Changeset 20680 in project


Ignore:
Timestamp:
10/07/10 06:59:11 (8 years ago)
Author:
iraikov
Message:

9ML: added example file installation to the setup script

Location:
release/4/9ML-toolkit/trunk
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • release/4/9ML-toolkit/trunk/9ML-toolkit.meta

    r20679 r20680  
    1010        "report.scm"
    1111        "SXML.scm" "SXML-to-XML.scm"
    12         "9ML-toolkit.setup" )
     12        "9ML-toolkit.setup" "examples")
    1313
    1414
  • release/4/9ML-toolkit/trunk/9ML-toolkit.setup

    r20679 r20680  
    2222  ; Assoc list with properties for the program:
    2323  '((version 1.0)))
     24
     25(include "setup-helper")
     26(define SHARED-DIR (installation-chicken-home))
     27(define 9ML-DIR (make-pathname SHARED-DIR "9ML"))
     28
     29;; File Copy Operations
     30
     31(define (*file-copy fn dn)
     32  (let ([fn (->string fn)])
     33    (copy-file fn (make-pathname dn fn)) ) )
     34
     35(define (copy-file-to-9ML-dir fn)
     36  (*file-copy (->string fn) 9ML-DIR) )
     37
     38(if (not (file-exists? 9ML-DIR))
     39    (create-directory 9ML-DIR))
     40
     41(copy-file-to-9ML-dir "examples/LeakyIAF.9ML" )
     42
     43
Note: See TracChangeset for help on using the changeset viewer.