changeset 2247:565da55a4e18

Fix NONE capitalization typo.
author Ziv Scully <ziv@mit.edu>
date Sun, 02 Aug 2015 18:37:24 -0700
parents 4769b27aa436
children e09c3dc102ef
files src/sql.sml
diffstat 1 files changed, 1 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/src/sql.sml	Sun Aug 02 18:26:44 2015 -0700
+++ b/src/sql.sml	Sun Aug 02 18:37:24 2015 -0700
@@ -309,7 +309,7 @@
    expressions, so accept any expression without modifying it. *)
 val sqlifySqlcache =
  fn Exp e :: chs => SOME (e, chs)
-  | _ => None
+  | _ => NONE
 
 fun constK s = wrap (const s) (fn () => s)