diff options
Diffstat (limited to 'src/interp/as.boot')
| -rw-r--r-- | src/interp/as.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/as.boot b/src/interp/as.boot index 15242412..68e0b01f 100644 --- a/src/interp/as.boot +++ b/src/interp/as.boot @@ -1012,7 +1012,7 @@ asyCattranOp1(op, item, predlist) == asyPredTran p == asyPredTran1 asyJoinPart p asyPredTran1 p == - p is ['Has,x,y] => ['has,x, simpCattran y] + p is ['Has,x,y] => ["has",x, simpCattran y] p is ['Test, q] => asyPredTran1 q p is [op,:r] and MEMQ(op,'(AND OR NOT)) => [op,:[asyPredTran1 q for q in r]] |