macro preprocessor

lib/aids.klambda

@@ -0,0 +1,15 @@
+: get it? because std?
+: i'm hilarious.
+
+(defun spit
+	(id miracle
+		"builtins" "print" (id $1))
+)
+(defun input
+	(id miracle
+		"builtins" "input" (""))
+)
+(defun thesis
+	(id spit
+		("this language belongs to makise kurisu. there are many like it, but this one is hers."))
+)

main.py

@@ -8,6 +8,21 @@ def isnum(n):
     return True
 reps = ["(", ")", "\"", ","]
 f = open(sys.argv[1]).read()
+
+def expand(file):
+    tmp = file.split("\n")
+    for idx, i in enumerate(tmp):
+        if len(i) < 1:
+            continue
+        elif i[:8] == "INCLUDE:":
+            tmp[idx] = expand(open(i[8:]).read())
+        elif i[0] == ":":
+            tmp.pop(idx)
+    return "\n".join(tmp)
+
+f = expand(f)
+
+
 f = f.replace(" ", " RDANEELOLIVAW ") # spacer
 for r in reps: f = f.replace(r, " "+r+" ")
 f = f.split()

test.klambda

@@ -1,15 +1,4 @@
-(defun spit
+INCLUDE:./lib/aids.klambda
-	(id miracle
-		"builtins" "print" (id $1))
-)
-(defun input
-	(id miracle
-		"builtins" "input" (""))
-)
-(defun thesis
-	(id spit
-		("this language belongs to makise kurisu. there are many like it, but this one is hers."))
-)
 
 (def a (id (id "desu")))
 (spit
@@ -20,7 +9,6 @@
 	(id spit ("one"))
 	(id spit ("zero"))
 )
-(thesis)
 
 (spit ("how old are you? > "))
 (def age (conv number (input)))
@@ -32,3 +20,5 @@
 		)
 	)
 )
+
+(thesis)