mirror of
https://git.savannah.gnu.org/git/guile.git
synced 2025-06-29 14:30:34 +02:00
Convert srfi-197 implementation and tests to modules
https://srfi.schemers.org/srfi-197/srfi-197.html * NEWS: mention SRFI 197 support. * am/bootstrap.am: Add srfi-197.scm. * module/srfi/srfi-197.scm: Convert to module. * test-suite/Makefile.am: Add srfi-197.sr64. * test-suite/tests/srfi-197.sr64: Renamed from srfi-197.test. * test-suite/tests/srfi-197.test: Port to Guile; rename to srfi-197.sr64.
This commit is contained in:
parent
2d602d28c3
commit
36ba0aa655
5 changed files with 38 additions and 4 deletions
|
@ -161,6 +161,7 @@ SCM_TESTS = tests/00-initial-env.test \
|
|||
tests/srfi-111.test \
|
||||
tests/srfi-119.test \
|
||||
tests/srfi-171.test \
|
||||
tests/srfi-197.sr64 \
|
||||
tests/srfi-4.test \
|
||||
tests/srfi-9.test \
|
||||
tests/statprof.test \
|
||||
|
|
|
@ -1,3 +1,5 @@
|
|||
;;;; srfi-197.sr64 --- SRFI 197: Pipeline Operators test suite
|
||||
;;;;
|
||||
;;;; SPDX-FileCopyrightText: 2020 Adam R. Nelson <adam@nels.onl>
|
||||
;;;;
|
||||
;;;; SPDX-License-Identifier: MIT
|
||||
|
@ -26,7 +28,16 @@
|
|||
;;;; CONNECTION WITH THE SOFTWARE OR THE USE OR OTHER DEALINGS IN THE
|
||||
;;;; SOFTWARE.
|
||||
|
||||
(include "./srfi-64-minimal.scm")
|
||||
;;; Commentary:
|
||||
|
||||
;;; The Copyright statement above was taken from the srfi-197.html file
|
||||
;;; in the original source.
|
||||
|
||||
;;; Code:
|
||||
|
||||
(define-module (srfi-197-test)
|
||||
#:use-module (srfi srfi-64)
|
||||
#:use-module (srfi srfi-197))
|
||||
|
||||
(define (exclamation x) (string-append x "!"))
|
||||
|
||||
|
@ -236,3 +247,7 @@
|
|||
(quote <>)))
|
||||
|
||||
(test-end "Pipeline Operators")
|
||||
|
||||
;; Local Variables:
|
||||
;; mode: scheme
|
||||
;; End:
|
Loading…
Add table
Add a link
Reference in a new issue