2 files changed, 44 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..aca80877
--- /dev/null
+++ b/testsuite/systemtap.base/rand.stp
@@ -0,0 +1,41 @@
+function checkStatus(status:long){
+	if (status == 1){
+		printf("%s\n","FAIL")
+	}else{
+		printf("%s\n","PASS")		
+	}
+}
+
+probe begin
+{
+
+	for (i = 0; i < 100; i ++) {
+			num = randint(-5, 5)
+		if (num > 5) {
+			printf("NUMBER TOO HIGH\n")
+		}
+		if (num < -5) {
+			printf("NUMBER TOO LOW\n")
+		}
+	}
+
+	for (i = 0; i < 500; i ++) {
+		num = randint(-3, 3)
+		if (num > 3) {
+			printf("NUMBER TOO HIGH\n")
+		}
+		if (num < -3) {
+			printf("NUMBER TOO LOW\n")
+		}
+	}
+	
+		status = 0
+		for (i=1; i <= 100; i++){
+			if ( randint(-1*i,i) < (-1*i) || randint(-1*i,i) > i ){
+					status = 1
+			}
+		}
+		checkStatus(status)
+		
+        exit()
+}