Move ReaderExp to its own file

This commit is contained in:
2021-05-21 16:13:00 -06:00
parent 64ea5c79c9
commit 85658df321
19 changed files with 98 additions and 21 deletions

View File

@@ -0,0 +1,9 @@
package test;
import kiss.Kiss;
import kiss.Prelude;
import nap.BoolExpInterp;
import nap.Archive;
@:build(kiss.Kiss.build())
class TestMain {}

View File

@@ -0,0 +1,25 @@
(defun :Void main []
(assert (BoolExpInterp.eval "true" []))
(assert !(BoolExpInterp.eval "false" []))
(assert !(BoolExpInterp.eval "flag" []))
(assert (BoolExpInterp.eval "flag" ["flag"]))
(assert !(BoolExpInterp.eval "(and flag false)" ["flag"]))
(assert (BoolExpInterp.eval "(or flag otherFlag)" ["otherFlag"]))
//trace(error);
(let [systems
[]
archive
(new Archive "src/test/example-archive" systems)]
(print "TODO")))
/*
(let [e (new Entry "name")]
(dictSet e.components "f" [5])
(dictSet e.components "b" [(object c "d")])
(let [s (haxe.Json.stringify e)
:Entry e2 (haxe.Json.parse s)]
// can't call Entry methods on e2
(print s))))
*/

View File

@@ -0,0 +1 @@
"Rafael Krux"

View File

@@ -0,0 +1 @@
"Kevin MacLeod"

View File

@@ -0,0 +1 @@
"Adventure"

View File

@@ -0,0 +1 @@
"Ancient Rite"

View File

@@ -0,0 +1,4 @@
[
["song", 1],
["western", 1]
]

View File

@@ -0,0 +1,4 @@
[
["song", 1],
["religious", 1]
]

View File

@@ -0,0 +1,11 @@
{
"id": "song1",
"components": [
["Name", "name1"],
["Author", "author1"],
["Tags", "tags1"]
],
"files": [
"Adventure.mp3"
]
}

View File

@@ -0,0 +1,11 @@
{
"id": "song2",
"components": [
["Name", "name2"],
["Author", "author2"],
["Tags", "tags2"]
],
"files": [
"Ancient Rite.mp3"
]
}