diff options
Diffstat (limited to 'src/interp/ptrees.boot')
-rw-r--r-- | src/interp/ptrees.boot | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/interp/ptrees.boot b/src/interp/ptrees.boot index b6ab6e37..d2849527 100644 --- a/src/interp/ptrees.boot +++ b/src/interp/ptrees.boot @@ -342,8 +342,8 @@ pfApplicationArg pf == CADDR pf -- was ==> -- Tuple := (Parts: [Expr]) pfTupleListOf(pfparts) == pfTuple pfListOf pfparts -pfTuple(pfparts) == pfTree('Tuple, [pfparts]) -pfTuple?(pf) == pfAbSynOp? (pf, 'Tuple) +pfTuple(pfparts) == pfTree("tuple", [pfparts]) +pfTuple?(pf) == pfAbSynOp? (pf, "tuple") pfTupleParts pf == CADR pf -- was ==> pf0TupleParts pf == pfParts pfTupleParts pf |