mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-11 09:06:14 +02:00
* i in strlen converted to a local variable, because that now works
git-svn-id: branches/wasm@47928 -
This commit is contained in:
parent
31bc357c1b
commit
08ae48aebf
@ -32,7 +32,6 @@ type
|
|||||||
var
|
var
|
||||||
our_iov: __wasi_ciovec_t;
|
our_iov: __wasi_ciovec_t;
|
||||||
our_nwritten: longint;
|
our_nwritten: longint;
|
||||||
i: size_t;
|
|
||||||
|
|
||||||
function fd_write(fd: __wasi_fd_t;
|
function fd_write(fd: __wasi_fd_t;
|
||||||
iovs: P__wasi_ciovec_t;
|
iovs: P__wasi_ciovec_t;
|
||||||
@ -42,6 +41,7 @@ function fd_write(fd: __wasi_fd_t;
|
|||||||
function StrLen(P: PChar): size_t;
|
function StrLen(P: PChar): size_t;
|
||||||
var
|
var
|
||||||
lp: pchar;
|
lp: pchar;
|
||||||
|
i: size_t;
|
||||||
begin
|
begin
|
||||||
lp := p;
|
lp := p;
|
||||||
i := 0;
|
i := 0;
|
||||||
|
Loading…
Reference in New Issue
Block a user