diff options
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 |