aboutsummaryrefslogtreecommitdiff
path: root/src/interp/clammed.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/clammed.boot')
-rw-r--r--src/interp/clammed.boot4
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/clammed.boot b/src/interp/clammed.boot
index 9894f53b..eb3eda6d 100644
--- a/src/interp/clammed.boot
+++ b/src/interp/clammed.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
@@ -106,7 +106,7 @@ isValidType form ==
form = '(Complex (AlgebraicNumber)) => NIL
form is ['Expression, ['Kernel, . ]] => NIL
form is [op,:argl] =>
- null constructor? op => nil
+ not constructor? op => nil
cosig := getDualSignatureFromDB op
cosig and null rest cosig => -- niladic constructor
null argl => true