Convert 'from' to 'p' (:p/:pos).

perl6 · Nov 22, 2009 · 19d5ef4 · 19d5ef4
1 parent c4b8abd
commit 19d5ef4
Show file tree

Hide file tree

Showing 3 changed files with 5 additions and 5 deletions.
diff --git a/build/PARROT_REVISION b/build/PARROT_REVISION
@@ -1 +1 @@
-42612
+42791
diff --git a/src/Regex/Cursor.pir b/src/Regex/Cursor.pir
@@ -225,7 +225,7 @@ Create a new cursor for matching C<target>.
 
 .sub '!cursor_init' :method
     .param string target
-    .param int from            :named('from') :optional
+    .param int pos             :named('p') :optional
 
     .local pmc parrotclass, cur
     $P0 = self.'HOW'()
@@ -236,9 +236,9 @@ Create a new cursor for matching C<target>.
     $P0 = target
     setattribute cur, '$!target', $P0
 
-    $P0 = box from
+    $P0 = box pos
     setattribute cur, '$!from', $P0
-    $P0 = box from
+    $P0 = box pos
     setattribute cur, '$!pos', $P0
 
     .return (cur)

diff --git a/src/cheats/hll-compiler.pir b/src/cheats/hll-compiler.pir
@@ -56,7 +56,7 @@
 
     .local int rxtrace
     rxtrace = options['parsetrace']
-    match = parsegrammar.'parse'(source, 'from'=>0, 'actions'=>parseactions, 'rxtrace'=>rxtrace)
+    match = parsegrammar.'parse'(source, 'p'=>0, 'actions'=>parseactions, 'rxtrace'=>rxtrace)
     unless match goto err_parsefail
     .return (match)