diff options
author | Xavier Leroy <xavier.leroy@inria.fr> | 2017-02-15 09:58:44 +0100 |
---|---|---|
committer | Xavier Leroy <xavier.leroy@inria.fr> | 2017-02-15 09:58:44 +0100 |
commit | 4ac453011fb3ee241c6f3023f79c942d99f72eb5 (patch) | |
tree | 00b4ef5e0be846f62e49c9af68a06a01fc9ae065 /test/cminor/qsort.cm | |
parent | 29653baeb2c7fa6bfe5da031622d8fb8ac1e50c3 (diff) | |
download | compcert-4ac453011fb3ee241c6f3023f79c942d99f72eb5.tar.gz compcert-4ac453011fb3ee241c6f3023f79c942d99f72eb5.zip |
Remove tests involving Cminor concrete syntax. Update Changelog
Follow-up to [29653ba]
Diffstat (limited to 'test/cminor/qsort.cm')
-rw-r--r-- | test/cminor/qsort.cm | 32 |
1 files changed, 0 insertions, 32 deletions
diff --git a/test/cminor/qsort.cm b/test/cminor/qsort.cm deleted file mode 100644 index 8c735843..00000000 --- a/test/cminor/qsort.cm +++ /dev/null @@ -1,32 +0,0 @@ -"quicksort"(lo, hi, a): int -> int -> int -> void -{ - var i, j, pivot, temp; - - if (! (lo < hi)) return; - i = lo; - j = hi; - pivot = int32[a + hi * 4]; - {{ loop { - if (! (i < j)) exit; - {{ loop { - if (i >= hi) exit; - if (int32[a + i * 4] > pivot) exit; - i = i + 1; - } }} - {{ loop { - if (j <= lo) exit; - if (int32[a + j * 4] < pivot) exit; - j = j - 1; - } }} - if (i < j) { - temp = int32[a + i * 4]; - int32[a + i * 4] = int32[a + j * 4]; - int32[a + j * 4] = temp; - } - } }} - temp = int32[a + i * 4]; - int32[a + i * 4] = int32[a + hi * 4]; - int32[a + hi * 4] = temp; - "quicksort"(lo, i - 1, a) : int -> int -> int -> void; - "quicksort"(i + 1, hi, a) : int -> int -> int -> void; -} |