kiss-lang/kiss-vscode
1
0
Fork 0
Code Issues 1 Pull Requests Actions Packages Projects Releases Wiki Activity

optimizations on when to do NAT processing

Browse Source
This commit is contained in:
Nat Quayle Nelson
2021-09-30 16:34:26 -06:00
parent 7cdec42351
commit 4162c09433
3 changed files with 4 additions and 4 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
projects/nat-archive-tool/src/nat/ArchiveController.kiss
View File

@@ -107,7 +107,7 @@
&mut lastCollector &mut lastCollector
(lambda [] (lambda []
(set lastChangeSet (the ChangeSet (Reflect.callMethod null command.handler collectedArgs))) (set lastChangeSet (the ChangeSet (Reflect.callMethod null command.handler collectedArgs)))
(ui.handleChanges archive lastChangeSet))] (when lastChangeSet (ui.handleChanges archive lastChangeSet)))]
// To facilitate asynchronous arg input via UI, we need to construct an insanely complicated nested callback to give the UI // To facilitate asynchronous arg input via UI, we need to construct an insanely complicated nested callback to give the UI
(doFor arg (reversed command.args) (doFor arg (reversed command.args)
(set lastCollector (_composeArgCollector collectedArgs arg lastCollector))) (set lastCollector (_composeArgCollector collectedArgs arg lastCollector)))

1
projects/nat-archive-tool/src/nat/CLI.kiss
View File

@@ -82,6 +82,7 @@
(method handleChanges [:Archive archive :ChangeSet changeSet] (method handleChanges [:Archive archive :ChangeSet changeSet]
(archive.processSystems)
(doFor e changeSet (doFor e changeSet
(print (archive.fullString e)))) (print (archive.fullString e))))

5
projects/nat-archive-tool/src/nat/System.kiss
View File

@@ -2,8 +2,7 @@
(method :Void process [:Archive archive] (method :Void process [:Archive archive]
(doFor e (entries.iterator) (doFor e (entries.iterator)
(processEntry archive e) (processEntry archive e)))
(archive.refreshEntry e)))
(defNew [&prop :EntryChecker canProcessEntry (defNew [&prop :EntryChecker canProcessEntry
&prop :EntryProcessor processEntry] &prop :EntryProcessor processEntry]
@@ -18,4 +17,4 @@
(entries.remove e.id) (entries.remove e.id)
(when onRemoveEntry (onRemoveEntry archive e))))) (when onRemoveEntry (onRemoveEntry archive e)))))
// TODO systems may need access to a UI // TODO systems may need access to a UI or ArchiveController