comments

src/lib/dnode.c

···
 #include "dnode.h"
 
+// Implement all of the functions for ListDNode and ListDNodeInfo
 ImplList(DNode)
 ImplList(DNodeInfo)
 
···
 }
 
 
-/*
-insert :: [Int] -> Int -> [Int]
-insert [] a = [a]
-insert (x:xs) a = if x > a then a:x:xs else x:insert xs a
- */
 ListDNodeInfo insert(ListDNodeInfo l, DNodeInfo a) {
 	if (l == NULL) {
 		return ListDNodeInfo_cons(a, NULL);
···
 	}
 }
 
-/*
-sort :: [Int] -> [Int]
-sort = foldl insert []
- */
 ListDNodeInfo sort(ListDNodeInfo l) {
 	ListDNodeInfo acc = NULL;
 	for (;l != NULL; l = l->rest) acc = insert(acc, l->head);