Data update
This commit is contained in:
parent
4d5544505c
commit
4924dd0264
3073 changed files with 55820 additions and 4408 deletions
|
|
@ -0,0 +1,6 @@
|
|||
(let s "hello")
|
||||
(print (+ s " world!"))
|
||||
|
||||
(let w " there")
|
||||
(let v (+ s w))
|
||||
(print v)
|
||||
|
|
@ -0,0 +1,9 @@
|
|||
:- set_prolog_flag(double_quotes, chars).
|
||||
|
||||
println([]) :- write('\n').
|
||||
println([Char | Chars]) :- write(Char), println(Chars).
|
||||
|
||||
:- S0 = "Hello, ",
|
||||
S1 = "world!",
|
||||
append(S0, S1, S),
|
||||
println(S).
|
||||
6
Task/String-concatenation/Tcl/string-concatenation-3.tcl
Normal file
6
Task/String-concatenation/Tcl/string-concatenation-3.tcl
Normal file
|
|
@ -0,0 +1,6 @@
|
|||
set s "Hello"
|
||||
set w "World"
|
||||
set hw "$s $w" ; # "hello world"
|
||||
set hw [concat $s $w] ; # {hello world}, same as above
|
||||
set hw [string cat $s $w] ; # "helloworld"
|
||||
set hw [join [list $s $w] " "] ; # "hello world" \w space delimiter
|
||||
Loading…
Add table
Add a link
Reference in a new issue