Changeset 8709


Ignore:
Timestamp:
Mar 11, 2008, 5:56:20 PM (12 years ago)
Author:
andreas
Message:

Windows file system is case insensitive too. Also, treat return value of
VirtualProtect? properly.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/win64/lisp-kernel/pmcl-kernel.c

    r8696 r8709  
    778778
    779779
    780 #ifdef DARWIN
     780#if defined(DARWIN) || defined(WINDOWS)
    781781/*
    782782   The underlying file system may be case-insensitive (e.g., HFS),
     
    11981198{
    11991199  extern opcode spjump_start;
    1200   pc new, old;
    12011200  DWORD old_protect;
    12021201
    1203   new = VirtualProtect((pc) 0x15000,
    1204                        0x1000,
    1205                        PAGE_EXECUTE_READWRITE,
    1206                        &old_protect);
    1207   if (!new) {
     1202  if (!VirtualProtect((pc) 0x15000,
     1203                      0x1000,
     1204                      PAGE_EXECUTE_READWRITE,
     1205                      &old_protect)) {
    12081206    wperror("VirtualProtect spjump");
    12091207    _exit(1);
Note: See TracChangeset for help on using the changeset viewer.