1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
|
/* Copyright (C) 2008 The Android Open Source Project
*
* Licensed under the Apache License, Version 2.0 (the "License");
* you may not use this file except in compliance with the License.
* You may obtain a copy of the License at
*
* http://www.apache.org/licenses/LICENSE-2.0
*
* Unless required by applicable law or agreed to in writing, software
* distributed under the License is distributed on an "AS IS" BASIS,
* WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
* See the License for the specific language governing permissions and
* limitations under the License.
*/
/*
* File: OP_CMPL_FLOAT.S
*
* Code: Provides a "nan" variable to specify the return value for
* NaN. Provides a variable "sod" which appends a "s" or a "d"
* to the move and comparison instructions, depending on if we
* are working with a float or a double. For instructions
* cmpx-float and cmpx-double, the x will be eiher a g or a l
* to specify positive or negative bias for NaN.
*
* For: cmpg-double, dmpg-float, cmpl-double, cmpl-float
*
* Description: Perform the indicated floating point or long comparison,
* storing 0 if the two arguments are equal, 1 if the second
* argument is larger, or -1 if the first argument is larger.
*
* Format: AA|op CC|BB (23x)
*
* Syntax: op vAA, vBB, vCC
*/
%default { "nan":"$0xFFFFFFFF" , "sod":"s" }
FETCH_BB 1, %ecx # %ecx<- BB
FETCH_CC 1, %edx # %edx<- CC
FFETCH_ADV 2, %eax # %eax<- next instruction hi; fetch, advance
movs$sod (rFP, %ecx, 4), %xmm0 # %xmm0<- vBB
comis$sod (rFP, %edx, 4), %xmm0 # do comparison
ja .L${opcode}_greater
jp .L${opcode}_finalNan
jz .L${opcode}_final
.L${opcode}_less:
movl $$0xFFFFFFFF, (rFP, rINST, 4) # vAA<- less than
FGETOP_JMP 2, %eax # jump to next instruction; getop, jmp
%break
.L${opcode}_greater:
movl $$0x1, (rFP, rINST, 4) # vAA<- greater than
FGETOP_JMP 2, %eax # jump to next instruction; getop, jmp
.L${opcode}_final:
movl $$0x0, (rFP, rINST, 4) # vAA<- equal
FGETOP_JMP 2, %eax # jump to next instruction; getop, jmp
.L${opcode}_finalNan:
movl $nan, (rFP, rINST, 4) # vAA<- NaN
FGETOP_JMP 2, %eax # jump to next instruction; getop, jmp
|
