find-ffi-error ( string -- error )

Vocabulary

debugger

Inputs

string

an object

Outputs

error

an object

Definition

USING: accessors assocs compiler.errors kernel namespaces ;

IN: debugger

: find-ffi-error ( string -- error )
    [ linkage-errors get ] dip [ [ nip asset>> name>> ] ] dip
    [ = ] curry compose assoc-find drop nip
    [ error>> message>> ] [ "none" ] if* ;