From d20fd9e99244600c23afae42f73a6457004d434f Mon Sep 17 00:00:00 2001
From: fche <fche>
Date: Mon, 6 Mar 2006 23:07:56 +0000
Subject: 2006-03-06  Frank Ch. Eigler  <fche@elastic.org>

	PR 2425
	* staptree.cxx (varuse_collecting_visitor::visit_embeddedcode):
	Realize that $var-setter functions have side-effects.
	* testsuite/transok/tval-opt.stp: New test.
---
 testsuite/transok/tval-opt.stp | 9 +++++++++
 1 file changed, 9 insertions(+)
 create mode 100755 testsuite/transok/tval-opt.stp

(limited to 'testsuite/transok')

diff --git a/testsuite/transok/tval-opt.stp b/testsuite/transok/tval-opt.stp
new file mode 100755
index 00000000..4f1c0b06
--- /dev/null
+++ b/testsuite/transok/tval-opt.stp
@@ -0,0 +1,9 @@
+#! /bin/sh
+
+set -e
+
+script='probe kernel.function("kbd_keycode") { if ($keycode==50) $keycode=49 }'
+s1=`./stap -p3 -g    -e "$script" | sum`
+s2=`./stap -p3 -g -u -e "$script" | sum`
+
+test x"$s1" == x"$s2"
-- 
cgit