* Some fixes to the runtime system.

modified:
  bin/ikarus
  bin/ikarus-fasl.c
  bin/ikarus-main.c
  bin/ikarus-runtime.c
  src/ikarus.boot

bin/ikarus-fasl.c

@@ -182,7 +182,7 @@ ik_relocate_code(ikp code){
         fprintf(stderr, "foreign name is not a bytevector\n");
         exit(-1);
       }
-      dlerror(); 
+      dlerror();
       void* sym = dlsym(RTLD_DEFAULT, name);
       char* err = dlerror();
       if(err){

bin/ikarus-main.c

@@ -189,8 +189,7 @@ int main(int argc, char** argv){
          struct sigaction * restrict oact);
 #endif
 
-//void handler(int signo, struct __siginfo* info, void* uap){
-void handler(int signo, siginfo_t* info, void* uap){
+void handler(int signo, struct __siginfo* info, void* uap){
   the_pcb->engine_counter = -1;
   the_pcb->interrupted = 1;
 }
@@ -200,7 +199,7 @@ register_handlers(){
   struct sigaction sa;
   sa.sa_sigaction = handler;
   sa.sa_flags = SA_SIGINFO | SA_ONSTACK;
-  sa.sa_mask = 0;
+  sigemptyset(&sa.sa_mask);
   int err = sigaction(SIGINT, &sa, 0);
   if(err){
     fprintf(stderr, "Sigaction Failed: %s\n", strerror(errno));

bin/ikarus-runtime.c

@@ -15,8 +15,6 @@
 #include <sys/resource.h>
 #include <sys/wait.h>
 
-#include <uuid/uuid.h>
-
 int total_allocated_pages = 0;
          
 extern char **environ;