github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-01-23 02:48:48 +00:00
Code Issues Releases Wiki Activity

Once again translate-and-compile macsyma programs in one step.

Browse Source 
Now that the NXM error is fixed.

This reverts commit 4c3381b50941ca8175ed88e3390dd1e642e46519.
This commit is contained in:
Lars Brinkhoff 2018-07-16 21:46:25 +02:00
parent 0e3fd9d83d
commit d392edc158
1 changed files with 4 additions and 34 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

38
build/lisp.tcl
View File

@ -544,47 +544,17 @@ respond "*" ":link sys3;ts macsym,maxdmp;loser >\r"
respond "*" ":link demo;manual demo,demo;manual >\r"
respond "*" ":link manual;manual demo,demo;manual demo\r"
### build ctensr for macsyma
# ejs: commented out until we can fix NXM error in KA10 emulator
#respond "*" "macsym\013"
#respond "(C1)" "compile_lisp_file(translate_file(\"sharem\\;packg >\")\[2\]);"
#respond "(C2)" "compile_lisp_file(translate_file(\"tensor\\;ctensr funcs\")\[2\]);"
#respond "Type ALL;" "all;"
#respond "Type ALL;" "all;"
#respond "(C3)" "quit();"
### build eigen for macsyma
# ejs: commented out until we can fix NXM error in KA10 emulator
#respond "*" "macsym\013"
#respond "(C1)" "compile_lisp_file(translate_file(\"share\\;eigen >\")\[2\]);"
#respond "Type ALL;" "all;"
#respond "(C2)" "quit();"
### build ctensr for macsyma
respond "*" "macsym\013"
respond "(C1)" "translate_file(\"sharem\\;packg >\");"
respond "(C2)" "quit();"
respond ":KILL" "complr\013"
respond "_" "sharem;packg fasl_packg trlisp\r"
respond "_" "\032"
type ":kill\r"
respond "*" "macsym\013"
respond "(C1)" "translate_file(\"tensor\\;ctensr funcs\");"
respond "(C2)" "quit();"
respond ":KILL" "complr\013"
respond "_" "share;ctensr fasl_tensor;ctensr trlisp\r"
respond "_" "\032"
type ":kill\r"
respond "(C1)" "compile_lisp_file(translate_file(\"sharem\\;packg >\")\[2\]);"
respond "(C2)" "compile_lisp_file(translate_file(\"tensor\\;ctensr funcs\")\[2\]);"
respond "(C3)" "quit();"
### build eigen for macsyma
respond "*" "macsym\013"
respond "(C1)" "translate_file(\"share\\;eigen >\");"
respond "(C1)" "compile_lisp_file(translate_file(\"share\\;eigen >\")\[2\]);"
respond "Type ALL;" "all;"
respond "(C2)" "quit();"
respond ":KILL" "complr\013"
respond "_" "share;eigen fasl_share;eigen trlisp\r"
respond "_" "\032"
type ":kill\r"
### build share;array fasl and ellen; check fasl for macsyma