blob: b7fea6ac5d1c24d5f92267c4a000bf0ceef6809c (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
|
#!/bin/sh
# makeSystem creates a target SYSTEM.def using the appropriate dialect template.
# Copyright (C) 2008-2025 Free Software Foundation, Inc.
# Contributed by Gaius Mulley <gaius.mulley@southwales.ac.uk>.
#
# This file is part of GNU Modula-2.
#
# GNU Modula-2 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 3, or (at your option) any later
# version.
#
# GNU Modula-2 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 GCC; see the file COPYING3. If not see
# <http://www.gnu.org/licenses/>.
Usage () {
echo "Usage: makesystem [-gdb] dialectflag SYSTEM.def SYSTEM.mod { librarypath } compiler"
}
if [ $# -lt 6 ] ; then
Usage
exit 1
fi
if [ "$1" = "-gdb" ] ; then
DEBUG=$1
shift
else
DEBUG=""
fi
DIALECT=$1
SYSTEMDEF=$2
SYSTEMMOD=$3
shift 3
LIBRARY=""
while [ $# -gt 2 ] ; do
if [ "$LIBRARY" = "" ] ; then
LIBRARY=$1
else
LIBRARY="${LIBRARY} $1"
fi
shift
done
COMPILER=$1
OUTPUTFILE=$2
if [ "$COMPILER" = "" ] ; then
echo "parameter 5 of makeSystem is incorrect, GM2_FOR_TARGET was unset"
exit 1
fi
if [ "$DIALECT" != "-fiso" -a "$DIALECT" != "-fpim" ] ; then
Usage
echo "dialect must be -fiso or -fpim"
exit 1
fi
displayExportedTypes () {
n=1
c=0
for i in ${types} ; do
if [ $n -eq 1 ] ; then
n=0
echo -n " " >> ${OUTPUTFILE}
fi
echo -n "$i, " >> ${OUTPUTFILE}
if [ $c -eq 4 ] ; then
echo " " >> ${OUTPUTFILE}
n=1
c=0
fi
c=`expr $c + 1`
done
echo " " >> ${OUTPUTFILE}
}
displayBuiltinTypes () {
for i in ${types} ; do
echo " $i ; " >> ${OUTPUTFILE}
done
}
displayStart () {
sed -e "1,/@SYSTEM_DATATYPES@/!d" < ${SYSTEMDEF} | \
sed -e "/@SYSTEM_DATATYPES@/d" >> ${OUTPUTFILE}
}
displayMiddle () {
sed -e "1,/@SYSTEM_DATATYPES@/d" < ${SYSTEMDEF} | \
sed -e "1,/@SYSTEM_TYPES@/!d" | \
sed -e "/@SYSTEM_TYPES@/d" >> ${OUTPUTFILE}
}
displayEnd () {
sed -e "1,/@SYSTEM_TYPES@/d" < ${SYSTEMDEF} >> ${OUTPUTFILE}
}
MINIMAL="-fno-scaffold-main -fno-scaffold-dynamic -fno-scaffold-static -fno-m2-plugin"
rm -f ${OUTPUTFILE}
if [ "$DEBUG" != "" ] ; then
echo "entering gdb to debug cc1gm2 when using -fdump-system-exports"
${COMPILER} ${DIALECT} ${LIBRARY} ${MINIMAL} \
-c -fdump-system-exports ${SYSTEMMOD} -wrapper gdb,--args
exit $?
fi
${COMPILER} ${DIALECT} ${LIBRARY} ${MINIMAL} \
-S -fdump-system-exports ${SYSTEMMOD} -o /dev/null 2>&1 > /dev/null
res=$?
if [ ${res} -eq 0 ] ; then
types=`${COMPILER} ${DIALECT} ${LIBRARY} ${MINIMAL} -fno-m2-plugin -S -fdump-system-exports ${SYSTEMMOD} -o /dev/null | cut -f5 -d' '`
touch ${OUTPUTFILE}
displayStart
displayExportedTypes
displayMiddle
displayBuiltinTypes
displayEnd
else
echo "the command below failed:"
echo "${COMPILER} ${DIALECT} ${LIBRARY} ${MINIMAL} -S -fdump-system-exports ${SYSTEMMOD}"
echo "to debug the command use"
echo "${COMPILER} ${DIALECT} ${LIBRARY} ${MINIMAL} -S -fdump-system-exports ${SYSTEMMOD} -wrapper gdb,--args"
exit $res
fi
|
