Mercurial > repos > rhope

comparison nworker_c.rhope @ 117:4d089503fb51

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Performance optimization
author Mike Pavone <pavone@retrodev.com>
date Thu, 14 Oct 2010 22:37:20 -0400
parents 04148770c229
children b3f56e1d54a0
comparison
equal deleted inserted replaced
116:60906f8803ef 117:4d089503fb51
37 out <- [[set]Variables <<[ Combine[[set]Variables >>, [cond]Variables >>] ] 37 out <- [[set]Variables <<[ Combine[[set]Variables >>, [cond]Variables >>] ]
38 ]Subsets <<[ Combine[[set]Subsets >>, [cond]Subsets >>] ] 38 ]Subsets <<[ Combine[[set]Subsets >>, [cond]Subsets >>] ]
39 }{ 39 }{
40 [cond]Empty? 40 [cond]Empty?
41 { 41 {
42 out <- [set]Subsets <<[ [[set]Subsets>>]Set[[cond]To String, cond] ] 42 [cond]Simple?
43 { out <- [set]Variables <<[ Combine[[set]Variables >>, [cond]Variables >>] ] }
44 { out <- [set]Subsets <<[ [[set]Subsets>>]Set[[cond]To String, cond] ] }
43 }{ 45 }{
44 out <- set 46 out <- set
45 } 47 }
46 } 48 }
47 }{ 49 }{
89 }{ 91 }{
90 ,empty <- [[set]Subsets >>]First 92 ,empty <- [[set]Subsets >>]First
91 { 93 {
92 not empty <- Yes 94 not empty <- Yes
93 } 95 }
96 }
97 }
98
99 Simple?@Condition Set[set:simple,not simple]
100 {
101 ,not simple <- If[[Length[[set]Variables >>]]=[1]]
102 {
103 simple,not simple <- If[[Blueprint Of[[set]Subsets >>]]=[Empty Dictionary()]]
94 } 104 }
95 } 105 }
96 106
97 For Backend@Condition Set[set:out,none] 107 For Backend@Condition Set[set:out,none]
98 { 108 {