<html>
<head>
<meta name="viewport" content="width=device-width, initial-scale=1.0">
</head>
<body>
<span dir="ltr" style="margin-top:0; margin-bottom:0;">Wow, thank you so much for figuring all of that out. I tried to make the changes you suggested, and I'm still running into errors, but I'm not sure I have the exact version of str that you do, so I imagine that is the reason. I was able to make a build with a different package ("vector") and it worked fine. Who would have guessed it was a package I was using?</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">I think I will talk to the str developers upstream and let them know ecl won't MAKE-BUILD with it. In the meantime, I may implement the functions I used from str myself, or embed a source code file from str with just the functions I need, depending on the license of str.</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">Thank you very much for your help,</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">Brandon Hale</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">On 2/10/23 14:36, Daniel Kochmański wrote:</span> <br>
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">I think that you should not call quickload in the package file. ASDF should solve depenencies based on a sole (ql:quickload 'cl-i3).</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">I've tried to reproduce your issue and I've succeeded. After quick investigation it seems that the system cl-str expects that its</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">source code will be available to asdf at any time (even after the compilation). The offensive line is this:</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">cl-str-20221106-git/str.lisp:144:(defvar +version+ (asdf:component-version (asdf:find-system "str")))</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">Basically it is as if you were expecting that both make and linux source code are both available at startup.</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">If you replace this line to maintain some reasonable sanity it will look like this:</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">(defvar +version+ #.(asdf:component-version (asdf:find-system "str")))</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">Another issue with this system is that it does not declare dependencies on "uiop" and "asdf" despite using both. str.asd</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">should have</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">:depends-on (:cl-ppcre</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;"> :cl-ppcre-unicode</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;"> :cl-change-case</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;"> "asdf"</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;"> "uiop")</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">note the last two lines. With that the following builds and runs without a hitch:</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">brandon.asd:</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">(in-package #:asdf-user)</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">(asdf:defsystem "brandon"</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;"> :name "brandon"</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;"> :depends-on ("str")</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;"> :components ((:file "main")))</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">main.lisp:</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">(defpackage #:brandon</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;"> (:use #:cl))</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">(in-package #:brandon)</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">(defun main (str)</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;"> (format t "Hello ~a!~%" str))</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">build.lisp (not part of the system):</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">(in-package #:cl-user)</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">;;; Make the system recognizable by ASDF</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">(asdf:load-asd "brandon.asd")</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">;;; Pull dependencies and load macros</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">(asdf:load-system "brandon")</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">;;; Build the program (shared object)</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">(asdf:make-build "brandon" :type :program</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;"> :move-here "./brandon.out")</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">(asdf:make-build "brandon" :type :program</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;"> :monolithic t</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;"> :move-here ".")</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">----</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">note that if you don't want repl then probably you want to add (progn (main "HI") (ext:quit)) in the epilogue code.</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">Best regards,</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">Daniel</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">p.s if you feel like it you may make issues in cl-str repository bugtracker.</span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">--</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">Daniel Kochmański ;; aka jackdaniel | Przemyśl, Poland</span></span></span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">TurtleWare - Daniel Kochmański | </span></span><span style="font-size:small;"><span style="font-family:arial, sans-serif;"><a href="http://www.turtleware.eu">www.turtleware.eu</a></span></span></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><span style="font-size:small;"><span style="font-family:arial, sans-serif;">"Be the change that you wish to see in the world." - Mahatma Gandhi</span></span></span> <br> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">------- Original Message -------</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">On Friday, February 10th, 2023 at 20:02, Brandon Hale <a href="mailto:bthaleproductions@gmail.com"><bthaleproductions@gmail.com></a> wrote:</span> <br> <br>
</blockquote>
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<span dir="ltr" style="margin-top:0; margin-bottom:0;">Maybe I should get my project up in a repo, but it looks like I have the dependency listed. Here is my package's .asd named cl-i3.asd:</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">(asdf:defsystem #:cl-i3</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"> :name "cl-i3"</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"> :description "A replacement for i3status written in Common Lisp."</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"> :author "Brandon Hale <a href="mailto:bthaleproductions@gmail.com"><bthaleproductions@gmail.com></a>"</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"> :license "GPLv3"</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"> :version "1.0"</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"> :depends-on (#:cl-ansi-text #:trivial-battery #:str)</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"> :components ((:file "main")))</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">And the top portion of my main.lisp:</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">(ql:quickload :trivial-battery)</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">(ql:quickload :str)</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">;; allows for colors to be printed</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">(ql:quickload :cl-ansi-text)</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">(defpackage :cl-i3</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"> (:use #:common-lisp))</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">I am definitely not an expert on Common Lisp packages, but this does load up in slime on my machine when I do a</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">(ql:quickload :cl-i3)</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">with ecl 21.2.1-3 from Arch Linux.</span> <br> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">I need to look at the well-commented example again to see what I'm doing wrong methinks.</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">Brandon Hale</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">On 2/10/23 01:07, Daniel Kochmański wrote:</span> <br>
</blockquote>
</blockquote>
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<span dir="ltr" style="margin-top:0; margin-bottom:0;">Hello Brandon,</span> <br> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">------- Original Message -------</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">On Friday, February 10th, 2023 at 00:20, Brandon Hale <a href="mailto:bthaleproductions@gmail.com"><bthaleproductions@gmail.com></a> wrote:</span> <br> <br> <br>
</blockquote>
</blockquote>
</blockquote>
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<span dir="ltr" style="margin-top:0; margin-bottom:0;">Hello all,</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">I apologize if this is either the wrong place to get help with ecl, or if this is asked all of the time.</span> <br>
</blockquote>
</blockquote>
</blockquote>
</blockquote>
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<span dir="ltr" style="margin-top:0; margin-bottom:0;">this is the right place, don't worry :)</span> <br> <br> <br>
</blockquote>
</blockquote>
</blockquote>
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<span dir="ltr" style="margin-top:0; margin-bottom:0;">I've written a small replacement for i3status with common lisp and want to use ecl to make a binary so when i3wm loads, it just loads the cl-i3status binary. I've looked at the ecl documentation online and it suggests doing something like this:</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">(ql:quickload :cl-i3)</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">(asdf:make-build :cl-i3</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"> :type :program</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"> :move-here #P"/home/brandon/Programming/lisp/cl-i3/"</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"> :prologue-code '(require 'asdf))</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">So, I run this and the binary appears. However, when I try to run it, I get this output:</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">;;; Loading #P"/usr/lib/ecl-21.2.1/asdf.fas"</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">;;; Computing Hangul syllable names</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">Condition of type: MISSING-COMPONENT</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">Component "str" not found</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">Available restarts:</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">1. (RETRY) Retry ASDF operation.</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">2. (CLEAR-CONFIGURATION-AND-RETRY) Retry ASDF operation after resetting the configuration.</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">Top level in: #<process TOP-LEVEL 0x557ade1c2f80>.</span> <br>
</blockquote>
</blockquote>
</blockquote>
</blockquote>
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<br>
</blockquote>
</blockquote>
</blockquote>
</blockquote>
</blockquote>
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<span dir="ltr" style="margin-top:0; margin-bottom:0;">I imagine it is just because of my use of quicklisp packages, but how do I compile the packages into the binary?</span> <br>
</blockquote>
</blockquote>
</blockquote>
</blockquote>
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<span dir="ltr" style="margin-top:0; margin-bottom:0;">this error message seems to suggest that you use a system "str" without declaring it in dependencies. In your</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">project file my-project.asd add</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">(defsystem "my-project"</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"> ...</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"> :depends-on (... "str")</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"> ...)</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">depending on what you want from your project you may not need (require 'asdf) in the prologue code. Also you</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">may consider passing :monolithic t flag to make-build.</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">Make sure that you study well-commented example in ecl source repository under examples/asdf_with_dependence/.</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">Last but not least make sure that you use the latest release (currently it is 21.2.1) or a build from the branch</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">"develop" if you are not afraid of cutting your self on the bleeding edge ;).</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">If none of these advises helps then please try to minimize the test case to the minimum (basically an asd system</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">with a singly stub file and all dependencies you need) and make an issue ticket on gitlab</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;"><a href="https://gitlab.com/embeddable-common-lisp/ecl/-/issues">https://gitlab.com/embeddable-common-lisp/ecl/-/issues</a></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">mind that such action requires registration on the gitlab platform.</span> <br> <br>
</blockquote>
</blockquote>
</blockquote>
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<span dir="ltr" style="margin-top:0; margin-bottom:0;">Thank you very much for any help you can offer,</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">Brandon Hale</span> <br>
</blockquote>
</blockquote>
</blockquote>
</blockquote>
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<span dir="ltr" style="margin-top:0; margin-bottom:0;">Best regards,</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">Daniel</span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">-- </span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">Daniel Kochmański ;; aka jackdaniel | Przemyśl, Poland</span> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">TurtleWare - Daniel Kochmański | <a href="http://www.turtleware.eu">www.turtleware.eu</a></span> <br> <br> <span dir="ltr" style="margin-top:0; margin-bottom:0;">"Be the change that you wish to see in the world." - Mahatma Gandhi</span> <br> <br>
</blockquote>
</blockquote>
</blockquote>
<blockquote style="border-left:3px solid #ccc; padding-left:10px;margin:0;">
<span dir="ltr" style="margin-top:0; margin-bottom:0;"> </span>
</blockquote>
</body>
</html>