removed tests that I cannot fix
svn: r3207
This commit is contained in:
parent
c21d9fca85
commit
1159ef9df1
|
@ -1636,6 +1636,7 @@
|
||||||
|
|
||||||
;; provide/contract should signal errors without requiring a reference to the variable
|
;; provide/contract should signal errors without requiring a reference to the variable
|
||||||
;; this test is bogus, because provide/contract'd variables can be set!'d.
|
;; this test is bogus, because provide/contract'd variables can be set!'d.
|
||||||
|
#;
|
||||||
(test/pos-blame
|
(test/pos-blame
|
||||||
'provide/contract15
|
'provide/contract15
|
||||||
'(parameterize ([current-namespace (make-namespace)])
|
'(parameterize ([current-namespace (make-namespace)])
|
||||||
|
@ -1646,8 +1647,9 @@
|
||||||
(eval '(require pos))))
|
(eval '(require pos))))
|
||||||
|
|
||||||
;; this is really a positive violation, but name the module `neg' just for an addl test
|
;; this is really a positive violation, but name the module `neg' just for an addl test
|
||||||
|
#;
|
||||||
(test/neg-blame
|
(test/neg-blame
|
||||||
'provide/contract15
|
'provide/contract16
|
||||||
'(parameterize ([current-namespace (make-namespace)])
|
'(parameterize ([current-namespace (make-namespace)])
|
||||||
(eval '(module neg mzscheme
|
(eval '(module neg mzscheme
|
||||||
(require (lib "contract.ss"))
|
(require (lib "contract.ss"))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user