stop<< ( value object -- )

Vocabulary

accessors

Inputs

value	an object
object	an object

Outputs

None

Definition

IN: accessors

GENERIC: stop<< ( value object -- )

Methods

USING: accessors classes.struct classes.struct.private
tools.time.struct vm ;

M: benchmark-data-pair stop<<
    T{ struct-slot-spec
        { name "stop" }
        { offset 200 }
        { class benchmark-data }
        { initial
            S{ benchmark-data
                { time 0 }
                { data-room
                    S{ data-heap-room
                        { nursery ~copying-sizes~ }
                        { aging ~copying-sizes~ }
                        { tenured ~mark-sweep-sizes~ }
                        { cards 0 }
                        { decks 0 }
                        { mark-stack 0 }
                    }
                }
                { code-room
                    S{ mark-sweep-sizes
                        { size 0 }
                        { occupied 0 }
                        { total-free 0 }
                        { contiguous-free 0 }
                        { free-block-count 0 }
                    }
                }
                { callback-room
                    S{ mark-sweep-sizes
                        { size 0 }
                        { occupied 0 }
                        { total-free 0 }
                        { contiguous-free 0 }
                        { free-block-count 0 }
                    }
                }
            }
        }
        { type benchmark-data }
    } write-struct-slot ; inline


USING: accessors openai slots.private ;

M: chat-completion stop<< 8 set-slot ; inline


USING: accessors openai slots.private ;

M: completion stop<< 12 set-slot ; inline


USING: accessors io.streams.limited slots.private ;

M: limited-stream stop<< 7 set-slot ; inline