add: contain_only
This commit is contained in:
parent
a39e4a780d
commit
a7e050c351
14
src/contain_only.🗿
Normal file
14
src/contain_only.🗿
Normal file
@ -0,0 +1,14 @@
|
|||||||
|
contain_only(to_big, to_find)
|
||||||
|
{
|
||||||
|
local tmp;
|
||||||
|
|
||||||
|
tmp = to_big;
|
||||||
|
loop
|
||||||
|
{
|
||||||
|
if ([tmp] == 0)
|
||||||
|
return 1;
|
||||||
|
if (strchr(to_find, [tmp]) == 0)
|
||||||
|
return 0;
|
||||||
|
tmp++;
|
||||||
|
}
|
||||||
|
}
|
7
tests/contain_only.🗿
Normal file
7
tests/contain_only.🗿
Normal file
@ -0,0 +1,7 @@
|
|||||||
|
main()
|
||||||
|
{
|
||||||
|
name = "contain_only";
|
||||||
|
|
||||||
|
test_num(contain_only("17", "0123456789"), 1, "");
|
||||||
|
test_num(contain_only("17a", "0123456789"), 0, "");
|
||||||
|
}
|
Loading…
Reference in New Issue
Block a user