alien

Vocabulary

alien

Class description

The class of alien pointers. See Alien object literal syntax for syntax and Passing data between Factor and C for general information.

Definition

IN: alien

BUILTIN: alien
{ underlying c-ptr read-only initial: f } expired ;

Methods

USING: alien core-foundation core-foundation.utilities ;

M: alien (>cf) CFRetain ;


USING: alien tools.disassembler.private ;

M: alien convert-address alien-address ;


USING: alien kernel ;

M: alien equal?
    over alien? [
        2dup [ expired? ] either?
        [ [ expired? ] both? ] [ [ alien-address ] same? ] if
    ] [ 2drop f ] if ;


USING: accessors alien ;

M: alien expired? expired>> ;


USING: alien alien.syntax combinators kernel math.parser
prettyprint.backend prettyprint.custom prettyprint.sections ;

M: alien pprint*
    {
        { [ dup expired? ] [ drop \ BAD-ALIEN pprint-word ] }
        {
            [ dup pinned-c-ptr? not ]
            [ drop "( displaced alien )" text ]
        }
        [ \ ALIEN: [ alien-address >hex text ] pprint-prefix ]
    } cond ;