alien.data: fix unit test failure
parent
f950fca035
commit
4c4a86ee72
|
@ -1,6 +1,6 @@
|
|||
USING: alien alien.c-types alien.data alien.syntax
|
||||
classes.struct kernel sequences specialized-arrays
|
||||
tools.test ;
|
||||
specialized-arrays.private tools.test compiler.units vocabs ;
|
||||
IN: alien.data.tests
|
||||
|
||||
STRUCT: foo { a int } { b void* } { c bool } ;
|
||||
|
@ -33,3 +33,9 @@ SPECIALIZED-ARRAY: foo
|
|||
S{ foo f 1 f f }
|
||||
} [ first binary-zero? ] [ second binary-zero? ] [ third binary-zero? ] tri
|
||||
] unit-test
|
||||
|
||||
[ ] [
|
||||
[
|
||||
foo specialized-array-vocab forget-vocab
|
||||
] with-compilation-unit
|
||||
] unit-test
|
||||
|
|
Loading…
Reference in New Issue