Fix an atkey that shoulda been an atpos.

jnthn · Feb 27, 2013 · e556c3d · e556c3d
1 parent 289ad59
commit e556c3d
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/nqp-src/NQPHLL.pm b/nqp-src/NQPHLL.pm
@@ -638,8 +638,8 @@ class HLL::Actions {
     our sub string_to_int($src, $base) {
         my $res := nqp::radix($base, $src, 0, 2);
         $src.CURSOR.panic("'$src' is not a valid number")
-            unless nqp::atkey($res, 2) == nqp::chars($src);
-        nqp::atkey($res, 0);
+            unless nqp::atpos($res, 2) == nqp::chars($src);
+        nqp::atpos($res, 0);
     }
 
     method ints_to_string($ints) {