Author: fperrad
Date: Wed Jan  7 05:58:50 2009
New Revision: 35121

Modified:
   trunk/languages/m4/src/builtin.pir

Log:
[m4]
- fix deprecated opcodes : store/find_global

Modified: trunk/languages/m4/src/builtin.pir
==============================================================================
--- trunk/languages/m4/src/builtin.pir  (original)
+++ trunk/languages/m4/src/builtin.pir  Wed Jan  7 05:58:50 2009
@@ -814,7 +814,7 @@
   .local pmc exit_status_as_pmc
   exit_status_as_pmc = new 'Integer'
   exit_status_as_pmc  = exit_status
-  store_global 'exit_status', exit_status_as_pmc
+  set_global 'exit_status', exit_status_as_pmc
 
   .return ( '' )
 .end
@@ -832,7 +832,7 @@
 
   # Retrieve it as a global set by m4_sysval
   .local pmc exit_status_as_pmc
-  find_global exit_status_as_pmc, 'exit_status'
+  exit_status_as_pmc = get_global 'exit_status'
 
   .local string ret
   ret = exit_status_as_pmc

Reply via email to