Changeset 2594


Ignore:
Timestamp:
Sep 30, 2005, 6:51:27 PM (16 years ago)
Author:
gb
Message:

Flesh out a bit more.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/library/chud-metering.txt

    r2592 r2594  
    8181      1
    8282      (* n (fact (1- n)))))
     83FACT
     84? (defun fact-n-m-times (m n)
     85    (dotimes (i m)
     86      (fact n)))
     87FACT-N-M-TIMES
    8388
    8489Then run something with metering enabled:
    8590
    86 ? (CHUD:METER (dotimes (i 1000) (fact 1000)))
     91? (CHUD:METER (fact-n-m-times 1000 1000))
    8792
    88 The first time that CHUD:METER is invoked in a lisp
    89 session, it'll:
     93The first time that CHUD:METER is invoked in a lisp session, it'll:
    9094
    91951. Ensure that Shark is running
     
    97101   directory (which is where we configure Shark to look
    98102   for such files back in the "Prerequisites" section.)
     103   See also CHUD:*SPATCH-DIRECTORY-PATH*.
    99104
    1001054. Try to ensure that Shark is running in "remote" mode.
     
    145150way better than nothing.
    146151
     152 Reference
     153
     154(CHUD:METER form &key (duration 0) (frequency 1))  [Macro]
     155
     156Ensures that access to the "remote sampling facility" (Shark, usually)
     157has been acquired, ensure that code vectors have been purified and
     158that an spatch file for the current process is writen to the directory
     159named by CHUD:*SPATCH-DIRECTORY-PATH* (or the user's home directory),
     160and starts and stops the sampling facility around execution of <form>.
     161Returns whatever values execution of <form> returns.
     162
     163Arguments
     164  <form>        an arbitrary lisp expression
     165  <frequency>   sampling frequency in milliseconds
     166  <duration>    total number of sampling intervals, 0 implies "infinite".
     167
     168It seems that the <frequency> and <duration> arguments have no effect;
     169the sampling frequency and duration can be set via Shark's "configuration
     170editor" dialog.
     171
     172CHUD:*SPATCH-DIRECTORY-PATH*  [Special Variable]
     173
     174If non-NIL, should be a pathname whose directory component matches the
     175"Patch FIles" search path in Shark's Preferences.  When this variable
     176is NIL, USER-HOMEDIR-PATHNAME is used instead.
     177
     178
    147179 Acknowledgments
    148180
Note: See TracChangeset for help on using the changeset viewer.