tests: Move (ice-9 syncase) into cond-expand.

* tests/psyntax.mes: Move (ice-9 syncase) into cond-expand.  Fixes
  guile-2 deprecation messages.
This commit is contained in:
Jan Nieuwenhuizen 2016-12-25 22:48:06 +01:00
parent 1a58dbe3c6
commit 15518f92af

View file

@ -26,12 +26,13 @@ exit $?
;;; along with Mes. If not, see <http://www.gnu.org/licenses/>. ;;; along with Mes. If not, see <http://www.gnu.org/licenses/>.
(cond-expand (cond-expand
(guile (guile-2
;;(use-modules (ice-9 syncase))
(define sc-expand identity) (define sc-expand identity)
(define syntax-object->datum syntax->datum) (define syntax-object->datum syntax->datum)
(define datum->syntax-object datum->syntax) (define datum->syntax-object datum->syntax))
) (guile
(use-modules (ice-9 syncase))
(define sc-expand identity))
(mes (mes
(mes-use-module (mes psyntax)) (mes-use-module (mes psyntax))
(mes-use-module (mes test)))) (mes-use-module (mes test))))