balsoft/ligo
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Merge branch 'feature/more-subtraction' into 'dev'

Browse Source 
Type subtraction also as nat->int->int and int->nat->int

See merge request ligolang/ligo!228
This commit is contained in:
Gabriel Alfour 2019-11-29 10:13:29 +00:00
commit bfb01d371a
1 changed files with 2 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/passes/operators/operators.ml
View File

@ -318,9 +318,8 @@ module Typer = struct
| Some t -> ok t | Some t -> ok t
let sub = typer_2 "SUB" @@ fun a b -> let sub = typer_2 "SUB" @@ fun a b ->
if (eq_2 (a , b) (t_int ())) if (eq_1 a (t_int ()) || eq_1 a (t_nat ()))
then ok @@ t_int () else && (eq_1 b (t_int ()) || eq_1 b (t_nat ()))
if (eq_2 (a , b) (t_nat ()))
then ok @@ t_int () else then ok @@ t_int () else
if (eq_2 (a , b) (t_timestamp ())) if (eq_2 (a , b) (t_timestamp ()))
then ok @@ t_int () else then ok @@ t_int () else