update environment.winnt for <c-array> change

2009-08-31 10:31:28 -05:00 · 2009-08-31 10:31:28 -05:00 · fc9f40b789
parent efe4f838ea
commit fc9f40b789
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 = [