[svn:parrot] r38747 - branches/pmc_pct/compilers/pmcc/src

[bacek at svn.parrot.org]

Author: bacek
Date: Wed May 13 12:30:40 2009
New Revision: 38747
URL: https://trac.parrot.org/parrot/changeset/38747

Log:
Add couple of useful methods into builtins

Modified:
   branches/pmc_pct/compilers/pmcc/src/builtins.pir

Modified: branches/pmc_pct/compilers/pmcc/src/builtins.pir
==============================================================================
--- branches/pmc_pct/compilers/pmcc/src/builtins.pir	Wed May 13 12:30:18 2009	(r38746)
+++ branches/pmc_pct/compilers/pmcc/src/builtins.pir	Wed May 13 12:30:40 2009	(r38747)
@@ -30,6 +30,19 @@
     .return ($I0)
 .end
 
+.sub 'exists'
+    .param pmc where
+    .param pmc what
+    $I0 = exists where[what]
+    .return ($I0)
+.end
+
+.sub 'clone'
+    .param pmc what
+    $P0 = clone what
+    .return ($P0)
+.end
+
 # Local Variables:
 #   mode: pir
 #   fill-column: 100