From d888c5fcaa46266c338981c374b9cc4b697d0953 Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Tue, 4 Mar 1997 21:27:18 -0800
Subject: [PATCH] some bugs fixed (nonconstant constants)

Rev: lib/modules/Simulate.pmod:1.3
---
 lib/modules/Simulate.pmod | 32 ++++++++++++++++----------------
 1 file changed, 16 insertions(+), 16 deletions(-)

diff --git a/lib/modules/Simulate.pmod b/lib/modules/Simulate.pmod
index 5023cc845f..983bd0b374 100644
--- a/lib/modules/Simulate.pmod
+++ b/lib/modules/Simulate.pmod
@@ -51,21 +51,21 @@ string *map_regexp(string *s, string reg)
 }
 
 constant PI = 3.1415926535897932384626433832795080;
-constant all_efuns = all_constants;
-constant explode = `/;
-constant filter_array = filter;
-constant map_array = map;
-constant implode = `*;
-constant m_indices = indices;
-constant m_sizeof = sizeof;
-constant m_values = values;
-constant strstr = search;
-constant sum = `+;
-constant add_efun = add_constant;
-constant l_sizeof = sizeof;
-constant listp = multisetp;
-constant mklist = mkmultiset;
-constant aggregate_list = aggregate_multiset;
+function all_efuns = all_constants;
+function explode = `/;
+function filter_array = filter;
+function map_array = map;
+function implode = `*;
+function m_indices = indices;
+function m_sizeof = sizeof;
+function m_values = values;
+function strstr = search;
+function sum = `+;
+function add_efun = add_constant;
+function l_sizeof = sizeof;
+function listp = multisetp;
+function mklist = mkmultiset;
+function aggregate_list = aggregate_multiset;
 #if efun(gethostname)
-constant query_host_name=gethostname;
+function query_host_name=gethostname;
 #endif
-- 
GitLab