[pypy-svn] r44949 - pypy/dist/pypy/translator/goal

[jlg at codespeak.net]

Author: jlg
Date: Thu Jul 12 11:53:37 2007
New Revision: 44949

Added:
   pypy/dist/pypy/translator/goal/targetssstandalone.py   (contents, props changed)
Log:
target for scheme interpreter

Added: pypy/dist/pypy/translator/goal/targetssstandalone.py
==============================================================================
--- (empty file)
+++ pypy/dist/pypy/translator/goal/targetssstandalone.py	Thu Jul 12 11:53:37 2007
@@ -0,0 +1,35 @@
+"""
+A simple standalone target for the scheme interpreter.
+"""
+
+import autopath
+import sys
+from pypy.rlib.streamio import open_file_as_stream
+from pypy.lang.scheme.ssparser import parse
+from pypy.lang.scheme.object import SchemeQuit, ExecutionContext
+
+# __________  Entry point  __________
+
+def entry_point(argv):
+    if len(argv) == 2:
+        f = open_file_as_stream(argv[1])
+        t = parse(f.readall())
+        ctx = ExecutionContext()
+        w_retval = t.eval(ctx)
+        print w_retval,
+        return 0
+    elif argv[0] == 'foo':
+        raise SchemeQuit
+    else:
+        print "Usage: %s schemesourcefile" % argv[0]
+        return 1
+
+# _____ Define and setup target ___
+
+def target(driver, args):
+    driver.exe_name = 'ss-%(backend)s'
+    return entry_point, None
+
+if __name__ == '__main__':
+    entry_point(sys.argv)
+