author | wenzelm |
Sun, 14 Jul 2024 15:49:26 +0200 | |
changeset 80561 | 437895863e1d |
parent 80560 | 960b866b1117 |
child 80562 | d55cdb87f332 |
--- a/src/Pure/PIDE/yxml.ML Sun Jul 14 15:16:08 2024 +0200 +++ b/src/Pure/PIDE/yxml.ML Sun Jul 14 15:49:26 2024 +0200 @@ -109,8 +109,7 @@ val split_bytes = Bytes.space_explode X - #> filter (fn "" => false | _ => true) - #> map (space_explode Y); + #> map_filter (fn "" => NONE | s => SOME (space_explode Y s)); (* structural errors *)