diff options
Diffstat (limited to 'src/interp/database.boot')
-rw-r--r-- | src/interp/database.boot | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/src/interp/database.boot b/src/interp/database.boot index afd2159e..92938d81 100644 --- a/src/interp/database.boot +++ b/src/interp/database.boot @@ -623,7 +623,7 @@ flattenSignatureList(x) == x is ['PROGN,:l] => ll:= [] for x in l repeat - x is ['SIGNATURE,:.] => ll:=cons(x,ll) + x is ['SIGNATURE,:.] => ll := [x,:ll] ll:= append(flattenSignatureList x,ll) ll nil |