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

12
Task/Loops-While/Ballerina/loops-while.ballerina
View file

@ -1,5 +1,9 @@
int i = 1024;
while i > 0 {
io:println(i);
i = i / 2;
import ballerina/io;
public function main() {
int i = 1024;
while i > 0 {
io:println(i);
i = i / 2;
}
}

21
Task/Loops-While/Uxntal/loops-while.uxnatl Normal file
View file

@ -0,0 +1,21 @@
%newline { [ LIT2 0a -Console/write ] DEO }
|18 @Console/write
|100
#0000 #0400
&while EQU2k ?{
DUP2 print-hex newline
#01 SFT2 !&while }
POP2 POP2
BRK
@print-hex ( short* -- )
SWP /byte
&byte ( byte -- )
DUP #04 SFT /nibble
&nibble ( byte -- )
#0f AND DUP #09 GTH #27 MUL ADD [ LIT "0 ] ADD #18 DEO
JMP2r