Migrate Sub.add_directive to Sub.pm

parrot · Jan 8, 2011 · 18a500f · 18a500f
1 parent 9fdc791
commit 18a500f
Show file tree

Hide file tree

Showing 3 changed files with 140 additions and 142 deletions.
diff --git a/compilers/pct/src/POST/Node.pir b/compilers/pct/src/POST/Node.pir
@@ -201,19 +201,6 @@ Get/set the opcode type for this node.
 .end
 
 
-.sub 'add_directive' :method
-    .param string line
-    .local string dlist
-    dlist = self['directives']
-    $I0 = index dlist, line
-    unless $I0 < 0 goto done
-    dlist = concat dlist, line
-    dlist = concat dlist, "\n"
-    self['directives'] = dlist
-  done:
-    .return ()
-.end
-
 .namespace []
 .include 'compilers/pct/src/POST/Call.pir'
 .include 'compilers/pct/src/POST/Value.pir'