record-top-level-form ( quot source-file -- )

Vocabulary

source-files

Inputs

quot	an object
source-file	an object

Outputs

None

Definition

USING: accessors compiler.units words ;

IN: source-files

: record-top-level-form ( quot source-file -- )
    top-level-form<<
    [ ] [ f notify-definition-observers ] if-bootstrapping ;