repo.or.cz
/
factor
/
jcg.git
/
blob
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
log
|
graphiclog1
|
graphiclog2
|
commit
|
commitdiff
|
tree
|
refs
|
edit
|
fork
blame
|
history
|
raw
|
HEAD
fix some db docs
[factor/jcg.git]
/
basis
/
compiler
/
tests
/
redefine14.factor
blob
807f3ed2c7161c3c2726cbeb1d26ef58e1bc7807
1
USING: compiler.units definitions tools.test sequences ;
2
IN: compiler.tests.redefine14
3
4
! TUPLE: bad ;
5
!
6
! M: bad length 1 2 3 ;
7
!
8
! [ ] [ [ { bad length } forget ] with-compilation-unit ] unit-test
