Branch: Tag:

1999-03-04

1999-03-04 06:05:14 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

::`() and ::`-> implemented

Rev: src/language.yacc:1.112
Rev: src/las.c:1.76
Rev: src/las.h:1.19
Rev: src/main.c:1.65
Rev: src/object.c:1.58
Rev: src/object.h:1.24
Rev: src/program.c:1.113
Rev: src/stralloc.c:1.56
Rev: src/stralloc.h:1.34
Rev: src/testsuite.in:1.153

4:   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: las.c,v 1.75 1999/03/02 03:13:21 hubbe Exp $"); + RCSID("$Id: las.c,v 1.76 1999/03/04 06:05:01 hubbe Exp $");      #include "language.h"   #include "interpret.h"
475:    return res;   }    +  + node *mkprgnode(struct program *p) + { +  struct svalue s; +  s.u.program=p; +  s.type=T_PROGRAM; +  return mkconstantsvaluenode(&s); + } +    node *mkapplynode(node *func,node *args)   {    return mknode(F_APPLY, func, args);