[svn:parrot] r33600 - trunk/languages/m4/src

Author: bernhard
Date: Sun Dec  7 04:49:46 2008
New Revision: 33600

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

Log:
[m4] Make m4 work again, by using the simple syntax for calling indirect functions


Modified: trunk/languages/m4/src/macro.pir
==============================================================================
--- trunk/languages/m4/src/macro.pir	(original)
+++ trunk/languages/m4/src/macro.pir	Sun Dec  7 04:49:46 2008
@@ -178,14 +178,7 @@
 TOKEN_FUNC:
   .local pmc func
   func = symbol['func']
-  # indirect call of subs, seems to need elaborate PIR syntax
-  .begin_call
-    .set_arg state
-    .set_arg arguments
-  .call func
-    ret_func_1:
-    .result text
-  .end_call
+  (text) = func( state, arguments )
 
 FINISH_CALL_MACRO:
   .return ( text )

• [svn:parrot] r33600 - trunk/languages/m4/src by bernhard