revisions

This commit is contained in:
pls.153 2023-08-11 14:33:19 +02:00
parent 29175d9784
commit ee2d032911
11 changed files with 20 additions and 19 deletions

View file

@ -315,7 +315,7 @@ cl_object qload_cpp(cl_object l_lib_name, cl_object l_unload) { /// qload-c++
cl_object qload_rc(cl_object l_file) {
/// args: (file)
/// Loads a Lisp file added to the Qt resource system, see *.qrc files.
/// (qload-rc "lisp/example.fasc")
/// (qload-rc "lisp/example.lisp")
ecl_process_env()->nvalues = 1;
QFile file(toQString(l_file).prepend(":/"));
if (file.open(QIODevice::ReadOnly)) {