Diff for /rpl/src/interface_cas.cpp between versions 1.15 and 1.19

version 1.15, 2011/08/09 11:31:36 version 1.19, 2011/11/18 09:51:33
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.1.3    RPL/2 (R) version 4.1.4
   Copyright (C) 1989-2011 Dr. BERTRAND Joël    Copyright (C) 1989-2011 Dr. BERTRAND Joël
   
   This file is part of RPL/2.    This file is part of RPL/2.
Line 21 Line 21
   
   
 #ifdef RPLCAS  #ifdef RPLCAS
   
   // Giac inclut <semaphore.h> et définit sem_t. Or l'émulation
   // des IPCS POSIX requiert une redéfinition de sem_t.
   
   #   ifdef IPCS_SYSV
   //      NetBSD : _SEMAPHORE_H_
   #       define _SEMAPHORE_H_
   #   endif
   
 #   include "giac.h"  #   include "giac.h"
   
 #   undef PACKAGE  #   undef PACKAGE
Line 57  liberation_contexte_cas(struct_processus Line 66  liberation_contexte_cas(struct_processus
 {  {
     if (s_etat_processus->contexte_cas != NULL)      if (s_etat_processus->contexte_cas != NULL)
     {      {
   #       ifdef RPLCAS
         delete reinterpret_cast<giac::context *>(          delete reinterpret_cast<giac::context *>(
                 s_etat_processus->contexte_cas);                  s_etat_processus->contexte_cas);
   #       endif
         s_etat_processus->contexte_cas = NULL;          s_etat_processus->contexte_cas = NULL;
     }      }
   
     return;      return;
 }  }
   
   #ifdef RPLCAS
 static unsigned char *  static unsigned char *
 conversion_rpl_vers_cas(struct_processus *s_etat_processus,  conversion_rpl_vers_cas(struct_processus *s_etat_processus,
         struct_objet **s_objet)          struct_objet **s_objet)
Line 389  conversion_cas_vers_rpl(struct_processus Line 401  conversion_cas_vers_rpl(struct_processus
   
     return;      return;
 }  }
   #endif
   
   
 /*  /*

Removed from v.1.15  
changed lines
  Added in v.1.19


CVSweb interface <joel.bertrand@systella.fr>