Diff for /rpl/src/interface_cas.cpp between versions 1.14 and 1.17

version 1.14, 2011/08/09 10:30:37 version 1.17, 2011/09/20 19:28:39
Line 1 Line 1
 /*  /*
 ================================================================================  ================================================================================
   RPL/2 (R) version 4.1.2    RPL/2 (R) version 4.1.3
   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 55  initialisation_contexte_cas(struct_proce Line 64  initialisation_contexte_cas(struct_proce
 void  void
 liberation_contexte_cas(struct_processus *s_etat_processus)  liberation_contexte_cas(struct_processus *s_etat_processus)
 {  {
     delete reinterpret_cast<giac::context *>(s_etat_processus->contexte_cas);      if (s_etat_processus->contexte_cas != NULL)
     s_etat_processus->contexte_cas = NULL;      {
   #       ifdef RPLCAS
           delete reinterpret_cast<giac::context *>(
                   s_etat_processus->contexte_cas);
   #       endif
           s_etat_processus->contexte_cas = NULL;
       }
   
     return;      return;
 }  }

Removed from v.1.14  
changed lines
  Added in v.1.17


CVSweb interface <joel.bertrand@systella.fr>