cli/q
1
0
Fork 0
Code Issues Pull requests Releases Activity

Implemented multiple return values

Browse source
This commit is contained in:
Eduard Urbach 2024-08-05 12:39:07 +02:00
parent d4020da6d9
commit 42f0367a94
No known key found for this signature in database
GPG key ID: C874F672B1AF20C0
15 changed files with 113 additions and 35 deletions
Download patch file Download diff file Expand all files Collapse all files

9
lib/log/number.q
View file

@ -4,13 +4,14 @@ import sys
number(x) {
length := 20
buffer := mem.alloc(length)
tmp := itoa(x, buffer, length)
sys.write(1, tmp, buffer + length - tmp)
address, count := itoa(x, buffer, length)
sys.write(1, address, count)
mem.free(buffer, length)
}
itoa(x, buffer, length) {
tmp := buffer + length
end := buffer + length
tmp := end
digit := 0
loop {
@ -19,7 +20,7 @@ itoa(x, buffer, length) {
tmp[0] = '0' + digit
if x == 0 {
return tmp
return tmp, end - tmp
}
}
}