24 lines
866 B
Scheme
24 lines
866 B
Scheme
|
;;; 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
|
||
|
define-record-type/destructor
|
||
|
pair-d assq-d
|
||
|
length* length-at-least)
|
||
|
(import "cond-values.scm"))
|