Skip to content

Commit 7339fb1

Browse files
committed
[Inheritance] fix not_found error
1 parent a3deb52 commit 7339fb1

File tree

1 file changed

+5
-5
lines changed

1 file changed

+5
-5
lines changed

src/inheritance.ml

Lines changed: 5 additions & 5 deletions
Original file line numberDiff line numberDiff line change
@@ -205,7 +205,7 @@ let add_missing_methods ?(is_stdlib = false) class_name info summary_map
205205
else
206206
let args = JsonUtil.member "args" m_info |> JsonUtil.to_list in
207207
let arg_ids = make_arg_id args in
208-
( SummaryMap.M.add m_name ([ make_summary arg_ids ], []) s_map,
208+
( SummaryMap.add m_name ([ make_summary arg_ids ], []) s_map,
209209
MethodInfoMap.add m_name
210210
(get_method_info class_name m_name args arg_ids m_info)
211211
m_map ))
@@ -251,10 +251,10 @@ let make_type ?(is_static = false) assoc =
251251
else Default
252252

253253
let get_inner_class_type ic_name is_static : class_info =
254-
match Hashtbl.find class_info ic_name with
255-
| `Null when is_static -> { class_type = Private_Static }
256-
| `Null -> { class_type = Private }
257-
| info -> { class_type = make_type ~is_static info }
254+
match Hashtbl.find_opt class_info ic_name with
255+
| None when is_static -> { class_type = Private_Static }
256+
| None -> { class_type = Private }
257+
| Some info -> { class_type = make_type ~is_static info }
258258

259259
let mapping_class_type_info class_name info mmap =
260260
if ClassInfoMap.mem class_name mmap then mmap

0 commit comments

Comments
 (0)