let easy_to_escape s =       String.for_all s         ~f:(function           | 'a' .. 'z' | 'A' .. 'Z' | '0' .. '9' | '-' | '_' | '*' | '&' | '^'           | '=' | '+' | '%' | '$' | '"' | '\'' | '/' | '#' | '@' | '!' | ' '           | '~' | '`' | '\\' | '|' | '?' | '>' | '<' | '.' | ',' | ':' | ';'           | '{' | '}' | '(' | ')' | '[' | ']' -> true           | other -> false)