From 1777fbbddce252990fc5055e4e5462123938483c Mon Sep 17 00:00:00 2001
From: Adam Chlipala <adamc@hcoop.net>
Date: Sun, 7 Sep 2008 09:28:13 -0400
Subject: Ran a prepared statement with one string parameter

---
 src/cjr.sml | 4 +++-
 1 file changed, 3 insertions(+), 1 deletion(-)

(limited to 'src/cjr.sml')

diff --git a/src/cjr.sml b/src/cjr.sml
index 4d6608ce..0f261de6 100644
--- a/src/cjr.sml
+++ b/src/cjr.sml
@@ -76,7 +76,8 @@ datatype exp' =
                      state : typ,
                      query : exp,
                      body : exp,
-                     initial : exp }
+                     initial : exp,
+                     prepared : int option }
 
 withtype exp = exp' located
 
@@ -90,6 +91,7 @@ datatype decl' =
 
        | DTable of string * (string * typ) list
        | DDatabase of string
+       | DPreparedStatements of (string * int) list
 
 withtype decl = decl' located
 
-- 
cgit v1.2.3