From 1927cfeec1dfebf7e70a6e608c0bbaba178baa1e Mon Sep 17 00:00:00 2001
From: Joe Groff <arcata@gmail.com>
Date: Tue, 13 Sep 2011 11:58:30 -0700
Subject: [PATCH] bootstrap.compiler: add GetLastError and FormatMessageW to
 the compilation shortlist on Windows to avoid compilation order issues

---
 basis/bootstrap/compiler/compiler.factor | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/basis/bootstrap/compiler/compiler.factor b/basis/bootstrap/compiler/compiler.factor
index 9c753ce08f..c807b84c6d 100644
--- a/basis/bootstrap/compiler/compiler.factor
+++ b/basis/bootstrap/compiler/compiler.factor
@@ -111,6 +111,12 @@ gc
         malloc calloc free memcpy
     } compile-unoptimized
 
+    os windows? [
+        "GetLastError" "windows.kernel32" lookup
+        "FormatMessageW" "windows.kernel32" lookup
+        2array compile-unoptimized
+    ] when
+
     "." write flush
 
     vocabs [ words compile-unoptimized "." write flush ] each