mal/basic/run

#!/bin/bash
cd $(dirname $0)
(echo "(list $(for a in "${@}"; do echo -n "\"${a}\""; done))") > .args.mal
exec cbmbasic ${STEP:-stepA_mal}.bas "${@}"
Basic (C64 v2): step0 This works with cbmbasic from https://github.com/mist64/cbmbasic. The cbmbasic interpreter needs to be on the PATH. The actually sources are .in.bas which are "compiled" to .bas using the qb2cbm.sh. qb2cbm.sh translates from a QBasic-ish format to a line numbered source with include files inlined (REM $INCLUDE: 'file.bas'). One additional advantage is that the *.in.bas versions can also be indented and qb2cbm.sh will remove the indenting in the translated code. 2016-09-05 04:23:56 +03:00			`#!/bin/bash`
Basic: Reduce GOSUB use. Partial self-host to step3 step4 runs out of space attempting to load the program. Step2 and step3 run out of memory (stack exhaustion) for more complicated forms. - Use GOTO with return label on our stack instead of GOSUB for: - APPLY function in types.in.bas - "apply", "map" and "swap!" core functions - Implement DO TCO. Change EVAL_AST to detect if we are called from DO and exit one element early. - Remove GOSUB recursion from EQUAL_Q - Inline PAIR_Q. Reduce REPLACE stack use. - Remove one level of GOSUB/stack by calling REP with GOTO - Simplify mal/step2_eval.mal to remove use of (or ) macro in eval_ast. - Fix ON GOTO/GOSUB line detection in basicpp 2016-10-25 07:29:27 +03:00			`cd $(dirname $0)`
			`(echo "(list $(for a in "${@}"; do echo -n "\"${a}\""; done))") > .args.mal`
			`exec cbmbasic ${STEP:-stepA_mal}.bas "${@}"`