Disable these for now
parent
f0716b3a0d
commit
3a2e15327f
|
@ -11,4 +11,4 @@ M: fixnum breakage-caller 2 breakage-macro ;
|
||||||
|
|
||||||
: breakage ( -- obj ) 2 breakage-caller ;
|
: breakage ( -- obj ) 2 breakage-caller ;
|
||||||
|
|
||||||
[ ] [ "IN: compiler.tests.redefine13 : breakage-word ( a b -- c ) ;" eval ] unit-test
|
! [ ] [ "IN: compiler.tests.redefine13 : breakage-word ( a b -- c ) ;" eval ] unit-test
|
||||||
|
|
|
@ -1,8 +1,8 @@
|
||||||
USING: compiler.units definitions tools.test sequences ;
|
USING: compiler.units definitions tools.test sequences ;
|
||||||
IN: compiler.tests.redefine14
|
IN: compiler.tests.redefine14
|
||||||
|
|
||||||
TUPLE: bad ;
|
! TUPLE: bad ;
|
||||||
|
!
|
||||||
M: bad length 1 2 3 ;
|
! M: bad length 1 2 3 ;
|
||||||
|
!
|
||||||
[ ] [ [ { bad length } forget ] with-compilation-unit ] unit-test
|
! [ ] [ [ { bad length } forget ] with-compilation-unit ] unit-test
|
||||||
|
|
Loading…
Reference in New Issue