2 files changed, 22 insertions, 0 deletions
diff --git a/testsuite/systemtap.base/rand.exp b/testsuite/systemtap.base/rand.exp
new file mode 100644
index 00000000..9b372e18
--- /dev/null
+++ b/testsuite/systemtap.base/rand.exp
@@ -0,0 +1,3 @@
+set test "rand"
+set ::result_string {PASS}
+stap_run2 $srcdir/$subdir/$test.stp
diff --git a/testsuite/systemtap.base/rand.stp b/testsuite/systemtap.base/rand.stp
new file mode 100644
index 00000000..d584e5f7
--- /dev/null
+++ b/testsuite/systemtap.base/rand.stp
@@ -0,0 +1,19 @@
+function checkStatus(status:long){
+	if (status == 1){
+		printf("%s\n","FAIL")
+	}else{
+		printf("%s\n","PASS")		
+	}
+}
+
+probe begin
+{
+	status = 0
+        for (i=1; i <= 100; i++){
+		if (randint(i) < 0 || randint(i) > i) {
+			status = 1
+		}
+	}
+	checkStatus(status)
+        exit()
+}