[svn:parrot] r35736 - trunk/examples/library

[email protected]
Newsgroups perl.cvs.parrot
Message-ID <[email protected]>
Author: coke
Date: Sun Jan 18 21:55:25 2009
New Revision: 35736

Modified:
   trunk/examples/library/pcre.pir

Log:
update opcode usage.



Modified: trunk/examples/library/pcre.pir
==============================================================================
--- trunk/examples/library/pcre.pir	(original)
+++ trunk/examples/library/pcre.pir	Sun Jan 18 21:55:25 2009
@@ -35,7 +35,7 @@
     .local pmc func
     .local pmc lib
 
-    func= find_global 'PCRE', 'init'
+    func= get_hll_global ['PCRE'], 'init'
     lib= func()
 
     .local string s
@@ -52,7 +52,7 @@
     .local string error
     .local int errptr
 
-    func= find_global 'PCRE', 'compile'
+    func= get_hll_global ['PCRE'], 'compile'
     ( regex, error, errptr )= func( pat, 0 )
 
     .local int is_regex_defined
@@ -62,7 +62,7 @@
     .local int ok
     .local pmc result
 
-    func= find_global 'PCRE', 'match'
+    func= get_hll_global ['PCRE'], 'match'
     ( ok, result )= func( regex, s, 0, 0 )
 
     if ok < 0 goto NOMATCH
@@ -73,7 +73,7 @@
     .local string match
 
 LP:
-    func= find_global 'PCRE', 'dollar'
+    func= get_hll_global ['PCRE'], 'dollar'
     match= func( s, ok, result, i )
     print match
     print "\n"
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.