diff options
| author | Alex Auvolat <alex.auvolat@ansys.com> | 2014-06-19 13:47:00 +0200 |
|---|---|---|
| committer | Alex Auvolat <alex.auvolat@ansys.com> | 2014-06-19 13:47:00 +0200 |
| commit | f4200a0aa90e2641ce1b0b1c54d00d9d4dd3b73e (patch) | |
| tree | 53b82c4d758d11936f0ee0d106ea0aaf75d48f61 /libs | |
| parent | 8286c7c23a47c166aa87337a3146cdf3b278b144 (diff) | |
| download | scade-analyzer-f4200a0aa90e2641ce1b0b1c54d00d9d4dd3b73e.tar.gz scade-analyzer-f4200a0aa90e2641ce1b0b1c54d00d9d4dd3b73e.zip | |
Did most of the boring stuff. Now, work on the abstract domain.
Diffstat (limited to 'libs')
| -rw-r--r-- | libs/util.ml | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/libs/util.ml b/libs/util.ml index 97aa480..6931ed9 100644 --- a/libs/util.ml +++ b/libs/util.ml @@ -1,3 +1,10 @@ +(* Either type *) + +type ('a, 'b) either = + | Left of 'a + | Right of 'b + + (* Locations *) type position = Lexing.position |