We read every piece of feedback, and take your input very seriously.
To see all available qualifiers, see our documentation.
There was an error while loading. Please reload this page.
String.for_all
1 parent 1486cbf commit a48c494Copy full SHA for a48c494
tests/core/t_char.ml
@@ -43,8 +43,41 @@ q
43
(fun c -> not @@ CCChar.is_digit_ascii c)
44
;;
45
46
-eq true (String.for_all CCChar.is_whitespace_ascii "\n\t \010\011\012\013");;
+eq true
47
+ (Stdlib.List.for_all CCChar.is_whitespace_ascii
48
+ [ '\n'; '\t'; ' '; '\010'; '\011'; '\012'; '\013' ])
49
+;;
50
51
eq false
- (String.for_all CCChar.is_whitespace_ascii
- "Hello!--NOthina\055kag$$$%^bch\008h")
52
53
+ [
54
+ 'H';
55
+ 'e';
56
+ 'l';
57
58
+ 'o';
59
+ '!';
60
+ '-';
61
62
+ 'N';
63
+ 'O';
64
+ 't';
65
+ 'h';
66
+ 'i';
67
+ 'n';
68
+ 'a';
69
+ '\055';
70
+ 'k';
71
72
+ 'g';
73
+ '$';
74
75
76
+ '%';
77
+ '^';
78
+ 'b';
79
+ 'c';
80
81
+ '\008';
82
83
+ ])
0 commit comments