kiss-lang/nat-archive-tool
1
0
Fork 0
Code Issues 4 Pull Requests Actions Packages Projects Releases Wiki Activity

print when writing component

Browse Source
This commit is contained in:
Nat Quayle Nelson
2021-09-27 19:48:39 -06:00
parent 4e211b1a46
commit e18f294b97
1 changed files with 6 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
src/nat/Lib.kiss
View File

@@ -19,10 +19,12 @@
// Components have to be saved individually after writing because the Entity only knows their ids, // Components have to be saved individually after writing because the Entity only knows their ids,
// not the data they contain. This is more ergonomically done by using (withWritableComponents...) // not the data they contain. This is more ergonomically done by using (withWritableComponents...)
(defMacro writeComponent [archive e componentType c] (defMacro writeComponent [archive e componentType c]
`(sys.io.File.saveContent `{
(_componentPath ,archive ,e ,componentType) (print (+ "saving " (the nat.components ,componentType ,c) " as " ,(symbolName componentType) " for " .id ,e))
(tink.Json.stringify (sys.io.File.saveContent
(the nat.components ,componentType ,c)))) (_componentPath ,archive ,e ,componentType)
(tink.Json.stringify
(the nat.components ,componentType ,c)))})
// TODO check not overwriting a component // TODO check not overwriting a component
(defMacro addComponent [archive e componentType c] (defMacro addComponent [archive e componentType c]