Skip to content
Snippets Groups Projects
  1. Sep 21, 2005
  2. Sep 19, 2005
    • rtoy's avatar
      o Print out the host name when we're printing out LOGICAL-HOST · 3c14ace4
      rtoy authored
        objects.  (Makes it easier to see what the logical host is when
        describe'ing a pathname.)
      
      o Fix some issues with UNPARSE-ENOUGH-NAMESTRING
        o It should return a string, not the pathname object.  (Noted by
          Peter Graves on cmucl-imp, 2005-09-18.)
        o The directory paths must have something more in common than just
          :ABSOLUTE before we produce a relative directory path.  Fixes the
          issue of always returning relative paths even if the directories
          don't match at all.
      
      o In ENOUGH-NAMESTRING, if the host for the pathname isn't the same as
        the host for the defaults, just return the pathname.  I (rtoy) think
        this is right.  It doesn't make sense to do anything if the hosts
        are different.
      3c14ace4
  3. Sep 16, 2005
  4. Sep 13, 2005
  5. Sep 12, 2005
    • rtoy's avatar
      Fix some issues with printing (make-pathname :directory '(:relative)), · c33b7b7a
      rtoy authored
      which used to print as #p"", and with reading #p".", #p"./".
      
      code/filesys.lisp:
      o When parsing a unix namestring, delete any "." elements of the
        directory list.
      o If we've parsed a namestring such that the file name is ".", replace
        that with :name NIL and adjust the :directory component
        appropriately, because on Unix, "." can't be the name of a file.
      o Make :directory '(:relative) be printed as "./"
      
      code/pathname.lisp:
      o If the :directory argument to MAKE-PATHNAME contains strings with
        #\/, print a warning that this is not a valid element.
      o Remove all "."'s from a :relative directory component.
      c33b7b7a
  6. Sep 09, 2005
  7. Aug 31, 2005
  8. Aug 30, 2005
    • rtoy's avatar
      Fix for bug in alien enum types reported by Nicolas Neuss, cmucl-imp, · 5d5d2c79
      rtoy authored
      2004/11/09.  An example illustrating the bug is:
      
          (use-package "ALIEN")
          (use-package "C-CALL")
      
          (def-alien-type yes_no_t (enum yes_no_t :NO :YES))
          (def-alien-type nil
      	(struct foo
      		(arg1 yes_no_t)
      		(arg2 yes_no_t)))
      
          (def-alien-routine "set_default_options" void
            (options (* (struct foo))))
      
      Modified alien-type-translator for enum so that if the enum type is
      known and it's the same type as before we skip the call to (setf
      auxiliary-alien-type).  This fixes the problem.
      5d5d2c79
  9. Aug 25, 2005
    • rtoy's avatar
      o Fix a bug in %unary-ftruncate/single-float and · 8e58835f
      rtoy authored
        %unary-ftruncate/double-float where the test for infinity and NaN
        was wrong.
      o When given NaN, these functions should return a quiet
        (non-signaling) NaN instead of returning the signaling NaN.  This
        fixes the FRUNCATE/FFLOOR/FCEILING tests in ieeefp-tests.
      8e58835f
    • rtoy's avatar
      ASIN and ACOS were getting errors when given NaN's. Check for that · 430c366a
      rtoy authored
      case and dispatch to the real-valued C functions in that case.  This
      fixes some errors in the asin and acos tests from ieeefp-tests (at
      common-lisp.net).
      430c366a
  10. Aug 22, 2005
  11. Aug 17, 2005
    • rtoy's avatar
      Apply patch from Matthias Koeppe adding annotation support to pretty · 43025687
      rtoy authored
      streams.  (See mail to cmucl-imp on 2005-07-25 through 2005-08-03.)
      This basically allows arbitrary annotations to be added to pretty
      streams so that the annotations are "printed" at the appropriate times
      when the pretty stream is printed.
      
      This allows better presentation-like features in Slime and McCLIM, and
      is modeled on Allegro's schedule-annotation.
      
      No bootstrap file, but when load-world is run, answer 0 (use-current)
      to keep these changes to the pretty-stream structure.
      43025687
  12. Aug 02, 2005
  13. Aug 01, 2005
    • rtoy's avatar
      o CLHS 22.3.3.2 (~E) says prin1 omits the plus sign of the exponent if · b70016bc
      rtoy authored
        it is non-negative.  Adjust PRINT-FLOAT-EXPONENT accordingly.
      o OUTPUT-FLOAT-AUX prints out 1d23 as "1.0d23".  This differs from how
        FORMAT ~E prints out that number.  Adjust OUTPUT-FLOAT-AUX to match
        what ~E does.  (Are there other cases that we're missing?)
      b70016bc
  14. Jul 13, 2005
  15. Jul 12, 2005
  16. Jul 07, 2005
  17. Jul 05, 2005
  18. Jul 01, 2005
  19. Jun 30, 2005
  20. Jun 23, 2005
  21. Jun 20, 2005
  22. Jun 19, 2005
  23. Jun 15, 2005
  24. Jun 14, 2005
    • rtoy's avatar
      Some fixes for floating-point printing bugs reported by Bruno Haible, · 1031c478
      rtoy authored
      cmucl-imp, on or around 2005/06/13.
      
      Some useful tests:
      
      (format nil "~9,3,2,0,'%G" 0.0314159)
      Expected: "0.314e-01"
      
      
      (format nil "~9,3,2,-2,'%@e" 3.14159)
      Expected: "+.003E+03"
      
      
      (format nil "~6,2,1,'*F" 3.14159)
      Expected: " 31.42"
      
      (format nil "~9,0,6f" 3.14159)
      Expected: " 3141590."
      
      (let (x)
       (dotimes (k 13 x)
        (setq x (cons (format nil "~%Scale factor ~2D: |~13,6,2,VE|"
                (- k 5) (- k 5) 3.14159) x))))
      
      ("
      Scale factor  7: | 3141590.e-06|"
       "
      Scale factor  6: | 314159.0e-05|"
       "
      Scale factor  5: | 31415.90e-04|"
       "
      Scale factor  4: | 3141.590e-03|"
       "
      Scale factor  3: | 314.1590e-02|"
       "
      Scale factor  2: | 31.41590e-01|"
       "
      Scale factor  1: | 3.141590e+00|"
       "
      Scale factor  0: | 0.314159e+01|"
       "
      Scale factor -1: | 0.031416e+02|"
       "
      Scale factor -2: | 0.003142e+03|"
       "
      Scale factor -3: | 0.000314e+04|"
       "
      Scale factor -4: | 0.000031e+05|"
       "
      Scale factor -5: | 0.000003e+06|")
      
      
      code/format.lisp:
      o If the scale factor (k) is negative, the min number of digits to
        print is 1, not (- 1 k) because that prints too many if the field is
        too short.  Setting fmin to fdig is ok if k >= 0.  (See scale factor
        test above.)
      o If flonum-to-string returns with a trailing decimal point, we don't
        need to decrement spaceleft because that deletes a white-space
        character.  (See first scale factor 7 test above.)
      
      code/print.lisp:
      o We need to adjust the number of digits to be printed to include the
        scale factor.  See tests above.
      1031c478
  25. Jun 13, 2005
    • rtoy's avatar
      Save xref information to fasls. · 624c3dc2
      rtoy authored
      This is done by faking it.  The file being compiled is compiled as
      usual, but we append fake forms to the file as if they came from the
      file.  These fake forms insert the necessary information into the xref
      databases when the fasl is loaded.
      
      To support this feature, we also updated COMPILE-FILE to recognize the
      :xref keyword arg.  Set this to non-NIL to enable computing and saving
      xref information.
      
      code/exports.lisp:
      o Update XREF exports
      
      compiler/fndb.lisp:
      o Update with new definition of COMPILE-FILE.
      
      compiler/main.lisp:
      o Append fake forms to the file being compiled to save xref
        information to the fasl.  This clears out any xref info we might
        have for the file, and inserts the necessary xref information into
        the database.
      o Add :XREF keyword arg to COMPILE-FILE.  Default value of :XREF is
        C::*RECORD-XREF-INFO*.
      
      compiler/xref.lisp:
      o Add function to invalidate xref info for a given namestring, so we
        can reset the info when a fasl with xref info is loaded.
      o Add a function to find all xref information for a given pathname.
        Used for saving xref info to a fasl.
      624c3dc2
  26. Jun 01, 2005
  27. May 26, 2005
  28. May 23, 2005
  29. May 19, 2005
  30. May 17, 2005
  31. May 12, 2005
Loading