git-object-from-pack ( sha1 -- pack )

Vocabulary

git

Inputs

sha1

an object

Outputs

pack

an object

Definition

USING: accessors kernel sequences ;

IN: git

: git-object-from-pack ( sha1 -- pack )
    [ find-pack-for [ first ] [ third ] bi parse-packed-object ]
    keep >>hash ;