or-map: fix specific assertion that should have been general

This commit is contained in:
Logan Allen 2020-06-12 13:26:45 -04:00
parent 2e5bbd7423
commit 37f332dcb6

View File

@ -276,7 +276,7 @@
(del-span tre %end end)
?~ end
(del-span tre %start start)
?> (lth u.start u.end)
?> (compare u.start u.end)
=. tre (del-span tre %start start)
(del-span tre %end end)
::