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

SCM Repository

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

Annotation of /sml/trunk/benchmarks/bin/runmany

Parent Directory Parent Directory | Revision Log Revision Log


Revision 538 - (view) (download)

1 : monnier 538 #!/bin/sh
2 :    
3 :     prg=$1; shift
4 :     repeat=$1; shift
5 :     output=$1; shift
6 :    
7 :     echo "######################################################" >>$output
8 :     while read line; do
9 :     case "$line" in
10 :     \#*) echo "$line" >>$output;;
11 :     *)
12 :     line3=""
13 :     while read line2; do
14 :     case "$line2" in
15 :     \#*) line3="$line2"; break ;;
16 :     *) line="$line $line2" ;;
17 :     esac
18 :     done
19 :     (echo "### $line"; echo) >>$output
20 :     (echo 'CM.autoload "host-compiler.cm";' "$line";
21 :     bin/runit "$repeat" "$output" "$@") | $prg
22 :     (echo; echo;
23 :     echo "######################################################";
24 :     echo "$line3") >>$output ;;
25 :     esac
26 :     done

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