attempt int 3

AccelerateHS · Oct 30, 2024 · 24cc7d9 · 24cc7d9
1 parent 1de604e
commit 24cc7d9
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 1 deletion.
diff --git a/cbits/clock.c b/cbits/clock.c
@@ -143,6 +143,7 @@ double clock_gettime_elapsed_seconds(void)
 __attribute__((constructor)) void initialise_program_epoch(void)
 {
     printf("--- Entering initialise_program_epoch constructor ---\n");
+    __asm("int 3");
     __program_epoch = clock_gettime_monotonic_seconds();
 }
 
diff --git a/cbits/flags.c b/cbits/flags.c
@@ -218,7 +218,8 @@ static void parse_options(int argc, char *argv[])
  */
 __attribute__((constructor)) void process_options(int argc, char *argv[])
 {
-  printf("--- Entering process_options constructor ---\n");
+  printf("--- Entering process_options constructor 3 ---\n");
+  __asm("int 3");
 
   /* Find the command line options which need to be processed. These will be
    * between +ACC ... [-ACC] (similar to the Haskell RTS options).