Как я могу выполнить результаты compile_file?

Question

compile_file() создает некоторые выходные файлы. Ни одно из них не может использоваться с load() или loadfile() или batch() или может из командной строки оболочки. И нет примера, как их можно использовать.

Answer 1

Вот an example from the test suite.

(kill (all), 
lisp_name : ssubst ("_", " ", build_info()@lisp_name), 
maxima_filename : sconcat (maxima_tempdir, "/tmp-rtest_translator-compile_file-", lisp_name, ".mac"), 
fasl_filename : sconcat (maxima_tempdir, "/tmp-rtest_translator-compile_file-", lisp_name, ".fasl"), 
lisp_filename : sconcat (maxima_tempdir, "/tmp-rtest_translator-compile_file-", lisp_name, ".LISP"), 
maxima_output : openw (maxima_filename), 
maxima_content : 
"foo (x) := my_foo * x; 
Foo (x) := my_Foo * x; 
FOO (x) := my_FOO * x; 
[my_foo, my_Foo, my_FOO] : [123, 456, 789]; 
results : [foo (2), Foo (3), FOO (4)]; 
my_test() := is (results = [2*123, 3*456, 4*789]);", 
printf (maxima_output, maxima_content), 
close (maxima_output), 
compile_file (maxima_filename, fasl_filename, lisp_filename), 
kill (allbut (lisp_filename)), 
load (lisp_filename), 
my_test());