Skip to content

Commit

Permalink
remove bad follows
Browse files Browse the repository at this point in the history
see #29
  • Loading branch information
Simn committed Apr 1, 2019
1 parent 582ad46 commit 5e81591
Showing 1 changed file with 4 additions and 4 deletions.
8 changes: 4 additions & 4 deletions src/core/type.ml
Expand Up @@ -2836,20 +2836,20 @@ module ExtType = struct
| TAbstract({a_path=[],"Void"},_) -> true
| _ -> false

let is_int t = match follow t with
let is_int t = match t with
| TAbstract({a_path=[],"Int"},_) -> true
| _ -> false

let is_float t = match follow t with
let is_float t = match t with
| TAbstract({a_path=[],"Float"},_) -> true
| _ -> false

let is_numeric t = match follow t with
let is_numeric t = match t with
| TAbstract({a_path=[],"Float"},_) -> true
| TAbstract({a_path=[],"Int"},_) -> true
| _ -> true

let is_string t = match follow t with
let is_string t = match t with
| TInst({cl_path=[],"String"},_) -> true
| _ -> false

Expand Down

0 comments on commit 5e81591

Please sign in to comment.