steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

bootstrap.compiler: move GetLastError/FormatMessageW compilation before any other foreign words; add a similar shortlist for dlerror on unix as a safeguard

db4
Joe Groff 2011-09-13 13:17:42 -07:00
parent 1927cfeec1
commit 7f71ab3024
1 changed files with 9 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
basis/bootstrap/compiler/compiler.factor
View File

@ -107,16 +107,21 @@ gc
"." write flush "." write flush
{
malloc calloc free memcpy
} compile-unoptimized
os windows? [ os windows? [
"GetLastError" "windows.kernel32" lookup "GetLastError" "windows.kernel32" lookup
"FormatMessageW" "windows.kernel32" lookup "FormatMessageW" "windows.kernel32" lookup
2array compile-unoptimized 2array compile-unoptimized
] when ] when
os unix? [
"(dlerror)" "alien.libraries.unix" lookup
1array compile-unoptimized
] when
{
malloc calloc free memcpy
} compile-unoptimized
"." write flush "." write flush
vocabs [ words compile-unoptimized "." write flush ] each vocabs [ words compile-unoptimized "." write flush ] each