[BACK]Return to util.c CVS log [TXT][DIR] Up to [local] / OpenXM_contrib2 / asir2000 / parse

Diff for /OpenXM_contrib2/asir2000/parse/util.c between version 1.15 and 1.20

version 1.15, 2005/10/19 04:51:15 version 1.20, 2018/03/27 06:29:19
Line 45 
Line 45 
  * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,   * DEVELOPER SHALL HAVE NO LIABILITY IN CONNECTION WITH THE USE,
  * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.   * PERFORMANCE OR NON-PERFORMANCE OF THE SOFTWARE.
  *   *
  * $OpenXM: OpenXM_contrib2/asir2000/parse/util.c,v 1.14 2005/09/14 02:48:38 noro Exp $   * $OpenXM: OpenXM_contrib2/asir2000/parse/util.c,v 1.19 2017/02/07 08:30:31 noro Exp $
 */  */
 #include "ca.h"  #include "ca.h"
 #include "base.h"  #include "base.h"
 #include "parse.h"  #include "parse.h"
 #if defined(__GNUC__) || defined(VISUAL) || (defined(__MACH__) && defined(__ppc__)) || defined(__FreeBSD__)  #if defined(__GNUC__) || defined(VISUAL) || defined(__MINGW32__) || (defined(__MACH__) && defined(__ppc__)) || defined(__FreeBSD__)
 #include <stdarg.h>  #include <stdarg.h>
 #else  #else
 #include <varargs.h>  #include <varargs.h>
Line 291  int zp(P p)
Line 291  int zp(P p)
         return ( r );          return ( r );
 }  }
   
 #if defined(__GNUC__) || defined(VISUAL) || (defined(__MACH__) && defined(__ppc__)) || defined(__FreeBSD__)  #if defined(__GNUC__) || defined(VISUAL) || defined(__MINGW32__) || (defined(__MACH__) && defined(__ppc__)) || defined(__FreeBSD__)
 NODE mknode(int ac,...)  NODE mknode(int ac,...)
 {  {
         va_list ap;          va_list ap;
Line 393  V searchvar(char *str)
Line 393  V searchvar(char *str)
 {  {
         VL vl;          VL vl;
   
         for ( vl = CO; ;vl = NEXT(vl) )          for ( vl = CO; vl ;vl = NEXT(vl) )
                 if ( NAME(VR(vl)) && !strcmp(NAME(VR(vl)),str) )                  if ( NAME(VR(vl)) && !strcmp(NAME(VR(vl)),str) )
                         return VR(vl);                          return VR(vl);
         return 0;          return 0;
 }  }
   
   void update_LASTCO()
   {
     VL vl;
   
     for ( vl = CO; NEXT(vl); vl = NEXT(vl) );
     LASTCO = vl;
   }
   
 void makevar(char *str,P *p)  void makevar(char *str,P *p)
 {  {
         VL vl;          VL vl;
Line 415  void makevar(char *str,P *p)
Line 423  void makevar(char *str,P *p)
                         strcpy(NAME(v),str);                          strcpy(NAME(v),str);
                         NEWVL(NEXT(vl)); VR(NEXT(vl)) = v; NEXT(NEXT(vl)) = 0;                          NEWVL(NEXT(vl)); VR(NEXT(vl)) = v; NEXT(NEXT(vl)) = 0;
                         MKV(v,t); *p = t;                          MKV(v,t); *p = t;
                           LASTCO = NEXT(vl);
                         return;                          return;
                 } else                  } else
                         vl = NEXT(vl);                          vl = NEXT(vl);
Line 437  void makesrvar(FUNC f,P *p)
Line 446  void makesrvar(FUNC f,P *p)
                         NAME(v) = (char *)CALLOC(strlen(str)+1,sizeof(char));                          NAME(v) = (char *)CALLOC(strlen(str)+1,sizeof(char));
                         strcpy(NAME(v),str);                          strcpy(NAME(v),str);
                         NEWVL(NEXT(vl)); VR(NEXT(vl)) = v; NEXT(NEXT(vl)) = 0;                          NEWVL(NEXT(vl)); VR(NEXT(vl)) = v; NEXT(NEXT(vl)) = 0;
                           LASTCO = NEXT(vl);
                         MKV(v,t); *p = t;                          MKV(v,t); *p = t;
                         return;                          return;
                 } else                  } else
Line 474  void appendvar(VL vl,V v)
Line 484  void appendvar(VL vl,V v)
                         return;                          return;
                 else if ( !NEXT(vl) ) {                  else if ( !NEXT(vl) ) {
                         NEWVL(NEXT(vl)); VR(NEXT(vl)) = v; NEXT(NEXT(vl)) = 0;                          NEWVL(NEXT(vl)); VR(NEXT(vl)) = v; NEXT(NEXT(vl)) = 0;
                           LASTCO = NEXT(vl);
                         return;                          return;
                 } else                  } else
                         vl = NEXT(vl);                          vl = NEXT(vl);
 }  }
   
 void reallocarray(char **arrayp,int *sizep,int *indexp,int esize)  void asir_reallocarray(char **arrayp,int *sizep,int *indexp,int esize)
 {  {
         char *new;          char *new;
   
Legend:
Removed from v.1.15  
changed lines
  Added in v.1.20
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>