unofficial mirror of guile-user@gnu.org 
 help / color / mirror / Atom feed
* A test script for statprof
@ 2021-02-26 15:31 Tommi Höynälänmaa
  0 siblings, 0 replies; only message in thread
From: Tommi Höynälänmaa @ 2021-02-26 15:31 UTC (permalink / raw)
  To: guile-user


[-- Attachment #1.1.1: Type: text/plain, Size: 85 bytes --]

Hi

Here is a script to test the statprof patch.

      - Tommi Höynälänmaa



[-- Attachment #1.1.2: statprof-test.scm --]
[-- Type: text/x-scheme, Size: 169 bytes --]

(use-modules (statprof))

(define (factorial n)
  (if (= n 0) 1 (* n (factorial (- n 1)))))

(statprof (lambda ()
            (factorial 10000)
            #f))

[-- Attachment #1.1.3: OpenPGP_0xBB861FDE40460F83.asc --]
[-- Type: application/pgp-keys, Size: 3199 bytes --]

[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 840 bytes --]

^ permalink raw reply	[flat|nested] only message in thread

only message in thread, other threads:[~2021-02-26 15:31 UTC | newest]

Thread overview: (only message) (download: mbox.gz / follow: Atom feed)
-- links below jump to the message on this page --
2021-02-26 15:31 A test script for statprof Tommi Höynälänmaa

This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).