12345678910111213141516171819202122 |
- @echo off
- rem Part of Scheme 48 1.9. See file COPYING for notices and license.
- rem
- rem Authors: Richard Kelsey, Jonathan Rees, Mike Sperber
- rem
- set runnable="%~1"
- echo ,bench > generate-c-header.input
- echo ,batch >> generate-c-header.input
- echo ,load-package big-scheme >> generate-c-header.input
- echo ,open big-scheme >> generate-c-header.input
- echo ,load scheme/link/generate-c-header.scm >> generate-c-header.input
- echo (make-c-header-file "c/scheme48.h" >> generate-c-header.input
- echo "c/scheme48.h.in" >> generate-c-header.input
- echo "scheme/vm/interp/arch.scm" >> generate-c-header.input
- echo "scheme/vm/data/data.scm" >> generate-c-header.input
- echo "scheme/rts/record.scm") >> generate-c-header.input
- %runnable% < generate-c-header.input
|