- Bugfix for dot output.
This commit is contained in:
parent
3241c0c828
commit
f11f1fff0b
@ -184,7 +184,7 @@ chooseTermNode (const Term t)
|
|||||||
|
|
||||||
rsbuf = RUNSEP;
|
rsbuf = RUNSEP;
|
||||||
RUNSEP = "x";
|
RUNSEP = "x";
|
||||||
termPrintRemap (t);
|
termPrint (t);
|
||||||
RUNSEP = rsbuf;
|
RUNSEP = rsbuf;
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
@ -598,7 +598,7 @@ drawClass (const System sys, Binding b)
|
|||||||
// not seen before: choose class
|
// not seen before: choose class
|
||||||
eprintf ("\t");
|
eprintf ("\t");
|
||||||
chooseTermNode (varterm);
|
chooseTermNode (varterm);
|
||||||
eprintf (" [label=\"Class:\\nAny ");
|
eprintf (" [label=\"Any ");
|
||||||
termPrintRemap (varterm);
|
termPrintRemap (varterm);
|
||||||
eprintf ("\"];\n");
|
eprintf ("\"];\n");
|
||||||
eprintf ("\t");
|
eprintf ("\t");
|
||||||
|
Loading…
Reference in New Issue
Block a user