Use include-from-path for upstream.

* module/mes/lalr.scm: Rename from module/mes/lalr.upstream.mes.
* module/mes/lalr.mes: Update.
* module/mes/match.scm: Rename from module/mes/match.upstream.mes.
* module/mes/match.mes: Update.
* module/mes/optargs.scm: Rename from module/mes/optargs.upstream.mes.
* module/mes/optargs.mes: Update.
* module/mes/quasisyntax.scm: Rename from module/mes/quasisyntax.upstream.mes.
* module/mes/quasisyntax.mes: Update.
* module/srfi/srfi-1.scm: Rename from module/srfi/srfi-1.upstream.mes.
* module/srfi/srfi-1.mes: Update.
* module/srfi/srfi-9.scm: Rename from module/srfi/srfi-9.upstream.mes.
* module/srfi/srfi-9.mes: Update.
* AUTHORS: Update.
This commit is contained in:
Jan Nieuwenhuizen 2016-12-22 19:34:41 +01:00
parent 51cd4885fc
commit 0bac0cb948
21 changed files with 23 additions and 21 deletions

16
AUTHORS
View file

@ -4,8 +4,8 @@ All files except the files listed below
Based on Scheme48's scheme/alt Based on Scheme48's scheme/alt
module/mes/record.mes module/mes/record.mes
module/mes/syntax.upstream.mes module/mes/syntax.scm
module/srfi/srfi-9.upstream.mes module/srfi/srfi-9.scm
Based on Guile ECMAScript Based on Guile ECMAScript
module/language/c/lexer.mes module/language/c/lexer.mes
@ -14,20 +14,20 @@ Included verbatim from gnulib
build-aux/gitlog-to-changelog build-aux/gitlog-to-changelog
Portable hygienic pattern matcher Portable hygienic pattern matcher
module/mes/match.upstream.mes module/mes/match.scm
Portable LALR(1) parser generator Portable LALR(1) parser generator
module/mes/lalr.upstream.mes module/mes/lalr.scm
Portable syntax-case from Chez Scheme Portable syntax-case from Chez Scheme
module/mes/psyntax.ss module/mes/psyntax.ss
module/mes/psyntax-pp.mes [generated] module/mes/psyntax-pp.mes [generated]
Optargs from Guile Optargs from Guile
module/mes/optargs.upstream.mes module/mes/optargs.scm
Srfi-1 bits from Guile Srfi-1 bits from Guile
module/srfi/srfi-1.upstream.mes module/srfi/srfi-1.scm
Sxml xpath from Guile Sxml bits from Guile
module/sxml/xpath.upstream.mes module/sxml/xpath.scm

1
guile/mes/nyacc Symbolic link
View file

@ -0,0 +1 @@
../../module/nyacc

View file

@ -1,6 +1,6 @@
#! /bin/sh #! /bin/sh
# -*-scheme-*- # -*-scheme-*-
exec ${GUILE-guile} -L $(pwd)/module -e '(nyacc)' -s "$0" "$@" exec ${GUILE-guile} -L $(pwd)/guile/mes -e '(nyacc)' -s "$0" "$@"
!# !#
;;; Mes --- The Maxwell Equations of Software ;;; Mes --- The Maxwell Equations of Software

View file

@ -1,6 +1,6 @@
#! /bin/sh #! /bin/sh
# -*-scheme-*- # -*-scheme-*-
exec ${GUILE-guile} -L $(pwd)/module -e '(nyacc)' -s "$0" "$@" exec ${GUILE-guile} -L $(pwd)/guile/mes -e '(nyacc)' -s "$0" "$@"
!# !#
;;; Mes --- The Maxwell Equations of Software ;;; Mes --- The Maxwell Equations of Software

View file

@ -25,4 +25,4 @@
(mes-use-module (mes scm)) (mes-use-module (mes scm))
(mes-use-module (mes syntax)) (mes-use-module (mes syntax))
(mes-use-module (srfi srfi-9)) (mes-use-module (srfi srfi-9))
(mes-use-module (mes lalr.upstream)) (include-from-path "mes/lalr.scm")

View file

@ -23,4 +23,4 @@
;;; portable matcher ;;; portable matcher
(mes-use-module (mes syntax)) (mes-use-module (mes syntax))
(mes-use-module (mes match.upstream)) (include-from-path "mes/match.scm")

View file

@ -31,4 +31,5 @@
(define-macro (set-procedure-property! proc key value) (define-macro (set-procedure-property! proc key value)
proc) proc)
(mes-use-module (mes optargs.upstream))
(include-from-path "mes/optargs.scm")

View file

@ -24,4 +24,4 @@
(mes-use-module (mes psyntax)) (mes-use-module (mes psyntax))
(define syntax-violation error) (define syntax-violation error)
(mes-use-module (mes quasisyntax.upstream)) (include-from-path "mes/quasisyntax.scm")

View file

@ -26,7 +26,7 @@
;;; Code: ;;; Code:
(mes-use-module (mes scm)) (mes-use-module (mes scm))
(mes-use-module (mes syntax.upstream)) (include-from-path "mes/syntax.scm")
(define (syntax-error message thing) (define (syntax-error message thing)
(display "syntax-error:" (current-error-port)) (display "syntax-error:" (current-error-port))

View file

@ -3,7 +3,7 @@
;;; Mes --- Maxwell Equations of Software ;;; Mes --- Maxwell Equations of Software
;;; Copyright © 2016 Jan Nieuwenhuizen <janneke@gnu.org> ;;; Copyright © 2016 Jan Nieuwenhuizen <janneke@gnu.org>
;;; ;;;
;;; srfi-1.mes: This file is part of Mes. ;;; This file is part of Mes.
;;; ;;;
;;; Mes is free software; you can redistribute it and/or modify it ;;; Mes is free software; you can redistribute it and/or modify it
;;; under the terms of the GNU General Public License as published by ;;; under the terms of the GNU General Public License as published by
@ -20,7 +20,7 @@
;;; Commentary: ;;; Commentary:
;;; srfi-1.mes is the miminimal srfi-1 needed to run mescc. ;;; srfi-1.mes is the minimal srfi-1 needed to run mescc.
;;; Code: ;;; Code:
@ -70,4 +70,4 @@
(set-cdr! lst result) (set-cdr! lst result)
(loop tail lst))))) (loop tail lst)))))
(mes-use-module (srfi srfi-1.upstream)) (include-from-path "srfi/srfi-1.scm")

View file

@ -26,4 +26,4 @@
(mes-use-module (mes psyntax)) (mes-use-module (mes psyntax))
(mes-use-module (mes record-0)) (mes-use-module (mes record-0))
(mes-use-module (mes record)) (mes-use-module (mes record))
(mes-use-module (srfi srfi-9.upstream)) (include-from-path "srfi/srfi-9.scm")

View file

@ -26,4 +26,4 @@
(mes-use-module (mes syntax)) (mes-use-module (mes syntax))
(mes-use-module (mes record-0)) (mes-use-module (mes record-0))
(mes-use-module (mes record)) (mes-use-module (mes record))
(mes-use-module (srfi srfi-9.upstream)) (include-from-path "srfi/srfi-9.scm")

View file

@ -23,4 +23,4 @@
;;; xpath ;;; xpath
(mes-use-module (mes scm)) (mes-use-module (mes scm))
(mes-use-module (sxml xpath.upstream)) (include-from-path "sxml/xpath.scm")