2 files changed, 8 insertions, 0 deletions
diff --git a/test-suite/check b/test-suite/check
index d01f9b51a9..4c98f8ac28 100755
--- a/test-suite/check
+++ b/test-suite/check
@@ -106,6 +106,7 @@ test_interactive() {
 # La fonction suivante teste en interactif 
 # It expects a line "(* Expected time < XXX.YYs *)" in the .v file 
 # with exactly two digits after the dot
+# The reference for time is a 6120 bogomips cpu
 test_complexity() {
     if [ -f /proc/cpuinfo ]; then
 	if grep -q bogomips /proc/cpuinfo; then # i386, ppc
diff --git a/test-suite/complexity/ring.v b/test-suite/complexity/ring.v
new file mode 100644
index 0000000000..5a541bc24a
--- /dev/null
+++ b/test-suite/complexity/ring.v
@@ -0,0 +1,7 @@
+(* This example, checks the efficiency of the abstract machine used by ring *)
+(* Expected time < 1.00s *)
+
+Require Import ZArith.
+Open Scope Z_scope.
+Goal forall a, a+a+a+a+a+a+a+a+a+a+a+a+a = a*13.
+Time intro; ring.