From a5e03af20c12861d3f92a418969a04150be56011 Mon Sep 17 00:00:00 2001 From: Mackenzie Straight Date: Fri, 18 Feb 2005 08:48:56 +0000 Subject: [PATCH] minor style updates --- library/io/win32-server.factor | 23 ++++------------------- library/io/win32-stream.factor | 22 ++++------------------ 2 files changed, 8 insertions(+), 37 deletions(-) diff --git a/library/io/win32-server.factor b/library/io/win32-server.factor index 20697eaa61..23d4587c76 100644 --- a/library/io/win32-server.factor +++ b/library/io/win32-server.factor @@ -1,8 +1,6 @@ -! :folding=indent:collapseFolds=1: - ! $Id$ ! -! Copyright (C) 2004 Mackenzie Straight. +! Copyright (C) 2004, 2005 Mackenzie Straight. ! ! Redistribution and use in source and binary forms, with or without ! modification, are permitted provided that the following conditions are met: @@ -26,22 +24,9 @@ ! ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. IN: win32-stream -USE: alien -USE: errors -USE: generic -USE: kernel -USE: kernel-internals -USE: lists -USE: math -USE: namespaces -USE: prettyprint -USE: stdio -USE: streams -USE: strings -USE: threads -USE: unparser -USE: win32-api -USE: win32-io-internals +USING: alien errors generic kernel kernel-internals lists math namespaces + prettyprint stdio streams strings threads unparser win32-api + win32-io-internals ; TUPLE: win32-server this ; TUPLE: win32-client-stream delegate host ; diff --git a/library/io/win32-stream.factor b/library/io/win32-stream.factor index 79f5b53323..f52c9c640e 100644 --- a/library/io/win32-stream.factor +++ b/library/io/win32-stream.factor @@ -1,8 +1,6 @@ -! :folding=indent:collapseFolds=1: - ! $Id$ ! -! Copyright (C) 2004 Mackenzie Straight. +! Copyright (C) 2004, 2005 Mackenzie Straight. ! ! Redistribution and use in source and binary forms, with or without ! modification, are permitted provided that the following conditions are met: @@ -26,21 +24,9 @@ ! ADVISED OF THE POSSIBILITY OF SUCH DAMAGE. IN: win32-stream -USE: alien -USE: continuations -USE: generic -USE: kernel -USE: kernel-internals -USE: lists -USE: math -USE: namespaces -USE: prettyprint -USE: stdio -USE: streams -USE: strings -USE: threads -USE: win32-api -USE: win32-io-internals +USING: alien continuations generic kernel kernel-internals lists math + namespaces prettyprint stdio streams strings threads win32-api + win32-io-internals ; TUPLE: win32-stream this ; ! FIXME: rewrite using tuples GENERIC: win32-stream-handle