diff options
Diffstat (limited to 'src/interp/functor.boot')
-rw-r--r-- | src/interp/functor.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/functor.boot b/src/interp/functor.boot index 8c6fc79c..be229149 100644 --- a/src/interp/functor.boot +++ b/src/interp/functor.boot @@ -284,7 +284,7 @@ optFunctorBody x == first pred="HasCategory" => nil ['%when,:l] ['%when,:l] - [optFunctorBody u for u in x] + [optFunctorBody first x,:optFunctorBody rest x] optFunctorBodyQuotable u == u = nil or integer? u or string? u => true |