Scilab [trunk]: scilab/modules/core/src/c/csignal.c Source File

00001 /* Copyright INRIA/ENPC */
00002 
00003 #include "banier.h"
00004 #include "csignal.h"
00005 
00006 extern int C2F(sigbas)(); /*  __PARAMS((integer *));*/
00007 
00008 void controlC_handler (int sig)
00009 {
00010   int j = SIGINT;
00011   C2F(sigbas)(&j);
00012 }
00013 
00014 int C2F(csignal)(void)
00015 {
00016   signal (SIGINT, controlC_handler);
00017   return(0);
00018 }
00019