s/atkey/atpos/ fix from NQP JVM.

Raku · Apr 13, 2013 · 08d0103 · 08d0103
1 parent 67270f7
commit 08d0103
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/src/HLL/Actions.pm b/src/HLL/Actions.pm
@@ -2,8 +2,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) {