Skip to content
GitLab
Projects Groups Snippets
  • /
  • Help
    • Help
    • Support
    • Community forum
    • Submit feedback
    • Contribute to GitLab
  • Sign in / Register
  • C clpm
  • Project information
    • Project information
    • Activity
    • Labels
    • Members
  • Repository
    • Repository
    • Files
    • Commits
    • Branches
    • Tags
    • Contributors
    • Graph
    • Compare
  • Issues 32
    • Issues 32
    • List
    • Boards
    • Service Desk
    • Milestones
  • Merge requests 1
    • Merge requests 1
  • CI/CD
    • CI/CD
    • Pipelines
    • Jobs
    • Schedules
  • Deployments
    • Deployments
    • Environments
    • Releases
  • Packages and registries
    • Packages and registries
    • Package Registry
    • Container Registry
    • Infrastructure Registry
  • Monitor
    • Monitor
    • Incidents
  • Analytics
    • Analytics
    • Value stream
    • CI/CD
    • Repository
  • Wiki
    • Wiki
  • Snippets
    • Snippets
  • Activity
  • Graph
  • Create a new issue
  • Jobs
  • Commits
  • Issue Boards
Collapse sidebar
  • clpm
  • clpm
  • Merge requests
  • !15

Fix scripts/clpm-live-sbcl when it is linked somewhere into the PATH

  • Review changes

  • Download
  • Email patches
  • Plain diff
Merged Alexander Artemenko requested to merge svetlyak40wt/clpm:fix-live-clpm into main Oct 16, 2021
  • Overview 1
  • Commits 1
  • Pipelines 2
  • Changes 1

Previosly, when you made a link If you follow "Live install" instructions from INSTALL.org and link scripts/clpm-live-sbcl, it will return following error:

[art@art-osx:~]% clpm
While evaluating the form starting at line 13, column 0
  of #P"/Users/art/projects/lisp/clpm/scripts/live.lisp":
Unhandled SB-INT:SIMPLE-PROGRAM-ERROR in thread #<SB-THREAD:THREAD "main thread" RUNNING
                                                   {1001540143}>:
  invalid number of arguments: 1

Backtrace for: #<SB-THREAD:THREAD "main thread" RUNNING {1001540143}>
0: (SETUP-ASDF "live") [external]
1: (SB-INT:SIMPLE-EVAL-IN-LEXENV (SETUP-ASDF "live") #<NULL-LEXENV>)
2: (SB-EXT:EVAL-TLF (SETUP-ASDF "live") 3 NIL)
3: ((LABELS SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (SETUP-ASDF "live") 3)
4: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) (SETUP-ASDF "live") :CURRENT-INDEX 3)
5: (SB-C::%DO-FORMS-FROM-INFO #<FUNCTION (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) {100158765B}> #<SB-C::SOURCE-INFO {1001587623}> SB-C::INPUT-ERROR-IN-LOAD)
6: (SB-INT:LOAD-AS-SOURCE #<SB-INT:FORM-TRACKING-STREAM for "file /Users/art/projects/lisp/clpm/scripts/live.lisp" {1001585BD3}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading")
7: ((FLET SB-FASL::THUNK :IN LOAD))
8: (SB-FASL::CALL-WITH-LOAD-BINDINGS #<FUNCTION (FLET SB-FASL::THUNK :IN LOAD) {C63ECEB}> #<SB-INT:FORM-TRACKING-STREAM for "file /Users/art/projects/lisp/clpm/scripts/live.lisp" {1001585BD3}>)
9: ((FLET SB-FASL::LOAD-STREAM :IN LOAD) #<SB-INT:FORM-TRACKING-STREAM for "file /Users/art/projects/lisp/clpm/scripts/live.lisp" {1001585BD3}> NIL)
10: (LOAD #P"/Users/art/projects/lisp/clpm/scripts/live.lisp" :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST T :EXTERNAL-FORMAT :DEFAULT)
11: (SB-INT:SIMPLE-EVAL-IN-LEXENV (LOAD (MERGE-PATHNAMES "live.lisp" *LOAD-TRUENAME*)) #<NULL-LEXENV>)
12: (SB-EXT:EVAL-TLF (LOAD (MERGE-PATHNAMES "live.lisp" *LOAD-TRUENAME*)) 2 NIL)
13: ((LABELS SB-FASL::EVAL-FORM :IN SB-INT:LOAD-AS-SOURCE) (LOAD (MERGE-PATHNAMES "live.lisp" *LOAD-TRUENAME*)) 2)
14: ((LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) (LOAD (MERGE-PATHNAMES "live.lisp" *LOAD-TRUENAME*)) :CURRENT-INDEX 2)
15: (SB-C::%DO-FORMS-FROM-INFO #<FUNCTION (LAMBDA (SB-KERNEL:FORM &KEY :CURRENT-INDEX &ALLOW-OTHER-KEYS) :IN SB-INT:LOAD-AS-SOURCE) {1001547F9B}> #<SB-C::SOURCE-INFO {1001547F63}> SB-C::INPUT-ERROR-IN-LOAD)
16: (SB-INT:LOAD-AS-SOURCE #<SB-SYS:FD-STREAM for "file /Users/art/.local/bin/clpm" {1000898C33}> :VERBOSE NIL :PRINT NIL :CONTEXT "loading")
17: ((FLET SB-FASL::THUNK :IN LOAD))
18: (SB-FASL::CALL-WITH-LOAD-BINDINGS #<FUNCTION (FLET SB-FASL::THUNK :IN LOAD) {C63F74B}> #<SB-SYS:FD-STREAM for "file /Users/art/.local/bin/clpm" {1000898C33}>)
19: ((FLET SB-FASL::LOAD-STREAM :IN LOAD) #<SB-SYS:FD-STREAM for "file /Users/art/.local/bin/clpm" {1000898C33}> NIL)
20: (LOAD #<SB-SYS:FD-STREAM for "file /Users/art/.local/bin/clpm" {1000898C33}> :VERBOSE NIL :PRINT NIL :IF-DOES-NOT-EXIST T :EXTERNAL-FORMAT :DEFAULT)
21: ((FLET SB-IMPL::LOAD-SCRIPT :IN SB-IMPL::PROCESS-SCRIPT) #<SB-SYS:FD-STREAM for "file /Users/art/.local/bin/clpm" {1000898C33}>)
22: ((FLET SB-UNIX::BODY :IN SB-IMPL::PROCESS-SCRIPT))
23: ((FLET "WITHOUT-INTERRUPTS-BODY-11" :IN SB-IMPL::PROCESS-SCRIPT))
24: (SB-IMPL::PROCESS-SCRIPT "/Users/art/.local/bin/clpm")
25: (SB-IMPL::TOPLEVEL-INIT)
26: ((FLET SB-UNIX::BODY :IN SB-IMPL::START-LISP))
27: ((FLET "WITHOUT-INTERRUPTS-BODY-1" :IN SB-IMPL::START-LISP))
28: (SB-IMPL::START-LISP)

unhandled condition in --disable-debugger mode, quitting

This patch fixes this issue.

Assignee
Assign to
Reviewers
Request review from
Time tracking
Source branch: fix-live-clpm