Branch: Tag:

1995-11-05

1995-11-05 23:38:00 by Fredrik Hübinette (Hubbe) <hubbe@hubbe.net>

see changelog

Rev: lib/master.lpc:1.3
Rev: lib/simulate.lpc:1.3
Rev: src/Makefile.in:1.5
Rev: src/compilation.h:1.2
Rev: src/configure.in:1.3
Rev: src/docode.c:1.2
Rev: src/interpret.c:1.3
Rev: src/interpret.h:1.2
Rev: src/language.y:1.5
Rev: src/las.c:1.2
Rev: src/las.h:1.3
Rev: src/modules/files/file.c:1.5
Rev: src/object.c:1.2
Rev: src/opcodes.c:1.2
Rev: src/program.c:1.4
Rev: src/program.h:1.2
Rev: src/svalue.c:1.2
Rev: src/todo:1.3

1027:    return i;   }    - int store_constant(struct svalue *foo) + int store_constant(struct svalue *foo, int equal)   {    struct svalue *s,tmp;    unsigned int e;    s=(struct svalue *)areas[A_CONSTANTS].s.str; -  +     for(e=0;e<areas[A_CONSTANTS].s.len / sizeof(struct svalue);e++) -  if(is_equal(s+e,foo)) +  if(equal ? is_equal(s+e,foo) : is_eq(s+e,foo))    return e;       assign_svalue_no_free(&tmp,foo);
1116:    INT32 off,line,offset;    char *cnt;    -  if (prog == 0) return "Uknown program"; +  if (prog == 0) return "Unkown program";    offset = pc - prog->program;       if(prog == & fake_program)