|
@@ -433,7 +433,7 @@ let rec to_type ?tref ctx t =
|
|
| _ -> class_type ~tref ctx c pl false)
|
|
| _ -> class_type ~tref ctx c pl false)
|
|
| TAbstract ({a_path = [],"Null"},[t1]) ->
|
|
| TAbstract ({a_path = [],"Null"},[t1]) ->
|
|
let t = to_type ?tref ctx t1 in
|
|
let t = to_type ?tref ctx t1 in
|
|
- if not (is_nullable t) then HNull t else t
|
|
|
|
|
|
+ if not (is_nullable t) && t <> HVoid then HNull t else t
|
|
| TAbstract (a,pl) ->
|
|
| TAbstract (a,pl) ->
|
|
if Meta.has Meta.CoreType a.a_meta then
|
|
if Meta.has Meta.CoreType a.a_meta then
|
|
(match a.a_path with
|
|
(match a.a_path with
|