>>major_code ( object value -- object )


Vocabulary
accessors

Inputs
objectan object
valuean object


Outputs
objectan object


Definition
USING: kernel ;

IN: accessors

: >>major_code ( object value -- object ) over major_code<<
; inline