2018-04-29 17:38:57 +01:00
|
|
|
#! /bin/sh
|
|
|
|
|
2018-07-22 13:24:36 +01:00
|
|
|
# GNU Mes --- Maxwell Equations of Software
|
2019-06-08 14:36:22 +01:00
|
|
|
# Copyright © 2019 Jan (janneke) Nieuwenhuizen <janneke@gnu.org>
|
2018-04-29 17:38:57 +01:00
|
|
|
#
|
2018-07-22 13:24:36 +01:00
|
|
|
# This file is part of GNU Mes.
|
2018-04-29 17:38:57 +01:00
|
|
|
#
|
2018-07-22 13:24:36 +01:00
|
|
|
# GNU Mes is free software; you can redistribute it and/or modify it
|
2018-04-29 17:38:57 +01:00
|
|
|
# under the terms of the GNU General Public License as published by
|
|
|
|
# the Free Software Foundation; either version 3 of the License, or (at
|
|
|
|
# your option) any later version.
|
|
|
|
#
|
2018-07-22 13:24:36 +01:00
|
|
|
# GNU Mes is distributed in the hope that it will be useful, but
|
2018-04-29 17:38:57 +01:00
|
|
|
# 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
|
2018-07-22 13:24:36 +01:00
|
|
|
# along with GNU Mes. If not, see <http://www.gnu.org/licenses/>.
|
2018-04-29 17:38:57 +01:00
|
|
|
|
2018-11-06 19:29:35 +00:00
|
|
|
set -e
|
2019-06-08 14:36:22 +01:00
|
|
|
set -u
|
2018-11-06 19:29:35 +00:00
|
|
|
|
2019-06-08 14:36:22 +01:00
|
|
|
V=${V-1}
|
|
|
|
|
|
|
|
if [ "$V" = 2 ]; then
|
|
|
|
set -x
|
2018-11-06 19:29:35 +00:00
|
|
|
fi
|
|
|
|
|
2019-06-08 14:36:22 +01:00
|
|
|
. ./config.sh
|
2018-07-25 07:14:13 +01:00
|
|
|
. ${srcdest}build-aux/trace.sh
|
2018-11-06 19:29:35 +00:00
|
|
|
. ${srcdest}build-aux/cc.sh
|
2018-05-03 19:32:06 +01:00
|
|
|
|
2019-06-08 14:36:22 +01:00
|
|
|
trap 'test -f .log && cat .log' EXIT
|
|
|
|
|
|
|
|
srcdest=${srcdest-}
|
|
|
|
mes_sources="
|
2019-10-20 09:49:48 +01:00
|
|
|
src/builtins.c
|
2019-10-29 21:01:53 +00:00
|
|
|
src/cc.c
|
core: Split-off core.c.
* src/mes.c (assoc_string, car, cdr, list, null_p, eq_p, values, acons,
length__, length, error, append2, append_reverse, reverse_x_, assq,
assoc): Move to ...
* src/core.c: New file.
* build-aux/build-mes.sh (mes_sources): Likewise.
* simple.make (MES_SOURCES): Add it..
2019-10-27 06:49:23 +00:00
|
|
|
src/core.c
|
2019-10-20 19:42:48 +01:00
|
|
|
src/display.c
|
core: Split-out eval-apply.c.
* src/mes.c (check_formals, check_apply, pairlis, set_car_x, set_cdr_x,
set_env_x, call_lambda, make_closure_, make_variable_, macro_get_handle,
get_macro, macro_set_x, push_cc, add_formals, formal_p,
expand_variable_, expand_variable, apply_builtin, eval_apply, apply):
Move to ..
* src/eval-apply.c: New file.
* simple.make: Add it.
* src/eval.c (assert_defined): Likewise.
2019-10-20 19:14:08 +01:00
|
|
|
src/eval-apply.c
|
2019-06-08 14:36:22 +01:00
|
|
|
src/gc.c
|
|
|
|
src/hash.c
|
|
|
|
src/lib.c
|
|
|
|
src/math.c
|
|
|
|
src/mes.c
|
|
|
|
src/module.c
|
|
|
|
src/posix.c
|
|
|
|
src/reader.c
|
2019-10-27 06:53:46 +00:00
|
|
|
src/stack.c
|
2019-06-08 14:36:22 +01:00
|
|
|
src/string.c
|
|
|
|
src/struct.c
|
2019-10-20 19:50:12 +01:00
|
|
|
src/symbol.c
|
2019-06-08 14:36:22 +01:00
|
|
|
src/vector.c
|
|
|
|
"
|
|
|
|
|
|
|
|
for c in $mes_sources; do
|
|
|
|
compile $c
|
|
|
|
done
|
|
|
|
if test $mes_libc = system; then
|
|
|
|
LIBS=-lmes
|
|
|
|
fi
|
2018-11-06 19:29:35 +00:00
|
|
|
link src/mes
|