/[cmucl]/src/code/x86-vm.lisp
ViewVC logotype

Diff of /src/code/x86-vm.lisp

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.30 by rtoy, Wed Nov 12 15:04:23 2008 UTC revision 1.31 by agoncharov, Wed Dec 10 02:21:31 2008 UTC
# Line 29  Line 29 
29            sigcontext-float-register sigcontext-floating-point-modes            sigcontext-float-register sigcontext-floating-point-modes
30            extern-alien-name sanctify-for-execution))            extern-alien-name sanctify-for-execution))
31    
 #+sse2  
 (sys:register-lisp-runtime-feature :sse2)  
32  #+complex-fp-vops  #+complex-fp-vops
33  (sys:register-lisp-feature :complex-fp-vops)  (sys:register-lisp-feature :complex-fp-vops)
34    
35  #+(or x87 (not :sse2))  #+(or x87 (not :sse2))
36  (sys:register-lisp-feature :x87)  (sys:register-lisp-feature :x87)
37    #+sse2
38    (progn
39      (setf *features* (delete :x87 *features*))
40      (sys:register-lisp-runtime-feature :sse2))
41    
42    
43  ;;;; The sigcontext structure.  ;;;; The sigcontext structure.

Legend:
Removed from v.1.30  
changed lines
  Added in v.1.31

  ViewVC Help
Powered by ViewVC 1.1.5