diff options
| author | kr.angelov <kr.angelov@gmail.com> | 2013-06-27 09:39:15 +0000 |
|---|---|---|
| committer | kr.angelov <kr.angelov@gmail.com> | 2013-06-27 09:39:15 +0000 |
| commit | 155afdf9b76e37f4daed6d7d48dfd9e56844964f (patch) | |
| tree | 81a0ea3cd21dd64cf147c36949235751268b1b87 /src/runtime/c/pgf/printer.c | |
| parent | f4f76e46386e0888215eaf264e03e02a924dc7a7 (diff) | |
a complete Python API for reading, printing and manipulation of abstract trees and types. This includes dependent types, high-order abstract syntax and implicit arguments
Diffstat (limited to 'src/runtime/c/pgf/printer.c')
| -rw-r--r-- | src/runtime/c/pgf/printer.c | 14 |
1 files changed, 11 insertions, 3 deletions
diff --git a/src/runtime/c/pgf/printer.c b/src/runtime/c/pgf/printer.c index 4b91a011c..71ccda1f4 100644 --- a/src/runtime/c/pgf/printer.c +++ b/src/runtime/c/pgf/printer.c @@ -1,4 +1,5 @@ #include <pgf/data.h> +#include <stdlib.h> typedef struct { GuMapItor fn; @@ -33,11 +34,18 @@ pgf_print_cat(GuMapItor* fn, const void* key, void* value, gu_puts(" cat ", wtr, err); gu_string_write(name, wtr, err); + PgfPrintContext* ctxt = NULL; size_t n_hypos = gu_seq_length(cat->context); for (size_t i = 0; i < n_hypos; i++) { - PgfHypo* hypo = gu_seq_get(cat->context, PgfHypo*, i); + PgfHypo* hypo = gu_seq_index(cat->context, PgfHypo, i); gu_putc(' ', wtr, err); - pgf_print_hypo(hypo, 4, wtr, err); + ctxt = pgf_print_hypo(hypo, ctxt, 4, wtr, err); + } + + while (ctxt != NULL) { + PgfPrintContext* next = ctxt->next; + free(ctxt); + ctxt = next; } gu_printf(wtr, err, " ; -- %f\n",cat->meta_prob); @@ -55,7 +63,7 @@ pgf_print_absfun(GuMapItor* fn, const void* key, void* value, gu_puts(gu_seq_is_null(fun->defns) ? " data " : " fun ", wtr, err); gu_string_write(name, wtr, err); gu_puts(" : ", wtr, err); - pgf_print_type(fun->type, 0, wtr, err); + pgf_print_type(fun->type, NULL, 0, wtr, err); gu_printf(wtr, err, " ; -- %f\n", fun->ep.prob); } static void |