From b7de8e9ac590f9d06df72d22489375b33a6efef9 Mon Sep 17 00:00:00 2001 From: Adam Chlipala Date: Tue, 9 Jun 2009 18:11:59 -0400 Subject: Some standard library reorgs and additions; handle mutual datatypes better in Specialize --- lib/ur/list.urs | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) (limited to 'lib/ur/list.urs') diff --git a/lib/ur/list.urs b/lib/ur/list.urs index daf81074..f5495d41 100644 --- a/lib/ur/list.urs +++ b/lib/ur/list.urs @@ -1,8 +1,10 @@ datatype t = datatype Basis.list -val show : a ::: Type -> show a -> show (list a) +val show : a ::: Type -> show a -> show (t a) +val eq : a ::: Type -> eq a -> eq (t a) val foldl : a ::: Type -> b ::: Type -> (a -> b -> b) -> b -> t a -> b +val foldlPartial : a ::: Type -> b ::: Type -> (a -> b -> option b) -> b -> t a -> option b val rev : a ::: Type -> t a -> t a -- cgit v1.2.3