Skip to content
Snippets Groups Projects
  1. Apr 14, 2010
    • rtoy's avatar
      code/intl.lisp: · a735122e
      rtoy authored
      o When saving the file name, use *compile-file-truename* instead of
        *compile-file-pathname*.  Also use enough-namestring to make a
        shorter name.  The file names that were placed in the pot file
        included search-lists which aren't understood by anything besides
        CMUCL.
      o Don't install the reader macros by default anymore.
      o Change INSTALL to accept an optional readtable that is modified with
        the reader macros and such.
      
      code/exports.lisp:
      o Export INTL::INSTALL.
      
      tools/build-world.sh:
      tools/build-utils.sh:
      o Need to install the reader macros when building so we can get
        generate the pot files.
      o Set *default-pathname-defaults* to be the (full) current build
        directory so that the pathnames in the pot file are relative to the
        build directory.
      
      These changes fix the main part of Ticket #39.
      a735122e
  2. Apr 03, 2010
  3. Apr 01, 2010
    • rtoy's avatar
      Update from logs. · f987a426
      rtoy authored
      f987a426
    • rtoy's avatar
      Fix SSE2 bug when running · 5efbe364
      rtoy authored
      (defun testfn ()
        (let* ((i-gc-ed-u nil)
               (ext:*gc-notify-before* (lambda (a) (/ a 0.34d0))))
          (dotimes (i 100000)
            (setf i-gc-ed-u nil)
            (let* ((v1 (list (* 1d0 (random 10)) (* 1d0 (random 10))))
                   (v2 (list (* 1d0 (random 10)) (* 1d0 (random 10))))
                   (dot1 (reduce #'+ (mapcar #'* v1 v2)))
                   (dot2 (reduce #'+ (mapcar #'* v1 v2))))
              (when (/= dot1 dot2)
                (print `(gc ,i-gc-ed-u v1 ,v1 v2 ,v2 dot1 ,dot1 dot2 ,dot2)))))))
      
      Running this with sse2 would cuase dot1 and dot2 to sometimes be
      different.  We forgot to save the SSE2 state in call_into_lisp.
      
      (This bug was mentioned on comp.lang.lisp, http://groups.google.com/group/comp.lang.lisp/browse_thread/thread/828371aa4800272c?hl=en#
      
      x86-assem.S:
      o Save and restore SSE2 state when running with SSE2 core.  (This
        might need more tweaking.  Should we use cpuid instead of looking at
        fpu_mode?)
      
      gencgc.c:
      o Save the SSE2 state, along with X87 state for SSE2 cores.
      5efbe364
  4. Mar 19, 2010
  5. Mar 18, 2010
    • rtoy's avatar
      Update from logs. · a1482b8c
      rtoy authored
      a1482b8c
    • rtoy's avatar
      Make CMUCL signal a cerror if we try to redefine a slot accessor. If · bd3d965b
      rtoy authored
      continued, the accessor is redefined.  Previously, a warning was
      printed and the structure was (mostly) undefined.
      
      compiler/proclaim.lisp:
      o Add new function NOTE-IF-ACCESSOR to check if we're redefining a
        slot accessor.  If so, signal a cerror, and redefine if continued.
      o Adjust DEFINE-FUNCTION-NAME to call NOTE-IF-ACCESSOR.
      
      compiler/main.lisp:
      o Make COMPILE-FIX-FUNCTION-NAME call NOTE-IF-ACCESSOR to catch
        attempts to redefine a slot-accessor.
      
      code/macros.lisp:
      o Move call to C::DEFINE-FUNCTION-NAME to the top of C::%%DEFUN before
        we set the fdefinition.   This allows us to give up before modifying
        anything if we choose not to redefine the slot accessor.
      bd3d965b
  6. Mar 16, 2010
  7. Mar 14, 2010
  8. Mar 12, 2010
  9. Mar 08, 2010
  10. Mar 04, 2010
    • rtoy's avatar
      Fix issue where CMUCL does not correctly handle FLETs in DEFMETHOD · 221ef9af
      rtoy authored
      bodies which use the same name as that of the generic function.  Bug
      report and fix from Madhu, cmucl-imp, 2010-02-19.
      
      An example:
      
      (defmethod foo (bar var)
        (format t "GENERICFOO ~S, ~S.%" bar var))
      
      (defclass fnarr () ())
      
      (defmethod foo ((bar fnarr) var)
        (flet ((foo (&optional arg)
      	   (foo var (class-of arg)))) ; gf FOO call
          (foo bar))) ; local function FOO call
      
      ;; (incorrect) Error when evaluating
      (foo (make-instance 'fnarr) t)
      221ef9af
  11. Mar 01, 2010
    • rtoy's avatar
      o Fix issue where some instructions like MOVLPS would print the · 19f4abf4
      rtoy authored
        arguments in reverse order.  (Ported from SBCL).
      o Work around issue where MOVHLPS and MOVLHPS would be disassembled as
        MOVLPS and MOVHPS.  The instruction is still disassembled
        incorrectly, but we at least add a note indicating the actual
        instruction in these cases.
      19f4abf4
  12. Feb 24, 2010
  13. Feb 19, 2010
  14. Feb 15, 2010
  15. Feb 07, 2010
  16. Feb 05, 2010
  17. Feb 02, 2010
    • rtoy's avatar
      Ticket #22 · db3bb369
      rtoy authored
      tools/create-target.sh:
      o If lisp variant is solaris using Sun C, setup default motif config
        to use Sun C too.
      
      motif/server/Config.solaris_sunc:
      o New config file for building motifd using Sun C.
      db3bb369
  18. Feb 01, 2010
    • rtoy's avatar
      Simplify UNICODE conditionalization by using convert_lisp_string · ae7e9d7b
      rtoy authored
      everywhere, not just for unicode.  Non-unicode takes a small hit from
      doing an unnecessary strcpy, but that should not be critical.
      ae7e9d7b
    • rtoy's avatar
      Add declaration for convert_lisp_string to get rid of compiler warning · 68e8e5d1
      rtoy authored
      in backtrace.c about undeclared function.
      68e8e5d1
    • rtoy's avatar
      Use appropriate flags for SunStudio 12. · 31577257
      rtoy authored
      31577257
    • rtoy's avatar
      o For DARWIN (and NetBSD), use the SpaceStart_* values for the · e4ba8f5e
      rtoy authored
        starting addresses.
      o Make DYNAMIC_SPACE_SIZE an unsigned to get rid of an overflow
        warning when compiling.
      e4ba8f5e
    • rtoy's avatar
      Linux-os.c: · 0f0aed07
      rtoy authored
      o Follow CMUCL coding style.
      o Argv and envp are const char*.
      
      os.h:
      lisp.c:
      Darwin-os.c:
      FreeBSD-os.c:
      NetBSD-os.c:
      OpenBSD-os.c:
      hpux-os.c:
      irix-os.c:
      mach-os.c:
      osf1-os.c:
      solaris-os.c:
      sunos-os.c:
      o argv and envp are const char *.
      0f0aed07
    • rtoy's avatar
      Patch from Stelian Ionescu on cmucl-imp, 2010/02/01: · 911be032
      rtoy authored
          When run on a kernel compiled without COMPAT_BRK CMUCL segfaults,
          so I copied the kludge used by SBCL - check the current
          personality, and if necessary, enable ADDR_NO_RANDOMIZE and
          re-exec itself.
      
      Linux-os.c:
      o Check for personality and rexec if necessary.
      
      os.h:
      o New prototype for os_init needed because it needs argv and envp.
      
      lisp.c:
      Darwin-os.c:
      FreeBSD-os.c:
      NetBSD-os.c:
      OpenBSD-os.c:
      hpux-os.c:
      irix-os.c:
      mach-os.c:
      osf1-os.c:
      solaris-os.c:
      sunos-os.c:
      o Update call to os_init, which needs argv and envp now.
      911be032
    • rtoy's avatar
      build.sh: · 806697d3
      rtoy authored
      o Add RCS header
      
      make-dist.sh:
      o Add RCS header
      o Add some comments on what this does.
      806697d3
  19. Jan 31, 2010
  20. Jan 30, 2010
  21. Jan 28, 2010
Loading