Giter Club home page Giter Club logo

Comments (2)

cxxxr avatar cxxxr commented on September 1, 2024

I have tried lock with sbcl 2.4.3 and it seems to work.

$ sbcl
This is SBCL 2.4.3, 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.
* (defpackage :foo (:use :cl) (:lock t))
#<PACKAGE "FOO">

Is it possible that the lock is not present in some sbcl build options?

from lem.

tiwe0 avatar tiwe0 commented on September 1, 2024

I rechecked the features of my SBCL:

$ sbcl
This is SBCL 2.4.3, 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.
* *features*
(:QUICKLISP :ASDF3.3 :ASDF3.2 :ASDF3.1 :ASDF3 :ASDF2 :ASDF :OS-MACOSX :OS-UNIX
 :NON-BASE-CHARS-EXIST-P :ASDF-UNICODE :ARM64 :GENCGC :64-BIT :ANSI-CL :BSD
 :COMMON-LISP :DARWIN :IEEE-FLOATING-POINT :LITTLE-ENDIAN :MACH-O
 :PACKAGE-LOCAL-NICKNAMES :SB-CORE-COMPRESSION :SB-LDB :SB-PACKAGE-LOCKS
 :SB-THREAD :SB-UNICODE :SBCL :UNIX)

It does have :SB-PACKAGE-LOCKS. And I can run (defpackage :foo (:use :cl) (:lock t)) without problem.

Here's what I've done:

  1. Downloaded the source code from release 2.2.0.
  2. Unzipped the code.
  3. Moved it to the common-lisp folder and renamed it from "lem-2.2.0" to "lem".
  4. Navigated to the "lem" directory.
  5. Ran the "make" command.

This is the backtrace:

$ qlot install --debug
Reading '/Users/ivory/common-lisp/lem/qlfile'...
Already have dist "quicklisp" version "2023-06-18".
Already have dist "micros" version "git-994d4d67467ec1b6eddacad9dba385b42101679e".
Already have dist "lem-mailbox" version "git-12d629541da440fadf771b0225a051ae65fa342a".
Already have dist "lem-base16-themes" version "git-07dacae6c1807beaeffc730063b54487d5c82eb0".
Already have dist "async-process" version "git-9690530fc92b59636d9f17d821afa7697e7c8ca4".
Already have dist "sblint" version "git-1037296f604c3210ce073a53539d4ae95b0c2f8c".
Already have dist "rove" version "git-f168cd177b5f83f171dd970dc1a9abb6eb43f044".
Already have dist "cl-sdl2" version "git-24dd7f238f99065b0ae35266b71cce7783e89fa7".
Already have dist "cl-sdl2-ttf" version "git-e61bb2119003d8ae7792d38aa11f7728d3ee5a00".
Already have dist "cl-sdl2-image" version "git-8734b0e24de9ca390c9f763d9d7cd501546d17d4".
Already have dist "jsonrpc" version "git-035ba8a8f2e9b9968786ee56b59c7f8afbea9ca2".
Loading '/Users/ivory/common-lisp/lem/contrib/bracket-paren-mode/lem-bracket-paren-mode.asd'...
'lem-bracket-paren-mode' requires NIL
Loading '/Users/ivory/common-lisp/lem/contrib/calc-mode/lem-calc-mode.asd'...
Unhandled SB-KERNEL:CASE-FAILURE in thread #<SB-THREAD:THREAD tid=259 "main thread" RUNNING
                                              {70087B0363}>:
  :LOCK fell through ECASE expression.
  Wanted one of (:USE :MIX :REEXPORT :USE-REEXPORT :MIX-REEXPORT :IMPORT-FROM
                 :SHADOWING-IMPORT-FROM :LOCAL-NICKNAMES :NICKNAMES
                 :DOCUMENTATION :SHADOW :EXPORT :INTERN :UNINTERN :RECYCLE).

Backtrace for: #<SB-THREAD:THREAD tid=259 "main thread" RUNNING {70087B0363}>
0: (ASDF/PACKAGE-INFERRED-SYSTEM::PACKAGE-DEPENDENCIES (DEFPACKAGE :LEM-ASM-MODE (:USE :CL :LEM :LEM/LANGUAGE-MODE) (:EXPORT :*ASM-MODE-HOOK* :ASM-MODE) (:LOCK T)))
1: (ASDF/PACKAGE-INFERRED-SYSTEM::PACKAGE-INFERRED-SYSTEM-FILE-DEPENDENCIES #P"/Users/ivory/common-lisp/lem/extensions/asm-mode/asm-mode.lisp" NIL)
2: (QLOT/UTILS/PROJECT:PROJECT-DEPENDENCIES #P"/Users/ivory/common-lisp/lem/")
3: (QLOT/INSTALL::INSTALL-DEPENDENCIES #P"/Users/ivory/common-lisp/lem/" #P"/Users/ivory/common-lisp/lem/.qlot/")
4: (QLOT/INSTALL:INSTALL-QLFILE #P"/Users/ivory/common-lisp/lem/qlfile" :QUICKLISP-HOME NIL :INSTALL-DEPS T :CACHE-DIRECTORY NIL)
5: (QLOT-COMMAND "install" "--debug")
6: (SB-INT:SIMPLE-EVAL-IN-LEXENV (APPLY (QUOTE MAIN) ROSWELL:*ARGV*) #<NULL-LEXENV>)
7: (SB-INT:SIMPLE-EVAL-IN-LEXENV (ROSWELL:QUIT (APPLY (QUOTE MAIN) ROSWELL:*ARGV*)) #<NULL-LEXENV>)
8: (SB-EXT:EVAL-TLF (ROSWELL:QUIT (APPLY (QUOTE MAIN) ROSWELL:*ARGV*)) NIL NIL)
9: ((LABELS SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (ROSWELL:QUIT (APPLY (QUOTE MAIN) ROSWELL:*ARGV*)) NIL)
10: (SB-INT:LOAD-AS-SOURCE #<CONCATENATED-STREAM :STREAMS NIL {7008D60223}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading")
11: ((LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) #<CONCATENATED-STREAM :STREAMS NIL {7008D60223}> NIL)
12: (SB-FASL::CALL-WITH-LOAD-BINDINGS #<FUNCTION (LABELS SB-FASL::LOAD-STREAM-1 :IN LOAD) {100CF0B5B}> #<CONCATENATED-STREAM :STREAMS NIL {7008D60223}> NIL #<CONCATENATED-STREAM :STREAMS NIL {7008D60223}>)
13: (LOAD #<CONCATENATED-STREAM :STREAMS NIL {7008D60223}> :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST :ERROR :EXTERNAL-FORMAT :DEFAULT)
14: ((FLET ROSWELL::BODY :IN ROSWELL:SCRIPT) #<SB-SYS:FD-STREAM for "file /Users/ivory/.roswell/bin/qlot" {7008D60003}>)
15: (ROSWELL:SCRIPT "/Users/ivory/.roswell/bin/qlot" "install" "--debug")
16: (ROSWELL:RUN ((:EVAL "(ros:asdf)") (:EVAL "(ros:quicklisp)") (:SCRIPT "/Users/ivory/.roswell/bin/qlot" "install" "--debug") (:QUIT NIL)))
17: (SB-INT:SIMPLE-EVAL-IN-LEXENV (ROSWELL:RUN (QUOTE ((:EVAL "(ros:asdf)") (:EVAL "(ros:quicklisp)") (:SCRIPT "/Users/ivory/.roswell/bin/qlot" "install" "--debug") (:QUIT NIL)))) #<NULL-LEXENV>)
18: (EVAL (ROSWELL:RUN (QUOTE ((:EVAL "(ros:asdf)") (:EVAL "(ros:quicklisp)") (:SCRIPT "/Users/ivory/.roswell/bin/qlot" "install" "--debug") (:QUIT NIL)))))
19: (SB-IMPL::PROCESS-EVAL/LOAD-OPTIONS ((:EVAL . "(progn #-ros.init(cl:load \"/opt/homebrew/Cellar/roswell/23.10.14.114/etc/roswell/init.lisp\"))") (:EVAL . "(ros:run '((:eval\"(ros:asdf)\")(:eval\"(ros:quicklisp)\")(:script \"/Users/ivory/.roswell/bin/qlot\"\"install\"\"--debug\")(:quit ())))")))
20: (SB-IMPL::TOPLEVEL-INIT)
21: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP))
22: ((FLET "WITHOUT-INTERRUPTS-BODY-3" :IN SB-IMPL::START-LISP))
23: (SB-IMPL::%START-LISP)

I'm confused.

The issue may not be widespread, but if I find the answer, I will reply. Thank you for your time.

Wishing this project even greater success.

from lem.

Related Issues (20)

Recommend Projects

  • React photo React

    A declarative, efficient, and flexible JavaScript library for building user interfaces.

  • Vue.js photo Vue.js

    🖖 Vue.js is a progressive, incrementally-adoptable JavaScript framework for building UI on the web.

  • Typescript photo Typescript

    TypeScript is a superset of JavaScript that compiles to clean JavaScript output.

  • TensorFlow photo TensorFlow

    An Open Source Machine Learning Framework for Everyone

  • Django photo Django

    The Web framework for perfectionists with deadlines.

  • D3 photo D3

    Bring data to life with SVG, Canvas and HTML. 📊📈🎉

Recommend Topics

  • javascript

    JavaScript (JS) is a lightweight interpreted programming language with first-class functions.

  • web

    Some thing interesting about web. New door for the world.

  • server

    A server is a program made to process requests and deliver data to clients.

  • Machine learning

    Machine learning is a way of modeling and interpreting data that allows a piece of software to respond intelligently.

  • Game

    Some thing interesting about game, make everyone happy.

Recommend Org

  • Facebook photo Facebook

    We are working to build community through open source technology. NB: members must have two-factor auth.

  • Microsoft photo Microsoft

    Open source projects and samples from Microsoft.

  • Google photo Google

    Google ❤️ Open Source for everyone.

  • D3 photo D3

    Data-Driven Documents codes.