diff options
Diffstat (limited to 'src/runtime/c/pgf/reader.c')
| -rw-r--r-- | src/runtime/c/pgf/reader.c | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/src/runtime/c/pgf/reader.c b/src/runtime/c/pgf/reader.c index c65b8b057..2e8c154be 100644 --- a/src/runtime/c/pgf/reader.c +++ b/src/runtime/c/pgf/reader.c @@ -442,7 +442,12 @@ pgf_read_absfun(PgfReader* rdr, PgfAbstr* abstr) switch (tag) { case 0: absfun->defns = NULL; - absfun->closure_id = 0; + if (absfun->arity == 0) { + absfun->closure.code = abstr->eval_gates->evaluate_value; + absfun->closure.con = &absfun->closure.code; + } else { + absfun->closure.code = NULL; + } break; case 1: { GuLength length = pgf_read_len(rdr); |