amr/cl-tty
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Zero-dependency demo loading: just (require asdf) + push cwd + load-system

Browse Source 
No Quicklisp needed at all.  Works from a fresh git clone with
just SBCL installed.  Registering the current directory in ASDF's
central-registry is enough to find cl-tty.asd.
This commit is contained in:
Hermes
2026-05-12 01:22:55 +00:00
parent bdd558407e
commit 517b43b801
1 changed files with 5 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
demo.lisp
View File

@@ -5,20 +5,11 @@
;;; layout engine, component rendering pipeline, framebuffer diff flush, ;;; layout engine, component rendering pipeline, framebuffer diff flush,
;;; text-input, textarea, select, dialog, scrollbox, tabbar. ;;; text-input, textarea, select, dialog, scrollbox, tabbar.
(load "~/quicklisp/setup.lisp") ;; Load cl-tty directly via ASDF (no Quicklisp dependency needed —
;; sb-posix is built into SBCL, no external libraries required).
;; Register local project and load via ASDF directly (require "asdf")
;; (avoids Quicklisp SYSTEM-NOT-FOUND in --disable-debugger mode) (push (truename ".") asdf:*central-registry*)
(let ((cl-tty-path (truename "."))) (asdf:load-system :cl-tty)
(pushnew cl-tty-path ql:*local-project-directories* :test #'equal)
(ql:register-local-projects))
(unless (find-package :cl-tty.backend)
(ignore-errors
(ql:quickload :cl-tty :silent t))
(unless (find-package :cl-tty.backend)
(load "cl-tty.asd")
(asdf:load-system :cl-tty)))
(use-package :cl-tty.backend) (use-package :cl-tty.backend)
(use-package :cl-tty.input) (use-package :cl-tty.input)