Merge pull request #2140 from martin-frbg/pgi19
Do not try ancient PGI hacks with recent versions of that compiler
This commit is contained in:
commit
21d05a4835
|
@ -1622,6 +1622,7 @@ void gotoblas_dummy_for_PGI(void) {
|
|||
gotoblas_init();
|
||||
gotoblas_quit();
|
||||
|
||||
#if __PGIC__ < 19
|
||||
#if 0
|
||||
asm ("\t.section\t.ctors,\"aw\",@progbits; .align 8; .quad gotoblas_init; .section .text");
|
||||
asm ("\t.section\t.dtors,\"aw\",@progbits; .align 8; .quad gotoblas_quit; .section .text");
|
||||
|
@ -1629,6 +1630,7 @@ void gotoblas_dummy_for_PGI(void) {
|
|||
asm (".section .init,\"ax\"; call gotoblas_init@PLT; .section .text");
|
||||
asm (".section .fini,\"ax\"; call gotoblas_quit@PLT; .section .text");
|
||||
#endif
|
||||
#endif
|
||||
}
|
||||
#endif
|
||||
|
||||
|
@ -3192,7 +3194,7 @@ void gotoblas_dummy_for_PGI(void) {
|
|||
|
||||
gotoblas_init();
|
||||
gotoblas_quit();
|
||||
|
||||
#if __PGIC__ < 19
|
||||
#if 0
|
||||
asm ("\t.section\t.ctors,\"aw\",@progbits; .align 8; .quad gotoblas_init; .section .text");
|
||||
asm ("\t.section\t.dtors,\"aw\",@progbits; .align 8; .quad gotoblas_quit; .section .text");
|
||||
|
@ -3200,6 +3202,7 @@ void gotoblas_dummy_for_PGI(void) {
|
|||
asm (".section .init,\"ax\"; call gotoblas_init@PLT; .section .text");
|
||||
asm (".section .fini,\"ax\"; call gotoblas_quit@PLT; .section .text");
|
||||
#endif
|
||||
#endif
|
||||
}
|
||||
#endif
|
||||
|
||||
|
|
Loading…
Reference in New Issue