equal
deleted
inserted
replaced
267 map(tag("DEL"), |_| Byte(b'\x7F')), |
267 map(tag("DEL"), |_| Byte(b'\x7F')), |
268 )), |
268 )), |
269 ))(input) |
269 ))(input) |
270 } |
270 } |
271 |
271 |
272 fn string_content(mut input: &[u8]) -> HaskellResult<String> { |
272 fn string_content(input: &[u8]) -> HaskellResult<String> { |
273 map_res( |
273 map_res( |
274 escaped_transform(is_not("\"\\"), '\\', string_escape), |
274 escaped_transform(is_not("\"\\"), '\\', string_escape), |
275 |bytes| String::from_utf8(bytes).map_err(|_| ()), |
275 |bytes| String::from_utf8(bytes).map_err(|_| ()), |
276 )(input) |
276 )(input) |
277 } |
277 } |
329 preceded( |
329 preceded( |
330 take_while(is_space), |
330 take_while(is_space), |
331 many0(terminated(value, take_while(is_space))), |
331 many0(terminated(value, take_while(is_space))), |
332 ), |
332 ), |
333 ), |
333 ), |
334 |(name, mut fields)| HaskellValue::AnonStruct { |
334 |(name, fields)| HaskellValue::AnonStruct { |
335 name: name.clone(), |
335 name: name.clone(), |
336 fields, |
336 fields, |
337 }, |
337 }, |
338 ), |
338 ), |
339 ))(input) |
339 ))(input) |