remove irrelevant undo test from classes.struct

db4
Joe Groff 2009-08-18 10:25:47 -05:00
parent 24d9a8635c
commit 4ea2820f2f
1 changed files with 1 additions and 3 deletions

View File

@ -1,6 +1,6 @@
! (c)Joe Groff bsd license
USING: accessors alien.c-types classes.c-types classes.struct
combinators inverse kernel math tools.test ;
combinators kernel math tools.test ;
IN: classes.struct.tests
STRUCT: foo
@ -30,8 +30,6 @@ STRUCT: bar
[ 7654 ] [ S{ foo f 98 7654 f } y>> ] unit-test
[ 7654 ] [ S{ foo { y 7654 } } y>> ] unit-test
[ 98 7654 t ] [ S{ foo f 98 7654 t } [ foo <struct-boa> ] undo ] unit-test
UNION-STRUCT: float-and-bits
{ f single-float }
{ bits uint } ;