summaryrefslogtreecommitdiff
path: root/src/jscomp.sml
diff options
context:
space:
mode:
authorGravatar Adam Chlipala <adamc@hcoop.net>2009-06-07 11:13:18 -0400
committerGravatar Adam Chlipala <adamc@hcoop.net>2009-06-07 11:13:18 -0400
commit6994a00f608335fc2e835538dfd84b70aa486d0f (patch)
tree025a2cfb12b5075c231a663b21c6df3b979848ef /src/jscomp.sml
parent555b6a066f6a4a2396ead20e673b363c3706e713 (diff)
Start of Option; Basis.current; fix missed cases in Jscomp.isNullable
Diffstat (limited to 'src/jscomp.sml')
-rw-r--r--src/jscomp.sml2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/jscomp.sml b/src/jscomp.sml
index b66cdaf2..75cca425 100644
--- a/src/jscomp.sml
+++ b/src/jscomp.sml
@@ -194,6 +194,8 @@ fun process file =
fun isNullable (t, _) =
case t of
TOption _ => true
+ | TList _ => true
+ | TDatatype (_, ref (Option, _)) => true
| TRecord [] => true
| _ => false