OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

S/390: Add builtins for efpc and sfpc 

gcc/ChangeLog:
	* config/s390/s390.c (enum s390_builtin):
	Add S390_BUILTIN_S390_SFPC and S390_BUILTIN_S390_EFPC.
	(code_for_builtin): Add CODE_FOR_s390_sfpc and CODE_FOR_s390_efpc.
	(s390_init_builtins): Generate new builtin functions.
	* config/s390/s390.md (UNSPECV_SFPC, UNSPECV_EFPC): New constants.
	(s390_sfpc, s390_efpc): New pattern definitions.

From-SVN: r221047
This commit is contained in:
Andreas Krebbel 2015-02-27 10:14:20 +00:00 committed by Andreas Krebbel
parent 9b80b7bc4d
commit 004f64e1b0
3 changed files with 46 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
gcc/ChangeLog
View File

@ -1,3 +1,12 @@
2015-02-27 Andreas Krebbel <Andreas.Krebbel@de.ibm.com>
* config/s390/s390.c (enum s390_builtin):
Add S390_BUILTIN_S390_SFPC and S390_BUILTIN_S390_EFPC.
(code_for_builtin): Add CODE_FOR_s390_sfpc and CODE_FOR_s390_efpc.
(s390_init_builtins): Generate new builtin functions.
* config/s390/s390.md (UNSPECV_SFPC, UNSPECV_EFPC): New constants.
(s390_sfpc, s390_efpc): New pattern definitions.
2015-02-27 Andreas Krebbel <Andreas.Krebbel@de.ibm.com>
* config/s390/s390.c: (enum s390_builtin, s390_expand_builtin):

19
gcc/config/s390/s390.c
View File

@ -9982,6 +9982,9 @@ enum s390_builtin
S390_BUILTIN_TX_NESTING_DEPTH,
S390_BUILTIN_TX_ASSIST,
S390_BUILTIN_S390_SFPC,
S390_BUILTIN_S390_EFPC,
S390_BUILTIN_MAX
};
@ -9997,7 +10000,10 @@ static enum insn_code const code_for_builtin[S390_BUILTIN_MAX] = {
CODE_FOR_tabort,
CODE_FOR_ntstg,
CODE_FOR_etnd,
CODE_FOR_tx_assist
CODE_FOR_tx_assist,
CODE_FOR_s390_sfpc,
CODE_FOR_s390_efpc
};
static void
@ -10025,6 +10031,12 @@ s390_init_builtins (void)
add_builtin_function ("__builtin_tx_assist", ftype,
S390_BUILTIN_TX_ASSIST, BUILT_IN_MD, NULL, NULL_TREE);
/* void foo (unsigned) */
ftype = build_function_type_list (void_type_node, unsigned_type_node,
NULL_TREE);
s390_builtin_decls[S390_BUILTIN_S390_SFPC] =
add_builtin_function ("__builtin_s390_sfpc", ftype,
S390_BUILTIN_S390_SFPC, BUILT_IN_MD, NULL, NULL_TREE);
/* int foo (void *) */
ftype = build_function_type_list (integer_type_node, ptr_type_node,
@ -10061,6 +10073,11 @@ s390_init_builtins (void)
add_builtin_function ("__builtin_tend", ftype,
S390_BUILTIN_TEND, BUILT_IN_MD, NULL, NULL_TREE);
/* unsigned foo (void) */
ftype = build_function_type_list (unsigned_type_node, NULL_TREE);
s390_builtin_decls[S390_BUILTIN_S390_EFPC] =
add_builtin_function ("__builtin_s390_efpc", ftype,
S390_BUILTIN_S390_EFPC, BUILT_IN_MD, NULL, NULL_TREE);
/* void foo (uint64_t *, uint64_t) */
if (TARGET_64BIT)

19
gcc/config/s390/s390.md
View File

@ -162,6 +162,10 @@
UNSPECV_ETND
UNSPECV_NTSTG
UNSPECV_PPA
; Set and get floating point control register
UNSPECV_SFPC
UNSPECV_EFPC
])
;;
@ -10300,3 +10304,18 @@
"TARGET_HTM && INTVAL (operands[2]) < 16"
"ppa\t%0,%1,%2"
[(set_attr "op_type" "RRF")])
; Set and get floating point control register
(define_insn "s390_sfpc"
[(unspec_volatile [(match_operand:SI 0 "register_operand" "d")]
UNSPECV_SFPC)]
"TARGET_HARD_FLOAT"
"sfpc\t%0")
(define_insn "s390_efpc"
[(set (match_operand:SI 0 "register_operand" "=d")
(unspec_volatile:SI [(const_int 0)] UNSPECV_EFPC))]
"TARGET_HARD_FLOAT"
"efpc\t%0")