Skip to content
New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Compilation fails at iterators.lisp #2

Closed
zyd-n opened this issue Jun 2, 2024 · 3 comments
Closed

Compilation fails at iterators.lisp #2

zyd-n opened this issue Jun 2, 2024 · 3 comments
Assignees
Labels
bug Something isn't working

Comments

@zyd-n
Copy link

zyd-n commented Jun 2, 2024

SBCL Version: 2.4.4

Followed Quicklisp installation instructions in INSTALLATION.md

Lisp Session Log
CL-USER> (ql:quickload :org.tfeb.star)
To load "org.tfeb.star":
  Load 1 ASDF system:
    org.tfeb.star
; Loading "org.tfeb.star"

; file: /home/zyd/src/third-party/star/iterators.lisp
; in:
;      DEFINE-ITERATOR-OPTIMIZER (IN-LIST *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;     (ORG.TFEB.STAR/ITERATOR-OPTIMIZER-PROTOCOL:DEFINE-ITERATOR-OPTIMIZER (ORG.TFEB.STAR/ITERATORS:IN-LIST
;                                                                           ORG.TFEB.STAR/COMMON:*BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;         (ORG.TFEB.STAR/ITERATORS::FORM)
;       (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::FORM
;         ((ORG.TFEB.STAR/ITERATORS::_ ORG.TFEB.STAR/ITERATORS::L)
;          (ORG.TFEB.HAX.UTILITIES:WITH-NAMES (ORG.TFEB.STAR/ITERATORS::<TAIL>)
;            (VALUES T `# `# `#)))
;         ((ORG.TFEB.STAR/ITERATORS::_ ORG.TFEB.STAR/ITERATORS::L &KEY
;           ORG.TFEB.STAR/ITERATORS::BY)
;          (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::BY
;            (# # #)
;            (OTHERWISE #)))
;         (OTHERWISE NIL)))
; 
; caught ERROR:
;   (during macroexpansion of (DEFINE-ITERATOR-OPTIMIZER (IN-LIST *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;       ...))
;   The function ORG.TFEB.STAR/IMPL::<IGNORED-ENV> is undefined.

; in:
;      DEFINE-ITERATOR-OPTIMIZER (ON-LIST *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;     (ORG.TFEB.STAR/ITERATOR-OPTIMIZER-PROTOCOL:DEFINE-ITERATOR-OPTIMIZER (ORG.TFEB.STAR/ITERATORS:ON-LIST
;                                                                           ORG.TFEB.STAR/COMMON:*BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;         (ORG.TFEB.STAR/ITERATORS::FORM)
;       (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::FORM
;         ((ORG.TFEB.STAR/ITERATORS::_ ORG.TFEB.STAR/ITERATORS::L)
;          (ORG.TFEB.HAX.UTILITIES:WITH-NAMES (ORG.TFEB.STAR/ITERATORS::<TAIL>)
;            (VALUES T `# `# `#)))
;         ((ORG.TFEB.STAR/ITERATORS::_ ORG.TFEB.STAR/ITERATORS::L &KEY
;           ORG.TFEB.STAR/ITERATORS::BY)
;          (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::BY
;            (# # #)
;            (OTHERWISE #)))
;         (OTHERWISE NIL)))
; 
; caught ERROR:
;   (during macroexpansion of (DEFINE-ITERATOR-OPTIMIZER (ON-LIST *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;       ...))
;   The function ORG.TFEB.STAR/IMPL::<IGNORED-ENV> is undefined.

; in:
;      DEFINE-ITERATOR-OPTIMIZER (IN-VECTOR *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;     (ORG.TFEB.STAR/ITERATOR-OPTIMIZER-PROTOCOL:DEFINE-ITERATOR-OPTIMIZER (ORG.TFEB.STAR/ITERATORS:IN-VECTOR
;                                                                           ORG.TFEB.STAR/COMMON:*BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;         (ORG.TFEB.STAR/ITERATORS::FORM)
;       (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::FORM
;         ((ORG.TFEB.STAR/ITERATORS::_ VECTOR &KEY
;           (ORG.TFEB.STAR/ITERATORS::ELEMENT-TYPE 'T)
;           (ORG.TFEB.STAR/ITERATORS::SIMPLE 'NIL))
;          (MULTIPLE-VALUE-BIND
;              (ORG.TFEB.STAR/ITERATORS::ELEMENT-TYPE
;               ORG.TFEB.STAR/ITERATORS::ELEMENT-TYPE-LITERAL)
;              (ORG.TFEB.STAR/ITERATORS::LITERAL
;               ORG.TFEB.STAR/ITERATORS::ELEMENT-TYPE)
;            (MULTIPLE-VALUE-BIND # # # #)))
;         (OTHERWISE NIL)))
; 
; caught ERROR:
;   (during macroexpansion of (DEFINE-ITERATOR-OPTIMIZER (IN-VECTOR *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;       ...))
;   The function ORG.TFEB.STAR/IMPL::<IGNORED-ENV> is undefined.

; in:
;      DEFINE-ITERATOR-OPTIMIZER (IN-HASH-TABLE *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;     (ORG.TFEB.STAR/ITERATOR-OPTIMIZER-PROTOCOL:DEFINE-ITERATOR-OPTIMIZER (ORG.TFEB.STAR/ITERATORS:IN-HASH-TABLE
;                                                                           ORG.TFEB.STAR/COMMON:*BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;         (ORG.TFEB.STAR/ITERATORS::FORM)
;       (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::FORM
;         ((ORG.TFEB.STAR/ITERATORS::_ ORG.TFEB.STAR/ITERATORS::H)
;          (ORG.TFEB.HAX.UTILITIES:WITH-NAMES (ORG.TFEB.STAR/ITERATORS::<HASH-ITERATOR>
;                                              ORG.TFEB.STAR/ITERATORS::<HASH-VALID>
;                                              ORG.TFEB.STAR/ITERATORS::<HASH-KEY>
;                                              ORG.TFEB.STAR/ITERATORS::<HASH-VALUE>)
;            (VALUES T `# ORG.TFEB.STAR/ITERATORS::<HASH-VALID> `# #)))
;         (OTHERWISE NIL)))
; 
; caught ERROR:
;   (during macroexpansion of (DEFINE-ITERATOR-OPTIMIZER (IN-HASH-TABLE *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;       ...))
;   The function ORG.TFEB.STAR/IMPL::<IGNORED-ENV> is undefined.
.
; in: DEFUN IN-PACKAGE-SYMBOLS
;     (ORG.TFEB.STAR/IMPL:FOR (((ORG.TFEB.STAR/ITERATORS::FOUND SYMBOL
;                                ORG.TFEB.STAR/ITERATORS::STATUS PACKAGE)
;                               (VALUES (CONSTANTLY T) (LAMBDA # #))))
;       (COND ((NOT ORG.TFEB.STAR/ITERATORS::FOUND) (ORG.TFEB.STAR/IMPL:FINAL))
;             ((MEMBER ORG.TFEB.STAR/ITERATORS::STATUS WHEN)
;              (ORG.TFEB.HAX.COLLECTING:COLLECT (CONS SYMBOL PACKAGE)))))
; 
; caught ERROR:
;   during macroexpansion of
;   (FOR (#)
;     (COND # #)).
;   Use *BREAK-ON-SIGNALS* to intercept.
;   
;    The variable ORG.TFEB.STAR/IMPL::<END> is unbound.

; in:
;      DEFINE-ITERATOR-OPTIMIZER (IN-PACKAGE-SYMBOLS
;                             *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;     (ORG.TFEB.STAR/ITERATOR-OPTIMIZER-PROTOCOL:DEFINE-ITERATOR-OPTIMIZER (ORG.TFEB.STAR/ITERATORS:IN-PACKAGE-SYMBOLS
;                                                                           ORG.TFEB.STAR/COMMON:*BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;         (ORG.TFEB.STAR/ITERATORS::FORM)
;       (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::FORM
;         ((ORG.TFEB.STAR/ITERATORS::_ ORG.TFEB.STAR/ITERATORS::P &KEY (WHEN ''#))
;          (ORG.TFEB.HAX.UTILITIES:WITH-NAMES (ORG.TFEB.STAR/ITERATORS::<WHEN>
;                                              ORG.TFEB.STAR/ITERATORS::<PI>
;                                              ORG.TFEB.STAR/ITERATORS::<S>
;                                              ORG.TFEB.STAR/ITERATORS::<P>)
;            (VALUES T `# `# `# #)))
;         (OTHERWISE NIL)))
; 
; caught ERROR:
;   (during macroexpansion of (DEFINE-ITERATOR-OPTIMIZER (IN-PACKAGE-SYMBOLS
;                               *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;       ...))
;   The function ORG.TFEB.STAR/IMPL::<IGNORED-ENV> is undefined.

; in: DEFUN EXPAND-STEPPING
;     (ORG.TFEB.STAR/IMPL:FOR ((ORG.TFEB.STAR/ITERATORS::CLAUSE
;                               (ORG.TFEB.STAR/ITERATORS:IN-LIST
;                                ORG.TFEB.STAR/ITERATORS::CLAUSES)))
;       (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::CLAUSE
;         ((ORG.TFEB.STAR/ITERATORS::VAR &KEY (ORG.TFEB.STAR/ITERATORS::VALUE T)
;           (ORG.TFEB.STAR/ITERATORS::INITIALLY NIL
;            ORG.TFEB.STAR/ITERATORS::INITIALLYP)
;           (ORG.TFEB.STAR/ITERATORS::THEN NIL ORG.TFEB.STAR/ITERATORS::THENP)
;           (TYPE NIL TYPEP)
;           (ORG.TFEB.STAR/ITERATORS::WHILE NIL ORG.TFEB.STAR/ITERATORS::WHILEP)
;           (ORG.TFEB.STAR/ITERATORS::UNTIL NIL ORG.TFEB.STAR/ITERATORS::UNTILP))
;          (:WHEN (SYMBOLP ORG.TFEB.STAR/ITERATORS::VAR))
;          (ORG.TFEB.STAR/ITERATORS::BINDING
;           (IF ORG.TFEB.STAR/ITERATORS::INITIALLYP
;               `#
;               ORG.TFEB.STAR/ITERATORS::VAR))
;          (WHEN ORG.TFEB.STAR/ITERATORS::VALUE
;            (ORG.TFEB.STAR/ITERATORS::VALUE ORG.TFEB.STAR/ITERATORS::VAR))
;          (WHEN TYPEP (ORG.TFEB.STAR/ITERATORS::TD `#))
;          (WHEN ORG.TFEB.STAR/ITERATORS::THENP (ORG.TFEB.STAR/ITERATORS::THEN `#))
;          (WHEN ORG.TFEB.STAR/ITERATORS::WHILEP
;            (ORG.TFEB.STAR/ITERATORS::TEST ORG.TFEB.STAR/ITERATORS::WHILE))
;          (WHEN ORG.TFEB.STAR/ITERATORS::UNTILP
;            (ORG.TFEB.STAR/ITERATORS::TEST `#)))
;         (OTHERWISE
;          (ORG.TFEB.STAR/COMMON:SYNTAX-ERROR ORG.TFEB.STAR/ITERATORS::CLAUSE
;                                             "bad stepping clause"))))
; 
; caught ERROR:
;   during macroexpansion of
;   (FOR (#)
;     (DESTRUCTURING-MATCH CLAUSE
;       #
;       ...)).
;   Use *BREAK-ON-SIGNALS* to intercept.
;   
;    The variable ORG.TFEB.STAR/IMPL::<END> is unbound.

; in:
;      DEFINE-ITERATOR-OPTIMIZER (SEQUENTIALLY-CALLING
;                             *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;     (ORG.TFEB.STAR/ITERATOR-OPTIMIZER-PROTOCOL:DEFINE-ITERATOR-OPTIMIZER (ORG.TFEB.STAR/ITERATORS:SEQUENTIALLY-CALLING
;                                                                           ORG.TFEB.STAR/COMMON:*BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;         (ORG.TFEB.STAR/ITERATORS::FORM)
;       (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::FORM
;         ((ORG.TFEB.STAR/ITERATORS::_) (VALUES T 'NIL NIL NIL NIL))
;         ((ORG.TFEB.STAR/ITERATORS::_ &REST ORG.TFEB.STAR/ITERATORS::FNS)
;          (LET (#)
;            (VALUES T `# `# `# NIL)))
;         (OTHERWISE
;          (ORG.TFEB.STAR/COMMON:SYNTAX-ERROR ORG.TFEB.STAR/ITERATORS::FORM
;                                             "what even is this?"))))
; 
; caught ERROR:
;   (during macroexpansion of (DEFINE-ITERATOR-OPTIMIZER (SEQUENTIALLY-CALLING
;                               *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;       ...))
;   The function ORG.TFEB.STAR/IMPL::<IGNORED-ENV> is undefined.

; in:
;      DEFINE-ITERATOR-OPTIMIZER (SEQUENTIALLY *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;     (ORG.TFEB.STAR/ITERATOR-OPTIMIZER-PROTOCOL:DEFINE-ITERATOR-OPTIMIZER (ORG.TFEB.STAR/ITERATORS:SEQUENTIALLY
;                                                                           ORG.TFEB.STAR/COMMON:*BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;         (ORG.TFEB.STAR/ITERATORS::FORM)
;       (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::FORM
;         ((ORG.TFEB.STAR/ITERATORS::_) (VALUES T 'NIL NIL NIL NIL))
;         ((ORG.TFEB.STAR/ITERATORS::_ &REST ORG.TFEB.STAR/ITERATORS::FORMS)
;          (LET (#)
;            (VALUES T `# `# `# NIL)))
;         (OTHERWISE
;          (ORG.TFEB.STAR/COMMON:SYNTAX-ERROR ORG.TFEB.STAR/ITERATORS::FORM
;                                             "what even is this?"))))
; 
; caught ERROR:
;   (during macroexpansion of (DEFINE-ITERATOR-OPTIMIZER (SEQUENTIALLY *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;       ...))
;   The function ORG.TFEB.STAR/IMPL::<IGNORED-ENV> is undefined.

; in:
;      DEFINE-ITERATOR-OPTIMIZER (SEQUENTIALLY-CALLING*
;                             *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;     (ORG.TFEB.STAR/ITERATOR-OPTIMIZER-PROTOCOL:DEFINE-ITERATOR-OPTIMIZER (ORG.TFEB.STAR/ITERATORS:SEQUENTIALLY-CALLING*
;                                                                           ORG.TFEB.STAR/COMMON:*BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;         (ORG.TFEB.STAR/ITERATORS::FORM)
;       (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::FORM
;         ((ORG.TFEB.STAR/ITERATORS::_ &REST ORG.TFEB.STAR/ITERATORS::FNS)
;          (WHEN (NULL ORG.TFEB.STAR/ITERATORS::FNS)
;            (ORG.TFEB.STAR/UTILITIES:STAR-ERROR "need at least one function"))
;          (LET (#)
;            (VALUES T `# T `# NIL)))
;         (OTHERWISE
;          (ORG.TFEB.STAR/COMMON:SYNTAX-ERROR ORG.TFEB.STAR/ITERATORS::FORM
;                                             "what even is this?"))))
; 
; caught ERROR:
;   (during macroexpansion of (DEFINE-ITERATOR-OPTIMIZER (SEQUENTIALLY-CALLING*
;                               *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;       ...))
;   The function ORG.TFEB.STAR/IMPL::<IGNORED-ENV> is undefined.
.
; in:
;      DEFINE-ITERATOR-OPTIMIZER (SEQUENTIALLY* *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;     (ORG.TFEB.STAR/ITERATOR-OPTIMIZER-PROTOCOL:DEFINE-ITERATOR-OPTIMIZER (ORG.TFEB.STAR/ITERATORS:SEQUENTIALLY*
;                                                                           ORG.TFEB.STAR/COMMON:*BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;         (ORG.TFEB.STAR/ITERATORS::FORM)
;       (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::FORM
;         ((ORG.TFEB.STAR/ITERATORS::_ &REST ORG.TFEB.STAR/ITERATORS::FORMS)
;          (WHEN (NULL ORG.TFEB.STAR/ITERATORS::FORMS)
;            (ORG.TFEB.STAR/UTILITIES:STAR-ERROR "need at least one form"))
;          (LET (#)
;            (VALUES T `# T `# NIL)))
;         (OTHERWISE
;          (ORG.TFEB.STAR/COMMON:SYNTAX-ERROR ORG.TFEB.STAR/ITERATORS::FORM
;                                             "what even is this?"))))
; 
; caught ERROR:
;   (during macroexpansion of (DEFINE-ITERATOR-OPTIMIZER (SEQUENTIALLY* *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;       ...))
;   The function ORG.TFEB.STAR/IMPL::<IGNORED-ENV> is undefined.

; in:
;      DEFINE-ITERATOR-OPTIMIZER (CYCLICALLY-CALLING
;                             *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;     (ORG.TFEB.STAR/ITERATOR-OPTIMIZER-PROTOCOL:DEFINE-ITERATOR-OPTIMIZER (ORG.TFEB.STAR/ITERATORS:CYCLICALLY-CALLING
;                                                                           ORG.TFEB.STAR/COMMON:*BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;         (ORG.TFEB.STAR/ITERATORS::FORM)
;       (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::FORM
;         ((ORG.TFEB.STAR/ITERATORS::_) (VALUES T 'NIL NIL NIL NIL))
;         ((ORG.TFEB.STAR/ITERATORS::_ &REST ORG.TFEB.STAR/ITERATORS::FNS)
;          (LET (# #)
;            (VALUES T `# T `# NIL)))
;         (OTHERWISE
;          (ORG.TFEB.STAR/COMMON:SYNTAX-ERROR ORG.TFEB.STAR/ITERATORS::FORM
;                                             "what even is this?"))))
; 
; caught ERROR:
;   (during macroexpansion of (DEFINE-ITERATOR-OPTIMIZER (CYCLICALLY-CALLING
;                               *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;       ...))
;   The function ORG.TFEB.STAR/IMPL::<IGNORED-ENV> is undefined.

; in:
;      DEFINE-ITERATOR-OPTIMIZER (CYCLICALLY *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;     (ORG.TFEB.STAR/ITERATOR-OPTIMIZER-PROTOCOL:DEFINE-ITERATOR-OPTIMIZER (ORG.TFEB.STAR/ITERATORS:CYCLICALLY
;                                                                           ORG.TFEB.STAR/COMMON:*BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;         (ORG.TFEB.STAR/ITERATORS::FORM)
;       (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::FORM
;         ((ORG.TFEB.STAR/ITERATORS::_) (VALUES T 'NIL NIL NIL NIL))
;         ((ORG.TFEB.STAR/ITERATORS::_ &REST ORG.TFEB.STAR/ITERATORS::FORMS)
;          (LET (# #)
;            (VALUES T `# T `# NIL)))
;         (OTHERWISE
;          (ORG.TFEB.STAR/COMMON:SYNTAX-ERROR ORG.TFEB.STAR/ITERATORS::FORM
;                                             "what even is this?"))))
; 
; caught ERROR:
;   (during macroexpansion of (DEFINE-ITERATOR-OPTIMIZER (CYCLICALLY *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;       ...))
;   The function ORG.TFEB.STAR/IMPL::<IGNORED-ENV> is undefined.

; in:
;      DEFINE-ITERATOR-OPTIMIZER (IN-ITERATORS *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;     (ORG.TFEB.STAR/ITERATOR-OPTIMIZER-PROTOCOL:DEFINE-ITERATOR-OPTIMIZER (ORG.TFEB.STAR/ITERATORS:IN-ITERATORS
;                                                                           ORG.TFEB.STAR/COMMON:*BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;         (ORG.TFEB.STAR/ITERATORS::FORM)
;       (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::FORM
;         ((ORG.TFEB.STAR/ITERATORS::_) (VALUES T 'NIL NIL NIL NIL))
;         ((ORG.TFEB.STAR/ITERATORS::_ &REST
;           ORG.TFEB.STAR/ITERATORS::ITERATOR-FORMS)
;          (ORG.TFEB.HAX.UTILITIES:WITH-NAMES (ORG.TFEB.STAR/ITERATORS::<VALID>
;                                              ORG.TFEB.STAR/ITERATORS::<VALIDS>
;                                              ORG.TFEB.STAR/ITERATORS::<CURSOR>
;                                              ORG.TFEB.STAR/ITERATORS::<CURSORS>)
;            (VALUES T `# `# `# NIL)))
;         (OTHERWISE NIL)))
; 
; caught ERROR:
;   (during macroexpansion of (DEFINE-ITERATOR-OPTIMIZER (IN-ITERATORS *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;       ...))
;   The function ORG.TFEB.STAR/IMPL::<IGNORED-ENV> is undefined.

; in:
;      DEFINE-ITERATOR-OPTIMIZER (IN-PARALLEL-ITERATORS
;                             *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;     (ORG.TFEB.STAR/ITERATOR-OPTIMIZER-PROTOCOL:DEFINE-ITERATOR-OPTIMIZER (ORG.TFEB.STAR/ITERATORS:IN-PARALLEL-ITERATORS
;                                                                           ORG.TFEB.STAR/COMMON:*BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;         (ORG.TFEB.STAR/ITERATORS::FORM)
;       (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::FORM
;         ((ORG.TFEB.STAR/ITERATORS::_) (VALUES T 'NIL NIL NIL NIL))
;         ((ORG.TFEB.STAR/ITERATORS::_ &REST
;           ORG.TFEB.STAR/ITERATORS::ITERATOR-FORMS)
;          (LET (# #)
;            (VALUES T # `# `# NIL)))
;         (OTHERWISE NIL)))
; 
; caught ERROR:
;   (during macroexpansion of (DEFINE-ITERATOR-OPTIMIZER (IN-PARALLEL-ITERATORS
;                               *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;       ...))
;   The function ORG.TFEB.STAR/IMPL::<IGNORED-ENV> is undefined.

; in: DEFUN IN-DELAYED-PARALLEL-ITERATORS
;     (ORG.TFEB.STAR/IMPL:FOR ((ORG.TFEB.STAR/ITERATORS::DELAYED-ITERATOR
;                               (ORG.TFEB.STAR/ITERATORS:IN-LIST
;                                ORG.TFEB.STAR/ITERATORS::DELAYED-ITERATORS)))
;       (MULTIPLE-VALUE-BIND
;           (ORG.TFEB.STAR/ITERATORS::V ORG.TFEB.STAR/ITERATORS::C)
;           (FUNCALL ORG.TFEB.STAR/ITERATORS::DELAYED-ITERATOR)
;         (ORG.TFEB.STAR/ITERATORS::VALID ORG.TFEB.STAR/ITERATORS::V)
;         (ORG.TFEB.STAR/ITERATORS::CURSOR ORG.TFEB.STAR/ITERATORS::C)))
; 
; caught ERROR:
;   during macroexpansion of
;   (FOR (#)
;     (MULTIPLE-VALUE-BIND # # ...)).
;   Use *BREAK-ON-SIGNALS* to intercept.
;   
;    The variable ORG.TFEB.STAR/IMPL::<END> is unbound.

; in:
;      DEFINE-ITERATOR-OPTIMIZER (ALWAYS *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;     (ORG.TFEB.STAR/ITERATOR-OPTIMIZER-PROTOCOL:DEFINE-ITERATOR-OPTIMIZER (ORG.TFEB.STAR/ITERATORS:ALWAYS
;                                                                           ORG.TFEB.STAR/COMMON:*BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;         (ORG.TFEB.STAR/ITERATORS::FORM)
;       (ORG.TFEB.DSM:DESTRUCTURING-MATCH ORG.TFEB.STAR/ITERATORS::FORM
;         ((ORG.TFEB.STAR/ITERATORS::_ ORG.TFEB.STAR/ITERATORS::V)
;          (ORG.TFEB.HAX.UTILITIES:WITH-NAMES (ORG.TFEB.STAR/ITERATORS::<V>)
;            (VALUES T `# 'T ORG.TFEB.STAR/ITERATORS::<V> NIL)))))
; 
; caught ERROR:
;   (during macroexpansion of (DEFINE-ITERATOR-OPTIMIZER (ALWAYS *BUILTIN-ITERATOR-OPTIMIZER-TABLE*)
;       ...))
;   The function ORG.TFEB.STAR/IMPL::<IGNORED-ENV> is undefined.
@tfeb tfeb self-assigned this Jun 3, 2024
@tfeb tfeb added the bug Something isn't working label Jun 3, 2024
@tfeb
Copy link
Owner

tfeb commented Jun 3, 2024

Hi, we can't look at this until next week: it looks like some compilation-order or missing-prerequisite problem. Thank you for reporting it.

@zyd-n
Copy link
Author

zyd-n commented Jun 3, 2024

This might have been something on my end. I successfully compiled all dependencies and files manually one by one, and now I can even (ql:quickload :org.tfeb.star) just fine. I made sure to even delete the local .fasl files and recompile to double check and it just works. Whenever you get to this, if you can't reproduce this bug then its definitely something on my end and this issue should be closed.

@tfeb
Copy link
Owner

tfeb commented Jun 11, 2024

I have made some attempts to make this happen and I can't. However what I haven't done is to try and set things up so that QL will try and download versions of all the dependencies: instead it's short-circuiting to my local versions. These are ahead of the versions in QL, so that could cause trouble.

In particular as of some changes I pushed today you will definitely need a version of org.tfeb.hax which is ahead of anything in QL.

I am going to provisionally close this as 'can't reproduce'. If it comes back please reopen it, or open another issue. Thank you!

@tfeb tfeb closed this as not planned Won't fix, can't repro, duplicate, stale Jun 11, 2024
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
Labels
bug Something isn't working
Projects
None yet
Development

No branches or pull requests

2 participants