let location_re = Str.regexp s_location_re