5 lines
100 B
Plaintext
Executable File
5 lines
100 B
Plaintext
Executable File
proc increment_by_1 { MY_COUNT } {
|
|
set MY_COUNT [expr $MY_COUNT + 1]
|
|
return "$MY_COUNT"
|
|
}
|