Changeset 14349


Ignore:
Timestamp:
Oct 11, 2010, 4:37:12 PM (9 years ago)
Author:
gb
Message:

Um, actually check in doc/src/streams.xml ...

doc/src/streams.xml: describe extensions to STREAM-EXTERNAL-FORMAT; don't
discuss imaginary STREAM-EXTERNAL-ENCODING.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/source/doc/src/streams.xml

    r12001 r14349  
    1616    <title>Stream Extensions</title>
    1717
    18     <sect2><title>Stream External Encoding</title>
    19     <para>&CCL; streams have an external-encoding attribute that
    20     may be read using
    21     <function>STREAM-EXTERNAL-ENCODING</function> and set using <function>(SETF
    22     STREAM-EXTERNAL-ENCODING)</function>.
     18    <sect2><title>Stream External Format</title>
     19    <para><function>STREAM-EXTERNAL-FORMAT</function> can be applied to
     20    (and may return a non-null result for) open streams that are not
     21    <literal>FILE-STREAM</literal>s.</para>
     22    <para><function>(SETF STREAM-EXTERNAL-FORMAT)</function> can be used to
     23    change the external format of open streams created with <function>
     24    OPEN</function> or <function>MAKE-SOCKET</function>.
    2325    </para>
    2426    </sect2>
     
    10691071;;; Write a vector of DOUBLE-FLOATs. Note that (to maintain
    10701072;;; alignment) there are 4 octets of padding before the 0th
    1071 ;;; element of a (VECTOR DOUBLE-FLOAT).
    1072 ;;; (Note that (= (- arch::misc-dfloat-offset
    1073 ;;;                  arch::misc-data-offset) 4))
     1073;;; element of a (VECTOR DOUBLE-FLOAT) on 32-bit platforms.
     1074;;; (Note that (= (- target::misc-dfloat-offset
     1075;;;                  target::misc-data-offset) 4))
    10741076(defun write-double-float-vector
    10751077    (stream vector &#38;key (start 0) (end (length vector)))
    10761078     (check-type vector (vector double-float))
    10771079     (let* ((start-octet (+ (* start 8)
    1078                             (- arch::misc-dfloat-offset
    1079                                arch::misc-data-offset)))
     1080                            (- target::misc-dfloat-offset
     1081                               target::misc-data-offset)))
    10801082                (num-octets (* 8 (- end start))))
    10811083       (stream-write-ivector stream vector start-octet num-octets)))
Note: See TracChangeset for help on using the changeset viewer.