summaryrefslogtreecommitdiffstats
path: root/get-contoffset-ia64.c
diff options
context:
space:
mode:
authorThomas Bushnell <tb@debian.org>2006-10-23 23:31:59 -0700
committerBryan Newbold <bnewbold@robocracy.org>2017-02-20 00:05:35 -0800
commit906cc4f0899080f1b832af98b7ccbcc257b8a64e (patch)
tree14e3ec231debdca4da9c1a3ccc0536033c1c8a4b /get-contoffset-ia64.c
parent3d573fa54db0fdcae8b2a20356faa46c8e335206 (diff)
parent50eb784bfcf15ee3c6b0b53d747db92673395040 (diff)
downloadscm-debian/5e3-1.tar.gz
scm-debian/5e3-1.zip
Import Debian changes 5e3-1debian/5e3-1
scm (5e3-1) unstable; urgency=low * New upstream release. * debian/control (Architecture): Add ia64 to list of supported archs. Now everything but s390 is listed. (Closes: #335980) (Build-Depends): Require at least version 3a4 of slib. * Change to continue.h from version 5e1-2 repeated here. * Change to xgen.scm from version 5e2-4 repeated here. * Change to scm.1 from version 5e2-4 repeated here.
Diffstat (limited to 'get-contoffset-ia64.c')
-rw-r--r--get-contoffset-ia64.c107
1 files changed, 107 insertions, 0 deletions
diff --git a/get-contoffset-ia64.c b/get-contoffset-ia64.c
new file mode 100644
index 0000000..4e3612c
--- /dev/null
+++ b/get-contoffset-ia64.c
@@ -0,0 +1,107 @@
+/* Copyright (C) 2006 Free Software Foundation, Inc.
+ * Author: Richard E. Harke (get-contoffset-ia64.c only) copyright assigned
+ * to Free Software Foundation, Inc.
+ *
+ * By including the following notice, I am agreeing to its terms,
+ * including the special exception for SCM.
+ *
+ * This program is free software; you can redistribute it and/or modify
+ * it under the terms of the GNU General Public License as published by
+ * the Free Software Foundation; either version 2, or (at your option)
+ * any later version.
+ *
+ * This program is distributed in the hope that it will be useful,
+ * but WITHOUT ANY WARRANTY; without even the implied warranty of
+ * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
+ * GNU General Public License for more details.
+ *
+ * You should have received a copy of the GNU General Public License
+ * along with this software; see the file COPYING. If not, write to
+ * the Free Software Foundation, 59 Temple Place, Suite 330, Boston, MA 02111, USA.
+ *
+ * As a special exception, the Free Software Foundation gives permission
+ * for additional uses of the text contained in its release of SCM.
+ *
+ * The exception is that, if you link the SCM library with other files
+ * to produce an executable, this does not by itself cause the
+ * resulting executable to be covered by the GNU General Public License.
+ * Your use of that executable is in no way restricted on account of
+ * linking the SCM library code into it.
+ *
+ * This exception does not however invalidate any other reasons why
+ * the executable file might be covered by the GNU General Public License.
+ *
+ * This exception applies only to the code released by the
+ * Free Software Foundation under the name SCM. If you copy
+ * code from other Free Software Foundation releases into a copy of
+ * SCM, as the General Public License permits, the exception does
+ * not apply to the code that you add in this way. To avoid misleading
+ * anyone as to the status of such modified files, you must delete
+ * this exception notice from them.
+ *
+ * If you write modifications of your own for SCM, it is your choice
+ * whether to permit this exception to apply to your modifications.
+ * If you do not wish that, delete this exception notice.
+ */
+
+/* The .o of this file does not get linked into SCM.
+ * It is a utility used to create an include file
+ * for continue-ia64.S to get offsets into struct jump_buf
+ * and be sure they are correct for the current compiler.
+ *
+ * create get-contoffset-ia64 program by:
+ * gcc -o get-contoffset-ia64 get-contoffset-ia64.c
+ * create ASM include file by:
+ * ./get-contoffset-ia64 contoffset-ia64.S
+ */
+#include <stddef.h>
+#include <stdio.h>
+
+#define IN_CONTINUE_C
+#include "setjump.h"
+
+int
+main(int argc, char ** argv)
+{
+ struct Continuation taco;
+ long jmpbuf_off = 10L;
+ long thrwval_off;
+ long length_off;
+ long stkbse_off;
+ long bspbse_off;
+ long bsplength_off;
+ long rnat_off;
+ long other_off;
+ long parent_off;
+ long cont_size;
+ FILE *prt;
+
+ switch (argc) {
+ case 1: prt = stdout; break;
+ case 2: prt = fopen(argv[1], "w"); break;
+ default: return !0;
+ }
+ jmpbuf_off = &((struct Continuation *)0)->jmpbuf;
+ thrwval_off = &((struct Continuation *)0)->thrwval;
+ length_off = &((struct Continuation *)0)->length;
+ stkbse_off = &((struct Continuation *)0)->stkbse;
+ bspbse_off = &((struct Continuation *)0)->bspbse;
+ bsplength_off = &((struct Continuation *)0)->bsplength;
+ rnat_off = &((struct Continuation *)0)->rnat;
+ other_off = &((struct Continuation *)0)->other;
+ parent_off = &((struct Continuation *)0)->parent;
+ cont_size = sizeof(struct Continuation);
+
+ fprintf(prt, " jmpbuf_off = %ld\n", jmpbuf_off);
+ fprintf(prt, " thrwval_off = %ld\n", thrwval_off);
+ fprintf(prt, " length_off = %ld\n", length_off);
+ fprintf(prt, " stkbse_off = %ld\n", stkbse_off);
+ fprintf(prt, " bspbse_off = %ld\n", bspbse_off);
+ fprintf(prt, " bsplength_off = %ld\n", bsplength_off);
+ fprintf(prt, " rnat_off = %ld\n", rnat_off);
+ fprintf(prt, " other_off = %ld\n", other_off);
+ fprintf(prt, " parent_off = %ld\n", parent_off);
+ fprintf(prt, " cont_size = %ld\n", cont_size);
+ fclose(prt);
+ return 0;
+}