2016 Update

This commit is contained in:
Tina Müller 2016-12-05 22:15:40 +01:00
parent 948b86eafa
commit dcf5d15da3
7965 changed files with 139854 additions and 31002 deletions

View file

@ -0,0 +1,25 @@
#import system.
#import system'collections.
#import extensions.
#symbol program =
[
// Create a queue and "push" items into it
#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
// To tell if the queue is empty, we check the count
console writeLine:"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.". ].
].