From 2ff960b3ab4daa09084f84b72711a42b5d86eab0 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Henrik=20Grubbstr=C3=B6m=20=28Grubba=29?=
<grubba@grubba.org>
Date: Thu, 31 Aug 2000 16:43:00 +0200
Subject: [PATCH] Changed a few ADD_FUNCTION() to ADD_FUNCTION2().
Rev: src/operators.c:1.101
---
src/operators.c | 8 +++++---
1 file changed, 5 insertions(+), 3 deletions(-)
diff --git a/src/operators.c b/src/operators.c
index afdedfcf7e..e93350b3ce 100644
--- a/src/operators.c
+++ b/src/operators.c
@@ -6,7 +6,7 @@
/**/
#include "global.h"
#include <math.h>
-RCSID("$Id: operators.c,v 1.100 2000/08/17 19:07:13 grubba Exp $");
+RCSID("$Id: operators.c,v 1.101 2000/08/31 14:43:00 grubba Exp $");
#include "interpret.h"
#include "svalue.h"
#include "multiset.h"
@@ -2749,9 +2749,11 @@ multiset & mapping -> mapping
start_new_program();
ADD_STORAGE(struct string_assignment_storage);
/* function(int:int) */
- ADD_FUNCTION("`[]",f_string_assignment_index,tFunc(tInt,tInt),0);
+ ADD_FUNCTION2("`[]", f_string_assignment_index, tFunc(tInt,tInt), 0,
+ OPT_EXTERNAL_DEPEND);
/* function(int,int:int) */
- ADD_FUNCTION("`[]=",f_string_assignment_assign_index,tFunc(tInt tInt,tInt),0);
+ ADD_FUNCTION2("`[]=", f_string_assignment_assign_index,
+ tFunc(tInt tInt,tInt), 0, OPT_SIDE_EFFECT);
set_init_callback(init_string_assignment_storage);
set_exit_callback(exit_string_assignment_storage);
string_assignment_program=end_program();
--
GitLab