在Notepad ++中编译lisp/scheme

import sys
import os
import subprocess

def run_lisp(script_path):
    clisp_path = r'C:\Program Files\CLISP\2.49\bin\clisp.exe' # 请根据您的CLISP安装路径进行修改
    script_dir = os.path.dirname(os.path.abspath(script_path))
    subprocess.call([clisp_path, '-q', '-c', '(load "{}")'.format(script_path)])

if __name__ == '__main__':
    if len(sys.argv) > 1:
        run_lisp(sys.argv[1])
    else:
        print("Please provide a Lisp script file.")

import sys
import os
import subprocess

def run_scheme(script_path):
    racket_path = r'C:\Program Files\Racket\racket.exe' # 请根据您的Racket安装路径进行修改
    script_dir = os.path.dirname(os.path.abspath(script_path))
    subprocess.call([racket_path, script_path])

if __name__ == '__main__':
    if len(sys.argv) > 1:
        run_scheme(sys.argv[1])
    else:
        print("Please provide a Scheme script file.")