2003-12-16 11:44:40 -05:00
|
|
|
;;; Installation library for scsh modules.
|
2004-01-04 09:34:32 -05:00
|
|
|
;;; $Id: install-lib-module.scm,v 1.3 2004/01/04 14:34:32 frese Exp $
|
2003-12-16 11:44:40 -05:00
|
|
|
|
2003-12-11 09:54:55 -05:00
|
|
|
;;; Interfaces
|
|
|
|
|
|
|
|
(define-interface install-interface
|
|
|
|
(export version->string
|
|
|
|
string->version
|
|
|
|
version-compare
|
|
|
|
version<?
|
|
|
|
version>?
|
|
|
|
version=?
|
|
|
|
|
|
|
|
(define-package :syntax)
|
|
|
|
|
|
|
|
install-file
|
|
|
|
install-files
|
|
|
|
install-directory
|
|
|
|
install-directories
|
2003-12-16 11:44:40 -05:00
|
|
|
install-directory-contents
|
|
|
|
|
2004-01-04 09:34:32 -05:00
|
|
|
identity
|
|
|
|
parse-boolean
|
|
|
|
show-boolean
|
2003-12-11 09:54:55 -05:00
|
|
|
|
2004-01-04 09:34:32 -05:00
|
|
|
get-directory
|
|
|
|
get-option-value
|
2003-12-11 09:54:55 -05:00
|
|
|
|
|
|
|
install-main))
|
|
|
|
|
|
|
|
;;; Structures
|
|
|
|
|
|
|
|
(define-structure install install-interface
|
|
|
|
(open scheme-with-scsh
|
|
|
|
fluids
|
|
|
|
let-opt
|
|
|
|
srfi-1
|
|
|
|
srfi-9
|
|
|
|
srfi-13
|
2003-12-16 11:44:40 -05:00
|
|
|
srfi-37
|
|
|
|
configure)
|
2003-12-11 09:54:55 -05:00
|
|
|
(files install-lib))
|