Changes in doc/theses/andrew_beach_MMath/code/resume-empty.cfa [54651005:18783b4]

File:

• doc/theses/andrew_beach_MMath/code/resume-empty.cfa (modified) (3 diffs)

doc/theses/andrew_beach_MMath/code/resume-empty.cfa

@@ -3 +3 @@
 #include <exception.hfa>
 #include <fstream.hfa>
-#include <stdlib.hfa>
+#include <stdlib.hfa>                                                                   // strto
 
-EHM_EXCEPTION(empty_exception)();
+exception empty_exception;
+vtable(empty_exception) empty_vt;
 
-EHM_VIRTUAL_TABLE(empty_exception, empty_vt);
-
-void unwind_empty(unsigned int frames) {
+void nounwind_empty(unsigned int frames) {
         if (frames) {
-                unwind_empty(frames - 1);
+                nounwind_empty(frames - 1);
+                if ( frames == -1 ) printf( "42" );                             // prevent recursion optimizations
         } else {
                 throwResume (empty_exception){&empty_vt};
@@ -21 +21 @@
         unsigned int total_frames = 1;
         if (1 < argc) {
-                times = strtol(argv[1], 0p, 10);
+                times = strto(argv[1], 0p, 10);
         }
         if (2 < argc) {
-                total_frames = strtol(argv[2], 0p, 10);
+                total_frames = strto(argv[2], 0p, 10);
         }
 
         Time start_time = timeHiRes();
-        for (int count = 0 ; count < times ; ++count) {
+        for (unsigned int count = 0 ; count < times ; ++count) {
                 try {
-                        unwind_empty(total_frames);
+                        nounwind_empty(total_frames);
                 } catchResume (empty_exception *) {
                         asm volatile ("# fixup block");
@@ -36 +36 @@
         }
         Time end_time = timeHiRes();
-        sout | "Run-Time (ns): " | (end_time - start_time)`ns;
+        sout | "Run-Time (s): " | wd(0,1, (end_time - start_time)`ns / 1_000_000_000.);
 }