Changeset 12841 for trunk/source/level-1


Ignore:
Timestamp:
Sep 16, 2009, 3:15:07 PM (10 years ago)
Author:
gb
Message:

Try once again to make sense out of WITH-STRING-VECTOR and its handful
of callers; assume that the macro's second arg is a list of strings.
(WITH-STRING-VECTOR seems to be exported but not documented.)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-1/linux-files.lisp

    r12825 r12841  
    965965      (funcall function argv))))
    966966
    967 (defmacro with-string-vector ((var &rest strings) &body body)
    968   `(call-with-string-vector #'(lambda (,var) ,@body) (list ,@strings)))
     967(defmacro with-string-vector ((var strings) &body body)
     968  `(call-with-string-vector #'(lambda (,var) ,@body) ,strings))
    969969
    970970(defloadvar *max-os-open-files* #-windows-target (#_getdtablesize) #+windows-target 32)
Note: See TracChangeset for help on using the changeset viewer.