Gentoo Archives: gentoo-commits

From: "Andrey Grozin (grozin)" <grozin@g.o>
To: gentoo-commits@l.g.o
Subject: [gentoo-commits] gentoo-x86 commit in dev-lisp/cmucl/files: 20e-execstack-fixes.patch 20e-customize-lisp-implementation-version.patch
Date: Thu, 06 Feb 2014 12:57:31
Message-Id: 20140206125726.877092004C@flycatcher.gentoo.org
1 grozin 14/02/06 12:57:26
2
3 Added: 20e-execstack-fixes.patch
4 20e-customize-lisp-implementation-version.patch
5 Log:
6 Version bump
7
8 (Portage version: 2.2.8-r1/cvs/Linux i686, signed Manifest commit with key 0x3AFFCE974D34BD8C!)
9
10 Revision Changes Path
11 1.1 dev-lisp/cmucl/files/20e-execstack-fixes.patch
12
13 file : http://sources.gentoo.org/viewvc.cgi/gentoo-x86/dev-lisp/cmucl/files/20e-execstack-fixes.patch?rev=1.1&view=markup
14 plain: http://sources.gentoo.org/viewvc.cgi/gentoo-x86/dev-lisp/cmucl/files/20e-execstack-fixes.patch?rev=1.1&content-type=text/plain
15
16 Index: 20e-execstack-fixes.patch
17 ===================================================================
18 diff -Naur work.old/src/lisp/alpha-assem.S work/src/lisp/alpha-assem.S
19 --- work.old/src/lisp/alpha-assem.S 2003-03-06 11:13:09.000000000 -0300
20 +++ work/src/lisp/alpha-assem.S 2010-05-10 00:06:34.000000000 -0300
21 @@ -297,3 +297,7 @@
22 function_end_breakpoint_end:
23
24
25 +
26 +#if defined(__linux__) && defined(__ELF__)
27 +.section .note.GNU-stack,"",%progbits
28 +#endif
29 diff -Naur work.old/src/lisp/amd64-assem.S work/src/lisp/amd64-assem.S
30 --- work.old/src/lisp/amd64-assem.S 2004-07-27 19:03:53.000000000 -0300
31 +++ work/src/lisp/amd64-assem.S 2010-05-10 00:06:34.000000000 -0300
32 @@ -1051,3 +1051,7 @@
33 .end
34
35 #endif /* LINKAGE_TABLE */
36 +
37 +#if defined(__linux__) && defined(__ELF__)
38 +.section .note.GNU-stack,"",%progbits
39 +#endif
40 diff -Naur work.old/src/lisp/backtrace.c work/src/lisp/backtrace.c
41 --- work.old/src/lisp/backtrace.c 2009-06-11 13:04:01.000000000 -0300
42 +++ work/src/lisp/backtrace.c 2010-05-10 00:06:22.000000000 -0300
43 @@ -3,6 +3,8 @@
44 * Simple backtrace facility. More or less from Rob's lisp version.
45 */
46
47 +#include "os-common.h"
48 +
49 #include <stdio.h>
50 #include <signal.h>
51 #include "lisp.h"
52 diff -Naur work.old/src/lisp/hppa-assem.S work/src/lisp/hppa-assem.S
53 --- work.old/src/lisp/hppa-assem.S 2002-08-23 14:05:35.000000000 -0300
54 +++ work/src/lisp/hppa-assem.S 2010-05-10 00:06:34.000000000 -0300
55 @@ -460,3 +460,7 @@
56
57 .export function_end_breakpoint_end
58 function_end_breakpoint_end
59 +
60 +#if defined(__linux__) && defined(__ELF__)
61 +.section .note.GNU-stack,"",%progbits
62 +#endif
63 diff -Naur work.old/src/lisp/linux-stubs.S work/src/lisp/linux-stubs.S
64 --- work.old/src/lisp/linux-stubs.S 2005-08-17 00:40:16.000000000 -0300
65 +++ work/src/lisp/linux-stubs.S 2010-05-10 00:06:34.000000000 -0300
66 @@ -995,3 +995,7 @@
67 /* doe(yperr_string) */
68 /* doe(ypprot_err) */
69 #endif /* defined(LINKAGE_TABLE) && !defined(__FreeBSD__) */
70 +
71 +#if defined(__linux__) && defined(__ELF__)
72 +.section .note.GNU-stack,"",%progbits
73 +#endif
74 diff -Naur work.old/src/lisp/lisp.c work/src/lisp/lisp.c
75 --- work.old/src/lisp/lisp.c 2009-07-13 16:41:54.000000000 -0300
76 +++ work/src/lisp/lisp.c 2010-05-10 00:05:55.000000000 -0300
77 @@ -5,6 +5,9 @@
78 *
79 */
80
81 +#include "os-common.h"
82 +#include <time.h>
83 +
84 #include <stdio.h>
85 #include <stdlib.h>
86 #include <limits.h>
87 diff -Naur work.old/src/lisp/mips-assem.S work/src/lisp/mips-assem.S
88 --- work.old/src/lisp/mips-assem.S 2002-08-23 14:01:02.000000000 -0300
89 +++ work/src/lisp/mips-assem.S 2010-05-10 00:06:34.000000000 -0300
90 @@ -402,3 +402,7 @@
91 move v0, a1
92 j _restore_state
93 .end save_state
94 +
95 +#if defined(__linux__) && defined(__ELF__)
96 +.section .note.GNU-stack,"",%progbits
97 +#endif
98 diff -Naur work.old/src/lisp/os-common.h work/src/lisp/os-common.h
99 --- work.old/src/lisp/os-common.h 1969-12-31 21:00:00.000000000 -0300
100 +++ work/src/lisp/os-common.h 2010-05-10 00:06:22.000000000 -0300
101 @@ -0,0 +1 @@
102 +char* convert_lisp_string(char *c_string, void *lisp_string, int len);
103 diff -Naur work.old/src/lisp/ppc-assem.S work/src/lisp/ppc-assem.S
104 --- work.old/src/lisp/ppc-assem.S 2006-02-25 01:35:58.000000000 -0300
105 +++ work/src/lisp/ppc-assem.S 2010-05-10 00:06:34.000000000 -0300
106 @@ -721,3 +721,7 @@
107 SET_SIZE(fpu_restore)
108
109 #endif
110 +
111 +#if defined(__linux__) && defined(__ELF__)
112 +.section .note.GNU-stack,"",%progbits
113 +#endif
114 diff -Naur work.old/src/lisp/sparc-assem.S work/src/lisp/sparc-assem.S
115 --- work.old/src/lisp/sparc-assem.S 2003-10-23 23:57:00.000000000 -0300
116 +++ work/src/lisp/sparc-assem.S 2010-05-10 00:06:34.000000000 -0300
117 @@ -837,3 +837,7 @@
118 * End:
119 */
120
121 +
122 +#if defined(__linux__) && defined(__ELF__)
123 +.section .note.GNU-stack,"",%progbits
124 +#endif
125 diff -Naur work.old/src/lisp/x86-assem.S work/src/lisp/x86-assem.S
126 --- work.old/src/lisp/x86-assem.S 2008-12-24 02:36:40.000000000 -0200
127 +++ work/src/lisp/x86-assem.S 2010-05-10 00:06:34.000000000 -0300
128 @@ -798,3 +798,7 @@
129 ENDFUNC(undefined_foreign_symbol_trap)
130
131 #endif /* LINKAGE_TABLE */
132 +
133 +#if defined(__linux__) && defined(__ELF__)
134 +.section .note.GNU-stack,"",%progbits
135 +#endif
136
137
138
139 1.1 dev-lisp/cmucl/files/20e-customize-lisp-implementation-version.patch
140
141 file : http://sources.gentoo.org/viewvc.cgi/gentoo-x86/dev-lisp/cmucl/files/20e-customize-lisp-implementation-version.patch?rev=1.1&view=markup
142 plain: http://sources.gentoo.org/viewvc.cgi/gentoo-x86/dev-lisp/cmucl/files/20e-customize-lisp-implementation-version.patch?rev=1.1&content-type=text/plain
143
144 Index: 20e-customize-lisp-implementation-version.patch
145 ===================================================================
146 diff -ur cmucl.orig/src/code/misc.lisp cmucl/src/code/misc.lisp
147 --- cmucl.orig/src/code/misc.lisp 2011-10-25 05:31:39.000000000 +0200
148 +++ cmucl/src/code/misc.lisp 2012-01-31 21:46:49.441273068 +0100
149 @@ -187,8 +187,10 @@
150
151 (defun lisp-implementation-version ()
152 "Returns a string describing the implementation version."
153 - (format nil "~A (~X~A)" *lisp-implementation-version* c:byte-fasl-file-version
154 - #+unicode _" Unicode" #-unicode ""))
155 + (format nil "~X~A~A"
156 + c:byte-fasl-file-version
157 + #+unicode "-unicode" #-unicode ""
158 + *lisp-implementation-version*))
159
160 (defun machine-instance ()
161 "Returns a string giving the name of the local machine."