fix environment on winnt

diff --git a/basis/environment/winnt/winnt.factor b/basis/environment/winnt/winnt.factor
index eb90a36ee7168a11044c904e288fe794ad25bd8e..d4ce25397c88b311b3e3eedd11d3b0106dc3a2ad 100644 (file)
--- a/basis/environment/winnt/winnt.factor
+++ b/basis/environment/winnt/winnt.factor
@@ -6,8 +6,10 @@ alien.c-types sequences windows.errors io.streams.memory
 io.encodings io ;
 IN: environment.winnt
 
+<< "TCHAR" require-c-type-arrays >>
+
 M: winnt os-env ( key -- value )
-    MAX_UNICODE_PATH "TCHAR" <c-array>
+    MAX_UNICODE_PATH "TCHAR" <c-type-array>
     [ dup length GetEnvironmentVariable ] keep over 0 = [
         2drop f
     ] [