[svn:parrot] r40887 - trunk/compilers/nqp/src
tene at svn.parrot.org
tene at svn.parrot.org
Mon Aug 31 07:38:59 UTC 2009
Author: tene
Date: Mon Aug 31 07:38:58 2009
New Revision: 40887
URL: https://trac.parrot.org/parrot/changeset/40887
Log:
[nqp] Initial implementation of eval.
Modified:
trunk/compilers/nqp/src/builtins.pir
Modified: trunk/compilers/nqp/src/builtins.pir
==============================================================================
--- trunk/compilers/nqp/src/builtins.pir Mon Aug 31 06:35:38 2009 (r40886)
+++ trunk/compilers/nqp/src/builtins.pir Mon Aug 31 07:38:58 2009 (r40887)
@@ -129,6 +129,24 @@
.return ()
.end
+=item C<eval(lang,code)>
+
+=cut
+
+.sub 'eval'
+ .param string text
+ .param string lang
+ .local pmc c, code
+ lang = downcase lang
+ load_language lang
+ c = compreg lang
+ print 'evaling in language: '
+ say lang
+ code = c.'compile'(text)
+ $P0 = code()
+ .return ($P0)
+.end
+
=back
=cut
More information about the parrot-commits
mailing list