File tree 1 file changed +2
-2
lines changed
1 file changed +2
-2
lines changed Original file line number Diff line number Diff line change @@ -163,9 +163,9 @@ let main () =
163
163
| Oval_string (s , maxlen , kind ) ->
164
164
Oval_string (s, (if maxlen < 8 then 8 else maxlen), kind)
165
165
(* IF_NOT_AT_LEAST 504 | Oval_tuple tl -> Oval_tuple (List.map ~f:map_tree tl) *)
166
- (* IF_AT_LEAST 504 | Oval_tuple tl -> Oval_tuple (List.map ~f:(fun (l , v) -> (l , map_tree v)) tl) *)
166
+ (* IF_AT_LEAST 504 | Oval_tuple tl -> Oval_tuple (List.map ~f:(fun (label , v) -> (label , map_tree v)) tl) *)
167
167
(* IF_NOT_AT_LEAST 504 | Oval_array tl -> Oval_array (List.map ~f:map_tree tl) *)
168
- (* IF_AT_LEAST 504 | Oval_array (tl, v ) -> Oval_array ((List.map ~f:map_tree tl), v ) *)
168
+ (* IF_AT_LEAST 504 | Oval_array (tl, mutable_ ) -> Oval_array ((List.map ~f:map_tree tl), mutable_ ) *)
169
169
| Oval_list tl -> Oval_list (List. map ~f: map_tree tl)
170
170
| Oval_record fel ->
171
171
Oval_record
You can’t perform that action at this time.
0 commit comments