All: split types into types, env, printer, core.

- types: low-level mapping to the implementation language.
- core: functions on types that are exposed directly to mal.
- printer: implementation called by pr-str, str, prn, println.
- env: the environment implementation

- Also, unindent all TCO while loops so that the diff of step4 and
  step5 are minimized.

1 files changed, 29 insertions, 0 deletions

diff --git a/python/printer.py b/python/printer.py
new file mode 100644
index 0000000..d501d60
--- /dev/null
+++ b/python/printer.py
@@ -0,0 +1,29 @@
+import mal_types as types
+
+def _pr_str(obj, print_readably=True):
+    _r = print_readably
+    if types._list_Q(obj):
+        return "(" + " ".join(map(lambda e: _pr_str(e,_r), obj)) + ")"
+    elif types._vector_Q(obj):                                    
+        return "[" + " ".join(map(lambda e: _pr_str(e,_r), obj)) + "]"
+    elif types._hash_map_Q(obj):
+        ret = []
+        for k in obj.keys():
+            ret.extend((_pr_str(k), _pr_str(obj[k],_r)))
+        return "{" + " ".join(ret) + "}"
+    elif types._string_Q(obj):
+        if print_readably:
+            return '"' + obj.encode('unicode_escape').replace('"', '\\"') + '"'
+        else:
+            return obj
+    elif types._nil_Q(obj):
+        return "nil"
+    elif types._true_Q(obj):
+        return "true"
+    elif types._false_Q(obj):
+        return "false"
+    elif types._atom_Q(obj):
+        return "(atom " + _pr_str(obj.val,_r) + ")"
+    else:
+        return obj.__str__()
+