summaryrefslogtreecommitdiff
path: root/examples
diff options
context:
space:
mode:
authorTuowen Zhao <ztuowen@gmail.com>2016-10-07 18:43:39 -0600
committerTuowen Zhao <ztuowen@gmail.com>2016-10-07 18:43:39 -0600
commit7bbd1a207f65428283471f1cc956f3fda43fbe3e (patch)
treef8febd1c59ad6aa5f071aa8644a4961b163cfb77 /examples
parent79866eaaf708759db9458e60bb4ea51799608f2e (diff)
downloadchill-7bbd1a207f65428283471f1cc956f3fda43fbe3e.tar.gz
chill-7bbd1a207f65428283471f1cc956f3fda43fbe3e.tar.bz2
chill-7bbd1a207f65428283471f1cc956f3fda43fbe3e.zip
fixes
Diffstat (limited to 'examples')
-rw-r--r--examples/testrun.log16
-rw-r--r--examples/“24
2 files changed, 24 insertions, 16 deletions
diff --git a/examples/testrun.log b/examples/testrun.log
deleted file mode 100644
index 7611517..0000000
--- a/examples/testrun.log
+++ /dev/null
@@ -1,16 +0,0 @@
-Test Run By bobw on Mon Sep 21 12:59:26 2015
-Native configuration is x86_64-unknown-linux-gnu
-
- === tests ===
-
-Schedule of variations:
- unix
-
-Running target unix
-Using /usr/local/share/dejagnu/baseboards/unix.exp as board description file for target.
-Using /usr/local/share/dejagnu/config/unix.exp as generic interface file for target.
-WARNING: Couldn't find tool config file for unix, using default.
-
- === Summary ===
-
-runtest completed at Mon Sep 21 12:59:26 2015
diff --git a/examples/“ b/examples/“
new file mode 100644
index 0000000..985ecaa
--- /dev/null
+++ b/examples/“
@@ -0,0 +1,24 @@
+// this source is derived from CHILL AST originally from file 'mm.c' as parsed by frontend compiler clang
+
+void mm(float **A, float **B, float **C, int ambn, int an, int bm) {
+ int t6;
+ int t4;
+ int t2;
+ int over1;
+ over1 = 0;
+ for (t2 = 0; t2 <= an - 1; t2 += 1)
+ for (t4 = 0; t4 <= bm - 1; t4 += 1)
+ C[t2][t4] = 0.0f;
+ for (t2 = 0; t2 <= an - 1; t2 += 1)
+ for (t4 = 0; t4 <= bm - 1; t4 += 1) {
+ over1 = ambn % 4;
+ for (t6 = 0; t6 <= -over1 + ambn - 1; t6 += 4) {
+ C[t2][t4] += A[t2][t6] * B[t6][t4];
+ C[t2][t4] += A[t2][t6 + 1] * B[t6 + 1][t4];
+ C[t2][t4] += A[t2][t6 + 2] * B[t6 + 2][t4];
+ C[t2][t4] += A[t2][t6 + 3] * B[t6 + 3][t4];
+ }
+ for (t6 = 0 < ambn - over1 ? ambn - over1 : 0; t6 <= ambn - 1; t6 += 1)
+ C[t2][t4] += A[t2][t6] * B[t6][t4];
+ }
+}