Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] View of /sml/trunk/benchmarks/bin/runmany
ViewVC logotype

View of /sml/trunk/benchmarks/bin/runmany

Parent Directory Parent Directory | Revision Log Revision Log


Revision 538 - (download) (annotate)
Fri Feb 18 17:59:53 2000 UTC (20 years, 9 months ago) by monnier
File size: 626 byte(s)
*** empty log message ***
#!/bin/sh

prg=$1; shift
repeat=$1; shift
output=$1; shift

echo "######################################################" >>$output
while read line; do
    case "$line" in
	\#*) echo "$line" >>$output;;
	*)
	    line3=""
	    while read line2; do
		case "$line2" in
		    \#*)  line3="$line2"; break ;;
		    *) line="$line $line2" ;;
		esac
	    done
	    (echo "### $line"; echo) >>$output
	    (echo 'CM.autoload "host-compiler.cm";' "$line";
		bin/runit "$repeat" "$output" "$@") | $prg
	    (echo; echo;
	     echo "######################################################";
	     echo "$line3") >>$output ;;
    esac
done

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0