eval-file ( file -- obj )

Vocabulary

mason.common

Inputs

file

an object

Outputs

obj

an object

Definition

USING: io.encodings.utf8 io.files kernel parser sequences ;

IN: mason.common

: eval-file ( file -- obj )
    dup utf8 file-lines parse-fresh
    [ "Empty file: " swap append throw ] [ nip first ] if-empty
    ;