@@ -969,7 +969,7 @@ proc defineLibrary*() =
969
969
rule = PrefixPrecedence ,
970
970
description = " check if given character/string is in ASCII" ,
971
971
args = {
972
- " string" : {Char , String }
972
+ " string" : {String , Char }
973
973
},
974
974
attrs = NoAttrs ,
975
975
returns = {Logical },
@@ -1011,6 +1011,9 @@ proc defineLibrary*() =
1011
1011
lower? "X" ; => false
1012
1012
lower? "Hello World" ; => false
1013
1013
lower? "hello" ; => true
1014
+ ..........
1015
+ lower? 'a' ; => true
1016
+ lower? 'A' ; => false
1014
1017
""" :
1015
1018
# =======================================================
1016
1019
if xKind== Char :
@@ -1175,6 +1178,9 @@ proc defineLibrary*() =
1175
1178
upper? "x" ; => false
1176
1179
upper? "Hello World" ; => false
1177
1180
upper? "HELLO" ; => true
1181
+ ..........
1182
+ upper? 'A' ; => true
1183
+ upper? 'a' ; => false
1178
1184
""" :
1179
1185
# =======================================================
1180
1186
if xKind== Char :
@@ -1196,18 +1202,25 @@ proc defineLibrary*() =
1196
1202
rule = PrefixPrecedence ,
1197
1203
description = " check if given string consists only of whitespace" ,
1198
1204
args = {
1199
- " string" : {String }
1205
+ " string" : {String , Char }
1200
1206
},
1201
1207
attrs = NoAttrs ,
1202
1208
returns = {Logical },
1203
1209
example = """
1204
1210
whitespace? "hello" ; => false
1205
1211
whitespace? " " ; => true
1206
1212
whitespace? "\n \n" ; => true
1213
+ whitespace? "" ; => false
1214
+ ..........
1215
+ whitespace? ' ' ; => true
1216
+ whitespace? '\n' ; => true
1217
+ whitespace? 'a' ; => false
1207
1218
""" :
1208
1219
# =======================================================
1209
- push (newLogical (x.s.isEmptyOrWhitespace ()))
1210
-
1220
+ if xKind== Char :
1221
+ push (newLogical (x.c.isWhitespace ()))
1222
+ else :
1223
+ push (newLogical (x.s.isWhitespace ()))
1211
1224
1212
1225
# =======================================
1213
1226
# Add Library
0 commit comments