aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data update

Browse source
This commit is contained in:
Ingy döt Net 2025-06-11 20:16:52 -04:00
parent 72eb4943cb
commit 4d5544505c
2347 changed files with 62432 additions and 16731 deletions
Download patch file Download diff file Expand all files Collapse all files

2
Task/String-concatenation/JavaScript/string-concatenation.js
View file

@ -1,2 +1,2 @@
var s = "hello"
print(s + " there!")
console.log(s + " there!")

31
Task/String-concatenation/Uxntal/string-concatenation.uxnatl
View file

@ -1,33 +1,32 @@
|10 @Console &vector $2 &read $1 &pad $4 &type $1 &write $1 &error $1
|18 @Console/write
|0100 @on-reset ( -> )
;str3 ;str1 copy-str
;str3 ;str2 append-str
;str3 print-str
#0a .Console/write DEO
BRK
@print-str ( str* -: )
&loop ( -- )
LDAk .Console/write DEO
INC2 LDAk ?&loop
POP2 JMP2r
@print-str_ ( str* -: )
LDAk .Console/write DEO
INC2 @print-str LDAk ?print-str_
POP2
JMP2r
@append-str ( dest* src* -: )
STH2 end-str STH2r
( >> )
@copy-str ( dest* src* -: )
STH2
&loop ( -- )
LDAkr STH2k STAr INC2 LDAkr STHr INC2r ?&loop
POP2 POP2r JMP2r
POP2 POP2r
JMP2r
@append-str ( dest* src* -: )
STH2 end-str STH2r copy-str JMP2r
@end-str ( str* -: str* )
!&inner
&loop ( -- )
INC2 &inner LDAk ?&loop
@end-str_ ( str* -: str* )
INC2 @end-str LDAk ?end-str_
JMP2r
@str1 "Uxn 00
@str2 "tal 00
@str2 "tal 0a00
@str3