simon/ocaml-containers
1
0
Fork 0
mirror of https://github.com/c-cube/ocaml-containers.git synced 2025-12-06 11:15:31 -05:00
Code Issues Projects Releases Packages Wiki Activity Actions

remove last refs to CCShims

Browse source
This commit is contained in:
Simon Cruanes 2023-06-24 15:59:01 -04:00
parent 459098312e
commit 979eca042c
No known key found for this signature in database
GPG key ID: EBFFF6F283F3A2B4
5 changed files with 6 additions and 7 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
tests/core/dune
View file

@ -1,6 +1,6 @@
(test (test
(name t) (name t)
(flags :standard -strict-sequence -warn-error -a+8 -open CCShims_) (flags :standard -strict-sequence -warn-error -a+8)
(modes (best exe)) (modes (best exe))
(package containers) (package containers)
(preprocess (preprocess

2
tests/core/t_char.ml
View file

@ -7,4 +7,4 @@ eq None (of_int 257);;
q q
(Q.string_of_size (Q.Gen.return 1)) (Q.string_of_size (Q.Gen.return 1))
(fun s -> CCShims_.Stdlib.( = ) (to_string s.[0]) s) (fun s -> Stdlib.( = ) (to_string s.[0]) s)

5
tests/core/t_string.ml
View file

@ -1,7 +1,6 @@
module T = (val Containers_testlib.make ~__FILE__ ()) module T = (val Containers_testlib.make ~__FILE__ ())
include T include T
open CCString open CCString.Stdlib;;
.Stdlib;;
q Q.printable_string (fun s -> s = rev (rev s));; q Q.printable_string (fun s -> s = rev (rev s));;
q Q.printable_string (fun s -> length s = length (rev s));; q Q.printable_string (fun s -> length s = length (rev s));;
@ -315,7 +314,7 @@ eq ~printer:Q.Print.string "abde"
;; ;;
q Q.printable_string (fun s -> filter (fun _ -> true) s = s);; q Q.printable_string (fun s -> filter (fun _ -> true) s = s);;
eq ~printer:Q.Print.string "abcde" (uniq CCShims_.Stdlib.( = ) "abbccdeeeee");; eq ~printer:Q.Print.string "abcde" (uniq Stdlib.( = ) "abbccdeeeee");;
eq ~printer:CCFun.id "abc " (ltrim " abc ");; eq ~printer:CCFun.id "abc " (ltrim " abc ");;
eq ~printer:CCFun.id " abc" (rtrim " abc ");; eq ~printer:CCFun.id " abc" (rtrim " abc ");;
q Q.(printable_string) (fun s -> String.trim s = (s |> ltrim |> rtrim));; q Q.(printable_string) (fun s -> String.trim s = (s |> ltrim |> rtrim));;

2
tests/data/dune
View file

@ -1,6 +1,6 @@
(test (test
(name t) (name t)
(flags :standard -strict-sequence -warn-error -a+8 -open CCShims_) (flags :standard -strict-sequence -warn-error -a+8)
(modes (best exe)) (modes (best exe))
(package containers-data) (package containers-data)
(libraries containers containers-data containers_testlib iter gen)) (libraries containers containers-data containers_testlib iter gen))

2
tests/thread/dune
View file

@ -1,6 +1,6 @@
(test (test
(name t) (name t)
(flags :standard -strict-sequence -warn-error -a+8 -open CCShims_) (flags :standard -strict-sequence -warn-error -a+8)
(modes (best exe)) (modes (best exe))
(package containers-thread) (package containers-thread)
(libraries containers containers-thread containers_testlib iter threads)) (libraries containers containers-thread containers_testlib iter threads))