all tasks

Task/Singly-linked-list-Element-definition/E/singly-linked-list-element-definition.e

@@ -0,0 +1,13 @@
+interface LinkedList guards LinkedListStamp {}
+def empty implements LinkedListStamp {
+    to null() { return true }
+}
+def makeLink(value :int, var next :LinkedList) {
+    def link implements LinkedListStamp {
+        to null() { return false }
+        to value() { return value }
+        to next() { return next }
+        to setNext(new) { next := new }
+    }
+    return link
+}