Made a mistake in parsing the .proj file.

StanzaOrg · Nov 28, 2022 · 24d25e2 · 24d25e2
1 parent 1b55fe5
commit 24d25e2
Show file tree

Hide file tree

Showing 3 changed files with 21 additions and 0 deletions.
diff --git a/compiler/proj-variable-substitution.stanza b/compiler/proj-variable-substitution.stanza
@@ -244,4 +244,5 @@ defn check-valid-substitution (v:ProjValue) -> String|False :
     (v:ProjValues) : find-by<String>(seq(check-valid-substitution, values(v)))
     (v:ProjTuple) : check-valid-substitution(value(v))
     (v:ProjTableS0) : "table"
+    (v:CondPlatform) : find-by<String>(seq(check-valid-substitution{value(_)}, values(v)))
 
diff --git a/tests/data/ex2.proj b/tests/data/ex2.proj
@@ -0,0 +1,16 @@
+;Example proj file
+
+var myvar =
+  on-platform :
+    os-x:
+      A
+      B
+      C
+    else :
+      D
+      E
+      F
+
+package myprogram requires :
+  ccflags: "{myvar}"
+
diff --git a/tests/test-proj.stanza b/tests/test-proj.stanza
@@ -10,4 +10,8 @@ deftest build-dev-proj :
 
 deftest read-proj-ex :
   val output = call-dev-tool $ ["dev-proj" data-file("ex1.proj")]
+  println(output)
+
+deftest read-proj-ex :
+  val output = call-dev-tool $ ["dev-proj" data-file("ex2.proj")]
   println(output)