diff options
author | Tuowen Zhao <ztuowen@gmail.com> | 2016-10-07 18:43:39 -0600 |
---|---|---|
committer | Tuowen Zhao <ztuowen@gmail.com> | 2016-10-07 18:43:39 -0600 |
commit | 7bbd1a207f65428283471f1cc956f3fda43fbe3e (patch) | |
tree | f8febd1c59ad6aa5f071aa8644a4961b163cfb77 /examples | |
parent | 79866eaaf708759db9458e60bb4ea51799608f2e (diff) | |
download | chill-7bbd1a207f65428283471f1cc956f3fda43fbe3e.tar.gz chill-7bbd1a207f65428283471f1cc956f3fda43fbe3e.tar.bz2 chill-7bbd1a207f65428283471f1cc956f3fda43fbe3e.zip |
fixes
Diffstat (limited to 'examples')
-rw-r--r-- | examples/testrun.log | 16 | ||||
-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]; + } +} |