From e2420f68c0385899ea52ce8525a207d51c2a78ea Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Sun, 26 Apr 1998 04:44:24 -0700
Subject: [PATCH] (function)"string" no longer supported (never worked
anyway...)
Rev: src/opcodes.c:1.21
---
src/opcodes.c | 25 +------------------------
1 file changed, 1 insertion(+), 24 deletions(-)
diff --git a/src/opcodes.c b/src/opcodes.c
index 2253ce1e41..c266de1c89 100644
--- a/src/opcodes.c
+++ b/src/opcodes.c
@@ -22,7 +22,7 @@
#include "builtin_functions.h"
#include "module_support.h"
-RCSID("$Id: opcodes.c,v 1.20 1998/04/20 18:53:21 grubba Exp $");
+RCSID("$Id: opcodes.c,v 1.21 1998/04/26 11:44:24 hubbe Exp $");
void index_no_free(struct svalue *to,struct svalue *what,struct svalue *ind)
{
@@ -256,29 +256,6 @@ void o_cast(struct pike_string *type, INT32 run_time_type)
default:
error("Cannot cast that to a program.\n");
}
-
-
- case T_FUNCTION:
- {
- INT32 i;
- if(fp->current_object->prog)
- error("Cast to function in destructed object.\n");
- i=find_shared_string_identifier(sp[-1].u.string,fp->current_object->prog);
- free_string(sp[-1].u.string);
- /* FIXME, check that it is a indeed a function */
- if(i==-1)
- {
- sp[-1].type=T_FUNCTION;
- sp[-1].subtype=i;
- sp[-1].u.object=fp->current_object;
- add_ref(fp->current_object);
- }else{
- sp[-1].type=T_INT;
- sp[-1].subtype=NUMBER_UNDEFINED;
- sp[-1].u.integer=0;
- }
- break;
- }
}
}
--
GitLab