| Revision | a0e1b940af1d9a97c53396c1058767960190169a (tree) |
|---|---|
| Time | 2024-03-28 21:11:42 |
| Author | Albert Mietus < albert AT mietus DOT nl > |
| Commiter | Albert Mietus < albert AT mietus DOT nl > |
removed some small typo/bugs in theSieve demo/code
CCastle/4.Blog/sieve-castle.irst (diff) CCastle/4.Blog/sieve-main.irst (diff) CCastle/4.Blog/sieve-moat.irst (diff)| @@ -55,8 +55,8 @@ | ||
| 55 | 55 | |
| 56 | 56 | SimpleSieve.input(foundPrime) on .newPrime |
| 57 | 57 | { |
| 58 | + report() | |
| 58 | 59 | .found.input(foundPrime); // Forward to “main” |
| 59 | - report() | |
| 60 | 60 | } |
| 61 | 61 | |
| 62 | 62 | report() // This is a local function -- as it is not connected (to a port) it is “private” |
| @@ -30,15 +30,14 @@ | ||
| 30 | 30 | |
| 31 | 31 | .. code-tab:: ReasonML try() |
| 32 | 32 | |
| 33 | - // We have build the sievelist (and reconnect) on a newly found prime .. | |
| 34 | - SimpleSieve.try(newPrime) on .generator.found | |
| 33 | + // We have extend the sieve-list (and reconnect) on a newly found prime .. | |
| 34 | + SimpleSieve.try(newPrime) on .finder.found | |
| 35 | 35 | { |
| 36 | 36 | alias s; |
| 37 | 37 | |
| 38 | 38 | // Extent the sieve-list ... |
| 39 | 39 | s:= Sieve(newPrime); |
| 40 | 40 | insert_sieve(s); |
| 41 | - .generator.collect.input(newPrime); // forward the prime to the Generator | |
| 42 | 41 | } |
| 43 | 42 | |
| 44 | 43 |
| @@ -55,7 +54,7 @@ | ||
| 55 | 54 | s.coprime = .finder.newPrime; |
| 56 | 55 | } |
| 57 | 56 | |
| 58 | - .. code-tab:: ReasonML powerOn() | |
| 57 | + .. code-tab:: ReasonML powerOn() | |
| 59 | 58 | |
| 60 | 59 | powerOn() // this kick-starts “every main” |
| 61 | 60 | { |
| @@ -9,7 +9,6 @@ | ||
| 9 | 9 | component Generator : Component { |
| 10 | 10 | port StartSieve<in>:controll; |
| 11 | 11 | port SimpleSieve<out>:outlet; |
| 12 | - port SimpleSieve<in>:collect; | |
| 13 | 12 | } |
| 14 | 13 | |
| 15 | 14 | .. code-tab:: ReasonML Sieve |
Fork