paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-08-19 07:09:17 +02:00
Code Issues Packages Projects Releases Wiki Activity

Fix the ~ is NOR rather than NOT

Browse Source
This commit is contained in:
Jinyang He 2022-11-05 09:48:55 +08:00 committed by FPK
parent cda8971baa
commit 2d680afab7
1 changed files with 8 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/raatt.pas
View File

@ -828,13 +828,20 @@ unit raatt;
exit;
end;
'!', '~' :
'!' :
begin
actasmtoken:=AS_NOT;
c:=current_scanner.asmgetchar;
exit;
end;
'~' :
begin
actasmtoken:=AS_NOR;
c:=current_scanner.asmgetchar;
exit;
end;
'@' :
begin
actasmtoken:=AS_AT;