diff options
Diffstat (limited to 'src/algebra/syntax.spad.pamphlet')
| -rw-r--r-- | src/algebra/syntax.spad.pamphlet | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/algebra/syntax.spad.pamphlet b/src/algebra/syntax.spad.pamphlet index 30de16df..ef4501ff 100644 --- a/src/algebra/syntax.spad.pamphlet +++ b/src/algebra/syntax.spad.pamphlet @@ -211,7 +211,7 @@ Syntax(): Public == Private where getOperator x == atom? x => userError "atom as operand to getOperator" - op: % := CAR(x)$Lisp + op: % := %head(x)$Foreign(Builtin) op case Identifier => op@Identifier op case Integer => op@Integer op case DoubleFloat => op@DoubleFloat @@ -223,7 +223,7 @@ Syntax(): Public == Private where getOperands x == atom? x => [] - CDR(x)$Lisp + %tail(x)$Foreign(Builtin) coerce(x: %): InputForm == x : InputForm |