test: fixes +to-wain (no more trailing empty lines)

This commit is contained in:
Joe Bryan 2020-11-20 13:40:46 -08:00
parent ebd4c8d264
commit a7ef000e81

View File

@ -18,12 +18,12 @@
:: empty string works fine
::
%+ expect-eq
!> ~['']
!> ~
!> (to-wain '')
:: leading/trailing/consecutive newlines all work fine
::
%+ expect-eq
!> ~['' 'hi' '' '' 'there' '']
!> ~['' 'hi' '' '' 'there']
!> (to-wain '\0ahi\0a\0a\0athere\0a')
==
:: join a list of lines (cords) into a single cord