diff options
Diffstat (limited to 'byterun/parsing.c')
| -rw-r--r-- | byterun/parsing.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/byterun/parsing.c b/byterun/parsing.c index 1be57adfe..ea470c2ca 100644 --- a/byterun/parsing.c +++ b/byterun/parsing.c @@ -138,7 +138,7 @@ value parse_engine(tables, env, cmd, arg) /* ML */ modify(&env->lval, Field(arg, 0)); } else { env->curr_char = Field(tables->transl_const, Int_val(arg)); - env->lval = Val_long(0); + modify(&env->lval, Val_long(0)); } Trace(printf("Token %d (0x%lx)\n", Int_val(env->curr_char), env->lval)); |