diff options
Diffstat (limited to 'src/interp/c-util.boot')
| -rw-r--r-- | src/interp/c-util.boot | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/src/interp/c-util.boot b/src/interp/c-util.boot index 4a28c92d..2c66f487 100644 --- a/src/interp/c-util.boot +++ b/src/interp/c-util.boot @@ -199,6 +199,12 @@ macro dbEntityCount db == macro dbLibstream db == cdOutput dbCompilerData db +macro dbCodeStream db == + libCodeStream dbLibstream db + +macro dbInsnStream db == + libInsnStream dbLibstream db + ++ Return the existential substitution of `db'. dbQuerySubst db == x := dbImplicitData db => first x @@ -1308,9 +1314,6 @@ clearReplacement name == property(name,"SPADreplace") := nil property(name,'%redex) := nil -printBackendStmt(db,stmt) == - printBackendDecl stmt - evalAndPrintBackendStmt(db,stmt) == eval stmt printBackendStmt(db,stmt) |