summaryrefslogtreecommitdiff
path: root/src/spiglet/spiglet2kanga/SpgProc.java
diff options
context:
space:
mode:
Diffstat (limited to 'src/spiglet/spiglet2kanga/SpgProc.java')
-rw-r--r--src/spiglet/spiglet2kanga/SpgProc.java10
1 files changed, 10 insertions, 0 deletions
diff --git a/src/spiglet/spiglet2kanga/SpgProc.java b/src/spiglet/spiglet2kanga/SpgProc.java
index 5d62dfa..c4d6e5f 100644
--- a/src/spiglet/spiglet2kanga/SpgProc.java
+++ b/src/spiglet/spiglet2kanga/SpgProc.java
@@ -21,4 +21,14 @@ public class SpgProc extends SpgSym {
statements.addElement(s);
}
+ public void printProc() {
+ System.err.println(name + "[" + argCount + "]");
+ for (int i=0; i<statements.size(); i++) {
+ System.err.println(statements.elementAt(i).toString());
+ }
+ if (retexp!=null) {
+ System.err.println("RETURN " + retexp.toString());
+ }
+ System.err.println();
+ }
}