develooper Front page | perl.cvs.parrot | Postings from December 2008

[svn:parrot] r34057 - branches/main/compilers/pct/src/PCT

From:
pmichaud
Date:
December 17, 2008 19:35
Subject:
[svn:parrot] r34057 - branches/main/compilers/pct/src/PCT
Message ID:
20081218033539.D0453CBA12@x12.develooper.com
Author: pmichaud
Date: Wed Dec 17 19:35:38 2008
New Revision: 34057

Modified:
   branches/main/compilers/pct/src/PCT/HLLCompiler.pir

Log:
[pct]:  'evalfiles' should pass command line arguments to 'eval'.


Modified: branches/main/compilers/pct/src/PCT/HLLCompiler.pir
==============================================================================
--- branches/main/compilers/pct/src/PCT/HLLCompiler.pir	(original)
+++ branches/main/compilers/pct/src/PCT/HLLCompiler.pir	Wed Dec 17 19:35:38 2008
@@ -666,7 +666,7 @@
     close ifh
     goto iter_loop
   iter_end:
-    $P0 = self.'eval'(code, adverbs :flat :named)
+    $P0 = self.'eval'(code, args :flat, adverbs :flat :named)
     if target == '' goto end
     if target == 'pir' goto end
     '_dumper'($P0, target)



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About