spider-page ( spider spider-result -- )

Vocabulary

spider.private

Inputs

spider	an object
spider-result	an object

Outputs

None

Definition

USING: accessors inspector kernel ;

IN: spider.private

:: spider-page ( spider spider-result -- )
    spider quiet?>> [ spider-result print-spidering ] unless
    spider spider-result fill-spidered-result spider quiet?>>
    [ spider-result describe ] unless
    spider spider-result add-spidered ;