Revision e4596682cb02162e7c7c29ab2fb3226ae4286e7a authored by Joshua Cogliati on 09 March 2021, 01:37:06 UTC, committed by GitHub on 09 March 2021, 01:37:06 UTC
ISSUE-96: Flush buffer in CURSOR so position isn't dependent on buffer state
2 parent s c1b1f7f + 2d7a355
Raw File
transfer
;;; -*- logo -*-

to transfer :transfer.limit :transfer.template :transfer.init
output cascade.2 (ifelse emptyp :transfer.limit ~
                         [[emptyp ?2]] ~
                         [list "transfer.end.test :transfer.limit]) ~
                 :transfer.template [] [butfirst ?2] :transfer.init
end

to transfer.end.test :the.condition.expression
if emptyp ?2 [output "true]
output run :the.condition.expression
end

to ?in
output first ?2
end

to ?out
output ?1
end

bury [transfer transfer.end.test ?in ?out]
back to top