[prev in list] [next in list] [prev in thread] [next in thread] 

List:       gnash-commit
Subject:    [Gnash-commit] gnash/testsuite/actionscript.all getvariable.as
From:       Sandro Santilli <strk () keybit ! net>
Date:       2007-02-28 23:05:59
Message-ID: E1HMXrz-0001Fo-2C () savannah ! gnu ! org
[Download RAW message or body]

CVSROOT:	/sources/gnash
Module name:	gnash
Changes by:	Sandro Santilli <strk>	07/02/28 23:05:59

Modified files:
	testsuite/actionscript.all: getvariable.as 

Log message:
	Test access to obj:variable (with obj not being a character)

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/gnash/testsuite/actionscript.all/getvariable.as?cvsroot=gnash&r1=1.6&r2=1.7


Patches:
Index: getvariable.as
===================================================================
RCS file: /sources/gnash/gnash/testsuite/actionscript.all/getvariable.as,v
retrieving revision 1.6
retrieving revision 1.7
diff -u -b -r1.6 -r1.7
--- getvariable.as	6 Feb 2007 11:00:36 -0000	1.6
+++ getvariable.as	28 Feb 2007 23:05:58 -0000	1.7
@@ -1,5 +1,5 @@
 // 
-//   Copyright (C) 2005, 2006 Free Software Foundation, Inc.
+//   Copyright (C) 2005, 2006, 2007 Free Software Foundation, Inc.
 //
 // This program is free software; you can redistribute it and/or modify
 // it under the terms of the GNU General Public License as published by
@@ -19,7 +19,7 @@
 // compile this test case with Ming makeswf, and then
 // execute it like this gnash -1 -r 0 -v out.swf
 
-rcsid="$Id: getvariable.as,v 1.6 2007/02/06 11:00:36 strk Exp $";
+rcsid="$Id: getvariable.as,v 1.7 2007/02/28 23:05:58 strk Exp $";
 
 #include "check.as"
 
@@ -128,6 +128,26 @@
 check_equals(checkpoint, undefined);
 
 //---------------------------------------------------------------------
+// Check 'obj:variable_in_object' access 
+//---------------------------------------------------------------------
+
+var obj = { variable_in_object: 'yes' };
+check_equals(obj.variable_in_object, 'yes');
+asm {
+        push 'checkpoint'
+	push 'obj:variable_in_object'
+	getvariable
+        setvariable
+};
+check_equals(checkpoint, 'yes');
+asm {
+	push 'obj:variable_in_object'
+        push 'yes2'
+        setvariable
+};
+check_equals(obj.variable_in_object, 'yes2');
+
+//---------------------------------------------------------------------
 // Check '../invalidname' access 
 // (expected to fail)
 //---------------------------------------------------------------------


[prev in list] [next in list] [prev in thread] [next in thread]