Branch: Tag:

1996-12-05

1996-12-05 03:23:48 by Per Hedbor <ph@opera.com>

Made 0->Foo return special error message

Rev: src/ChangeLog:1.33
Rev: src/interpret.c:1.16

4:   ||| See the files COPYING and DISCLAIMER for more information.   \*/   #include "global.h" - RCSID("$Id: interpret.c,v 1.15 1996/12/03 21:41:18 hubbe Exp $"); + RCSID("$Id: interpret.c,v 1.16 1996/12/05 03:23:48 per Exp $");   #include "interpret.h"   #include "object.h"   #include "program.h"
192:    break;       default: +  if(IS_ZERO(lval)) +  error("Indexing the NULL value.\n"); /* Per */ +  else    error("Indexing a basic type.\n");    }   }
228:    break;       default: +  if(IS_ZERO(lval)) +  error("Indexing the NULL value.\n"); /* Per */ +  else    error("Indexing a basic type.\n");    }   }
256:    case T_MULTISET: return 0;       default: +  if(IS_ZERO(lval)) +  error("Indexing the NULL value.\n"); /* Per */ +  else    error("Indexing a basic type.\n");    return 0;    }