Spade

Mini Shell

Directory:~$ /proc/self/root/lib64/perl5/bits/
Upload File

[Home] [System Details] [Kill Me]
Current File:~$ //proc/self/root/lib64/perl5/bits/sigcontext.ph

require '_h2ph_pre.ph';

no warnings qw(redefine misc);

unless(defined(&_BITS_SIGCONTEXT_H)) {
    eval 'sub _BITS_SIGCONTEXT_H () {1;}' unless
defined(&_BITS_SIGCONTEXT_H);
    if(!defined (&_SIGNAL_H)  && !defined
(&_SYS_UCONTEXT_H)) {
	die("Never use <bits/sigcontext.h> directly; include
<signal.h> instead.");
    }
    eval 'sub FP_XSTATE_MAGIC1 () {0x46505853;}' unless
defined(&FP_XSTATE_MAGIC1);
    eval 'sub FP_XSTATE_MAGIC2 () {0x46505845;}' unless
defined(&FP_XSTATE_MAGIC2);
    eval 'sub FP_XSTATE_MAGIC2_SIZE () {$sizeof{
&FP_XSTATE_MAGIC2};}' unless defined(&FP_XSTATE_MAGIC2_SIZE);
    unless(defined(&__x86_64__)) {
	unless(defined(&sigcontext_struct)) {
	    eval 'sub sigcontext_struct () { &sigcontext;}' unless
defined(&sigcontext_struct);
	}
	eval 'sub X86_FXSR_MAGIC () {0x;}' unless
defined(&X86_FXSR_MAGIC);
    } else {
    }
}
1;