blob: f7d7213a2df502d0c01d8deaac5bc19e622922a9 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
;;; Copyright 2024 Peter McGoron
;;; Licensed under the Apache License, Version 2.0 (the "License");
;;; you may not use this file except in compliance with the License.
;;; You may obtain a copy of the License at
;;;
;;; http://www.apache.org/licenses/LICENSE-2.0
;;;
;;; Unless required by applicable law or agreed to in writing, software
;;; distributed under the License is distributed on an "AS IS" BASIS,
;;; WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or
;;; implied. See the License for the specific language governing
;;; permissions and limitations under the License.
(cond-expand
(chicken (import r7rs)))
(define-library (mcgoron.com cond-values)
(import (scheme base))
(export after cond-values apply-after
define-record-type/destructor
pair=> assq=>
length=> length-at-least=>)
(include "cond-values.scm"))
|
