From fc9f40b789058599518d425bb60fef3bbe6f8f0c Mon Sep 17 00:00:00 2001 From: Joe Groff Date: Mon, 31 Aug 2009 10:31:28 -0500 Subject: [PATCH] update environment.winnt for change --- basis/environment/winnt/winnt.factor | 2 ++ 1 file changed, 2 insertions(+) diff --git a/basis/environment/winnt/winnt.factor b/basis/environment/winnt/winnt.factor index eb90a36ee7..afe4425b3f 100644 --- 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" [ dup length GetEnvironmentVariable ] keep over 0 = [