Ignore:
Timestamp:
Sep 7, 2021, 9:59:12 AM (3 years ago)
Author:
Andrew Beach <ajbeach@…>
Branches:
ADT, ast-experimental, 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:
1 edited

Legend:

Unmodified
Added
Removed
  • doc/theses/andrew_beach_MMath/code/fixup-other-f.cfa

    r49b3389 r812ba3d  
    22#include <clock.hfa>
    33#include <fstream.hfa>
    4 #include <stdlib.hfa>                                                                   // strto
     4#include <stdlib.hfa>
    55
    6 unsigned int frames;                                                                    // use global because of gcc thunk problem
     6// Using a global value to allow hoisting (and avoid thunks).
     7unsigned int frames;
    78
    89void nounwind_fixup(unsigned int dummy, void (*raised_rtn)(int &), void (*not_raised_rtn)(int &)) {
    910        void not_raised(int & fixup) {
    10                 fixup = frames + 42;                                                    // use local scope => lexical link
     11                fixup = frames + 42;
    1112        }
    1213
     
    1415                frames -= 1;
    1516                nounwind_fixup(42, raised_rtn, not_raised);
    16                 if ( frames == -1 ) printf( "42" );                             // prevent recursion optimizations
     17                // Always false, but prevents recursion elimination.
     18                if (-1 == frames) printf("~");
    1719        } else {
    1820                int fixup = dummy;
     
    3234        frames = total_frames;
    3335
     36        // Closures at the top level are allowed to be true closures.
    3437        void raised(int & fixup) {
    35                 fixup = total_frames + 42;                                              // use local scope => lexical link
     38                fixup = total_frames + 42;
    3639        }
    3740        void not_raised(int & fixup) {
    38                 fixup = total_frames + 42;                                              // use local scope => lexical link
     41                fixup = total_frames + 42;
    3942        }
    4043
Note: See TracChangeset for help on using the changeset viewer.