From 8ff47ff0b5ec12c9649155cd2132a65bafbc2292 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net> Date: Tue, 3 Feb 1998 10:11:35 -0800 Subject: [PATCH] oops, fix for the bugfix... Rev: src/object.c:1.38 --- src/object.c | 14 +++++++++++++- 1 file changed, 13 insertions(+), 1 deletion(-) diff --git a/src/object.c b/src/object.c index 6aa29efd68..0d76fa31f5 100644 --- a/src/object.c +++ b/src/object.c @@ -4,7 +4,7 @@ ||| See the files COPYING and DISCLAIMER for more information. \*/ #include "global.h" -RCSID("$Id: object.c,v 1.37 1998/02/03 05:29:27 hubbe Exp $"); +RCSID("$Id: object.c,v 1.38 1998/02/03 18:11:35 hubbe Exp $"); #include "object.h" #include "dynamic_buffer.h" #include "interpret.h" @@ -472,6 +472,10 @@ void object_index_no_free2(struct svalue *to, f=find_shared_string_identifier(index->u.string, p); break; + case T_LVALUE: + f=index->u.integer; + break; + default: error("Lookup on non-string value.\n"); } @@ -569,6 +573,10 @@ void object_set_index2(struct object *o, error("No such variable (%s) in object.\n", index->u.string->str); break; + case T_LVALUE: + f=index->u.integer; + break; + default: error("Lookup on non-string value.\n"); } @@ -664,6 +672,10 @@ union anything *object_get_item_ptr(struct object *o, f=find_shared_string_identifier(index->u.string, p); break; + case T_LVALUE: + f=index->u.integer; + break; + default: error("Lookup on non-string value.\n"); return 0; -- GitLab