From 0ecb771aa48808ec0c168b0e390719962d6580bb Mon Sep 17 00:00:00 2001
From: Slava Pestov <slava@slava-pestovs-macbook-pro.local>
Date: Tue, 5 May 2009 09:12:39 -0500
Subject: [PATCH] alien.strings cleanup

---
 core/alien/strings/strings.factor | 8 ++++----
 1 file changed, 4 insertions(+), 4 deletions(-)

diff --git a/core/alien/strings/strings.factor b/core/alien/strings/strings.factor
index 943530d4f2..896fb7f09f 100644
--- a/core/alien/strings/strings.factor
+++ b/core/alien/strings/strings.factor
@@ -34,16 +34,16 @@ M: string string>alien
 
 HOOK: alien>native-string os ( alien -- string )
 
-HOOK: native-string>alien os ( string -- alien )
-
 M: windows alien>native-string utf16n alien>string ;
 
+M: unix alien>native-string utf8 alien>string ;
+
+HOOK: native-string>alien os ( string -- alien )
+
 M: wince native-string>alien utf16n string>alien ;
 
 M: winnt native-string>alien utf8 string>alien ;
 
-M: unix alien>native-string utf8 alien>string ;
-
 M: unix native-string>alien utf8 string>alien ;
 
 : dll-path ( dll -- string )