mirror of
https://github.com/KarolS/millfork.git
synced 2024-09-10 11:54:30 +00:00
23 lines
290 B
Plaintext
23 lines
290 B
Plaintext
|
|
#if ARCH_I80
|
|
|
|
byte strzlen(pointer str) {
|
|
pointer end
|
|
end = str
|
|
while end[0] != 0 {
|
|
end += 1
|
|
}
|
|
return lo(end - str)
|
|
}
|
|
|
|
#else
|
|
|
|
byte strzlen(pointer str) {
|
|
byte index
|
|
index = 0
|
|
while str[index] != 0 {
|
|
index += 1
|
|
}
|
|
return index
|
|
}
|
|
#endif |