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

* ensure the generic version of tcgshlshrnode gets used for llvm

Browse Source 
git-svn-id: trunk@40464 -
This commit is contained in:
Jonas Maebe 2018-12-04 19:53:16 +00:00
parent 2109612fa3
commit b7da7cd654
1 changed files with 3 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
compiler/llvm/nllvmmat.pas
View File

@ -34,6 +34,9 @@ type
procedure pass_generate_code; override;
end;
tllvmshlshrnode = class(tcgshlshrnode)
end;
Tllvmunaryminusnode = class(tcgunaryminusnode)
procedure emit_float_sign_change(r: tregister; _size : tdef);override;
end;
@ -154,9 +157,7 @@ end;
begin
cmoddivnode := tllvmmoddivnode;
(*
cshlshrnode := tllvmshlshrnode;
*)
cnotnode := tllvmnotnode;
cunaryminusnode := Tllvmunaryminusnode;
end.