belka/elna
1
0
Fork 0
Code Issues 41 Pull Requests Releases Activity

Add an empty cstdlib.elna source file

Browse Source
This commit is contained in:
Eugen Wissner
2025-08-10 23:43:09 +03:00
parent 87058adcb3
commit 560689c092
11 changed files with 146 additions and 204 deletions
Download Patch File Download Diff File Expand all files Collapse all files

10
source/Lexer.elna
View File

@@ -3,7 +3,7 @@
obtain one at https://mozilla.org/MPL/2.0/. *)
module;
import Common, cstdlib;
import cstdio, Common;
const
CHUNK_SIZE := 85536;
@@ -410,7 +410,7 @@ begin
if lexer^.start.iterator^ = '"' then
text_length := lexer^.current.iterator - lexer^.start.iterator + 1;
MemZero(@token^.stringKind, #size(ShortString));
memset(@token^.stringKind, 0, #size(ShortString));
MemCopy(lexer^.start.iterator, text_length, @token^.stringKind);
token^.kind := LexerKind.character
@@ -418,7 +418,7 @@ begin
if lexer^.start.iterator^ = "'" then
text_length := lexer^.current.iterator - lexer^.start.iterator + 1;
MemZero(@token^.stringKind, #size(ShortString));
memset(@token^.stringKind, 0, #size(ShortString));
MemCopy(lexer^.start.iterator, text_length, @token^.stringKind);
token^.kind := LexerKind.string
@@ -590,7 +590,7 @@ begin
token^.kind := LexerKind.integer;
integer_length := lexer^.current.iterator - lexer^.start.iterator;
MemZero(@token^.identifierKind, #size(Identifier));
memset(@token^.identifierKind, 0, #size(Identifier));
MemCopy(lexer^.start.iterator, integer_length, @token^.identifierKind[1]);
buffer := InitStringCharStar(@token^.identifierKind[1]);
@@ -889,7 +889,7 @@ begin
lexer^.length := 0;
lexer^.buffer := malloc(CHUNK_SIZE);
MemZero(lexer^.buffer, CHUNK_SIZE);
memset(lexer^.buffer, 0, CHUNK_SIZE);
lexer^.size := CHUNK_SIZE
end;