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

change the #:get-lock-file argument of call-with-file-lock/timeout to #:lock-file

Browse Source 
original commit: 997813680db107a75dae889f73bc3da5ce00806f
This commit is contained in:
Robby Findler 2011-08-11 09:28:01 -05:00
parent 2673b89af3
commit f38df9c69b
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/tests/typed-scheme/unit-tests/typecheck-tests.rkt
View File

@ -1162,7 +1162,7 @@
(t:-> -Pathlike ManyUniv))
(tc-e (call-with-file-lock/timeout #f 'exclusive (lambda () 'res) (lambda () 'err)
#:get-lock-file (lambda () "lock")
#:lock-file "lock"
#:delay .01
#:max-delay .2) (one-of/c 'res 'err))

2
collects/typed-scheme/base-env/base-env.rkt
View File

@ -835,7 +835,7 @@
(one-of/c 'shared 'exclusive)
(-> a)
(-> a)
#:get-lock-file (-> -Pathlike) #f
#:lock-file (-opt -Pathlike) #f
#:delay -Real #f
#:max-delay -Real #f
a))]