summary refs log tree commit diff stats
path: root/rod/passaux.nim
diff options
context:
space:
mode:
Diffstat (limited to 'rod/passaux.nim')
-rwxr-xr-xrod/passaux.nim14
1 files changed, 5 insertions, 9 deletions
diff --git a/rod/passaux.nim b/rod/passaux.nim
index d687dba08..5df37c095 100755
--- a/rod/passaux.nim
+++ b/rod/passaux.nim
@@ -1,7 +1,7 @@
 #
 #
 #           The Nimrod Compiler
-#        (c) Copyright 2010 Andreas Rumpf
+#        (c) Copyright 2011 Andreas Rumpf
 #
 #    See the file "copying.txt", included in this
 #    distribution, for details about the copyright.
@@ -12,10 +12,6 @@
 import 
   strutils, ast, astalgo, passes, msgs, options
 
-proc verbosePass*(): TPass
-proc cleanupPass*(): TPass
-# implementation
-
 proc verboseOpen(s: PSym, filename: string): PPassContext = 
   #MessageOut('compiling ' + s.name.s);
   result = nil                # we don't need a context
@@ -24,9 +20,9 @@ proc verboseOpen(s: PSym, filename: string): PPassContext =
 proc verboseProcess(context: PPassContext, n: PNode): PNode = 
   result = n
   if context != nil: InternalError("logpass: context is not nil")
-  if gVerbosity == 3: liMessage(n.info, hintProcessing, $(ast.gid))
+  if gVerbosity == 3: Message(n.info, hintProcessing, $ast.gid)
   
-proc verbosePass(): TPass = 
+proc verbosePass*(): TPass = 
   initPass(result)
   result.open = verboseOpen
   result.process = verboseProcess
@@ -43,11 +39,11 @@ proc cleanUp(c: PPassContext, n: PNode): PNode =
     if (n.sons[namePos].kind == nkSym): 
       s = n.sons[namePos].sym
       if not (sfDeadCodeElim in getModule(s).flags) and not astNeeded(s): 
-        s.ast.sons[codePos] = nil # free the memory
+        s.ast.sons[codePos] = ast.emptyNode # free the memory
   else: 
     nil
 
-proc cleanupPass(): TPass = 
+proc cleanupPass*(): TPass = 
   initPass(result)
   result.process = cleanUp
   result.close = cleanUp