Skip to content
Snippets Groups Projects
  1. Apr 23, 2004
  2. Apr 22, 2004
    • rtoy's avatar
      Fix up printing of symbols. Passes Paul Dietz's symbol printing · ae18401e
      rtoy authored
      tests, now.  (Based on SBCL's fixes.)
      ae18401e
    • rtoy's avatar
      Fix up printing of symbols with :capitalize. · 719b5219
      rtoy authored
      719b5219
    • rtoy's avatar
      o Fix typo in output-ratio that was causing incorrect output when · 7204735b
      rtoy authored
        *print-radix* was T.  If *print-base* were 16, the output would be
        #xr<...>.
      
      o Comment out old float printer routines for now.
      7204735b
    • rtoy's avatar
      Oops. Remove unused code. Add a couple of comments. · 52168c78
      rtoy authored
      52168c78
    • rtoy's avatar
      o Fix the float printer to print correctly: · 4958e03b
      rtoy authored
           (float -54965272/1000000000000000000)
      
        was printing as -5.496527e-11 but should be -5.4965272e-11
      
      o Fix the float reader to read correctly, without roundoff:
      
        4.0058643e+8 was incorrectly read as 12518325, 1
        (integer-decode-float results).  It should be 12518326,1.
      
      o Fix the float reader to read floats correctly with unusual values of
        *read-base*:
      
          (let ((*read-base* 2))
            (read-from-string "-4.3e+7"))
      
        used to return a symbol instead of a float.
      
      This changes ported from SBCL.
      4958e03b
    • emarsden's avatar
      · f2b840db
      emarsden authored
      Change the behaviour of EXT:LOAD-FOREIGN when called with a single shared
      library: call SYS::LOAD-OBJECT-FILE directly, without invoking the linker as
      previously. This should make it possible to support the reloading of dependent
      shared libraries upon startup of a saved image.
      
      The new behaviour requires a function FILE-SHARED-LIBRARY-P to be defined. I
      have provided an implementation that works for ELF platforms. This has been
      tested with Linux/x86 and Solaris/SPARC, but is also enabled by
      conditionalization for :bsd (should include FreeBSD and OpenBSD).
      
      Also removed pmax support. IRIX and HPPA platforms will need to provide a
      definition for F-S-L-P.
      f2b840db
  3. Apr 16, 2004
  4. Apr 15, 2004
    • rtoy's avatar
      Fix ansi-test bug on read-sequence and echo-streams. Based on code · 48087ddd
      rtoy authored
      from SBCL.
      48087ddd
    • rtoy's avatar
      More ANSI test fixes: · 2e51cd52
      rtoy authored
      o FILE-STRING-LENGTH can be used on BROADCAST-STREAM's where the
        result is 1.
      o Graphic characters are not printed using the character name (hence
        #\space is printed #\ )
      o Make INPUT-STREAM-P and OUTPUT-STREAM-P work correctly on synonym
        streams.
      o MAKE-STRING-INPUT-STREAM was not accepting NIL for the optional END
        argument.
      o Close string-input streams.  (We weren't before.)
      2e51cd52
  5. Apr 14, 2004
  6. Apr 13, 2004
  7. Apr 10, 2004
  8. Apr 09, 2004
    • emarsden's avatar
      · 3f2ba723
      emarsden authored
      Fix stupid mistake in the broadcast-stream ANSI-compliance changes.
      3f2ba723
  9. Apr 08, 2004
    • 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
  10. Apr 07, 2004
    • emarsden's avatar
      ANSI compliance fixes for CONCATENATED-STREAMS: · c7aa07e6
      emarsden authored
        - (read-char-no-hang (make-concatenated-stream) nil :eof) returns :eof
          instead of nil
      
      Another bug brought to you by pfdietz.
      c7aa07e6
    • emarsden's avatar
      · 3eeefd6b
      emarsden authored
      More ANSI-compliance BROADCAST-STREAM fixes:
      
        - FILE-LENGTH and FILE-POSITION return the value from the last component
          stream, or 0 if there are no component streams.
      
      Will require a similar change for FILE-STRING-LENGTH (and addition of a
      :file-string-length misc-op).
      3eeefd6b
    • rtoy's avatar
      afa6bbfb
  11. Apr 06, 2004
    • 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
  12. Apr 01, 2004
    • 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
  13. 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
  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
      · e2daaabd
      emarsden authored
       - add ignore declaration
       - fix endpwent alien routine for Solaris
      e2daaabd
  16. Mar 23, 2004
    • emarsden's avatar
      · 335ca24f
      emarsden authored
       - various package-related cleanups. PROFILE and CLX packages use
         COMMON-LISP instead of LISP.
      335ca24f
  17. Jan 20, 2004
    • 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
  18. Jan 19, 2004
  19. Jan 18, 2004
  20. Jan 16, 2004
Loading