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

[bacek at svn.parrot.org]

Author: bacek
Date: Tue Apr  7 21:32:17 2009
New Revision: 37955
URL: https://trac.parrot.org/parrot/changeset/37955

Log:
Simplify slightly packfile loading

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

Modified: branches/packfile_revamp/t/pmc/packfile.t
==============================================================================
--- branches/packfile_revamp/t/pmc/packfile.t	Tue Apr  7 21:31:37 2009	(r37954)
+++ branches/packfile_revamp/t/pmc/packfile.t	Tue Apr  7 21:32:17 2009	(r37955)
@@ -72,9 +72,8 @@
     #$S0  = interpinfo .INTERPINFO_RUNTIME_PREFIX
     #$S0 .= "/runtime/parrot/library/uuid.pbc"
     $S0 .= "t/native_pbc/integer_1.pbc"
-    $I0  = stat $S0, .STAT_FILESIZE
     pio  = open $S0, 'r'
-    $S0  = read pio, $I0
+    $S0  = pio.'readall'()
     close pio
     pf   = $S0
     .return(pf)