Skip to content
Snippets Groups Projects
  1. Apr 14, 2004
  2. Apr 13, 2004
  3. Apr 10, 2004
  4. Apr 09, 2004
    • emarsden's avatar
      · 3f2ba723
      emarsden authored
      Fix stupid mistake in the broadcast-stream ANSI-compliance changes.
      3f2ba723
  5. Apr 08, 2004
    • rtoy's avatar
      If the file-info doesn't exist, we return nil for the · b9204788
      rtoy authored
      source-location.
      
      This bug triggered by
      
      	(compile nil (lambda () (defclass foo () ())))
      
      (Bug and fix from Eric Marsden.)
      b9204788
    • emarsden's avatar
      · cd5ddae9
      emarsden authored
      Revert to old behaviour for SERVE-EVENT and reentry of handler functions.
      Don't mask out file descriptors whose handlers are active from the set of
      descriptors that we check for activity.
      
      The possibility for reentry of handler functions is required by Hemlock's
      slave lisp mechansism, which uses SERVE-EVENT via the WIRE facility.
      cd5ddae9
  6. Apr 07, 2004
  7. Apr 06, 2004
    • rtoy's avatar
      Update notes: · d1b58751
      rtoy authored
      o Source location recording
      o Sparc port only supports Ultrasparc (Sparc V9) class machines.
      d1b58751
    • rtoy's avatar
      Add support for source location recording, from Helmut Eller on · f4f6325e
      rtoy authored
      cmucl-imp:
      
          The patch below adds a somewhat general mechanism to the get the
          "current location".  So every macro that wants to record the
          source location, can insert a call to SOURCE-LOCATION in the
          generated code and safe the result in a appropriate place.
          SOURCE-LOCATION is a compiler-macro and returns a quoted struct
          with the source info.
      
          The patch adds the definition for SOURCE-LOCATION some
          modifications for the defclass, defgeneric and defmethod macros.
          Classes, generic functions and methods have already a "source"
          slot and the result of SOURCE-LOCATION is just stored into that
          slot.  (The source slot contains currently only the *loadpath*,
          which is is not very useful, if the fasl file is in a different
          directory than the source file.)
      f4f6325e
    • rtoy's avatar
      Add WITH-UNBOUNDED-INTERVAL-ON-ERROR macro to catch errors · 7e328579
      rtoy authored
      during interval arithmetic and returns a doubly unbounded INTERVAL.  Use this
      in the INTERVAL-* routines.
      
      This is intended to fix the ansi-test failure misc.89.  The approach is
      rather heavy-handed, and a better solution is desirable.
      7e328579
    • rtoy's avatar
      debug-dump.lisp · 7ef21c40
      rtoy authored
       revision 1.10.1.3
       date: 90/04/13 12:11:22;  author: ram;  state: Exp;  lines added/del: 8/3
       Changed block dumping to notice when the successor is in a different
       environment (due to a TR call).
       ----------------------------
       revision 1.10.1.2
       date: 90/04/08 17:54:38;  author: ram;  state: Exp;  lines added/del: 2/2
       old-cont => old-fp
       ----------------------------
       revision 1.10.1.1
       date: 90/03/27 12:12:06;  author: ram;  state: Exp;  lines added/del: 1/0
       Added support for file comments.
      7ef21c40
    • emarsden's avatar
      More ANSI compliance fixes: · 1d002ae1
      emarsden authored
        - (fresh-line (make-broadcast-stream)) returns nil instead of t
      
        - STREAM-ELEMENT-TYPE on broadcast-streams should return element-type of
          the last component stream (see CLtS "System Class BROADCAST-STREAM").
          Fix from SBCL.
      
        - WRITE-SEQUENCE handles bit-vectors
      1d002ae1
    • emarsden's avatar
      · 7862b94e
      emarsden authored
      Two unrelated fixes to ADJUST-ARRAY:
      
        - (adjust-array (make-array nil :initial-element 'zob) nil)
          was losing the :initial-element information
      
        - ADJUST-ARRAY was sometimes returning the same array despite
          ADJUSTABLE-ARRAY-P returning nil for that array (fix from SBCL)
      
      Fixes a number of AJUST-ARRAY.* tests in Paul Dietz's ANSI compliance
      suite.
      7862b94e
    • 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
  8. Apr 05, 2004
  9. Apr 02, 2004
  10. 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
  11. 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
  12. Mar 29, 2004
  13. Mar 28, 2004
  14. 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
  15. 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
Loading