external-value.scm 628 B

123456789101112131415161718192021
  1. ;;; Ported from Scheme 48 1.9. See file COPYING for notices and license.
  2. ;;;
  3. ;;; Port Author: Andrew Whatson
  4. ;;;
  5. ;;; Original Authors: Richard Kelsey, Mike Sperber, Marcus Crestani
  6. ;;;
  7. ;;; scheme48-1.9.2/ps-compiler/prescheme/package-defs.scm
  8. (define-module (ps-compiler prescheme external-value)
  9. #:use-module (srfi srfi-9)
  10. #:export (external-value?
  11. make-external-value
  12. external-value-type
  13. external-value-string))
  14. (define-record-type :external-value
  15. (make-external-value string type)
  16. external-value?
  17. (string external-value-string)
  18. (type external-value-type))