Changeset 11288


Ignore:
Timestamp:
Nov 3, 2008, 1:05:48 AM (11 years ago)
Author:
gb
Message:

ERROR call in %MAKE-STRING-OUTPUT-STREAM needs an argument.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/level-1/l1-streams.lisp

    r11135 r11288  
    43344334  (unless (and (typep string 'string)
    43354335               (array-has-fill-pointer-p string))
    4336     (error "~S must be a string with a fill pointer."))
     4336    (error "~S must be a string with a fill pointer." string))
    43374337  (%%make-string-output-stream *fill-pointer-string-output-stream-class* string 'fill-pointer-string-output-stream-ioblock-write-char 'fill-pointer-string-output-stream-ioblock-write-simple-string))
    43384338
Note: See TracChangeset for help on using the changeset viewer.