Skip to content
Snippets Groups Projects
  1. Apr 06, 2004
    • emarsden's avatar
      · cf98504f
      emarsden authored
        - fix WRITE-SEQUENCE for vectors (detected by pfdietz' ANSI compliance
          test suite)
      
          (write-sequence (vector #\a) (make-string-output-stream))
      
          used to fail with
      
          "Type-error in lisp::write-vector-out:  #\a is not of type base-char"
      
          because the WRITE-SEQUENCE code is erroneously assuming that all vectors
          of characters are of type string. There are probably more errors of this
          nature!
      
      
        - fix STREAM-ELEMENT-TYPE for broadcast streams: CLtS specifies that t
          should be returned if there are no component streams, but we used to return
          nil.
      cf98504f
    • emarsden's avatar
      · f01e1819
      emarsden authored
        - fix defaulting behaviour of :if-not-exist in OPEN when used with
          :direction :io. Corrects a number of the OPEN.IO.* ANSI compliance tests.
      f01e1819
  2. Apr 05, 2004
  3. Apr 02, 2004
  4. Apr 01, 2004
    • rtoy's avatar
      Lynn Quam on cmucl-imp on 2004-03-30 says · b6353a20
      rtoy authored
      (defun foo (f d)
        (declare (type (simple-array single-float (*)) f)
                 (type (simple-array double-float (*)) d))
        (setf (aref f 0) (aref d 0)))
      
      doesn't produce any warnings and generates completely bogus code.
      
      Don't know what the real answer solution is, but turning off the
      assert-continuation-type for a single-use continuation fixes this,
      which is what 18a used to do.  There are probably other bugs that this
      hides.
      b6353a20
    • rtoy's avatar
      Helmut Eller notes on cmucl-imp on 2004-04-24 that · 70cf5703
      rtoy authored
        (delete-file (open "/tmp/tmp-file" :direction :output
                           :if-does-not-exist :create :if-exists :supersede))
      
      signals an error because delete-file is unlinking the file twice,
      because CLOSE is called with the option :ABORT T.
      
      Don't do that, so that any reversion of the file isn't done, and we
      file is deleted.
      70cf5703
    • rtoy's avatar
      From Helmut Eller: · 0519cdf6
      rtoy authored
      parse-compiled-debug-function-lambda-list fails for
      
        (di::debug-function-lambda-list
          (di::function-debug-function
            #'pcl::fix-early-generic-functions))
      
      because it tries to nconc the supplied-p var to a deleted keyword arg.
      0519cdf6
    • rtoy's avatar
      If it's already a logical pathname host, don't need to check if · 83cbf125
      rtoy authored
      it's a search-list, because it can't be, obviously.
      83cbf125
  5. Mar 31, 2004
    • emarsden's avatar
      · ef5d5943
      emarsden authored
       - restarts when a package lock is triggered by DEFSTRUCT redefinition:
         disable the package-definition-lock instead of the package-lock (from
         Helmut Eller)
      ef5d5943
  6. Mar 29, 2004
  7. Mar 28, 2004
  8. Mar 26, 2004
    • emarsden's avatar
      · 10b760ea
      emarsden authored
       - add a SIMPLE-STREAM-ERROR class, and use it when signaling errors from
         fd-streams DO-OUTPUT (noted by Matthew Danish)
      
       - fix bug in fd-stream error handling (patch from Ole Rohne)
      10b760ea
  9. Mar 24, 2004
    • emarsden's avatar
      · 9496c5fe
      emarsden authored
      Improved error-checking for CLX's (setf gcontext-dashes).  When the argument
      is a number it must be strictly positive; check this in the client before
      sending to server. See the XSetDashes(3x) manual page.
      9496c5fe
    • emarsden's avatar
      · 39828da8
      emarsden authored
       - component names may be non-pretty-printable
      39828da8
    • emarsden's avatar
      · e2daaabd
      emarsden authored
       - add ignore declaration
       - fix endpwent alien routine for Solaris
      e2daaabd
  10. Mar 23, 2004
    • emarsden's avatar
      · 335ca24f
      emarsden authored
       - various package-related cleanups. PROFILE and CLX packages use
         COMMON-LISP instead of LISP.
      335ca24f
  11. Jan 20, 2004
    • toy's avatar
      Update. · 6ae83779
      toy authored
      6ae83779
    • toy's avatar
      Some ANSI compliance fixes found by Paul Dietz's tests. · 09dc96ef
      toy authored
      o PEEK-CHAR wasn't signaling end-of-file when recursive-p was true.
        o GENERALIZED-PEEKING-MECHANISM needs to handle EOF-DETECTED-FORM
          when the peek-type is NIL.
        o Make PEEK-CHAR with peek-type NIL handle RECURSIVE-P.
      
      o WRITE-LINE didn't like an explicit :END NIL.
      
      o READ-SEQUENCE didn't like reading things into a bit-vector from a
        "good" stream element type.  If the sequence is a bit-vector, use
        the general read-into-vector to read the data.
      
      o READ-SEQUENCE wasn't returning the right value when reading into
        simple-strings with a non-zero :START value.
      09dc96ef
  12. Jan 19, 2004
    • toy's avatar
      o Fix INTERVAL-RANGE-INFO some more. Put back the previous change · 335f876a
      toy authored
        (that we backed out) so (abs (the (double-float 0d0) x)) produces
        the correct result.
      o Add a kludge to INTERVAL-RANGE-INFO to handle the case of an
        interval -0.0 to 0.0 specially.  INTERVAL-RANGE-INFO should return
        NIL instead of '- for this.
      o The fixes to INTERVAL-RANGE-INFO tickle a bug in INTERVAL-SPLIT
        where we weren't correctly splitting the the interval [-0.0, 0d0]
        into 2 intervals correctly.  This was causing the compiler to loop
        forever deriving things.
      
      This is all a bit kludgy.  Dealing with signed-zeroes is a pain.
      335f876a
    • toy's avatar
      PEEK-CHAR should determine whether a character is whitespace from the · 82f47e34
      toy authored
      current readtable.  Use that instead of whitespace-char-p.
      
      (Noted from Paul Dietz's ANSI tests.)
      82f47e34
  13. Jan 18, 2004
  14. Jan 17, 2004
  15. Jan 16, 2004
  16. Jan 15, 2004
    • toy's avatar
      Some micro-optimizations · 88ca1799
      toy authored
      o MOVE-FROM-SIGNED uses a shorter sequence of instructions with fewer
        branch instructions to figure out if the number is a fixnum.
      o MOVE-FROM-UNSIGNED uses shorter sequence of instructions to set the
        bignum correctly.
      88ca1799
    • toy's avatar
      Cross-compile script for the faster gencgc allocator on sparc. · af5a87b0
      toy authored
      (A cross-compile may not have been necessary, but I didn't try it.)
      af5a87b0
  17. Jan 12, 2004
Loading