Raymond Toy pushed to branch issue-350-solaris-export-warnings at cmucl / cmucl
Commits:
532bc06b by Raymond Toy at 2024-08-22T16:06:24-07:00
Add "ARM-FASL-FILE-IMPLEMENTATION" to C package exports
Solaris14 complains about this. Don't know why Linux or OSX don't,
but we should export this since it is exported in
src/compiler/generic/vm-macs.lisp.
- - - - -
1 changed file:
- src/code/exports.lisp
Changes:
=====================================
src/code/exports.lisp
=====================================
@@ -1989,6 +1989,7 @@
"ALPHA-FASL-FILE-IMPLEMENTATION"
"SGI-FASL-FILE-IMPLEMENTATION"
"AMD64-FASL-FILE-IMPLEMENTATION"
+ "ARM-FASL-FILE-IMPLEMENTATION"
"MAKE-UNBOUND-MARKER"
"RETURN-SINGLE"
"BACKEND-PAGE-SIZE"
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/532bc06bcd2c33da1faa8dd…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/532bc06bcd2c33da1faa8dd…
You're receiving this email because of your account on gitlab.common-lisp.net.
Raymond Toy pushed to branch master at cmucl / cmucl
Commits:
adf29820 by Raymond Toy at 2024-08-22T20:29:32+00:00
Fix #353: Use gtar on Solaris
- - - - -
186fb776 by Raymond Toy at 2024-08-22T20:29:36+00:00
Merge branch 'issue-353-solaris-use-gtar' into 'master'
Fix #353: Use gtar on Solaris
Closes #353
See merge request cmucl/cmucl!250
- - - - -
1 changed file:
- bin/make-dist.sh
Changes:
=====================================
bin/make-dist.sh
=====================================
@@ -59,7 +59,8 @@ def_arch_os () {
sun*)
ARCH=sparc ;;
i*)
- ARCH=x86 ;;
+ ARCH=x86
+ GTAR=gtar ;;
esac
uname_r=`uname -r`
case $uname_r in
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/e4b82cb4e97cd29203c7a9…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/e4b82cb4e97cd29203c7a9…
You're receiving this email because of your account on gitlab.common-lisp.net.
Raymond Toy pushed to branch master at cmucl / cmucl
Commits:
ea1f0b32 by Raymond Toy at 2024-08-22T20:20:51+00:00
Fix #351: Use grep instead of egrep and update patterns
- - - - -
e4b82cb4 by Raymond Toy at 2024-08-22T20:20:54+00:00
Merge branch 'issue-351-solaris-grep' into 'master'
Fix #351: Use grep instead of egrep and update patterns
Closes #351
See merge request cmucl/cmucl!249
- - - - -
1 changed file:
- bin/make-extra-dist.sh
Changes:
=====================================
bin/make-extra-dist.sh
=====================================
@@ -93,13 +93,15 @@ install ${GROUP} ${OWNER} -m 0755 $TARGET/motif/server/motifd \
$DESTDIR/lib/cmucl/lib/
# Install the contrib stuff. Create the directories and then copy the files.
-
-for d in `(cd src; find contrib -type d -print | grep -E -v "CVS|asdf|defsystem")`
+#
+# asdf, defsystem and unix are part of the main distribution, so skip
+# these directories.
+for d in `(cd src; find contrib -type d -print | grep -v "asdf\|defsystem")`
do
install -d ${GROUP} ${OWNER} -m 0755 $DESTDIR/lib/cmucl/lib/$d
done
-for f in `(cd src/contrib; find . -type f -print | grep -E -v "CVS|asdf|defsystem|unix")`
+for f in `(cd src/contrib; find . -type f -print | grep -v "asdf\|defsystem\|unix")`
do
FILE=`basename $f`
DIR=`dirname $f`
@@ -108,13 +110,13 @@ done
# Install all the locale data.
-for d in `(cd src/i18n/; find locale -type d -print | grep -E -v CVS)`
+for d in `(cd src/i18n/; find locale -type d -print)`
do
install -d ${GROUP} ${OWNER} -m 0755 $DESTDIR/lib/cmucl/lib/$d
done
-# Install mo files.
-for f in `(cd $TARGET/i18n; find locale -type f -print | grep -E -v 'CVS|~.*~|.*~')`
+# Install mo files. Ignore any emacs-style backup files.
+for f in `(cd $TARGET/i18n; find locale -type f -print | grep -v '~.*~\|.*~')`
do
FILE=`basename $f`
DIR=`dirname $f`
@@ -122,7 +124,7 @@ do
done
# Install po files. (Do we really need to distribute the po files?)
-#for f in `(cd $TARGET/i18n; find locale -type f -print | grep -E -v 'CVS|~.*~|.*~')`
+#for f in `(cd $TARGET/i18n; find locale -type f -print | grep -v '~.*~\|.*~')`
#do
# FILE=`basename $f`
# DIR=`dirname $f`
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/0243097544980dde9def2a…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/0243097544980dde9def2a…
You're receiving this email because of your account on gitlab.common-lisp.net.
Raymond Toy pushed to branch master at cmucl / cmucl
Commits:
6b8df49b by Raymond Toy at 2024-08-22T14:18:22+00:00
Fix #262: arch_skip_inst invalid code
- - - - -
02430975 by Raymond Toy at 2024-08-22T14:18:49+00:00
Merge branch 'issue-262-fix-arch-skip-inst-invalid' into 'master'
Fix #262: arch_skip_inst invalid code
Closes #262
See merge request cmucl/cmucl!248
- - - - -
1 changed file:
- src/lisp/x86-arch.c
Changes:
=====================================
src/lisp/x86-arch.c
=====================================
@@ -29,7 +29,13 @@
* included here.
*/
static const unsigned char ud1[] = {0x0f, 0xb9};
-
+
+/*
+ * Extract the error trap code from the UD1 instruction. BYTE must be
+ * the 3rd byte of the UD1 instruction that represents the mod r/m
+ * byte.
+ */
+#define UD1_CODE(modrm) ((modrm) & 0x3f)
/*
* Set to positive value to enabled debug prints related to the sigill
@@ -161,7 +167,8 @@ arch_skip_instruction(os_context_t * context)
*/
pc += sizeof(ud1);
- code = *pc++;
+ code = UD1_CODE(*pc++);
+
SC_PC(context) = (unsigned long) pc;
switch (code) {
@@ -187,7 +194,7 @@ arch_skip_instruction(os_context_t * context)
break;
default:
- fprintf(stderr, "[arch_skip_inst invalid code %d\n]\n", code);
+ fprintf(stderr, "[arch_skip_inst invalid code 0x%x\n]\n", code);
break;
}
@@ -387,7 +394,7 @@ sigill_handler(HANDLER_ARGS)
* number is placed in the low 6-bits of the 3rd byte of the
* instruction.
*/
- trap = *(((char *)SC_PC(context)) + 2) & 0x3f;
+ trap = UD1_CODE(*(((char *)SC_PC(context)) + sizeof(ud1)));
DPRINTF(debug_handlers, (stderr, "code = %x\n", trap));
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/b614f974decf204770b377…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/compare/b614f974decf204770b377…
You're receiving this email because of your account on gitlab.common-lisp.net.
Raymond Toy pushed to branch issue-262-fix-arch-skip-inst-invalid at cmucl / cmucl
Commits:
570d67ec by Raymond Toy at 2024-08-22T13:17:50+00:00
Apply 2 suggestion(s) to 1 file(s)
Co-authored-by: Carl Shapiro <cshapiro(a)panix.com>
- - - - -
1 changed file:
- src/lisp/x86-arch.c
Changes:
=====================================
src/lisp/x86-arch.c
=====================================
@@ -35,7 +35,7 @@ static const unsigned char ud1[] = {0x0f, 0xb9};
* the 3rd byte of the UD1 instruction that represents the mod r/m
* byte.
*/
-#define UD1_CODE(byte) ((byte) & 0x3f)
+#define UD1_CODE(modrm) ((modrm) & 0x3f)
/*
* Set to positive value to enabled debug prints related to the sigill
@@ -394,7 +394,7 @@ sigill_handler(HANDLER_ARGS)
* number is placed in the low 6-bits of the 3rd byte of the
* instruction.
*/
- trap = UD1_CODE(*(((char *)SC_PC(context)) + 2));
+ trap = UD1_CODE(*(((char *)SC_PC(context)) + sizeof(ud1)));
DPRINTF(debug_handlers, (stderr, "code = %x\n", trap));
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/570d67ecc5141c3c01ee096…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/570d67ecc5141c3c01ee096…
You're receiving this email because of your account on gitlab.common-lisp.net.
Raymond Toy pushed to branch issue-262-fix-arch-skip-inst-invalid at cmucl / cmucl
Commits:
47e545bb by Raymond Toy at 2024-08-21T19:15:22-07:00
Print the invalid code as hex, not a signed integer.
We used to print -55. It now prints as 0xc9, which is more helpful in
determining. (Of course this won't actually be printed anymore since
the code is now the low 6 bits of the byte.)
- - - - -
1 changed file:
- src/lisp/x86-arch.c
Changes:
=====================================
src/lisp/x86-arch.c
=====================================
@@ -194,7 +194,7 @@ arch_skip_instruction(os_context_t * context)
break;
default:
- fprintf(stderr, "[arch_skip_inst invalid code %d\n]\n", code);
+ fprintf(stderr, "[arch_skip_inst invalid code 0x%x\n]\n", code);
break;
}
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/47e545bbc1b6c7f542ff351…
--
View it on GitLab: https://gitlab.common-lisp.net/cmucl/cmucl/-/commit/47e545bbc1b6c7f542ff351…
You're receiving this email because of your account on gitlab.common-lisp.net.