Changeset 812ba3d for doc/theses/andrew_beach_MMath/code/fixup-other-r.cfa

Timestamp:

Sep 7, 2021, 9:59:12 AM (19 months ago)

Author:

Andrew Beach <ajbeach@…>

Branches:

enum, forall-pointer-decay, master, pthread-emulation, qualifiedEnum

Children:

2bfee8e

Parents:

49b3389

Message:

Some clean-up to make Peter's changes to the exception benchmarks fit in better. And make test.sh a bit more robust.

File:

• doc/theses/andrew_beach_MMath/code/fixup-other-r.cfa (modified) (3 diffs)

doc/theses/andrew_beach_MMath/code/fixup-other-r.cfa

@@ -3 +3 @@
 #include <exception.hfa>
 #include <fstream.hfa>
-#include <stdlib.hfa>                                                                   // strto
+#include <stdlib.hfa>
 
 exception fixup_exception {
@@ -13 +13 @@
 };
 
-unsigned int frames;                                                                    // use global because of gcc thunk problem
+// Using a global value to allow hoisting (and avoid thunks).
+unsigned int frames;
 
 void nounwind_other(unsigned int dummy) {
@@ -20 +21 @@
                 try {
                         nounwind_other(42);
-                        if ( frames == -1 ) printf( "42" );                     // prevent recursion optimizations
+                        // Always false, but prevents recursion elimination.
+                        if (-1 == frames) printf("~");
                 } catchResume (not_raised_exception * ex) {
-                        ex->fixup = frames + 42;                                        // use local scope => lexical link
+                        ex->fixup = frames + 42;
                 }
         } else {
                 int fixup = dummy;
-                throwResume (fixup_exception){&fixup_vt, fixup}; // change bad fixup
+                throwResume (fixup_exception){&fixup_vt, fixup};
         }
 }