[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.17 and 1.20

version 1.17, 2015/08/06 10:01:53 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.16 2005/10/24 08:26:42 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(__MINGW32__) || defined(__MINGW64__) || (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(__MINGW32__) || defined(__MINGW64__) || (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 399  V searchvar(char *str)
Line 399  V searchvar(char *str)
         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.17  
changed lines
  Added in v.1.20
FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>