First commit of partial RosettaCode contents.
Pushing this for testing purposes. Lots of work still needed.
This commit is contained in:
commit
1e05ecd7ee
781 changed files with 9080 additions and 0 deletions
4
Task/Comments/Tcl/comments-2.tcl
Normal file
4
Task/Comments/Tcl/comments-2.tcl
Normal file
|
|
@ -0,0 +1,4 @@
|
|||
set aList {foo}
|
||||
lappend aList # bar
|
||||
puts $aList ;# ==> prints "foo # bar"
|
||||
puts [llength $aList] ;# ==> 3
|
||||
3
Task/Comments/Tcl/comments-3.tcl
Normal file
3
Task/Comments/Tcl/comments-3.tcl
Normal file
|
|
@ -0,0 +1,3 @@
|
|||
if 0 {
|
||||
Comments...
|
||||
}
|
||||
3
Task/Comments/Tcl/comments.tcl
Normal file
3
Task/Comments/Tcl/comments.tcl
Normal file
|
|
@ -0,0 +1,3 @@
|
|||
# comment on a line by itself. The next is a command by itself:
|
||||
set var1 $value1
|
||||
set var2 $value2 ; # comment that follows a line of code
|
||||
Loading…
Add table
Add a link
Reference in a new issue