Mercurial > urweb
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)