aboutsummaryrefslogtreecommitdiff
path: root/src/interp/slam.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/slam.boot')
-rw-r--r--src/interp/slam.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/slam.boot b/src/interp/slam.boot
index cc71b84b..3adb29c9 100644
--- a/src/interp/slam.boot
+++ b/src/interp/slam.boot
@@ -1,6 +1,6 @@
-- Copyright (c) 1991-2002, The Numerical Algorithms Group Ltd.
-- All rights reserved.
--- Copyright (C) 2007-2010, Gabriel Dos Reis.
+-- Copyright (C) 2007-2011, Gabriel Dos Reis.
-- All rights reserved.
--
-- Redistribution and use in source and binary forms, with or without
@@ -156,7 +156,7 @@ reportFunctionCompilation(op,nam,argl,body,isRecursive) ==
compileInteractive [nam,["LAMBDA",parms,body]]
nam
num :=
- FIXP cacheCount =>
+ integer? cacheCount =>
cacheCount < 1 =>
keyedSystemError("S2IM0019",[cacheCount,op])
cacheCount