Delta profile

Jump to bottom Edit New page

angerangel edited this page Mar 15, 2013 · 1 revision

USAGE

   DELTA-PROFILE block

DESCRIPTION

Delta-profile of running a specific block.

DELTA-PROFILE is a function value.

ARGUMENTS

block (block!)

#SOURCE

delta-profile: make function! [  [
    "Delta-profile of running a specific block."
    block [block!]
    /local start end
][
    start: values-of stats/profile
    do block
    end: values-of stats/profile
    foreach num start [
        change end end/1 - num
        end: next end
    ]
    start: make system/standard/stats []
    set start head end
    start
] ]

Add a custom sidebar

Clone this wiki locally