Last change
on this file since 75 was 73, checked in by Izuru Yakumo, 8 months ago |
Because sweet girls are the best, officially rebranding Logarion to Kosuzu
Signed-off-by: Izuru Yakumo <yakumo.izuru@…>
|
File size:
234 bytes
|
Rev | Line | |
---|
[73] | 1 | let validate_id_length s = String.length s <= 32
|
---|
| 2 | let validate_id_chars s = try
|
---|
| 3 | String.iter (function 'a'..'z'|'A'..'Z'|'0'..'9'-> () | _ -> raise (Invalid_argument "")) s;
|
---|
| 4 | true
|
---|
| 5 | with Invalid_argument _ -> false
|
---|
Note:
See
TracBrowser
for help on using the repository browser.