invert-slice ( slice -- slice' )

Vocabulary

http.server

Inputs

slice

an object

Outputs

slice'

an object

Definition

USING: accessors kernel sequences ;

IN: http.server

: invert-slice ( slice -- slice' )
    dup slice?
    [ [ seq>> ] [ from>> ] bi head-slice ] [ drop { } ] if ;