summaryrefslogtreecommitdiffstats
path: root/cond-values.r7rs.scm
diff options
context:
space:
mode:
authorGravatar Peter McGoron 2024-10-18 12:48:01 -0400
committerGravatar Peter McGoron 2024-10-18 12:48:01 -0400
commit13c68fc3fa2f48ad59574885a8b46d7844459dfc (patch)
tree6dcb688e4632953bd01828609496d4188e159bfa /cond-values.r7rs.scm
parentcond-values: add with example (diff)
factor into libraries
Diffstat (limited to 'cond-values.r7rs.scm')
-rw-r--r--cond-values.r7rs.scm23
1 files changed, 23 insertions, 0 deletions
diff --git a/cond-values.r7rs.scm b/cond-values.r7rs.scm
new file mode 100644
index 0000000..22c7f8a
--- /dev/null
+++ b/cond-values.r7rs.scm
@@ -0,0 +1,23 @@
+;;; 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"))