aboutsummaryrefslogtreecommitdiff
path: root/comparison
diff options
context:
space:
mode:
authorShinya Sato <shinnya.sato@gmail.com>2022-03-03 21:12:55 +0900
committerShinya Sato <shinnya.sato@gmail.com>2022-03-03 21:12:55 +0900
commitf19a057cfcfd77c5567ff8d536db84a40037f10d (patch)
treef661d617e12dcf695fde6eb3c3cc330354e1ce97 /comparison
parentc0efadbf4003cead718d09a887cff05103f3c377 (diff)
downloadinpla-f19a057cfcfd77c5567ff8d536db84a40037f10d.tar.gz
inpla-f19a057cfcfd77c5567ff8d536db84a40037f10d.zip
v0.8.1
Diffstat (limited to 'comparison')
-rw-r--r--comparison/all.sh~6
-rw-r--r--comparison/tools/sptest_commands.sh~58
-rw-r--r--comparison/tools/sptest_scripts.sh~63
3 files changed, 0 insertions, 127 deletions
diff --git a/comparison/all.sh~ b/comparison/all.sh~
deleted file mode 100644
index 126d37f..0000000
--- a/comparison/all.sh~
+++ /dev/null
@@ -1,6 +0,0 @@
-#!/usr/bin/bash
-dir=(Haskell SML Python)
-for d in ${dir[@]} ; do
- echo "cd $d; make clean; make; cd ..";
- cd $d; make clean; make; cd ..
-done
diff --git a/comparison/tools/sptest_commands.sh~ b/comparison/tools/sptest_commands.sh~
deleted file mode 100644
index 0451c4e..0000000
--- a/comparison/tools/sptest_commands.sh~
+++ /dev/null
@@ -1,58 +0,0 @@
-#!/bin/bash
-# $1: name list of commands
-# ex: ./sptest_commands.sh fib38 bsort-40000
-
-
-# repeat and waittimes
-ct=10
-waittime=5
-
-# etc
-log="log.txt"
-
-# -------------------------------------------------
-function gettime() {
- rm -f _result.txt
- for ((i=1; i<ct; i++))
- do
- (time $1) 2>> _result.txt
- echo
- echo "Done ($i/$ct)"
- sleep $waittime
- echo 'Restart'
- done
- (time $1) 2>> _result.txt
- echo
- echo
- logtime=`grep real _result.txt | awk -F'\t' '{print $2}' | cut -c3- | awk -F's' '{print $1}'`
- echo "Execution times"
- echo "$logtime"
- res=`echo "$logtime\n" | awk 'BEGIN{r=0;c=0} {r=r+$0;c++} END{print r/c}'`
-
- # for return value
- res=`grep real _result.txt | awk -F'\t' '{print $2}' | cut -c3- | awk -F's' '{print $1}' | awk 'BEGIN{r=0;c=0} {r=r+$0;c++} END{print r/c}'`
- rm -f _result.txt
-}
-
-
-rm -f $log
-
-echo '' >> $log
-echo "$ct" | awk -F',' '{printf("%-27s| avg. time over %d runs (sec)\n","",$1)}' >> $log
-echo '===========================+=============================' >> $log
-
-for f in "$@"; do
- command="$f"
- echo 'Now just cooling CPU...'
- sleep $waittime
- echo 'The experimental was started.'
- echo "------------------"
- echo "$f"
- gettime "./$f"
- echo "Average ${res}sec"
- echo "$command,$res" | awk -F',' '{printf("%-27s| %.2f\n",$1,$2)}' >> $log
-done
-
-echo
-cat $log
-
diff --git a/comparison/tools/sptest_scripts.sh~ b/comparison/tools/sptest_scripts.sh~
deleted file mode 100644
index 2d543d0..0000000
--- a/comparison/tools/sptest_scripts.sh~
+++ /dev/null
@@ -1,63 +0,0 @@
-#!/bin/bash
-# $1: executable file name
-# $2: name list of script files
-# ex: ./sptest_scripts.sh sml 'fib5.sml fib10.sml'
-# Then, 'sml < fib5.sml' and "sml < fib10.sml' are executed.
-
-
-# repeat and waittimes
-#ct=10
-ct=1
-waittime=5
-
-# etc
-comf=$1
-log="log.txt"
-sfs=($2); # sourcefiles
-
-# -------------------------------------------------
-function gettime() {
- rm -f _result.txt
- for ((i=1; i<ct; i++))
- do
- (time $1 < $2) 2>> _result.txt
- echo
- echo "Done ($i/$ct)"
- sleep $waittime
- echo 'Restart'
- done
- (time $1 < $2) 2>> _result.txt
- echo
- echo
- logtime=`grep real _result.txt | cut -f2 | sed -e "s/\(.*\)m\(.*\)s/\1 \2/" | awk -F' ' '{print ($1*60+$2)}'`
- echo "Execution times"
- echo "$logtime"
- res=`echo "$logtime\n" | awk 'BEGIN{r=0;c=0} {r=r+$0;c++} END{print r/c}'`
-
- # for return value
- res=`grep real _result.txt | awk -F'\t' '{print $2}' | cut -c3- | awk -F's' '{print $1}' | awk 'BEGIN{r=0;c=0} {r=r+$0;c++} END{print r/c}'`
- rm -f _result.txt
-}
-
-
-rm -f $log
-
-echo '' >> $log
-echo "$ct" | awk -F',' '{printf("%-27s| avg. time over %d runs (sec)\n","",$1)}' >> $log
-echo '===========================+=============================' >> $log
-
-for f in "${sfs[@]}"
-do
- command="$f"
- echo 'Now just cooling CPU...'
- sleep $waittime
- echo 'The experimental was started.'
- echo "------------------"
- echo "$comf < $f"
- gettime "$comf" "$f"
- echo "Average ${res}sec"
- echo "$command,$res" | awk -F',' '{printf("%-27s| %.2f\n",$1,$2)}' >> $log
-done
-echo
-cat $log
-