view release on metacpan or search on metacpan
public/javascripts/ace/mode-php.js view on Meta::CPAN
harudoc_setpagesconfiguration|harudoc_setpassword|harudoc_setpermission|harudoc_usecnsencodings|harudoc_usecnsfonts|\
harudoc_usecntencodings|harudoc_usecntfonts|harudoc_usejpencodings|harudoc_usejpfonts|harudoc_usekrencodings|harudoc_usekrfonts|\
haruencoder|haruencoder_getbytetype|haruencoder_gettype|haruencoder_getunicode|haruencoder_getwritingmode|haruexception|harufont|\
harufont_getascent|harufont_getcapheight|harufont_getdescent|harufont_getencodingname|harufont_getfontname|harufont_gettextwidth|\
harufont_getunicodewidth|harufont_getxheight|harufont_measuretext|haruimage|haruimage_getbitspercomponent|haruimage_getcolorspace|\
haruimage_getheight|haruimage_getsize|haruimage_getwidth|haruimage_setcolormask|haruimage_setmaskimage|haruoutline|\
haruoutline_setdestination|haruoutline_setopened|harupage|harupage_arc|harupage_begintext|harupage_circle|harupage_closepath|\
harupage_concat|harupage_createdestination|harupage_createlinkannotation|harupage_createtextannotation|harupage_createurlannotation|\
harupage_curveto|harupage_curveto2|harupage_curveto3|harupage_drawimage|harupage_ellipse|harupage_endpath|harupage_endtext|\
harupage_eofill|harupage_eofillstroke|harupage_fill|harupage_fillstroke|harupage_getcharspace|harupage_getcmykfill|harupage_getcmykstroke|\
harupage_getcurrentfont|harupage_getcurrentfontsize|harupage_getcurrentpos|harupage_getcurrenttextpos|harupage_getdash|\
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
hints/svr4.pl view on Meta::CPAN
my $archname = $Config::Config{archname} || die;
$att{LIBS}      ||= [];
$att{LIBS}->[0] ||= '';
# Some SVR4 systems may need to link against -lc to pick up things like
# fpsetmask, sys_nerr and ecvt.
my @libs = qw(-lsocket -lnsl -lm -ldl);	# general svr4 default
# modified by Davide Migliavacca <davide.migliavacca@inferentia.it>
if ($archname eq 'RM400-svr4') {
    @libs = qw(-lucb);
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
cci-src/src/base/porting.c view on Meta::CPAN
      return (-1);
    }
}
/* satic function for sigprocmask */
static int setmask (sigset_t * set, sigset_t * oldset);
static int block_signals (sigset_t * set, sigset_t * oldset);
static int unblock_signals (sigset_t * set, sigset_t * oldset);
static void sync_mask (sigset_t * set);
/*
 * setmask -
 *   return:
 *   set(in/out):
 *   oldset(out):
 */
static int
setmask (sigset_t * set, sigset_t * oldset)
{
  sigset_t tmp;
  unsigned int test;
  if (set)
    
  
  
  cci-src/src/base/porting.c view on Meta::CPAN
    case SIG_UNBLOCK:
      return (unblock_signals (set, oldset));
    case SIG_SETMASK:
      return (setmask (set, oldset));
    }
  return (-1);
}
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
t/Dpkg_Shlibs/objdump.libc6-2.3 view on Meta::CPAN
000b24f0 g    DF .text	0000020c  GLIBC_2.0   tcsetattr
00119b50  w   DO .bss	00000004 (GLIBC_2.0)  _h_errno
0006d4c0 g    DF .text	00000040  GLIBC_2.1.1 __mempcpy_by2
00029440 g    DF .text	0000002c  GLIBC_2.0   sigisemptyset
000ac800  w   DF .text	0000003a  GLIBC_2.0   mkdir
00028d10  w   DF .text	0000007a  GLIBC_2.0   sigsetmask
00065b90  w   DF .text	0000008c  GLIBC_2.2   posix_memalign
000ee3b0 g    DF .text	00000036  GLIBC_2.0   __register_frame_info
000bb910 g    DF .text	0000004e  GLIBC_2.0   msgget
000d9820 g    DF .text	00000129  GLIBC_2.0   clntraw_create
000be9e0 g    DF .text	0000013a  GLIBC_2.0   sgetspent
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
libev/ev.pod view on Meta::CPAN
     if (sigismember (&prev, SIGUSR1)
       sigprocmask (SIG_UNBLOCK, &block, 0);
   }
(Note: pthreads in theory requires you to use C<pthread_setmask>
instead of C<sigprocmask> when you use threads, but libev doesn't do it
either...).
=item queueing from a thread context
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
lib/Games/Axmud/Cmd.pm view on Meta::CPAN
        # Setup
        my $self = Games::Axmud::Generic::Cmd->new('setcagemask', TRUE, FALSE);
        if (! $self) {return undef}
        $self->{defaultUserCmdList} = ['smk', 'setmask', 'setcagemask'];
        $self->{userCmdList} = \@{$self->{defaultUserCmdList}};
        $self->{descrip} = 'Manages cage masks';
        # Bless the object into existence
        bless $self, $class;
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
xt/author/data/jsort.gv view on Meta::CPAN
	free -> insert [color="0.650 0.700 0.700"];
	insert -> getfreehdr [color="0.650 0.700 0.700"];
	setfil -> div [color="0.650 0.700 0.700"];
	setfil -> rem [color="0.650 0.700 0.700"];
	sigvec -> sigblock [color="0.650 0.700 0.700"];
	sigvec -> sigsetmask [color="0.650 0.700 0.700"];
	doprnt -> urem [color="0.650 0.700 0.700"];
	doprnt -> udiv [color="0.650 0.700 0.700"];
	doprnt -> strlen [color="0.650 0.700 0.700"];
	doprnt -> localeconv [color="0.650 0.700 0.700"];
	sprintf -> doprnt [color="0.650 0.700 0.700"];
    
  
  
  xt/author/data/jsort.gv view on Meta::CPAN
findiop [color="0.650 0.200 1.000"];
fopen [color="0.650 0.200 1.000"];
mul [color="0.650 0.200 1.000"];
newfile [color="0.650 0.200 1.000"];
sigblock [color="0.650 0.200 1.000"];
sigsetmask [color="0.650 0.200 1.000"];
sigvec [color="0.650 0.200 1.000"];
udiv [color="0.650 0.200 1.000"];
urem [color="0.650 0.200 1.000"];
brk [color="0.650 0.200 1.000"];
getfreehdr [color="0.650 0.200 1.000"];
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
lib/HiPi/Interface/MPL3115A2.pm view on Meta::CPAN
sub active {
    my ($self, $set) = @_;
    my ( $curreg ) = $self->device->bus_read(MPL_REG_CTRL_REG1, 1);
    my $rval = $curreg & MPL_CTRL_REG1_SBYB;
    if (defined($set)) {
        my $setmask = ( $set ) ? MPL_CTRL_REG1_SBYB | $curreg : $curreg &~MPL_CTRL_REG1_SBYB;
        $self->device->bus_write(MPL_REG_CTRL_REG1, $setmask);
        $rval = $setmask & MPL_CTRL_REG1_SBYB;
    }
    return $rval;
}
sub reboot {
    
  
  
  lib/HiPi/Interface/MPL3115A2.pm view on Meta::CPAN
    if(defined($newmode)) {
        unless( $currentmode == $newmode ) {
            if( $curreg & MPL_CTRL_REG1_SBYB ) {
                croak('cannot set altitude / pressure mode while system is active');
            }
            my $setmask = ($newmode == MPL_FUNC_ALTITUDE) ? $curreg | MPL_CTRL_REG1_ALT : $curreg &~MPL_CTRL_REG1_ALT;
            $self->device->bus_write(MPL_REG_CTRL_REG1, $setmask );
            ( $curreg ) = $self->device->bus_read(MPL_REG_CTRL_REG1, 1);
            $currentmode = ( $curreg & MPL_CTRL_REG1_ALT ) ? MPL_FUNC_ALTITUDE : MPL_FUNC_PRESSURE;
        }
    }
    return $currentmode;
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
#endif /* def HEADER */
#define SETQRBIT(f,x,y) qr->f[((x)>>3) + (y) * qr->WDB] |= 0x80 >> ((x) & 7)
#define TOGQRBIT(f,x,y) qr->f[((x)>>3) + (y) * qr->WDB] ^= 0x80 >> ((x) & 7)
static void setmask(qr_t * qr, unsigned char x, unsigned char y)
{
    unsigned bt;
    if (x > y) {
        bt = x;
        x = y;
    
  
  
              SETQRBIT(framebase,i, k + j + 1);
            SETQRBIT(framebase,i + 6, k + j);
            SETQRBIT(framebase,i + j + 1, k + 6);
        }
        for (j = 1; j < 5; j++) {
            setmask(qr, i + j, k + 1);
            setmask(qr, i + 1, k + j + 1);
            setmask(qr, i + 5, k + j);
            setmask(qr, i + j + 1, k + 5);
        }
        for (j = 2; j < 4; j++) {
            SETQRBIT(framebase,i + j, k + 2);
            SETQRBIT(framebase,i + 2, k + j + 1);
            SETQRBIT(framebase,i + 4, k + j);
    
  
  
          SETQRBIT(framebase,x - 2, y + j + 1);
        SETQRBIT(framebase,x + 2, y + j);
        SETQRBIT(framebase,x + j + 1, y + 2);
    }
    for (j = 0; j < 2; j++) {
        setmask(qr, x - 1, y + j);
        setmask(qr, x + 1, y - j);
        setmask(qr, x - j, y - 1);
        setmask(qr, x + j, y + 1);
    }
}
static const unsigned char adelta[41] = {
    0, 11, 15, 19, 23, 27, 31,  // force 1 pat
    
  
  
              if (1 & (bc > 11 ? vers >> (bc - 12) : verinfo >> bc)) {
                SETQRBIT(framebase,5 - x, 2 - y + qr->WD - 11);
                SETQRBIT(framebase,2 - y + qr->WD - 11, 5 - x);
            }
	    else {
                setmask(qr, 5 - x, 2 - y + qr->WD - 11);
                setmask(qr, 2 - y + qr->WD - 11, 5 - x);
            }
	}
    }
}
    
  
  
      doaligns(qr);
    // single black
    SETQRBIT(framebase,8, qr->WD - 8);
    // timing gap - masks only
    for (y = 0; y < 7; y++) {
        setmask(qr, 7, y);
        setmask(qr, qr->WD - 8, y);
        setmask(qr, 7, y + qr->WD - 7);
    }
    for (x = 0; x < 8; x++) {
        setmask(qr, x, 7);
        setmask(qr, x + qr->WD - 8, 7);
        setmask(qr, x, qr->WD - 8);
    }
    // reserve mask-format area
    for (x = 0; x < 9; x++)
        setmask(qr,x, 8);
    for (x = 0; x < 8; x++) {
        setmask(qr,x + qr->WD - 8, 8);
        setmask(qr,8, x);
    }
    for (y = 0; y < 7; y++)
        setmask(qr,8, y + qr->WD - 7);
    // timing
    for (x = 0; x < qr->WD - 14; x++) {
        if (x & 1) {
            setmask(qr,8 + x, 6);
            setmask(qr,6, 8 + x);
        }
	else {
            SETQRBIT(framebase,8 + x, 6);
            SETQRBIT(framebase,6, 8 + x);
        }
    
  
  
      // version block
    putvpat(qr);
    for (y = 0; y < qr->WD; y++) {
        for (x = 0; x <= y; x++) {
            if (QRBIT(framebase,x, y)) {
                setmask(qr,x, y);
	    }
	}
    }
}
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
		i_color_set
		i_color_info
		i_img_info
		i_img_setmask
		i_img_getmask
		i_line
		i_line_aa
		i_box
    
  
  
    return i_img_getmask($self->{IMG});
}
# Set channel mask
sub setmask {
  my $self = shift;
  my %opts = @_;
  warnings::warnif("Imager::channelmask", "setmask: image channel masks are deprecated")
      if $] >= 5.014;
  $self->_valid_image("setmask")
    or return;
  unless (defined $opts{mask}) {
    $self->_set_error("mask parameter required");
    return;
  }
  i_img_setmask( $self->{IMG} , $opts{mask} );
  1;
}
# Get number of colors in an image
    
  
  
  setcolors() - L<Imager::ImageTypes/setcolors()> - set palette colors
in a paletted image
set_file_limits() - L<Imager::Files/set_file_limits()>
setmask() - L<Imager::ImageTypes/setmask()>
setpixel() - L<Imager::Draw/setpixel()>
setsamples() - L<Imager::Draw/setsamples()>
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
static int do_sigwait(const sigset_t *, int *);
File ../sysdeps/posix/sigblock.c:
int __sigblock(int);
File ../sysdeps/posix/sigsetmask.c:
int __sigsetmask(int);
File ../sysdeps/posix/sigpause.c:
int __default_sigpause(int);
int __sigpause(int, int);
int __xpg_sigpause(int);
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
lib/LaTeXML/Plugin/LtxMojo/public/js/external/ace-min/mode-php.js view on Meta::CPAN
define("ace/mode/php",["require","exports","module","ace/lib/oop","ace/mode/text","ace/tokenizer","ace/mode/php_highlight_rules","ace/mode/matching_brace_outdent","ace/range","ace/worker/worker_client","ace/mode/behaviour/cstyle","ace/mode/folding/cs...
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
hugs98-Nov2003/fptools/libraries/base/System/Posix/Internals.hs view on Meta::CPAN
	     c_sigaddset   p_sigset const_sigttou
	     c_sigprocmask const_sig_block p_sigset p_old_sigset
	     r <- fun p_tios  -- do the business
	     throwErrnoIfMinus1Retry_ "tcSetAttr" $
		 c_tcsetattr (fromIntegral fd) const_tcsanow p_tios
	     c_sigprocmask const_sig_setmask p_old_sigset nullPtr
	     return r
#ifdef __GLASGOW_HASKELL__
foreign import ccall unsafe "HsBase.h __hscore_get_saved_termios"
   get_saved_termios :: Int -> IO (Ptr CTermios)
    
  
  
  hugs98-Nov2003/fptools/libraries/base/System/Posix/Internals.hs view on Meta::CPAN
foreign import ccall unsafe "HsBase.h __hscore_icanon"       const_icanon :: CInt
foreign import ccall unsafe "HsBase.h __hscore_vmin"         const_vmin   :: CInt
foreign import ccall unsafe "HsBase.h __hscore_vtime"        const_vtime  :: CInt
foreign import ccall unsafe "HsBase.h __hscore_sigttou"      const_sigttou :: CInt
foreign import ccall unsafe "HsBase.h __hscore_sig_block"    const_sig_block :: CInt
foreign import ccall unsafe "HsBase.h __hscore_sig_setmask"  const_sig_setmask :: CInt
foreign import ccall unsafe "HsBase.h __hscore_f_getfl"      const_f_getfl :: CInt
foreign import ccall unsafe "HsBase.h __hscore_f_setfl"      const_f_setfl :: CInt
#if defined(HTYPE_TCFLAG_T)
foreign import ccall unsafe "HsBase.h __hscore_sizeof_termios"  sizeof_termios :: Int
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
lib/Linux/Seccomp.pm view on Meta::CPAN
		   __NR_socket
		   __NR_socketcall
		   __NR_socketpair
		   __NR_spu_create
		   __NR_spu_run
		   __NR_ssetmask
		   __NR_stat
		   __NR_stat64
		   __NR_statfs64
		   __NR_stime
		   __NR_stty
    
  
  
  lib/Linux/Seccomp.pm view on Meta::CPAN
		   __PNR_socket
		   __PNR_socketcall
		   __PNR_socketpair
		   __PNR_spu_create
		   __PNR_spu_run
		   __PNR_ssetmask
		   __PNR_stat
		   __PNR_stat64
		   __PNR_statfs64
		   __PNR_stime
		   __PNR_stty
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
qmailrem/sig_block.c view on Meta::CPAN
  sigset_t ss;
  sigemptyset(&ss);
  sigaddset(&ss,sig);
  sigprocmask(SIG_UNBLOCK,&ss,(sigset_t *) 0);
#else
  sigsetmask(sigsetmask(~0) & ~(1 << (sig - 1)));
#endif
}
void sig_blocknone()
{
#ifdef HASSIGPROCMASK
  sigset_t ss;
  sigemptyset(&ss);
  sigprocmask(SIG_SETMASK,&ss,(sigset_t *) 0);
#else
  sigsetmask(0);
#endif
}
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
htdocs/src-min/mode-php.js view on Meta::CPAN
define("ace/mode/doc_comment_highlight_rules",["require","exports","module","ace/lib/oop","ace/mode/text_highlight_rules"],function(e,t,n){"use strict";var r=e("../lib/oop"),i=e("./text_highlight_rules").TextHighlightRules,s=function(){this.$rules={s...
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
share/perl-5.26/strtoull-fix-perl.h view on Meta::CPAN
#    endif
/* Some operating systems have this as a macro, which in turn expands to a comma
   expression, and the last sub-expression is something that gets calculated,
   and then they have the gall to warn that a value computed is not used. Hence
   cast to void.  */
#    define PERL_FPU_INIT (void)fpsetmask(0)
#  else
#    if defined(SIGFPE) && defined(SIG_IGN) && !defined(PERL_MICRO)
#      define PERL_FPU_INIT       PL_sigfpe_saved = (Sighandler_t) signal(SIGFPE, SIG_IGN)
#      define PERL_FPU_PRE_EXEC   { Sigsave_t xfpe; rsignal_save(SIGFPE, PL_sigfpe_saved, &xfpe);
#      define PERL_FPU_POST_EXEC    rsignal_restore(SIGFPE, &xfpe); }
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
exercises/compile-tcsh/tcsh-6.10.00/ed.h view on Meta::CPAN
# define M_CHAR		2
# define M_NN		3
#endif /* TERMIO */
typedef struct { 
    char *t_name;
    int  t_setmask;
    int  t_clrmask;
} ttyperm_t[NN_IO][M_NN];
extern ttyperm_t ttylist;
#include "ed.decls.h"
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
include/rdfstore_bits.h view on Meta::CPAN
typedef struct bitseq {
        int     size;
        unsigned char bits[MAXBITBYTE];
        } bitseq;
int rdfstore_bits_setmask( 
	unsigned int  * len,
	unsigned char * bits,
	unsigned int at, 
	unsigned int mask,
	unsigned int value,
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
lib/Sys/Ebpf/Syscall/asm/unistd_32.ph view on Meta::CPAN
    eval 'sub __NR_getppid () {64;}' unless defined(&__NR_getppid);
    eval 'sub __NR_getpgrp () {65;}' unless defined(&__NR_getpgrp);
    eval 'sub __NR_setsid () {66;}' unless defined(&__NR_setsid);
    eval 'sub __NR_sigaction () {67;}' unless defined(&__NR_sigaction);
    eval 'sub __NR_sgetmask () {68;}' unless defined(&__NR_sgetmask);
    eval 'sub __NR_ssetmask () {69;}' unless defined(&__NR_ssetmask);
    eval 'sub __NR_setreuid () {70;}' unless defined(&__NR_setreuid);
    eval 'sub __NR_setregid () {71;}' unless defined(&__NR_setregid);
    eval 'sub __NR_sigsuspend () {72;}' unless defined(&__NR_sigsuspend);
    eval 'sub __NR_sigpending () {73;}' unless defined(&__NR_sigpending);
    eval 'sub __NR_sethostname () {74;}' unless defined(&__NR_sethostname);
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
Functions provided are
(internal fns ? - should probably be static, not external ?)
  b_setpixel(x,y,value)     
  b_setmaskpixel(x,y,value)
  b_putc(x,y,char,angle)
  b_setvalue(size)
setting up stuff
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
t/graphs/directed/jsort.dot view on Meta::CPAN
	umul [color="0.650 0.200 1.000"];
	sigvec [color="0.650 0.200 1.000"];
	moncontrol [color="0.647 0.204 1.000"];
	profil [color="0.650 0.200 1.000"];
	sigblock [color="0.650 0.200 1.000"];
	sigsetmask [color="0.650 0.200 1.000"];
	doprnt [color="0.650 0.200 1.000"];
	urem [color="0.650 0.200 1.000"];
	strlen [color="0.650 0.200 1.000"];
	localeconv [color="0.650 0.200 1.000"];
	start -> main [color="0.002 0.999 0.999"];
    
  
  
  t/graphs/directed/jsort.dot view on Meta::CPAN
	free -> insert [color="0.650 0.700 0.700"];
	insert -> getfreehdr [color="0.650 0.700 0.700"];
	setfil -> div [color="0.650 0.700 0.700"];
	setfil -> rem [color="0.650 0.700 0.700"];
	sigvec -> sigblock [color="0.650 0.700 0.700"];
	sigvec -> sigsetmask [color="0.650 0.700 0.700"];
	doprnt -> urem [color="0.650 0.700 0.700"];
	doprnt -> udiv [color="0.650 0.700 0.700"];
	doprnt -> strlen [color="0.650 0.700 0.700"];
	doprnt -> localeconv [color="0.650 0.700 0.700"];
	sprintf -> doprnt [color="0.650 0.700 0.700"];
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
pTk/mTk/tclUnix/tclUnixInit.c view on Meta::CPAN
    (void) signal(SIGPIPE, SIG_IGN);
#endif /* SIGPIPE */
#ifdef __FreeBSD__
    fpsetround(FP_RN);
    fpsetmask(0L);
#endif
#if defined(__bsdi__) && (_BSDI_VERSION > 199501)
    /*
     * Find local symbols. Don't report an error if we fail.
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
wasm3/platforms/embedded/fomu/include/irq.h view on Meta::CPAN
extern unsigned int _irq_mask;
// Read only.
extern unsigned int _irq_enabled;
extern void _irq_enable(void);
extern void _irq_disable(void);
extern void _irq_setmask(unsigned int);
#endif
static inline unsigned int irq_getie(void)
{
#if defined (__lm32__)
    
  
  
  wasm3/platforms/embedded/fomu/include/irq.h view on Meta::CPAN
#else
#error Unsupported architecture
#endif
}
static inline void irq_setmask(unsigned int mask)
{
#if defined (__lm32__)
	__asm__ __volatile__("wcsr IM, %0" : : "r" (mask));
#elif defined (__or1k__)
	mtspr(SPR_PICMR, mask);
#elif defined (__picorv32__)
    // PicoRV32 interrupt mask bits are high-disabled. This is the inverse of how
    // LiteX sees things.
    _irq_setmask(~mask);
#elif defined (__vexriscv__)
	asm volatile ("csrw %0, %1" :: "i"(CSR_IRQ_MASK), "r"(mask));
#elif defined (__minerva__)
	asm volatile ("csrw %0, %1" :: "i"(CSR_IRQ_MASK), "r"(mask));
#else
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
	}
	timeout.tv_sec = timeout_seconds;
	timeout.tv_usec = 0;
	(void)sigsetmask(omask);
	readfrom = (1 << rfd2) | (1 << rem);
	do {
		ready = readfrom;
		if (timeout_seconds) {
			select_return = select(16, &ready, 0, 0, &timeout);
    
  
  
     view all matches for this distribution
view release on metacpan or search on metacpan
#    endif
/* Some operating systems have this as a macro, which in turn expands to a comma
   expression, and the last sub-expression is something that gets calculated,
   and then they have the gall to warn that a value computed is not used. Hence
   cast to void.  */
#    define PERL_FPU_INIT (void)fpsetmask(0)
#  elif defined(SIGFPE) && defined(SIG_IGN)
#    define PERL_FPU_INIT       PL_sigfpe_saved = (Sighandler_t) signal(SIGFPE, SIG_IGN)
#    define PERL_FPU_PRE_EXEC   { Sigsave_t xfpe; rsignal_save(SIGFPE, PL_sigfpe_saved, &xfpe);
#    define PERL_FPU_POST_EXEC    rsignal_restore(SIGFPE, &xfpe); }
#  else
    
  
  
     view all matches for this distribution