diff --git a/src/ludus/compile.clj b/src/ludus/compile.clj
index e3f0423..bcfd8df 100644
--- a/src/ludus/compile.clj
+++ b/src/ludus/compile.clj
@@ -2,4 +2,12 @@
  	(:require
   		[ludus.grammar :as g]
   		[ludus.parser-new :as p]
-  		[ludus.scanner :as s]))
\ No newline at end of file
+  		[ludus.scanner :as s]))
+
+(def source 
+  "1"
+  )
+
+(def result (->> source s/scan :tokens (p/apply-parser g/script)))
+
+(println result)
\ No newline at end of file