suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

disable attempt at Jay's optimization

Browse Source 
When I enabled this, I don't see any speedup, on the R6RS test suite
benchmark (I see minor slowdown). Here are the numbers I get, on my
laptop:

   nt cache:  35537 msec
    neither: 844933 msec
 Jay's idea: 875306 msec

And with both on, I see a similar, minor slowdown (as compared to the
version with the nt cache).

The main difference seems to be that I'm getting about 6 "hits" per
test case on the nt-match structs (that is, I avoid work by finding an
nt-match struct) and I'm getting about 8,800 hits in the cache per
test case.
This commit is contained in:
Robby Findler 2011-12-31 10:08:24 -06:00
parent 424a535cf4
commit 6f97a3a783
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/redex/private/matcher.rkt
View File

@ -773,7 +773,7 @@ See match-a-pattern.rkt for more details
[else
(match-nt (hash-ref clang-list-ht nt)
(hash-ref clang-ht nt)
nt exp hole-info in-name? clang-ht)]))])
nt exp hole-info (and #f in-name?) clang-ht)]))])
try-again)
(hash-ref has-hole-ht nt)))]
[`(name ,name ,pat)