Commit 4a1bea89 authored by sof's avatar sof

[project @ 2001-07-23 23:08:41 by sof]

lex_demand: added a couple of missing cases for new demand type
parent fb40b8b1
......@@ -830,6 +830,8 @@ lex_demand cont buf =
'L'# -> read_em (Lazy : acc) (stepOn buf)
'A'# -> read_em (Abs : acc) (stepOn buf)
'V'# -> read_em (Eval : acc) (stepOn buf)
'X'# -> read_em (Err : acc) (stepOn buf)
'B'# -> read_em (Bot : acc) (stepOn buf)
')'# -> (reverse acc, stepOn buf)
'C'# -> do_call acc (stepOnBy# buf 2#)
'U'# -> do_unpack1 Drop Now acc (stepOnBy# buf 1#)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment