[svn:parrot] r38020 - branches/packfile_revamp/t/pmc

[bacek at svn.parrot.org]

Author: bacek
Date: Fri Apr 10 05:55:54 2009
New Revision: 38020
URL: https://trac.parrot.org/parrot/changeset/38020

Log:
Use packfile_constants.pasm instead of "magik constants" in packfileconstanttable.t.

Modified:
   branches/packfile_revamp/t/pmc/packfileconstanttable.t

Modified: branches/packfile_revamp/t/pmc/packfileconstanttable.t
==============================================================================
--- branches/packfile_revamp/t/pmc/packfileconstanttable.t	Fri Apr 10 05:33:39 2009	(r38019)
+++ branches/packfile_revamp/t/pmc/packfileconstanttable.t	Fri Apr 10 05:55:54 2009	(r38020)
@@ -24,6 +24,7 @@
 
 .sub 'main' :main
 .include 'test_more.pir'
+.include 'packfile_constants.pasm'
     'plan'(10)
 
     'test_sanity'()
@@ -65,11 +66,11 @@
     this    = 0
   loop:
     type = pftable.'get_type'(this)
-    eq type, 0x00, next
-    eq type, 0x6E, const_num
-    eq type, 0x73, const_str
-    eq type, 0x70, const_pmc
-    eq type, 0x6B, const_key
+    eq type, .PFC_NONE, next
+    eq type, .PFC_NUMBER, const_num
+    eq type, .PFC_STRING, const_str
+    eq type, .PFC_PMC, const_pmc
+    eq type, .PFC_KEY, const_key
     goto bad
   const_num:
     $N0 = pftable[this]