[plt-scheme] pack.ss

This ought to be a FAQ.  In Schematics CVS, see
tools/make-plt.  It contains all I know about pack.ss.
 For the chronically lazy:

#! /usr/bin/mzscheme -qr
;; -*-Mode: scheme-*-
;; ./make-plt name version directory

;; Package directory into file name-version.plt

(require (lib "pack.ss" "setup")
         (lib "match.ss"))

(match argv
  [#(name version directory)
    (printf "Packaging ~a into ~a-~a.plt" directory
name version)
	(pack (string-append name
                             "-"
                             version
                             ".plt")
              name
              (list directory)
              (list (list name))
              std-filter
              #t
              'file-replace
              )]
  [_ (printf (string-append 
              "Usage: make-plt name version
directory\n"
              "Where:\n"
              "  name is the name of the collection to
package\n"
              "  version is the version number of the
collection\n"
              "  directory is where the code to be
packaged is found\n"
              "A file name-version.plt will be
created\n"
              "\n"
              "Note: the file will be unpacked into
the same directory as that given in the directory
package above.  For this reason the directory must be
a subdirectory of collects.  I suggest making symlinks
from collects to your working directory.\n"))])


--- Matt <mcj4 at kent.ac.uk> wrote:

> I want to make a PLT file...


=====
Email: noelwelsh <at> yahoo <dot> com
Jabber: noelw <at> jabber <dot> org


	
		
__________________________________
Do you Yahoo!?
Win a $20,000 Career Makeover at Yahoo! HotJobs  
http://hotjobs.sweepstakes.yahoo.com/careermakeover