From 4f2c619bb0971153c518f120c8911ce3a94f783d Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adam@chlipala.net>
Date: Sun, 21 Nov 2010 15:43:24 -0500
Subject: Fix a bug in C list unurlification

---
 lib/ur/list.urs | 2 ++
 1 file changed, 2 insertions(+)

(limited to 'lib/ur/list.urs')

diff --git a/lib/ur/list.urs b/lib/ur/list.urs
index a0cec8fb..c23bf840 100644
--- a/lib/ur/list.urs
+++ b/lib/ur/list.urs
@@ -71,6 +71,8 @@ val mapQueryPartialM : tables ::: {{Type}} -> exps ::: {Type} -> t ::: Type
 
 val sort : a ::: Type -> (a -> a -> bool) (* > predicate *) -> t a -> t a
 
+val nth : a ::: Type -> list a -> int -> option a
+
 (** Association lists *)
 
 val assoc : a ::: Type -> b ::: Type -> eq a -> a -> t (a * b) -> option b
-- 
cgit v1.2.3