new-source-file-error ( error asset class -- source-file-error ) (original) (raw)
new-source-file-error ( error asset class -- source-file-error )
Vocabulary
source-files.errors
Inputs
error | an error |
---|---|
asset | an asset that contains the error |
class | a tuple class deriving source-file-error |
Outputs
source-file-error | a source-file-error |
---|
Word description
Creates a new source-file-error instance.
Definition
USING: accessors definitions kernel sequences ;
: new-source-file-error
( error asset class -- source-file-error )
new swap
[ >>asset ]
[ where [ first2 [ >>path ] [ >>line# ] bi* ] when* ] bi
swap >>error ; inline