|
|
61a2dab |
Description: <short summary of the patch>
|
|
|
61a2dab |
TODO: Put a short summary on the line above and replace this paragraph
|
|
|
61a2dab |
with a longer explanation of this change. Complete the meta-information
|
|
|
61a2dab |
with other relevant fields (see below for details). To make it easier, the
|
|
|
61a2dab |
information below has been extracted from the changelog. Adjust it or drop
|
|
|
61a2dab |
it.
|
|
|
61a2dab |
.
|
|
|
61a2dab |
gcl (2.6.12-98) unstable; urgency=medium
|
|
|
61a2dab |
.
|
|
|
61a2dab |
* Version_2.6.13pre94
|
|
|
61a2dab |
Author: Camm Maguire <camm@debian.org>
|
|
|
61a2dab |
|
|
|
61a2dab |
---
|
|
|
61a2dab |
The information above should follow the Patch Tagging Guidelines, please
|
|
|
61a2dab |
checkout http://dep.debian.net/deps/dep3/ to learn about the format. Here
|
|
|
61a2dab |
are templates for supplementary fields that you might want to add:
|
|
|
61a2dab |
|
|
|
61a2dab |
Origin: <vendor|upstream|other>, <url of original patch>
|
|
|
61a2dab |
Bug: <url in upstream bugtracker>
|
|
|
61a2dab |
Bug-Debian: https://bugs.debian.org/<bugnumber>
|
|
|
61a2dab |
Bug-Ubuntu: https://launchpad.net/bugs/<bugnumber>
|
|
|
61a2dab |
Forwarded: <no|not-needed|url proving that it has been forwarded>
|
|
|
61a2dab |
Reviewed-By: <name and email of someone who approved the patch>
|
|
|
61a2dab |
Last-Update: 2020-11-28
|
|
|
61a2dab |
|
|
|
61a2dab |
--- gcl-2.6.12.orig/h/compprotos.h
|
|
|
61a2dab |
+++ gcl-2.6.12/h/compprotos.h
|
|
|
61a2dab |
@@ -179,5 +179,5 @@ void gcl_init_or_load1(void (*)(void),co
|
|
|
61a2dab |
char *gcl_gets(char *,int);
|
|
|
61a2dab |
int gcl_puts(const char *);
|
|
|
61a2dab |
int endp_error(object);
|
|
|
61a2dab |
-object Icall_gen_error_handler(object,object,object,object,ufixnum,...);
|
|
|
61a2dab |
+object Icall_gen_error_handler(object,object,object,object,ufixnum,...) __attribute__((noreturn));
|
|
|
61a2dab |
object file_stream(object);
|
|
|
61a2dab |
--- gcl-2.6.12.orig/h/elf32_armhf_reloc.h
|
|
|
61a2dab |
+++ gcl-2.6.12/h/elf32_armhf_reloc.h
|
|
|
61a2dab |
@@ -4,7 +4,7 @@
|
|
|
61a2dab |
case R_ARM_THM_JUMP24:
|
|
|
61a2dab |
{
|
|
|
61a2dab |
long x=(long)(s+a-p);
|
|
|
61a2dab |
- if (abs(x)&(~MASK(23))) {
|
|
|
61a2dab |
+ if (abs(x)&(~MASK(22))) {
|
|
|
61a2dab |
|
|
|
61a2dab |
got+=(sym->st_size-1)*tz;
|
|
|
61a2dab |
memcpy(got,tramp,sizeof(tramp));
|
|
|
61a2dab |
--- gcl-2.6.12.orig/h/object.h
|
|
|
61a2dab |
+++ gcl-2.6.12/h/object.h
|
|
|
61a2dab |
@@ -391,9 +391,6 @@ emsg(const char *s,...) {
|
|
|
61a2dab |
va_list args;
|
|
|
61a2dab |
ufixnum n=0;
|
|
|
61a2dab |
void *v=NULL;
|
|
|
61a2dab |
-#ifndef vsnprintf
|
|
|
61a2dab |
- extern int vsnprintf();
|
|
|
61a2dab |
-#endif
|
|
|
61a2dab |
va_start(args,s);
|
|
|
61a2dab |
n=vsnprintf(v,n,s,args)+1;
|
|
|
61a2dab |
va_end(args);
|
|
|
61a2dab |
--- gcl-2.6.12.orig/o/read.d
|
|
|
61a2dab |
+++ gcl-2.6.12/o/read.d
|
|
|
61a2dab |
@@ -1590,6 +1590,7 @@ object from, to;
|
|
|
61a2dab |
if (to == Cnil) {
|
|
|
61a2dab |
to = alloc_object(t_readtable);
|
|
|
61a2dab |
to->rt.rt_self = NULL;
|
|
|
61a2dab |
+ to->rt.rt_case = sKupcase;
|
|
|
61a2dab |
/* For GBC not to go mad. */
|
|
|
61a2dab |
vs_push(to);
|
|
|
61a2dab |
/* Saving for GBC. */
|