Diff of /src/compiler/x86/parms.lisp [4af254] .. [3d19a6]  Maximize  Restore

  Switch to unified view

a/src/compiler/x86/parms.lisp b/src/compiler/x86/parms.lisp
...
...
133
;;;     support was added for FreeBSD ca. 20000910. This was to keep from
133
;;;     support was added for FreeBSD ca. 20000910. This was to keep from
134
;;;     stomping on an address range that the dynamic libraries want to
134
;;;     stomping on an address range that the dynamic libraries want to
135
;;;     use. (They want to use this address range even if we try to
135
;;;     use. (They want to use this address range even if we try to
136
;;;     reserve it with a call to validate() as the first operation in
136
;;;     reserve it with a call to validate() as the first operation in
137
;;;     main().)
137
;;;     main().)
138
;;;   * For NetBSD 2.0, the following ranges are used by normal
139
;;;     executables and mmap:
140
;;;     ** Executables are (by default) loaded at 0x08048000.
141
;;;     ** The break for the sbcl runtime seems to end around 0x08400000
142
;;;     We set read only space around 0x20000000, static
143
;;;     space around 0x30000000, all ending below 0x37fff000
144
;;;     ** ld.so and other mmap'ed stuff like shared libs start around
145
;;;        0x48000000
146
;;;     We set dynamic space between 0x60000000 and 0x98000000
147
;;;     ** Bottom of the stack is typically not below 0xb0000000
148
;;;     FYI, this can be looked at with the "pmap" program, and if you
149
;;;     set the top-down mmap allocation option in the kernel (not yet
150
;;;     the default), all bets are totally off!
138
151
139
#!+linux
152
#!+linux
140
(progn
153
(progn
141
154
142
  (def!constant read-only-space-start #x01000000)
155
  (def!constant read-only-space-start #x01000000)
...
...
146
  (def!constant static-space-end      #x07fff000)
159
  (def!constant static-space-end      #x07fff000)
147
160
148
  (def!constant dynamic-space-start   #x09000000)
161
  (def!constant dynamic-space-start   #x09000000)
149
  (def!constant dynamic-space-end     #x29000000))
162
  (def!constant dynamic-space-end     #x29000000))
150
163
151
#!+bsd
164
#!+(or freebsd openbsd)
152
(progn
165
(progn
153
166
154
  (def!constant read-only-space-start #x10000000)
167
  (def!constant read-only-space-start #x10000000)
155
  (def!constant read-only-space-end   #x1ffff000)
168
  (def!constant read-only-space-end   #x1ffff000)
156
169
...
...
161
174
162
  (def!constant dynamic-space-start
175
  (def!constant dynamic-space-start
163
    #!+freebsd                             #x48000000
176
    #!+freebsd                             #x48000000
164
    #!+openbsd                             #x50000000)
177
    #!+openbsd                             #x50000000)
165
  (def!constant dynamic-space-end          #x88000000))
178
  (def!constant dynamic-space-end          #x88000000))
179
180
#!+netbsd
181
(progn
182
183
  (def!constant read-only-space-start #x20000000)
184
  (def!constant read-only-space-end   #x2ffff000)
185
186
  (def!constant static-space-start    #x30000000)
187
  (def!constant static-space-end      #x37fff000)
188
189
  (def!constant dynamic-space-start   #x60000000)
190
  (def!constant dynamic-space-end     #x98000000))
191
166
192
167
;;; Given that NIL is the first thing allocated in static space, we
193
;;; Given that NIL is the first thing allocated in static space, we
168
;;; know its value at compile time:
194
;;; know its value at compile time:
169
(def!constant nil-value (+ static-space-start #xb))
195
(def!constant nil-value (+ static-space-start #xb))
170

196


Get latest updates about Open Source Projects, Conferences and News.

Sign up for the SourceForge newsletter:





No, thanks