diff options
Diffstat (limited to 'src/targets/unblc.c')
| -rw-r--r-- | src/targets/unblc.c | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/src/targets/unblc.c b/src/targets/unblc.c index 7e6c6e6..1b59f7f 100644 --- a/src/targets/unblc.c +++ b/src/targets/unblc.c @@ -30,9 +30,7 @@ static void fprint_unblc(struct term *term, struct bloc_parsed *bloc, case REF: if (term->u.ref.index + 1 >= bloc->length) fatal("invalid ref index %ld\n", term->u.ref.index); - fprint_unblc( - bloc->entries[bloc->length - term->u.ref.index - 2], - bloc, file); + fprint_unblc(bloc->entries[term->u.ref.index], bloc, file); break; default: fatal("invalid type %d\n", term->type); |