|
@@ -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.
|