From eaa183b7dfc841df75d42ace7a90ada1e40ff282 Mon Sep 17 00:00:00 2001
From: Rose Hogenson <rosehogenson@posteo.net>
Date: Tue, 4 Nov 2025 18:58:28 -0800
Subject: Add lists

---
 tests/19-list.sml | 11 -----------
 1 file changed, 11 deletions(-)
 delete mode 100644 tests/19-list.sml

(limited to 'tests/19-list.sml')

diff --git a/tests/19-list.sml b/tests/19-list.sml
deleted file mode 100644
index 52404dc..0000000
--- a/tests/19-list.sml
+++ /dev/null
@@ -1,11 +0,0 @@
-infix 6 +
-infixr 5 ::
-
-datatype 'a list = Nil | :: of 'a * 'a list
-
-fun x + y = __builtin "add" (x, y)
-
-fun foldl _ acc Nil = acc
-  | foldl f acc (x :: xs) = foldl f (f (x, acc)) xs
-
-val _ = __builtin "exit" (foldl op + 0 (1 :: 2 :: 3 :: 6 :: 8 :: 10 :: 12 :: Nil))
-- 
cgit v1.3.1