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

10
Task/Execute-SNUSP/EasyLang/execute-snusp.easy
View file

@ -1,4 +1,4 @@
proc snusp dlen raw$ . .
proc snusp dlen raw$ .
len ds[] dlen
is$[] = strsplit raw$ "\n"
for s$ in is$[]
@ -6,9 +6,7 @@ proc snusp dlen raw$ . .
.
for ipr to len is$[][]
for ipc to len is$[ipr][]
if is$[ipr][ipc] = "$"
break 2
.
if is$[ipr][ipc] = "$" : break 2
.
.
dp = 1
@ -42,9 +40,7 @@ proc snusp dlen raw$ . .
elif c$ = "!"
step
elif c$ = "?"
if ds[dp] = 0
step
.
if ds[dp] = 0 : step
.
step
.