Fix unit tests for specialized-arrays.direct change

db4
Slava Pestov 2009-09-05 02:26:06 -05:00
parent a054ec3d64
commit 1798000335
3 changed files with 6 additions and 5 deletions

View File

@ -5,8 +5,9 @@ classes.struct classes.tuple.private combinators
compiler.tree.debugger compiler.units destructors compiler.tree.debugger compiler.units destructors
io.encodings.utf8 io.pathnames io.streams.string kernel libc io.encodings.utf8 io.pathnames io.streams.string kernel libc
literals math mirrors multiline namespaces prettyprint literals math mirrors multiline namespaces prettyprint
prettyprint.config see sequences specialized-arrays.char int prettyprint.config see sequences specialized-arrays.char
specialized-arrays.ushort struct-arrays system tools.test ; specialized-arrays.int specialized-arrays.ushort
struct-arrays system tools.test ;
IN: classes.struct.tests IN: classes.struct.tests
<< <<

View File

@ -1,5 +1,5 @@
IN: specialized-arrays.tests IN: specialized-arrays.tests
USING: tools.test specialized-arrays sequences USING: tools.test alien.syntax specialized-arrays sequences
specialized-arrays.int specialized-arrays.bool specialized-arrays.int specialized-arrays.bool
specialized-arrays.ushort alien.c-types accessors kernel specialized-arrays.ushort alien.c-types accessors kernel
specialized-arrays.char specialized-arrays.uint arrays combinators ; specialized-arrays.char specialized-arrays.uint arrays combinators ;
@ -30,4 +30,5 @@ specialized-arrays.char specialized-arrays.uint arrays combinators ;
[ ushort-array{ 0 0 0 } ] [ [ ushort-array{ 0 0 0 } ] [
3 ALIEN: 123 100 <direct-ushort-array> new-sequence 3 ALIEN: 123 100 <direct-ushort-array> new-sequence
dup [ drop 0 ] change-each
] unit-test ] unit-test

View File

@ -1,8 +1,7 @@
! Copyright (C) 2009 Doug Coleman ! Copyright (C) 2009 Doug Coleman
! See http://factorcode.org/license.txt for BSD license. ! See http://factorcode.org/license.txt for BSD license.
USING: kernel accessors grouping sequences combinators math USING: kernel accessors grouping sequences combinators math
byte-arrays fry specialized-arrays.direct.ushort byte-arrays fry specialized-arrays.uint specialized-arrays.ushort
specialized-arrays.uint specialized-arrays.ushort
specialized-arrays.float images half-floats ; specialized-arrays.float images half-floats ;
IN: images.normalization IN: images.normalization