GitHub/gf-core
1
0
Fork 1
mirror of https://github.com/GrammaticalFramework/gf-core.git synced 2026-05-09 03:02:50 -06:00
Code Issues Packages Projects Releases Wiki Activity

added showContext

Browse Source
This commit is contained in:
krangelov
2021-09-14 19:10:01 +02:00
parent 3675e5cfc6
commit a7bf47cb87
6 changed files with 51 additions and 18 deletions
Download Patch File Download Diff File Expand all files Collapse all files

38
src/runtime/c/pgf/printer.cxx
View File

@@ -380,6 +380,26 @@ PgfLiteral PgfPrinter::lstr(PgfText *v)
return 0;
}
void PgfPrinter::hypo(PgfTypeHypo *hypo)
{
if (textcmp(hypo->cid, &wildcard) == 0) {
prio = 1;
m->match_type(this, hypo->type);
} else {
push_variable(hypo->cid);
puts("(");
if (hypo->bind_type == PGF_BIND_TYPE_IMPLICIT)
puts("{");
puts(&ctxt->name);
if (hypo->bind_type == PGF_BIND_TYPE_IMPLICIT)
puts("}");
puts(" : ");
m->match_type(this, hypo->type);
puts(")");
}
}
PgfType PgfPrinter::dtyp(size_t n_hypos, PgfTypeHypo *hypos,
PgfText *cat,
size_t n_exprs, PgfExpr *exprs)
@@ -391,23 +411,7 @@ PgfType PgfPrinter::dtyp(size_t n_hypos, PgfTypeHypo *hypos,
PgfPrintContext *save_ctxt = ctxt;
for (int i = 0; i < n_hypos; i++) {
if (textcmp(hypos[i].cid, &wildcard) == 0) {
prio = 1;
m->match_type(this, hypos[i].type);
} else {
push_variable(hypos[i].cid);
puts("(");
if (hypos[i].bind_type == PGF_BIND_TYPE_IMPLICIT)
puts("{");
puts(&ctxt->name);
if (hypos[i].bind_type == PGF_BIND_TYPE_IMPLICIT)
puts("}");
puts(" : ");
m->match_type(this, hypos[i].type);
puts(")");
}
hypo(&hypos[i]);
puts(" -> ");
}