From c8d63c56a9d53ffa1bf34e67a492e7d6f0369307 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Sat, 10 Feb 2018 15:25:36 -0600 Subject: [PATCH] factor: Clean up wrong form of specialized-arrays in using lists. --- basis/io/mmap/mmap-tests.factor | 3 +-- basis/ui/pens/caching/caching-tests.factor | 5 +++-- basis/windows/dragdrop-listener/dragdrop-listener.factor | 2 +- basis/windows/shell32/shell32.factor | 9 +++------ 4 files changed, 8 insertions(+), 11 deletions(-) diff --git a/basis/io/mmap/mmap-tests.factor b/basis/io/mmap/mmap-tests.factor index 28cbb547ed..3758dcefa6 100644 --- a/basis/io/mmap/mmap-tests.factor +++ b/basis/io/mmap/mmap-tests.factor @@ -1,7 +1,6 @@ USING: alien.c-types alien.data compiler.tree.debugger io.encodings.ascii io.files io.mmap kernel locals math sequences -sequences.private specialized-arrays -specialized-arrays.instances.alien.c-types.uint tools.test ; +sequences.private specialized-arrays tools.test ; SPECIALIZED-ARRAY: uint diff --git a/basis/ui/pens/caching/caching-tests.factor b/basis/ui/pens/caching/caching-tests.factor index 0ec5da43bc..cce3f0cb7c 100644 --- a/basis/ui/pens/caching/caching-tests.factor +++ b/basis/ui/pens/caching/caching-tests.factor @@ -1,10 +1,11 @@ ! Copyright (C) 2009 Slava Pestov. ! See http://factorcode.org/license.txt for BSD license. -USING: accessors colors.constants kernel -specialized-arrays.instances.alien.c-types.float tools.test +USING: accessors colors.constants kernel tools.test ui.gadgets.labels ui.pens.caching ui.pens.gradient ; IN: ui.pens.caching.tests +SPECIALIZED-ARRAY: float + ! compute-pen { { 0 0 } diff --git a/basis/windows/dragdrop-listener/dragdrop-listener.factor b/basis/windows/dragdrop-listener/dragdrop-listener.factor index 750049b8e1..505832d0c2 100644 --- a/basis/windows/dragdrop-listener/dragdrop-listener.factor +++ b/basis/windows/dragdrop-listener/dragdrop-listener.factor @@ -4,11 +4,11 @@ USING: accessors alien.accessors alien.data alien.strings classes.struct io.encodings.utf16n kernel make math namespaces prettyprint sequences specialized-arrays -specialized-arrays.instances.alien.c-types.ushort ui.backend.windows ui.gadgets.worlds ui.gestures ui.tools.listener windows.com windows.com.wrapper windows.dropfiles windows.kernel32 windows.ole32 windows.shell32 windows.types ; +SPECIALIZED-ARRAY: ushort SPECIALIZED-ARRAY: WCHAR IN: windows.dragdrop-listener diff --git a/basis/windows/shell32/shell32.factor b/basis/windows/shell32/shell32.factor index df840b4f70..864663bd40 100644 --- a/basis/windows/shell32/shell32.factor +++ b/basis/windows/shell32/shell32.factor @@ -1,11 +1,8 @@ ! Copyright (C) 2006, 2008 Doug Coleman. ! See http://factorcode.org/license.txt for BSD license. -USING: alien alien.c-types alien.data alien.strings -alien.syntax classes.struct io.backend kernel -specialized-arrays -specialized-arrays.instances.alien.c-types.ushort windows -windows.com windows.com.syntax windows.kernel32 windows.ole32 -windows.types ; +USING: alien alien.c-types alien.data alien.strings alien.syntax +classes.struct io.backend kernel windows windows.com +windows.com.syntax windows.kernel32 windows.ole32 windows.types ; IN: windows.shell32 CONSTANT: CSIDL_DESKTOP 0x00 -- 2.34.1