Sophie

Sophie

distrib > Fedora > 14 > x86_64 > by-pkgid > 5a3d998cc00060c67a9a8d7f23c2d34c > files > 87

gauche-0.8.14-3.fc11.x86_64.rpm

;;;
;;; spigot - 'spigot' module Scheme wrapper
;;;
;;;  Written by Shiro Kawai (shiro@acm.org)
;;;  I put this program in public domain.  Use it as you like.
;;;
;;;  $Id: spigot.scm,v 1.2 2003-06-12 11:09:23 shirok Exp $
;;;

;; Defines module
(define-module spigot
  (export spigot-calculate-pi
          spigot-calculate-e))
(select-module spigot)

;; Loads extension
(dynamic-load "spigot")

;; You can define Scheme functions here if you want.

;; Epilogue
(provide "spigot")