vars it, p p = {label, value| print("\n" + label) print(inspect(value)) } -- Create an array from 0 to 15 p("range", i-collect(range(5))) -- Create an array from 0 to 15 and break up in chunks of 4 p("chunked range", i-collect(i-chunk(4, range(16)))) -- Check if all or none items in stream pass test. p("all < 60 in range(60)", i-all?({i|i<60}, range(60))) p("any < 60 in range(60)", i-any?({i|i>60}, range(60))) p("all < 60 in range(70)", i-all?({i|i<60}, range(70))) p("any < 60 in range(70)", i-any?({i|i>60}, range(70))) -- Zip three different collections together p("zipped", i-collect(i-zip( range(10), [1,2,3,4,5], i-map({i|i*i}, range(10)) ))) vars names, person, i, doubles, lengths, cubeRange names = ["Thorin", "Dwalin", "Balin", "Bifur", "Bofur", "Bombur", "Oin", "Gloin", "Ori", "Nori", "Dori", "Fili", "Kili", "Bilbo", "Gandalf"] for name in names { if name != "Bilbo" && name != "Gandalf" { print(name) } } person = {name: "Tim", age: 30} for key, value in person { print(key + " = " + value) } i = 0 while i < 10 { i = i + 1 print(i) } print("range") for i in range(10) { print(i + 1) } for i in range(10) { print(10 - i) } -- Dynamic object that gives the first 10 doubles doubles = { @len: {| 10 } @get: {key| if key is Integer { key * key } } } print("#doubles", #doubles) print("Doubles") for k, v in doubles { print([k, v]) } -- Dynamic object that has names list as keys and string lenth as values lengths = { @keys: {| names } @get: {key| if key is String { #key } } } print ("Lengths") for k, v in lengths { print([k, v]) } cubeRange = {n| vars i, v i = 0 { @call: {| v = i i = i + 1 if v < n { v * v * v } } } } print("Cubes") for k, v in cubeRange(5) { print([k, v]) } print("String") for k, v in "Hello World" { print([k, v]) } print([i for i in range(10)]) print([i for i in range(20) if i % 3]) -- Example showing how to do parallel work using split..and base = {bootstrap, target-dir| split { copy("res", target-dir) } and { if newer("src/*.less", target-dir + "/style.css") { lessc("src/" + bootstrap + ".less", target-dir + "/style.css") } } and { build("src/" + bootstrap + ".js", target-dir + "/app.js") } } vars Dragon, pet Dragon = {name| vars asleep, stuff-in-belly, stuff-in-intestine, feed, walk, put-to-bed, toss, rock, hungry?, poopy?, passage-of-time asleep = false stuff-in-belly = 10 -- He's full. stuff-in-intestine = 0 -- He doesn't need to go. print(name + ' is born.') feed = {| print('You feed ' + name + '.') stuff-in-belly = 10 passage-of-time() } walk = {| print('You walk ' + name + ".") stuff-in-intestine = 0 passage-of-time } put-to-bed = {| print('You put ' + name + ' to bed.') asleep = true for i in range(3) { if asleep { passage-of-time() } if asleep { print(name + ' snores, filling the room with smoke.') } } if asleep { asleep = false print(name + ' wakes up slowly.') } } toss = {| print('You toss ' + name + ' up into the air.') print('He giggles, which singes your eyebrows.') passage-of-time() } rock = {| print('You rock ' + name + ' gently.') asleep = true print('He briefly dozes off...') passage-of-time() if asleep { asleep = false print('...but wakes when you stop.') } } hungry? = {| stuff-in-belly <= 2 } poopy? = {| stuff-in-intestine >= 8 } passage-of-time = {| if stuff-in-belly > 0 { -- Move food from belly to intestine stuff-in-belly = stuff-in-belly - 1 stuff-in-intestine = stuff-in-intestine + 1 } else { -- Our dragon is starving! if asleep { asleep = false print('He wakes up suddenly!') } print(name + ' is starving! In desperation, he ate YOU!') abort "died" } if stuff-in-intestine >= 10 { stuff-in-intestine = 0 print('Whoops! ' + name + ' had an accident...') } if hungry?() { if asleep { asleep = false print('He wakes up suddenly!') } print(name + "'s stomach grumbles...") } if poopy?() { if asleep { asleep = false print('He wakes up suddenly!') } print(name + ' does the potty dance...') } } -- Export the public interface to this closure object. { feed: feed walk: walk put-to-bed: put-to-bed toss: toss rock: rock } } pet = Dragon('Norbert') pet.feed() pet.toss() pet.walk() pet.put-to-bed() pet.rock() pet.put-to-bed() pet.put-to-bed() pet.put-to-bed() pet.put-to-bed()