71
71
Visitor_c.kexpr_s = (fun (k,bigf) e ->
73
73
(* todo: should also do something for multistrings *)
74
| (Constant (String (s,kind)), typ), [ii]
74
| (Constant (String (s,kind)), typ), [ii]
75
75
when Common.string_match_substring cvs_keyword_regexp s ->
76
76
let newstr = cvs_compute_newstr s in
77
77
(Constant (String (newstr,kind)), typ), [rewrap_str newstr ii]