From db0eb02ed3e0fb58948ec00f7bb191b7afb44f71 Mon Sep 17 00:00:00 2001 From: "Jan (janneke) Nieuwenhuizen" Date: Wed, 30 Dec 2020 21:15:00 +0100 Subject: [PATCH] WIP psyntax.test --- tests/psyntax.test | 9 +++++++-- 1 file changed, 7 insertions(+), 2 deletions(-) diff --git a/tests/psyntax.test b/tests/psyntax.test index fba50a03..ed62a8b4 100755 --- a/tests/psyntax.test +++ b/tests/psyntax.test @@ -1,5 +1,7 @@ #! /bin/sh # -*-scheme-*- +MES_BOOT=boot-5.mes +export MES_BOOT MES_ARENA=${MES_ARENA-10000000} exec ${MES-bin/mes} --no-auto-compile -L ${0%/*} -L module -C module -e '(tests psyntax)' -s "$0" "$@" !# @@ -27,10 +29,13 @@ MES_ARENA=${MES_ARENA-10000000} exec ${MES-bin/mes} --no-auto-compile -L ${0%/*} #:use-module (mes mes-0) #:use-module (mes test)) +(include-from-path "mes/psyntax.mes") (cond-expand (mes - (mes-use-module (mes psyntax)) - (mes-use-module (mes test))) + ;;(mes-use-module (mes test)) + ;;(mes-use-module (mes psyntax)) + + ) (guile-2.2 (define sc-expand identity) (define syntax-object->datum syntax->datum)