Start sketching out compile-time known value handling and how we'll reference values in World (so common it deserves explicit support).

jnthn · jnthn · commit de37dc4a578c · 2012-04-05T23:36:37.000+02:00
diff --git a/src/QAST/CompileTimeValue.nqp b/src/QAST/CompileTimeValue.nqp
@@ -0,0 +1,5 @@
+# Composed or mixed in to any node that also has a compile-time known value.
+role QAST::CompileTimeValue {
+    has $!value;
+    method value(*@value) { $!value := @value[0] if @value; $!value }
+}
diff --git a/src/QAST/WorldValue.nqp b/src/QAST/WorldValue.nqp
@@ -0,0 +1,2 @@
+class QAST::WorldValue does QAST::CompileTimeValue {
+}
diff --git a/tools/build/Makefile.in b/tools/build/Makefile.in
@@ -87,8 +87,10 @@ QREGEX_PIR = QRegex.pir
 QREGEX_PBC = QRegex.pbc
 QREGEX_SOURCES = \
   src/QRegex.nqp \
+  src/QAST/CompileTimeValue.nqp \
   src/QAST/Node.nqp \
   src/QAST/Regex.nqp \
+  src/QAST/WorldValue.nqp \
   src/QAST/Op.nqp \
   src/QAST/Compiler.nqp \
   src/QRegex/NFA.nqp \

Original file line number	Diff line number	Diff line change
`@@ -0,0 +1,2 @@`
	`1`	`+class QAST::WorldValue does QAST::CompileTimeValue {`
	`2`	`+}`