mirrors/lqml
1
Fork 0
mirror of https://gitlab.com/eql/lqml.git synced 2025-12-06 10:31:34 -08:00
Code Issues Projects Releases Packages Wiki Activity

fix (recently broken) 'swank-server' example to work again on iOS

Browse source
This commit is contained in:
pls.153 2022-03-10 12:21:07 +01:00
parent 4a0132fcfd
commit 4735b47159
2 changed files with 6 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

5
examples/advanced-qml-auto-reload/lisp/swank-quicklisp.lisp
View file

@ -69,8 +69,9 @@
;; needed for ASDF and Quicklisp
(setf (logical-pathname-translations "SYS")
(list (list "sys:**;*.*"
(merge-pathnames "**/*.*" (user-homedir-pathname)))
(list "home:**;*.*"
(merge-pathnames "**/*.*" (user-homedir-pathname)))))
(setf (logical-pathname-translations "HOME")
(list (list "home:**;*.*"
(merge-pathnames "**/*.*" (user-homedir-pathname)))))
(ffi:c-inline nil nil :void "ecl_init_module(NULL, init_lib_ASDF)" :one-liner t)
(in-package :qml-user))