update environment.winnt for <c-array> change

2009-08-31 10:31:28 -05:00 · 2009-08-31 10:31:28 -05:00 · faf953a6ed
parent 9d59d2b54f
commit faf953a6ed
1 changed files with 2 additions and 0 deletions
--- a/basis/environment/winnt/winnt.factor
+++ b/basis/environment/winnt/winnt.factor
@ -6,6 +6,8 @@ alien.c-types sequences windows.errors io.streams.memory
 io.encodings io ;
 IN: environment.winnt

+<< "TCHAR" require-c-arrays >>
+
 M: winnt os-env ( key -- value )
    MAX_UNICODE_PATH "TCHAR" <c-array>
    [ dup length GetEnvironmentVariable ] keep over 0 = [