The Racket repository
0b1e89bb50
When calling this function:
(contract (->i ([x integer?]
[y (x) (>=/c x)])
any)
(λ (x y) x)
'pos
'neg)
before this change it took this much time (to call the function many times):
cpu time: 1596 real time: 1606 gc time: 191
and after this change it takes this much time:
cpu time: 791 real time: 794 gc time: 7
Of course, on the same machine, just calling (λ (x y) x) the same number of times
gives us back this:
cpu time: 0 real time: 0 gc time: 0
sigh.
For perhaps another point of reference, this:
(contract (-> integer? integer? any)
(λ (x y) x)
'pos
'neg)
takes this much time:
cpu time: 393 real time: 395 gc time: 0
|
||
|---|---|---|
| collects | ||
| doc | ||
| man/man1 | ||
| src | ||
| .gitattributes | ||
| .gitignore | ||
| .mailmap | ||
| README | ||
The Racket programming language =============================== Important executables: * DrRacket: Racket's integrated development environment (start here!). * Racket: the main command-line entry point for running racket programs and scripts. * GRacket: the GUI-enabled Racket executable. * raco: Racket's command-line toolset. More Information ---------------- Racket comes with extensive documentation: use DrRacket's `Help' menu, or run `raco docs'. Also, visit us at http://racket-lang.org/ for more Racket resources. Instructions for building Racket from source are in src/README. License ------- Racket Copyright (c) 2010 PLT Scheme Inc. Racket is distributed under the GNU Lesser General Public License (LGPL). This means that you can link Racket into proprietary applications, provided you follow the rules stated in the LGPL. You can also modify Racket; if you distribute a modified version, you must distribute it under the terms of the LGPL, which in particular means that you must release the source code for the modified software. See doc/release-notes/COPYING.LIB for more information.