number-wrapper

Vocabulary

hashtables.numbers.private

Definition

USING: math ;

IN: hashtables.numbers.private

TUPLE: number-wrapper
    { underlying number read-only initial: 0 } ;

Methods

USING: accessors hashtables.numbers.private kernel math ;

M: number-wrapper equal?
    over number-wrapper?
    [ [ underlying>> ] bi@ number= ] [ 2drop f ] if ; inline


USING: accessors hashtables.numbers.private kernel
math.hashcodes ;

M: number-wrapper hashcode* nip underlying>> number-hashcode
    ; inline