/[gcl]/gcl/h/object.h
ViewVC logotype

Diff of /gcl/h/object.h

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.14 by camm, Sun Oct 27 21:06:42 2002 UTC revision 1.15 by camm, Sun Feb 9 22:35:15 2003 UTC
# Line 908  EXTER object MVloc[10]; Line 908  EXTER object MVloc[10];
908    if (n >= 65) FEerror("Too plong vl",0); \    if (n >= 65) FEerror("Too plong vl",0); \
909    for (i=0 ; i < (n); i++) new[i]=va_arg(vl,object);}    for (i=0 ; i < (n); i++) new[i]=va_arg(vl,object);}
910  #endif  #endif
911    
912    #ifdef DONT_COPY_VA_LIST
913    #error Cannot set DONT_COPY_VA_LIST in ANSI C
914    #else
915    #define COERCE_VA_LIST_NEW(new,fst,vl,n) \
916     object Xxvl[65]; \
917     {int i; \
918      new=Xxvl; \
919      if (n >= 65) FEerror("va_list too long",0); \
920      for (i=0 ; i < (n); i++) new[i]=i ? va_arg(vl,object) : fst;}
921    #endif
922    
923    
924    
925  #define make_si_vfun(s,f,min,max) \  #define make_si_vfun(s,f,min,max) \
926    make_si_vfun1(s,f,min | (max << 8))    make_si_vfun1(s,f,min | (max << 8))
927    
# Line 950  EXTER struct call_data fcall; Line 964  EXTER struct call_data fcall;
964  #define SGC_TOUCH(x)  #define SGC_TOUCH(x)
965  #endif  #endif
966    
967  object funcall_cfun();  object funcall_cfun(void(*)(),int,...);
968  object clear_compiler_properties();  object clear_compiler_properties();
969  EXTER object sSlambda_block_expanded;  EXTER object sSlambda_block_expanded;
970    

Legend:
Removed from v.1.14  
changed lines
  Added in v.1.15

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26