[svn:parrot] r37581 - trunk/t/compilers/imcc/syn

[coke at svn.parrot.org]

Author: coke
Date: Thu Mar 19 05:07:27 2009
New Revision: 37581
URL: https://trac.parrot.org/parrot/changeset/37581

Log:
Remove instance of DEPRECATED HLL_map.

Modified:
   trunk/t/compilers/imcc/syn/hll.t

Modified: trunk/t/compilers/imcc/syn/hll.t
==============================================================================
--- trunk/t/compilers/imcc/syn/hll.t	Thu Mar 19 05:03:20 2009	(r37580)
+++ trunk/t/compilers/imcc/syn/hll.t	Thu Mar 19 05:07:27 2009	(r37581)
@@ -12,7 +12,14 @@
 pir_output_is( <<'CODE', <<'OUT', ".param :slurpy (using PMC)" );
 
 .HLL 'misc'
-.HLL_map 'ResizablePMCArray' = 'ResizableStringArray'
+.sub anon :anon :init
+  .local pmc interp
+  .local pmc rpa,rsa
+  interp = getinterp
+  rpa = get_class 'ResizablePMCArray'
+  rsa = get_class 'ResizableStringArray'
+  interp.'hll_map'(rpa,rsa)
+.end
 
 .sub main :main
   elm('a','b','c')
@@ -44,6 +51,15 @@
 
 .HLL 'misc'
 .HLL_map 'ResizablePMCArray' = 'Stack'
+.sub anon :anon :init
+  .local pmc interp
+  .local pmc rpa,stack
+  interp = getinterp
+  rpa = get_class 'ResizablePMCArray'
+  stack = get_class 'Stack'
+  interp.'hll_map'(rpa,stack)
+.end
+
 
 .sub main :main
   elm('a','b','c')