--- rpl/src/rpl.h 2015/01/30 07:53:15 1.261 +++ rpl/src/rpl.h 2015/03/11 11:28:21 1.268 @@ -1,6 +1,6 @@ /* ================================================================================ - RPL/2 (R) version 4.1.20 + RPL/2 (R) version 4.1.21 Copyright (C) 1989-2015 Dr. BERTRAND Joël This file is part of RPL/2. @@ -38,6 +38,10 @@ # ifdef OpenBSD # define _BSD_SOURCE # endif + +# ifdef FreeBSD +# define __BSD_VISIBLE 1 +# endif #endif #ifdef OS2 @@ -212,7 +216,6 @@ # undef HAVE_STACK_OVERFLOW_RECOVERY # endif -# define HAVE_INLINE # define GSL_RANGE_CHECK_OFF # include "gsl/gsl_cdf.h" # include "gsl/gsl_cblas.h" @@ -2392,14 +2395,14 @@ typedef struct processus integer8 taille_pile_objets; struct_objet *pile_objets; -# define TAILLE_CACHE 1024 +# define TAILLE_CACHE 1024 # define CACHE(type, nom) \ type *objets_##nom[TAILLE_CACHE]; \ - int pointeur_##nom; + volatile int pointeur_##nom; # define CACHE2(type, nom) \ type *nom[TAILLE_CACHE]; \ - int pointeur_##nom; + volatile int pointeur_##nom; CACHE(integer8, adr) CACHE(logical8, bin)