aboutsummaryrefslogtreecommitdiff
path: root/src/interp/br-util.boot
diff options
context:
space:
mode:
Diffstat (limited to 'src/interp/br-util.boot')
-rw-r--r--src/interp/br-util.boot2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/br-util.boot b/src/interp/br-util.boot
index ca0e004d..8ab7c4ec 100644
--- a/src/interp/br-util.boot
+++ b/src/interp/br-util.boot
@@ -278,7 +278,7 @@ getConstructorForm name ==
name = 'Enumeration => '(Enumeration a b)
getConstructorFormFromDB name
-getConstructorArgs conname == CDR getConstructorForm conname
+getConstructorArgs conname == rest getConstructorForm conname
bcComments(comments,:options) ==
italics? := not IFCAR options