September 2017 Update

This commit is contained in:
Ingy döt Net 2017-09-23 10:01:46 +02:00
parent bba7bfd280
commit ba8067c3b7
14570 changed files with 153136 additions and 63871 deletions

View file

@ -1,25 +1,24 @@
#import system.
#import system'collections.
#import extensions.
import system'collections.
import extensions.
#symbol program =
program =
[
// Create a queue and "push" items into it
#var queue := Queue new.
var queue := Queue new.
queue push:1.
queue push:3.
queue push:5.
// "Pop" items from the queue in FIFO order
console writeLine:(queue pop). // 1
console writeLine:(queue pop). // 3
console writeLine:(queue pop). // 5
console printLine(queue pop). // 1
console printLine(queue pop). // 3
console printLine(queue pop). // 5
// To tell if the queue is empty, we check the count
console writeLine:"queue is ":((queue length == 0) iif:"empty":"nonempty").
console printLine("queue is ",(queue length == 0) iif("empty","nonempty")).
// If we try to pop from an empty queue, an exception
// is thrown.
queue pop | if &Error: e [ console writeLine:"Queue empty.". ].
queue pop | if(:e)[ console writeLine:"Queue empty.". ].
].