Changeset df5b2c8 for src/ControlStruct/ExceptDecl.cc

Timestamp:

Aug 4, 2021, 1:24:51 PM (3 years ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

ADT, ast-experimental, enum, forall-pointer-decay, jacob/cs343-translation, master, new-ast-unique-expr, pthread-emulation, qualifiedEnum

Children:

5541ea3d

Parents:

1e567ab (diff), da602aec (diff)
Note: this is a merge changeset, the changes displayed below correspond to the merge itself.
Use the (diff) links above to see all the changes relative to each parent.

Message:

Merge branch 'master' of plg.uwaterloo.ca:software/cfa/cfa-cc

File:

• src/ControlStruct/ExceptDecl.cc (modified) (3 diffs)

src/ControlStruct/ExceptDecl.cc

@@ -10 +10 @@
 // Created On       : Tue Jul 20 04:10:50 2021
 // Last Modified By : Henry Xue
-// Last Modified On : Mon Jul 26 12:55:28 2021
-// Update Count     : 3
+// Last Modified On : Tue Aug 03 10:42:26 2021
+// Update Count     : 4
 //
 
@@ -278 +278 @@
         cloneAll( forallClause, structDecl->parameters );
         return structDecl;
+}
+
+ObjectDecl * ehmTypeIdExtern(
+        const std::string & exceptionName,
+        const std::list< Expression *> & parameters
+) {
+        StructInstType * typeIdType = new StructInstType(
+                Type::Const,
+                Virtual::typeIdType( exceptionName )
+        );
+        cloneAll( parameters, typeIdType->parameters );
+        return new ObjectDecl(
+                Virtual::typeIdName( exceptionName ),
+                Type::Extern,
+                LinkageSpec::Cforall,
+                nullptr,
+                typeIdType,
+                nullptr,
+                { new Attribute( "cfa_linkonce" ) }
+        );
 }
 
@@ -421 +441 @@
 
                 if ( objectDecl->get_storageClasses().is_extern ) { // if extern
+                        if ( !parameters.empty() ) { // forall variant
+                                declsToAddBefore.push_back( ehmTypeIdExtern( exceptionName, parameters ) );
+                        }
                         return ehmExternVtable( exceptionName, parameters, tableName );
                 }