After updating dists, error loading cl-freetype2, freetype1-ffi, cffi-defs

170 views
Skip to first unread message

djw

unread,
Jun 19, 2013, 10:22:11 AM6/19/13
to quic...@googlegroups.com
After updating dists today, I get the following when trying to load SBCL 1.1.5 through SLIME.

This is tmi for me...  How can I proceed and get things working again?

Thanks for your expertise!

_don


--------------------------- output below --------------------------------

(progn (load "/home/dwiniecki/quicklisp/dists/quicklisp/software/slime-20130420-cvs/swank-loader.lisp" :verbose t) (funcall (read-from-string "swank-loader:init")) (funcall (read-from-string "swank:start-server") "/tmp/slime.6296"))

This is SBCL 1.1.5, an implementation of ANSI Common Lisp.
More information about SBCL is available at <http://www.sbcl.org/>.

SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses.  See the CREDITS and COPYING files in the
distribution for more information.
To load "cl-cairo2":
  Load 1 ASDF system:
    cl-cairo2
; Loading "cl-cairo2"
[package metabang.bind]...........................
[package metabang.bind.developer].................
[package trivial-garbage].........................
[package cl-utilities]............................
[package anaphora]................................
[package anaphora-basic]..........................
[package anaphora-symbol].........................
[package let-plus]................................
[package cl-colors]...............................
[package cl-cairo2]...............................
...............
To load "cl-colors":
  Load 1 ASDF system:
    cl-colors
; Loading "cl-colors"

To load "cl-freetype2":
  Load 1 ASDF system:
    cl-freetype2
; Loading "cl-freetype2"
[package freetype2-types].........................
[package freetype2-ffi]...........................
[package freetype2]; cc -m32 -I/home/dwiniecki/quicklisp/dists/quicklisp/software/cl-freetype2-20130615-git/src/ffi/grovel/ -I/usr/include/freetype2 -I/usr/share/common-lisp/source/cl-cffi/ -fPIC -o /home/dwiniecki/.cache/common-lisp/sbcl-1.1.5-linux-x86/home/dwiniecki/quicklisp/dists/quicklisp/software/cl-freetype2-20130615-git/src/ffi/grovel/grovel-freetype2 /home/dwiniecki/.cache/common-lisp/sbcl-1.1.5-linux-x86/home/dwiniecki/quicklisp/dists/quicklisp/software/cl-freetype2-20130615-git/src/ffi/grovel/grovel-freetype2.c
; /home/dwiniecki/.cache/common-lisp/sbcl-1.1.5-linux-x86/home/dwiniecki/quicklisp/dists/quicklisp/software/cl-freetype2-20130615-git/src/ffi/grovel/grovel-freetype2 /home/dwiniecki/.cache/common-lisp/sbcl-1.1.5-linux-x86/home/dwiniecki/quicklisp/dists/quicklisp/software/cl-freetype2-20130615-git/src/ffi/grovel/grovel-freetype2.grovel-tmp.lisp
...................
; file: /home/dwiniecki/quicklisp/dists/quicklisp/software/cl-freetype2-20130615-git/src/ffi/cffi-defs.lisp
; in: DEFCWRAP (FT-STREAMREC FT-STREAM)
;     (FREETYPE2-TYPES::DEFCWRAP
;      (FREETYPE2-TYPES::FT-STREAMREC FREETYPE2-TYPES::FT-STREAM)
;      ((FREETYPE2-TYPES::BASE :POINTER) (FREETYPE2-TYPES::SIZE :UNSIGNED-LONG)
;       (FREETYPE2-TYPES::POS :UNSIGNED-LONG)
;       (FREETYPE2-TYPES::DESCRIPTOR
;        (:STRUCT FREETYPE2-TYPES::FOREIGN-FT-STREAMDESC))
;       (PATHNAME (:STRUCT FREETYPE2-TYPES::FOREIGN-FT-STREAMDESC))
;       (READ FREETYPE2-TYPES::FT-STREAM-IOFUNC)
;       (CLOSE FREETYPE2-TYPES::FT-STREAM-CLOSEFUNC)
;       (FREETYPE2-TYPES::MEMORY FREETYPE2-TYPES::FT-MEMORY)
;       (FREETYPE2-TYPES::CURSOR :POINTER) (FREETYPE2-TYPES::LIMIT :POINTER)))
;
; caught ERROR:
;   (during macroexpansion of (DEFCWRAP (FT-STREAMREC FT-STREAM) ...))
;   Unknown CFFI type: :STRUCT.
............
......
; in: DEFCWRAP (FT-FACEREC FT-FACE)
;     (FREETYPE2-TYPES::DEFCWRAP
;      (FREETYPE2-TYPES::FT-FACEREC FREETYPE2-TYPES::FT-FACE)
;      ((FREETYPE2-TYPES::NUM-FACES FREETYPE2-TYPES::FT-LONG)
;       (FREETYPE2-TYPES::FACE-INDEX FREETYPE2-TYPES::FT-LONG)
;       (FREETYPE2-TYPES::FACE-FLAGS FREETYPE2-TYPES::FT-FACE-FLAGS)
;       (FREETYPE2-TYPES::STYLE-FLAGS FREETYPE2-TYPES::FT-STYLE-FLAGS)
;       (FREETYPE2-TYPES::NUM-GLYPHS FREETYPE2-TYPES::FT-LONG)
;       (FREETYPE2-TYPES::FAMILY-NAME :STRING)
;       (FREETYPE2-TYPES::STYLE-NAME :STRING)
;       (FREETYPE2-TYPES::NUM-FIXED-SIZES FREETYPE2-TYPES::FT-INT)
;       (FREETYPE2-TYPES::AVAILABLE-SIZES
;        (FREETYPE2-TYPES::POINTER-TO :TYPE FREETYPE2-TYPES::FT-BITMAP-SIZE
;         :ARRAY-SIZE FREETYPE2-TYPES::NUM-FIXED-SIZES))
;       (FREETYPE2-TYPES::NUM-CHARMAPS FREETYPE2-TYPES::FT-INT)
;       (FREETYPE2-TYPES::CHARMAPS
;        (FREETYPE2-TYPES::POINTER-TO :TYPE FREETYPE2-TYPES::FT-CHARMAP :ARRAY-SIZE
;         FREETYPE2-TYPES::NUM-CHARMAPS))
;       (FREETYPE2-TYPES::GENERIC (:STRUCT FREETYPE2-TYPES::FOREIGN-FT-GENERIC))
;       ...))
;
; caught ERROR:
;   (during macroexpansion of (DEFCWRAP (FT-FACEREC FT-FACE) ...))
;   Unknown CFFI type: :STRUCT.
..
; in: DEFCWRAP (FT-SIZEREC FT-SIZE)
;     (FREETYPE2-TYPES::DEFCWRAP
;      (FREETYPE2-TYPES::FT-SIZEREC FREETYPE2-TYPES::FT-SIZE)
;      ((FREETYPE2-TYPES::FACE FREETYPE2-TYPES::FT-FACE)
;       (FREETYPE2-TYPES::GENERIC (:STRUCT FREETYPE2-TYPES::FOREIGN-FT-GENERIC))
;       (FREETYPE2-TYPES::METRICS
;        (:STRUCT FREETYPE2-TYPES::FOREIGN-FT-SIZE-METRICS))
;       (FREETYPE2-TYPES::INTERNAL FREETYPE2-TYPES::FT-SIZE-INTERNAL)))
;
; caught ERROR:
;   (during macroexpansion of (DEFCWRAP (FT-SIZEREC FT-SIZE) ...))
;   Unknown CFFI type: :STRUCT.

; in: DEFCWRAP (FT-GLYPHSLOTREC FT-GLYPHSLOT)
;     (FREETYPE2-TYPES::DEFCWRAP
;      (FREETYPE2-TYPES::FT-GLYPHSLOTREC FREETYPE2-TYPES::FT-GLYPHSLOT)
;      ((FREETYPE2-TYPES::LIBRARY FREETYPE2-TYPES::FT-LIBRARY)
;       (FREETYPE2-TYPES::FACE FREETYPE2-TYPES::FT-FACE)
;       (FREETYPE2-TYPES::NEXT FREETYPE2-TYPES::FT-GLYPHSLOT)
;       (FREETYPE2-TYPES::RESERVED FREETYPE2-TYPES::FT-UINT)
;       (FREETYPE2-TYPES::GENERIC (:STRUCT FREETYPE2-TYPES::FOREIGN-FT-GENERIC))
;       (FREETYPE2-TYPES::METRICS
;        (:STRUCT FREETYPE2-TYPES::FOREIGN-FT-GLYPH-METRICS))
;       (FREETYPE2-TYPES::LINEAR-HORI-ADVANCE FREETYPE2-TYPES::FT-FIXED)
;       (FREETYPE2-TYPES::LINEAR-VERT-ADVANCE FREETYPE2-TYPES::FT-FIXED)
;       (FREETYPE2-TYPES::ADVANCE (:STRUCT FREETYPE2-TYPES::FOREIGN-FT-VECTOR))
;       (FORMAT FREETYPE2-TYPES::FT-GLYPH-FORMAT)
;       (FREETYPE2-TYPES::BITMAP (:STRUCT FREETYPE2-TYPES::FOREIGN-FT-BITMAP))
;       (FREETYPE2-TYPES::BITMAP-LEFT FREETYPE2-TYPES::FT-INT) ...))
;
; caught ERROR:
;   (during macroexpansion of (DEFCWRAP (FT-GLYPHSLOTREC FT-GLYPHSLOT) ...))
;   Unknown CFFI type: :STRUCT.
.......
; in: DEFCWRAP (FT-GLYPHREC FT-GLYPH)
;     (FREETYPE2-TYPES::DEFCWRAP
;      (FREETYPE2-TYPES::FT-GLYPHREC FREETYPE2-TYPES::FT-GLYPH)
;      ((FREETYPE2-TYPES::LIBRARY FREETYPE2-TYPES::FT-LIBRARY)
;       (FREETYPE2-TYPES::CLAZZ :POINTER) (FORMAT FREETYPE2-TYPES::FT-GLYPH-FORMAT)
;       (FREETYPE2-TYPES::ADVANCE (:STRUCT FREETYPE2-TYPES::FOREIGN-FT-VECTOR))))
;
; caught ERROR:
;   (during macroexpansion of (DEFCWRAP (FT-GLYPHREC FT-GLYPH) ...))
;   Unknown CFFI type: :STRUCT.

; in: DEFCWRAP (FT-BITMAPGLYPHREC FT-BITMAPGLYPH)
;     (FREETYPE2-TYPES::DEFCWRAP
;      (FREETYPE2-TYPES::FT-BITMAPGLYPHREC FREETYPE2-TYPES::FT-BITMAPGLYPH)
;      ((FREETYPE2-TYPES::ROOT (:STRUCT FREETYPE2-TYPES::FOREIGN-FT-GLYPHREC))
;       (FREETYPE2-TYPES::LEFT FREETYPE2-TYPES::FT-INT)
;       (FREETYPE2-TYPES::TOP FREETYPE2-TYPES::FT-INT)
;       (FREETYPE2-TYPES::BITMAP (:STRUCT FREETYPE2-TYPES::FOREIGN-FT-BITMAP))))
;
; caught ERROR:
;   (during macroexpansion of (DEFCWRAP (FT-BITMAPGLYPHREC FT-BITMAPGLYPH) ...))
;   Unknown CFFI type: :STRUCT.

; in: DEFCWRAP (FT-OUTLINEGLYPHREC FT-OUTLINEGLYPH)
;     (FREETYPE2-TYPES::DEFCWRAP
;      (FREETYPE2-TYPES::FT-OUTLINEGLYPHREC FREETYPE2-TYPES::FT-OUTLINEGLYPH)
;      ((FREETYPE2-TYPES::ROOT (:STRUCT FREETYPE2-TYPES::FOREIGN-FT-GLYPHREC))
;       (FREETYPE2-TYPES::OUTLINE (:STRUCT FREETYPE2-TYPES::FOREIGN-FT-OUTLINE))))
;
; caught ERROR:
;   (during macroexpansion of (DEFCWRAP (FT-OUTLINEGLYPHREC FT-OUTLINEGLYPH) ...))
;   Unknown CFFI type: :STRUCT.

debugger invoked on a ASDF:COMPILE-ERROR in thread
#<THREAD "main thread" RUNNING {AB41849}>:
  Error while invoking #<COMPILE-OP (:VERBOSE NIL) {AE58D19}> on
  #<CL-SOURCE-FILE "cl-freetype2" "freetype2-ffi" "cffi-defs">

Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.

restarts (invokable by number or by possibly-abbreviated name):
  0: [RETRY   ] Retry
                compiling #<CL-SOURCE-FILE "cl-freetype2" "freetype2-ffi" "cffi-defs">.
  1: [ACCEPT  ] Continue, treating
                compiling #<CL-SOURCE-FILE "cl-freetype2" "freetype2-ffi" "cffi-defs">
                as having been successful.
  2: [ABORT   ] Give up on "cl-freetype2"
  3: [RETRY   ] Retry EVAL of current toplevel form.
  4: [CONTINUE] Ignore error and continue userinit file "/home/dwiniecki/.sbclrc".
  5:            Abort userinit file "/home/dwiniecki/.sbclrc".
  6:            Skip to toplevel READ/EVAL/PRINT loop.
  7: [EXIT    ] Exit SBCL (calling #'EXIT, killing the process).

((:METHOD ASDF:PERFORM (ASDF:COMPILE-OP ASDF:CL-SOURCE-FILE)) #<ASDF:COMPILE-OP (:VERBOSE NIL) {AE58D19}> #<ASDF:CL-SOURCE-FILE "cl-freetype2" "freetype2-ffi" "cffi-defs">) [fast-method]
0] 2
;
; compilation unit aborted
;   caught 1 fatal ERROR condition
;   caught 7 ERROR conditions

*

Zach Beane

unread,
Jun 19, 2013, 10:28:53 AM6/19/13
to quic...@googlegroups.com
djw <dwin...@boisestate.edu> writes:

> After updating dists today, I get the following when trying to load SBCL
> 1.1.5 through SLIME.
>
> This is tmi for me... How can I proceed and get things working again?
[snip]

> [package freetype2]; cc -m32
> -I/home/dwiniecki/quicklisp/dists/quicklisp/software/cl-freetype2-20130615-git/src/ffi/grovel/
> -I/usr/include/freetype2 -I/usr/share/common-lisp/source/cl-cffi/ -fPIC -o
> /home/dwiniecki/.cache/common-lisp/sbcl-1.1.5-linux-x86/home/dwiniecki/quicklisp/dists/quicklisp/software/cl-freetype2-20130615-git/src/ffi/grovel/grovel-freetype2
> /home/dwiniecki/.cache/common-lisp/sbcl-1.1.5-linux-x86/home/dwiniecki/quicklisp/dists/quicklisp/software/cl-freetype2-20130615-git/src/ffi/grovel/grovel-freetype2.c

This reference to /usr/share/common-lisp/source/cl-cffi is highly
suspicious. Did you install CFFI via your system's package manager, or
something? What does (ql:where-is-system "cffi") return for you?

If you did install it via the package manager, you will need to
uninstall it to make sure you're using the Quicklisp version of CFFI
(0.11.2).

Zach

djw

unread,
Jun 19, 2013, 10:41:30 AM6/19/13
to quic...@googlegroups.com
After running Zach's advice here --> http://blog.quicklisp.org/2011/08/going-back-in-dist-time.html

I get the following:

Still need help, it seems.

Best,

_don

-----------------------------


(progn (load "/home/dwiniecki/swank-loader.lisp" :verbose t) (funcall (read-from-string "swank-loader:init")) (funcall (read-from-string "swank:start-server") "/tmp/slime.6524"))


This is SBCL 1.1.5, an implementation of ANSI Common Lisp.
More information about SBCL is available at <http://www.sbcl.org/>.

SBCL is free software, provided as is, with absolutely no warranty.
It is mostly in the public domain; some portions are provided under
BSD-style licenses.  See the CREDITS and COPYING files in the
distribution for more information.
To load "cl-cairo2":
  Load 1 ASDF system:
    cl-cairo2
; Loading "cl-cairo2"
.....
To load "cl-colors":
  Load 1 ASDF system:
    cl-colors
; Loading "cl-colors"

To load "cl-freetype2":
  Load 1 ASDF system:
    cl-freetype2
; Loading "cl-freetype2"
.......
*
debugger invoked on a SB-INT:SIMPLE-FILE-ERROR in thread

#<THREAD "main thread" RUNNING {AB41849}>:
  Couldn't load "/home/dwiniecki/swank-loader.lisp": file does not exist.


Type HELP for debugger help, or (SB-EXT:EXIT) to exit from SBCL.

restarts (invokable by number or by possibly-abbreviated name):
  0: [ABORT] Exit debugger, returning to top level.

(LOAD "/home/dwiniecki/swank-loader.lisp" :VERBOSE T :PRINT NIL :IF-DOES-NOT-EXIST T :EXTERNAL-FORMAT :DEFAULT)
0]

Zach Beane

unread,
Jun 19, 2013, 10:46:32 AM6/19/13
to quic...@googlegroups.com
That's a very odd place to look for swank-loader.lisp. How did you
install slime?

Zach

Donald Winiecki

unread,
Jun 19, 2013, 2:07:33 PM6/19/13
to quic...@googlegroups.com
Honestly, I don't know why it's looking for swank-loader.lisp in that location.

When I check the ...quicklisp/dists/quicklisp/software directory, I see that slime is no longer present.  Attempting to run (ql:update-all-dists) again doesn't get it.

here is my .emacs.  This might help explain how SLIME and the system is configured.

----- .emacs -----

(custom-set-variables
 ;; custom-set-variables was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(column-number-mode t)
 '(global-linum-mode t)
 '(inhibit-startup-screen t)
 '(save-place t nil (saveplace))
 '(scroll-bar-mode (quote left))
 '(show-paren-mode t)
 '(size-indication-mode t)
 '(tabbar-auto-scroll-flag t)
 '(tabbar-cycle-scope nil)
 '(tabbar-mode t nil (tabbar))
 '(tool-bar-mode nil)
 '(uniquify-buffer-name-style (quote forward) nil (uniquify))
 '(word-wrap t)
 '(x-select-enable-clipboard t))

(custom-set-faces
 ;; custom-set-faces was added by Custom.
 ;; If you edit it by hand, you could mess it up, so be careful.
 ;; Your init file should contain only one such instance.
 ;; If there is more than one, they won't work right.
 '(default ((t (:inherit nil :stipple nil :background "gray12" :foreground "green" :inverse-video nil :box nil :strike-through nil :overline nil :underline nil :slant normal :weight normal :height 125 :width normal :foundry "unknown" :family "DejaVu Sans Mono")))))

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Sets Emacs' frame window position and size
(setq default-frame-alist
      '((top . 00) (left . 00)
        (width . 95) (height . 45)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Set access to Emacs Lisp Package Archive (ELPA): See the following URL for
;; info on using ELPA
;; http://batsov.com/articles/2012/02/19/
;;        package-management-in-emacs-the-good-the-bad-and-the-ugly/
(add-to-list 'load-path "~/.emacs.d/elpa/")
(require 'package)
(package-initialize)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Color theme stuff
;; see the following for available GNU themes built into emacs
;;  "http://gnuemacscolorthemetest.googlecode.com/svn/html/index-el.html"
;; see the following for RGB color codes and names available for emacs
;;  "http://homepage1.nifty.com/blankspace/emacs/emacs_rgb.html"
;; use M-x color-theme-<color-theme-name> to inspect other themes from
;;  minibuffer

;; set access to lots of color schemes for Emacs 23.3 and later
(add-to-list 'load-path "~/.emacs.d/color-theme-6.6.0")
;(add-to-list 'load-path "~/.emacs.d/solarized/emacs-colors-solarized")

(require 'color-theme)
(color-theme-initialize)
(color-theme-calm-forest)
;; (require 'color-theme-solarized)
;; (color-theme-solarized-dark)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Column Marker stuff
;; Highlight column 80 with white block (most printers print 80 character-wide
;;  pages).
;; Manually invoke this in an Emacs buffer with either:
;;     C-u 80 M-x column-marker-1
;;     M-: (column-marker-1 80)
(add-to-list 'load-path "~/.emacs.d")    ;`column-marker.el' in this directory
(require 'column-marker)
;; (column-marker-1 80)

;; The following `add-hook...' commands automatically invoke `column-marker-1
;;     for four different minor modes in Emacs. Emacs detects these modes with
;;     the extension used for a file name.
;; Highlight column 80 in perl mode.
(add-hook 'perl-mode-hook (lambda () (interactive) (column-marker-1 80)))
;; Highlight column 80 in lisp mode.
(add-hook 'lisp-mode-hook (lambda () (interactive) (column-marker-1 80)))
;; Highlight column 80 in emacs-lisp mode.
(add-hook 'emacs-lisp-mode-hook (lambda () (interactive) (column-marker-1 80)))
;; Highlight column 80 in text mode.
;; (add-hook 'text-mode-hook (lambda () (interactive) (column-marker-1 80)))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Set the highlight-current-line minor mode
;; In every buffer, the line which contains the cursor will be fully highlighted
(global-hl-line-mode 1)

;; To customize the background color of highlighted line
(set-face-background 'hl-line "#330")
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Line by line scrolling
;; This makes the buffer scroll by only a single line when the up or
;; down cursor keys push the cursor (tool-bar-mode) outside the
;; buffer. The standard emacs behaviour is to reposition the cursor in
;; the center of the screen; this makes scrolling jumpy.
(setq scroll-step           1
      scroll-conservatively 10000)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; See following URL for details on how to make the following work in a buffer:
;;  http://ergoemacs.org/emacs/whitespace-mode.html

;; invoke the following command in minibuffer to remove all trailing-whitespace
;; (that is, space characters between the end of a line and linefeed character)
;;     M-x delete-trailing-whitespace
;;
;; invoke this command in minibuffer to make all whitespace characters visible
;; for current session
;;     M-x global-whitespace-mode
;;
;; invoke this command in minibuffer to make newline characters visible for
;; current session
;;     M-x global-whitespace-newline-mode
;;
;; make whitespace-mode use just basic coloring
(setq whitespace-style '(spaces tabs newline space-mark tab-mark newline-mark))

(setq whitespace-display-mappings
      ;; all numbers are Unicode codepoint in decimal. e.g. (insert-char 182 1)
      '((space-mark 32 [183] [46])     ; 32 SPACE 「 」, 183 MIDDLE DOT 「·」,
                                       ; 46 FULL STOP 「.」
        (newline-mark 10 [8629 10])    ; 8629 DOWNWARDS ARROW WITH CORNER
                                       ;LEFTWARDS, 10 LINE FEED
        (tab-mark 9 [9655 9] [92 9]))) ; 9 TAB, 9655 WHITE RIGHT-POINTING
                                       ; TRIANGLE 「▷」

;; invoke the mode to automatically display newline character at the end of
;; every line (global-whitespace-newline-mode)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; Enable ability to modify the .emacs file and then load those changes into
;; another buffer or window. See the following URL for more detail:
;;  http://stackoverflow.com/questions/2281593/
;;         how-can-i-load-changes-to-my-emacs-without-rebooting-emacs

(defun reload-dotemacs()
  "Reload .emacs file into current session"
  (interactive)
  (load-file "~/.emacs"))
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; SLIME and LISP stuff

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;                                                                            ;;
;; According to the following sources                                         ;;
;; http://www.ubuntuupdates.org/package/core/oneiric/universe/base/slime      ;;
;; http://hours-keyboard.blogspot.com/2012/01/slime-there-is-no-package-with-name.html
;;                                                                            ;;
;; The following should be added to Emacs setup files for                     ;;
;;      CLISP [~/.clisprc.lisp] and SBCL [~/.sbclrc]                          ;;
;; These files force invokation of ASDF in a particular way for               ;;
;; each environment.                                                          ;;
;;                                                                            ;;
;; Setup ASDF for CLISP. Add this line to ~/.clisprc.lisp                     ;;
;;                                                                            ;;
;;      (load #P"/usr/share/common-lisp/source/cl-asdf/asdf.lisp")            ;;
;;                                                                            ;;
;; Setup ASDF for SBCL. Add this line to ~/.sbclrc                            ;;
;;                                                                            ;;
;;      (require 'asdf)                                                       ;;
;;                                                                            ;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

(set-language-environment "utf-8")
;; Note that if you save a heap image, the character encoding specified on the
;; command line will be preserved, and you won't have to specify -K utf-8 again

;; Lines suffixed with `!!!' below, are based on lines from
;;  "/etc/emacs/site-start.d/50slime.el"

;; Lines suffixed with `$$$' are still necessary even though Quicklisp seems
;;  to deal with SLIME and maintain and updated SLIME.

;; The following reflects current SLIME directory
(add-to-list 'load-path "~/devtools/slime-current/")                     ; `!!!' `$$$'
;; The following was previous statement for the above. It reflects default
;; Ubuntu placement of SLIME (Ubuntu's version of SLIME is usually obsolete)
;; (add-to-list 'load-path "/usr/share/common-lisp/source/slime/")

;; The following reflects current SLIME directory
(add-to-list 'load-path "~/devtools/slime-current/contrib")              ; `!!!' `$$$'
;; The following was initial statement for the above. It reflects default
;; Ubuntu placement of SLIME (Ubuntu's version of SLIME usually obsolete)
;; (add-to-list 'load-path "/usr/share/common-lisp/source/slime/contrib")

(require 'slime-autoloads)
(setq slime-net-coding-system 'utf-8-unix)
;(setq slime-backend "~/devtools/slime-current/swank-loader.lisp")       ; `!!!' `$$$'
;; The following was initial statement for the above. It reflects default
;; Ubuntu placement of SLIME (Ubuntu's version of SLIME usually obsolete)
;; (setq slime-backend "/usr/share/common-lisp/source/slime/swank-loader.lisp")
;; The following adapted from /etc/emacs/site-start.d/50slime.el
(let ((slime-autoloads "~/devtools/slime-current/slime-autoloads.elc"))  ; `!!!' `$$$'
  (if (file-exists-p slime-autoloads)                                            `$$$'
      (load slime-autoloads)                                                     `$$$'
    (load "~/devtools/slime-current/slime-autoloads.el")))                       `$$$'

(eval-after-load "slime"
  '(progn
     (slime-setup '(slime-fancy slime-asdf slime-banner))
     (setq slime-complete-symbol*-fancy t)
     (setq slime-complete-symbol-function 'slime-fuzzy-complete-symbol)))

;; auto-generated & inserted by `(ql:quickload "quicklisp-slime-helper")
(load (expand-file-name "~/quicklisp/slime-helper.el"))

;; The following sets the default LISP to be run from `M-x run-lisp' from
;;  minibuffer in Emacs. This only runs lisp inside Emacs.  It doesn't
;;  invoke SLIME under Emacs.
;(setq inferior-lisp-program "~/devtools/acl90express/alisp")
;(setq inferior-lisp-program "~/devtools/ccl/lx86cl")
;(setq inferior-lisp-program "/usr/bin/clisp -I -ansi")
;(setq inferior-lisp-program "/usr/bin/gcl")
(setq inferior-lisp-program "/usr/local/bin/sbcl") ; --core /usr/local/lib/sbcl/sbcl.core")
;; Above is where SBCL was put when I upgraded manually. 
;; Currently using SBCL 1.1.5.

;(setq inferior-lisp-program "/usr/bin/sbcl") ; SBCL's default Ubuntu location,
                                              ; currently using SBCL 1.0.5

;; The following allows one to decide which lisp to load using
;; M-- M-x slime  <-- entered at the minibuffer in Emacs
;;
;; It also provides a selection list for use when invoking `M-x slime' in the
;;  minibuffer.  The first item in the list of implementations will be selected
;;  and run from `M-x slime'.  Reorder the list to change the behavior of
;;  `M-x slime'.
(setq slime-lisp-implementations
      '((sbcl ("/usr/local/bin/sbcl")) ; "--core" "/usr/local/lib/sbcl/sbcl.core")
;          :coding-system utf-8-unix) ;this is where SBCL was put when I
                                         ; upgraded manually, currently using
                                         ; SBCL 1.1.5

    (clisp ("/usr/bin/clisp" "-I" "-ansi"))
    (ccl ("~/devtools/ccl/lx86cl"))
    (acl9 ("~/devtools/acl90express/alisp"))))
;;    (sbcl ("/usr/bin/sbcl" "--core" "/usr/lib/sbcl/sbcl.core")
;;          :coding-system utf-8-unix) ;SBCL's default Ubuntu location
;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; these lines allow Gambit-C Scheme to be run in inferior mode un Emacs.
;; You can then start an inferior Gambit process by typing ALT-x run-scheme

; (autoload 'gambit-inferior-mode "gambit" "Hook Gambit mode into cmuscheme.")
; (autoload 'gambit-mode "gambit" "Hook Gambit mode into scheme.")
; (add-hook 'inferior-scheme-mode-hook (function gambit-inferior-mode))
; (add-hook 'scheme-mode-hook (function gambit-mode))
; (setq scheme-program-name "gsi -:d-")

; (require 'gambit)
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;; end of .emacs
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;



----------------------


_don


--
You received this message because you are subscribed to a topic in the Google Groups "Quicklisp" group.
To unsubscribe from this topic, visit https://groups.google.com/d/topic/quicklisp/rbRD-0s7Ufo/unsubscribe.
To unsubscribe from this group and all its topics, send an email to quicklisp+...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.



Zach Beane

unread,
Jun 19, 2013, 2:14:39 PM6/19/13
to quic...@googlegroups.com
Donald Winiecki <dwin...@boisestate.edu> writes:

> Honestly, I don't know why it's looking for swank-loader.lisp in that
> location.
>
> When I check the ...quicklisp/dists/quicklisp/software directory, I see
> that slime is no longer present. Attempting to run (ql:update-all-dists)
> again doesn't get it.

(ql:quickload "quicklisp-slime-helper") will get it.

Zach

Donald Winiecki

unread,
Jun 19, 2013, 2:55:27 PM6/19/13
to quic...@googlegroups.com
Thanks for that.

After Zach's advice and questions, and some tinkering with my other system (both running Ubuntu 12.4, SBCL 1.1.5) I've got it working again.  Here's what I did (you might see it relevant to tell me how far I've gone into the weeds with this...). 

1. Remove cl-cffi using Ubuntu Package Manager.
2. Reverting to previous operational quicklisp using Zach's advice here --> http://blog.quicklisp.org/2011/08/going-back-in-dist-time.html
3. Copied contents of ~/quicklisp/dists/quicklisp/... from my other system (the one I hadn't broken) to the same location in the system that I had broken.

SLIME starts successfully now on the system I had broken.

On the newly-fixed system I also ran (ql:update-all-dists).  SLIME continues to load successfully -- though it is still running SLIME 2013-04-02.  Checking the official SLIME snapshot at http://www.common-lisp.net/project/slime/snapshots/slime-current.tgz, I see this is still current.

What does the June SLIME update for quicklisp entail?  Do I want to force it?

Best wishes and I'll have some penance for bringing these problems onto myself...

_don



Reply all
Reply to author
Forward
0 new messages