when starting load only stdlib.lsp file, fix executable name in -v

later function for loading other files from mlisp dir will be added
This commit is contained in:
VaclavT 2021-04-19 21:13:35 +02:00
parent af9211a1a0
commit 7cc938fc7c
1 changed files with 2 additions and 2 deletions

4
ml.h
View File

@ -7,14 +7,14 @@
#include <sstream> #include <sstream>
#include <exception> #include <exception>
const std::string VERSION = "mi 0.1 (" __DATE__ " " __TIME__ ")"; const std::string VERSION = "ml 0.1 (" __DATE__ " " __TIME__ ")";
const std::string STDLIB_LOADER = const std::string STDLIB_LOADER =
R"( R"(
(do (define ___lib_path "/usr/local/var/mlisp") (do (define ___lib_path "/usr/local/var/mlisp")
(if (is-dir? ___lib_path) (if (is-dir? ___lib_path)
(for file (ls-dir ___lib_path) (for file (ls-dir ___lib_path)
(if (string-regex? file "^.*\.l(i)?sp$") (if (string-regex? file "^stdlib\.lsp$")
(include (+ ___lib_path "/" file))) (include (+ ___lib_path "/" file)))
))) )))
)"; )";