Index: doc/migration1-2.html
===================================================================
diff -u -reef622da1b387cfd1dd68babeb0bfecfbae5caa3 -r210eab6d9149846d5d6a6a8e0fa74e232ca5b6de
--- doc/migration1-2.html (.../migration1-2.html) (revision eef622da1b387cfd1dd68babeb0bfecfbae5caa3)
+++ doc/migration1-2.html (.../migration1-2.html) (revision 210eab6d9149846d5d6a6a8e0fa74e232ca5b6de)
@@ -86,7 +86,7 @@
::xotcl::use xotcl2
Class create C2 {
- .method foo {} {puts "hello world"}
+ :method foo {} {puts "hello world"}
}
}
@@ -130,8 +130,8 @@
C proc bar args {...}
Class create C {
- .method foo args {...}
- .object method bar args {...}
+ :method foo args {...}
+ :object method bar args {...}
}
Class create C
C method foo args {...}
@@ -144,11 +144,11 @@
o proc foo args {...}
|
Object create o {
- set .x 1
- .method foo args {...}
+ set :x 1
+ :method foo args {...}
}
Object create o
- o eval {set .x 1}
+ o eval {set :x 1}
# ::xotcl::setinstvar o x 1
o method foo args {...}
|
@@ -179,14 +179,14 @@
o proc baz {} {...}
Class create C {
- .method foo args {...}
- .method bar args {
- .foo 1 2 3 ;# invoke own method
+ :method foo args {...}
+ :method bar args {
+ :foo 1 2 3 ;# invoke own method
o baz ;# invoke others method
}
}
Object create o {
- .method baz {} {...}
+ :method baz {} {...}
}
|
@@ -209,11 +209,11 @@
}
Class create C {
- .method foo args {...}
+ :method foo args {...}
# method scoped variable a
set a 1
# instance variable b
- set .b 2
+ set :b 2
# global variable/namespaced variable c
set ::c 3
}
@@ -222,23 +222,23 @@
my set varname value |
- set .varname value |
+ set :varname value |
set newVar [my set otherVar] |
- set newVar [set .otherVar]
- set newVar ${.otherVar}
+ | set newVar [set :otherVar]
+ set newVar ${:otherVar}
|
my instvar newVar
set newVar value
|
- set .newVar value |
+ set :newVar value |
my exists varname |
- info .varname |
+ info :varname |
@@ -247,11 +247,11 @@
| XOTcl 1 | XOTcl 2 |
|---|
obj set varname value |
- obj eval [list set .varname value] |
+ obj eval [list set :varname value] |
set newVar [obj set otherVar] |
- set newVar [obj eval {set .otherVar}]
+ | set newVar [obj eval {set :otherVar}]
|
@@ -263,7 +263,7 @@
obj exists varname |
- obj eval {info exists .varname} |
+ obj eval {info exists :varname} |
@@ -688,5 +688,5 @@
- Last modified: Tue Jan 12 11:35:29 CET 2010
+ Last modified: Fri Jan 15 13:15:37 CET 2010
|