-USING: kernel tools.test windows.ole32 alien.c-types
-classes.struct specialized-arrays windows.kernel32
-windows.com.syntax ;
+USING: alien.c-types classes.struct kernel math sequences
+sets specialized-arrays tools.test windows.com.syntax
+windows.kernel32 windows.ole32 ;
SPECIALIZED-ARRAY: uchar
IN: windows.ole32.tests
[ "{01234567-89ab-cdef-0123-456789abcdef}" ]
[ "{01234567-89ab-cdef-0123-456789abcdef}" string>guid guid>string ]
unit-test
+
+{ 0 } [ 10 [ create-guid ] replicate duplicates length ] unit-test