mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-09 17:48:46 +02:00
* fix assembling with official binutils
* fix compilation on 32 bit hosts + compile with -Sew git-svn-id: branches/laksen/riscv_new@39482 -
This commit is contained in:
parent
054bf32f1f
commit
65a415c13e
@ -23,9 +23,6 @@
|
||||
<ExcludeFileFilter Value="*.(bak|ppu|ppw|o|so);*~;backup"/>
|
||||
</PublishOptions>
|
||||
<RunParams>
|
||||
<local>
|
||||
<LaunchingApplication PathPlusParams="\usr\X11R6\bin\xterm -T 'Lazarus Run Output' -e $(LazarusDir)\tools\runwait.sh $(TargetCmdLine)"/>
|
||||
</local>
|
||||
<FormatVersion Value="2"/>
|
||||
<Modes Count="1">
|
||||
<Mode0 Name="default">
|
||||
@ -74,7 +71,8 @@
|
||||
<ConfigFile>
|
||||
<StopAfterErrCount Value="50"/>
|
||||
</ConfigFile>
|
||||
<CustomOptions Value="-driscv64"/>
|
||||
<CustomOptions Value="-driscv64
|
||||
-Sew"/>
|
||||
</Other>
|
||||
</CompilerOptions>
|
||||
</CONFIG>
|
||||
|
@ -566,13 +566,15 @@ implementation
|
||||
if Count > 0 then
|
||||
begin
|
||||
tmpreg1 := GetIntRegister(list, OS_INT);
|
||||
for count2 := 1 to Count do
|
||||
begin
|
||||
list.concat(taicpu.op_reg_ref(A_LD, tmpreg1, src));
|
||||
list.concat(taicpu.op_reg_ref(A_SD, tmpreg1, dst));
|
||||
Inc(src.offset, 8);
|
||||
Inc(dst.offset, 8);
|
||||
end;
|
||||
count2 := 1;
|
||||
while count2 <= Count do
|
||||
begin
|
||||
list.concat(taicpu.op_reg_ref(A_LD, tmpreg1, src));
|
||||
list.concat(taicpu.op_reg_ref(A_SD, tmpreg1, dst));
|
||||
Inc(src.offset, 8);
|
||||
Inc(dst.offset, 8);
|
||||
Inc(count2);
|
||||
end;
|
||||
len := len mod 8;
|
||||
end;
|
||||
if (len and 4) <> 0 then
|
||||
|
@ -50,9 +50,9 @@ _start:
|
||||
1:auipc gp, %pcrel_hi(__global_pointer$)
|
||||
addi gp, gp, %pcrel_lo(1b)
|
||||
.option pop
|
||||
|
||||
|
||||
/* Clear the frame pointer since this is the outermost frame. */
|
||||
addi fp, x0, 0
|
||||
addi x8, x0, 0
|
||||
ld a2, 0(sp)
|
||||
addi sp, sp, 8
|
||||
|
||||
|
Loading…
Reference in New Issue
Block a user