size-without-directories ( info -- size )

Vocabulary

http.server.static

Inputs

info

an object

Outputs

size

an object

Definition

USING: accessors io.files.info kernel ;

IN: http.server.static

: size-without-directories ( info -- size )
    dup directory? [ drop -1 ] [ size>> ] if ;