Changeset 13016


Ignore:
Timestamp:
11/10/10 21:13:42 (11 years ago)
Author:
Mark Evenson
Message:

Improve docstring for SYS:ZIP.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/zip.java

    r12947 r13016  
    4545import java.util.zip.ZipOutputStream;
    4646
    47 // ### zip pathname pathnames
     47@DocString(name="zip",
     48           args="pathname pathnames &optional topdir",
     49           doc="Creates a zip archive at PATHNAME whose entries enumerated via the list of PATHNAMES.\n"
     50           + "If the optional TOPDIR argument is specified, the archive will "
     51           + "preserve the hierarchy of PATHNAMES relative to TOPDIR.  Without "
     52           + "TOPDIR, there will be no sub-directories in the archive, i.e. it will "
     53           + "be flat.")
    4854public final class zip extends Primitive
    4955{
    5056    private zip()
    5157    {
    52         super("zip", PACKAGE_SYS, true, "pathname pathnames &optional topdir");
     58        super("zip", PACKAGE_SYS, true);
    5359    }
    5460
    5561    @Override
    5662    public LispObject execute(LispObject first, LispObject second)
    57 
    5863    {
    5964        Pathname zipfilePathname = coerceToPathname(first);
Note: See TracChangeset for help on using the changeset viewer.