File tree Expand file tree Collapse file tree 2 files changed +0
-9
lines changed Expand file tree Collapse file tree 2 files changed +0
-9
lines changed Original file line number Diff line number Diff line change @@ -556,13 +556,6 @@ let string_length ?comment (e : t) : t =
556556 (* No optimization for {j||j}*)
557557 | _ -> {expression_desc = Length (e, String ); comment}
558558
559- (* TODO: use [Buffer] instead? *)
560- let bytes_length ?comment (e : t ) : t =
561- match e.expression_desc with
562- | Array (l , _ ) when no_side_effect e ->
563- int ?comment (Int32. of_int (List. length l))
564- | _ -> {expression_desc = Length (e, Bytes ); comment}
565-
566559let function_length ?comment (e : t ) : t =
567560 match e.expression_desc with
568561 | Fun {is_method; params} ->
Original file line number Diff line number Diff line change @@ -143,8 +143,6 @@ val array_length : ?comment:string -> t -> t
143143
144144val string_length : ?comment : string -> t -> t
145145
146- val bytes_length : ?comment : string -> t -> t
147-
148146val function_length : ?comment : string -> t -> t
149147
150148val string_append : ?comment : string -> t -> t -> t
You can’t perform that action at this time.
0 commit comments