diff options
author | Sébastien Dailly <sebastien@chimrod.com> | 2019-08-28 22:44:18 +0200 |
---|---|---|
committer | Sébastien Dailly <sebastien@chimrod.com> | 2019-08-28 22:44:18 +0200 |
commit | eea6c106dd959dec19dc70991010bf2008fcf6c6 (patch) | |
tree | dde5a8ff3fb71890bad756e0677cbfb6348142fc /src/expressions | |
parent | c20b6dd7533775eaed045950e04175b020ac52c4 (diff) |
Update catalog function register
Diffstat (limited to 'src/expressions')
-rw-r--r--[-rwxr-xr-x] | src/expressions/eval_ref.ml | 0 | ||||
-rw-r--r-- | src/expressions/evaluate.ml | 1 | ||||
-rw-r--r--[-rwxr-xr-x] | src/expressions/show_ref.ml | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | src/expressions/show_type.ml | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | src/expressions/sym_ref.ml | 0 | ||||
-rw-r--r--[-rwxr-xr-x] | src/expressions/sym_type.ml | 0 |
6 files changed, 1 insertions, 0 deletions
diff --git a/src/expressions/eval_ref.ml b/src/expressions/eval_ref.ml index 99b35af..99b35af 100755..100644 --- a/src/expressions/eval_ref.ml +++ b/src/expressions/eval_ref.ml diff --git a/src/expressions/evaluate.ml b/src/expressions/evaluate.ml index fbf2a18..4cf98da 100644 --- a/src/expressions/evaluate.ml +++ b/src/expressions/evaluate.ml @@ -106,6 +106,7 @@ let observe repr catalog = begin (* We can only match numeric formats here *)
| ScTypes.DataFormat.Date -> ScTypes.Result.Ok (ScTypes.Type.date n)
| ScTypes.DataFormat.Number -> ScTypes.Result.Ok (ScTypes.Type.number n)
+ | _ -> raise Errors.TypeError
end
| _ -> raise Errors.TypeError
end
diff --git a/src/expressions/show_ref.ml b/src/expressions/show_ref.ml index 97d8022..97d8022 100755..100644 --- a/src/expressions/show_ref.ml +++ b/src/expressions/show_ref.ml diff --git a/src/expressions/show_type.ml b/src/expressions/show_type.ml index 3451cde..3451cde 100755..100644 --- a/src/expressions/show_type.ml +++ b/src/expressions/show_type.ml diff --git a/src/expressions/sym_ref.ml b/src/expressions/sym_ref.ml index ef9168e..ef9168e 100755..100644 --- a/src/expressions/sym_ref.ml +++ b/src/expressions/sym_ref.ml diff --git a/src/expressions/sym_type.ml b/src/expressions/sym_type.ml index 8670f4d..8670f4d 100755..100644 --- a/src/expressions/sym_type.ml +++ b/src/expressions/sym_type.ml |