tasks a-s

Task/Queue-Definition/Fantom/queue-definition.fantom

@@ -0,0 +1,24 @@
+class Queue
+{
+  List queue := [,]
+
+  public Void push (Obj obj)
+  {
+    queue.add (obj)  // add to right of list
+  }
+
+  public Obj pop ()
+  {
+    if (queue.isEmpty)
+      throw (Err("queue is empty"))
+    else
+    {
+      return queue.removeAt(0) // removes left-most item
+    }
+  }
+
+  public Bool isEmpty ()
+  {
+    queue.isEmpty
+  }
+}