Skip to content
Open
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
10 changes: 1 addition & 9 deletions src/vm_s390x.dasc
Original file line number Diff line number Diff line change
Expand Up @@ -2126,16 +2126,8 @@ static void build_subroutines(BuildCtx *ctx)
|// Value to round is in f0. May clobber f0-f7 and r0. Return address is r14.
|.macro vm_round, name, mask
|->name:
| ldr f4, f0
| lghi r0, 1
| cdfbr f1, r0
| didbr f0, f2, f1, mask // f0=remainder, f2=quotient.
| fidbra f4, mask, f4, 0
| ldr f0, f4
| jnle >1
| fidbra f0, mask, f0, 0
| br r14
|1: // partial remainder (sanity check)
| stg r0, 0
|.endmacro
|
| vm_round vm_floor, 7 // Round towards -inf.
Expand Down