Permalink
Find file
Fetching contributors…
Cannot retrieve contributors at this time
17 lines (14 sloc) 483 Bytes
#!r6rs
;; Copyright (c) 2009 Derick Eddington. All rights reserved.
;; Licensed under an MIT-style license. My license is in the file
;; named LICENSE from the original collection this file is distributed
;; with. If this file is redistributed with some other collection, my
;; license must also be included.
(library (surfage s23 error)
(export
error)
(import
(rename (rnrs base) (error rnrs:error)))
(define (error . args)
(apply rnrs:error #F args))
)