Skip to content
Snippets Groups Projects
Commit c2323072 authored by agoncharov's avatar agoncharov
Browse files

* code/exports.lisp -- Added a missing quote characher.
* lisp/FreeBSD-os.c -- Fixed the switch to the SSE2 mode, in line with other OSes.
* lisp/Linux-os.c -- Fixed a comment (sse != sse2)
parent addf17d7
No related branches found
No related tags found
No related merge requests found
......@@ -5,7 +5,7 @@
;;; Carnegie Mellon University, and has been placed in the public domain.
;;;
(ext:file-comment
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.279 2009/01/06 01:11:24 rtoy Exp $")
"$Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/code/exports.lisp,v 1.280 2009/01/06 02:28:14 agoncharov Exp $")
;;;
;;; **********************************************************************
;;;
......@@ -1385,7 +1385,7 @@
(:export "*COMMAND-LINE-WORDS*" "*COMMAND-LINE-SWITCHES*"
"*COMMAND-SWITCH-DEMONS*" "*COMMAND-LINE-UTILITY-NAME*"
"*COMMAND-LINE-STRINGS*" "*BATCH-MODE*"
"*COMMAND-LINE-APPLICATION-ARGUMENTS*
"*COMMAND-LINE-APPLICATION-ARGUMENTS*"
"CMD-SWITCH-STRING" "COMMAND-LINE-SWITCH-P"
"CMD-SWITCH-NAME" "CMD-SWITCH-VALUE" "CMD-SWITCH-WORDS" "COMMAND-LINE-SWITCH"
"DEFSWITCH" "CMD-SWITCH-ARG" "GET-COMMAND-LINE-SWITCH")
......
......@@ -12,7 +12,7 @@
* Much hacked by Paul Werkowski
* GENCGC support by Douglas Crosher, 1996, 1997.
*
* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/FreeBSD-os.c,v 1.27 2008/12/10 02:39:13 rtoy Exp $
* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/FreeBSD-os.c,v 1.28 2009/01/06 02:28:14 agoncharov Exp $
*
*/
......@@ -137,7 +137,7 @@ os_sigcontext_fpu_modes(ucontext_t *scp)
modes = ((cw & 0x3f) << 7) | (sw & 0x3f);
#ifdef FEATURE_SSE2
if (arch_support_sse2()) {
if (fpu_mode == SSE2) {
u_int32_t mxcsr = env_xmm->en_mxcsr;
DPRINTF(0, (stderr, "SSE2 modes = %08x\n", (int) mxcsr));
modes |= mxcsr;
......
......@@ -15,7 +15,7 @@
* GENCGC support by Douglas Crosher, 1996, 1997.
* Alpha support by Julian Dolby, 1999.
*
* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/Linux-os.c,v 1.42 2009/01/05 22:26:27 rtoy Exp $
* $Header: /Volumes/share2/src/cmucl/cvs2git/cvsroot/src/lisp/Linux-os.c,v 1.43 2009/01/06 02:28:14 agoncharov Rel $
*
*/
......@@ -129,7 +129,7 @@ os_sigcontext_fpu_modes(ucontext_t *scp)
#ifdef FEATURE_SSE2
/*
* Add in the SSE2 part, if we're running the sse core.
* Add in the SSE2 part, if we're running the sse2 core.
*/
if (fpu_mode == SSE2) {
struct _fpstate *fpstate;
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment