Diff for /rpl/src/rpl.c between versions 1.46 and 1.51

version 1.46, 2010/08/30 19:33:34 version 1.51, 2010/11/26 11:46:38
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.0.19    RPL/2 (R) version 4.0.20
   Copyright (C) 1989-2010 Dr. BERTRAND Joël    Copyright (C) 1989-2010 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
Line 23 Line 23
 #define  MAIN_RPL  #define  MAIN_RPL
 #include "rpl-conv.h"  #include "rpl-conv.h"
   
 #ifdef SEMAPHORES_SYSV  #ifdef IPCS_SYSV
 #ifndef OS2  #ifndef OS2
     unsigned char       *chemin_semaphores_SysV;      unsigned char       *chemin_semaphores_SysV;
 #endif  #endif
Line 240  rplinit(int argc, char *argv[], unsigned Line 240  rplinit(int argc, char *argv[], unsigned
     (*s_etat_processus).chemin_fichiers_temporaires =      (*s_etat_processus).chemin_fichiers_temporaires =
             recherche_chemin_fichiers_temporaires(s_etat_processus);              recherche_chemin_fichiers_temporaires(s_etat_processus);
   
 #   ifdef SEMAPHORES_SYSV  #   ifdef IPCS_SYSV
 #   ifndef OS2  #   ifndef OS2
     chemin_semaphores_SysV = (*s_etat_processus).chemin_fichiers_temporaires;      chemin_semaphores_SysV = (*s_etat_processus).chemin_fichiers_temporaires;
 #   endif  #   endif
Line 419  rplinit(int argc, char *argv[], unsigned Line 419  rplinit(int argc, char *argv[], unsigned
 #   else  #   else
     action.sa_handler = interruption1;      action.sa_handler = interruption1;
 #   endif  #   endif
     action.sa_flags = SA_ONSTACK | SA_SIGINFO;      action.sa_flags = SA_ONSTACK | SA_SIGINFO | SA_NODEFER;
   
     if (sigaction(SIGINT, &action, NULL) != 0)      if (sigaction(SIGINT, &action, NULL) != 0)
     {      {
Line 1599  rplinit(int argc, char *argv[], unsigned Line 1599  rplinit(int argc, char *argv[], unsigned
 #           else  #           else
             action.sa_handler = interruption10;              action.sa_handler = interruption10;
 #           endif  #           endif
             action.sa_flags = SA_ONSTACK | SA_SIGINFO;              action.sa_flags = SA_ONSTACK | SA_SIGINFO | SA_NODEFER;
   
             if (sigaction(SIGHUP, &action, NULL) != 0)              if (sigaction(SIGHUP, &action, NULL) != 0)
             {              {
Line 1819  rplinit(int argc, char *argv[], unsigned Line 1819  rplinit(int argc, char *argv[], unsigned
             (*s_etat_processus).autorisation_empilement_programme = 'N';              (*s_etat_processus).autorisation_empilement_programme = 'N';
             (*s_etat_processus).requete_arret = 'N';              (*s_etat_processus).requete_arret = 'N';
             (*s_etat_processus).evaluation_forcee = 'N';              (*s_etat_processus).evaluation_forcee = 'N';
               (*s_etat_processus).recherche_type = 'N';
   
             (*s_etat_processus).constante_symbolique = 'N';              (*s_etat_processus).constante_symbolique = 'N';
             (*s_etat_processus).traitement_symbolique = 'N';              (*s_etat_processus).traitement_symbolique = 'N';

Removed from v.1.46  
changed lines
  Added in v.1.51


CVSweb interface <joel.bertrand@systella.fr>