]> git.ipfire.org Git - thirdparty/gcc.git/blame - gcc/testsuite/gm2/scripts/compileiso
Update copyright years.
[thirdparty/gcc.git] / gcc / testsuite / gm2 / scripts / compileiso
CommitLineData
1eee94d3
GM
1#!/bin/sh
2
a945c346 3# Copyright (C) 2000-2024 Free Software Foundation, Inc.
1eee94d3
GM
4# This file is part of GNU Modula-2.
5#
6# GNU Modula-2 is free software; you can redistribute it and/or modify
7# it under the terms of the GNU General Public License as published by
8# the Free Software Foundation; either version 2, or (at your option)
9# any later version.
10#
11# GNU Modula-2 is distributed in the hope that it will be useful,
12# but WITHOUT ANY WARRANTY; without even the implied warranty of
13# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
14# GNU General Public License for more details.
15#
16# You should have received a copy of the GNU General Public License
17# along with GNU Modula-2; see the file COPYING. If not, write to the
18# Free Software Foundation, 51 Franklin Street, Fifth Floor, Boston, MA
19# 02110-1301, USA.
20#
21
22BFLAGS=-B../../../../../../../build/gcc/stage1/gm2
23CLIBS=-I../../../../gm2-iso:.:/usr/local/lib/gcc-lib/i686-pc-linux-gnu/3.2/gm2/iso:/usr/local/lib/gcc-lib/i686-pc-linux-gnu/3.2/gm2/pim
24LLIBS=-I.:/usr/local/lib/gcc-lib/i686-pc-linux-gnu/3.2/gm2/iso:/usr/local/lib/gcc-lib/i686-pc-linux-gnu/3.2/gm2/pim
25DRIVER=../../../../../../../build/gcc/xgm2
26OPTS=-Wiso $2
27CPP=
28
29if [ ! -x $DRIVER ] ; then
30 echo "cannot find $DRIVER"
31 exit 1
32fi
33if ! $DRIVER $OPTS $BFLAGS $CLIBS -gstabs -c $1 ; then
34 exit $?
35fi
36if ! $DRIVER $OPTS $BFLAGS $CLIBS -S -gstabs -c $1 ; then
37 exit $?
38fi
39if ! $DRIVER $OPTS $BFLAGS $LLIBS -gstabs -I. $1 -lm ; then
40 exit $?
41fi
42cat << EOFEOF > .gdbinit
43# set language modula-2
44# set language pascal
45break _M2_`basename $1 .mod`_init
46run
47#next
48#print r
49#ptype r
50EOFEOF
51emacs .gdbinit
52