aboutsummaryrefslogtreecommitdiff
path: root/src/scTypes.ml
diff options
context:
space:
mode:
Diffstat (limited to 'src/scTypes.ml')
-rw-r--r--src/scTypes.ml2
1 files changed, 2 insertions, 0 deletions
diff --git a/src/scTypes.ml b/src/scTypes.ml
index f0a42d4..46886a9 100644
--- a/src/scTypes.ml
+++ b/src/scTypes.ml
@@ -92,6 +92,8 @@ module Type = struct
match f with
| DataFormat.Number -> T.num n
| DataFormat.Date -> T.date n
+ | _ -> raise Errors.TypeError
+
let eval t = T.observe (eval_type t)