view msdos/sigaction.c @ 60632:fa8be36e244d

Include macterm.h instead of directly including Carbon.h. [TARGET_API_MAC_CARBON] (Qstring, Qnumber, Qboolean, Qdate, Qdata) (Qarray, Qdictionary): New variables. (syms_of_mac) [TARGET_API_MAC_CARBON]: Initialize them. [TARGET_API_MAC_CARBON] (Qutf_8): Add extern. [TARGET_API_MAC_CARBON] (DECODE_UTF_8): New macro. [TARGET_API_MAC_CARBON] (struct cfdict_context): New struct used in callback for CFDictionaryApplyFunction. [TARGET_API_MAC_CARBON] (cfdata_to_lisp, cfstring_to_lisp) (cfnumber_to_lisp, cfdate_to_lisp, cfboolean_to_lisp) (cfobject_desc_to_lisp, cfdictionary_add_to_list) (cfdictionary_puthash, cfproperty_list_to_lisp): New functions. [TARGET_API_MAC_CARBON] (Fmac_get_preference): New function. (syms_of_mac) [TARGET_API_MAC_CARBON]: Defsubr it. (P, LOOSE_BINDING, SINGLE_COMPONENT, HASHKEY_TERMINAL): New macro. (skip_while_space, parse_comment, parse_include_file) (parse_binding, parse_component, parse_resource_name, parse_value) (parse_resource_line, xrm_create_database, xrm_q_put_resource) (xrm_merge_string_database, xrm_q_get_resource, xrm_get_resource) (xrm_cfproperty_list_to_value, xrm_get_preference_database): New functions.
author YAMAMOTO Mitsuharu <mituharu@math.s.chiba-u.ac.jp>
date Wed, 16 Mar 2005 08:05:56 +0000
parents 695cf19ef79e
children 60ed74508594 375f2633d815
line wrap: on
line source

/* Copyright (C) 1995 DJ Delorie, see COPYING.DJ for details */
#include <signal.h>
#include <errno.h>

int
sigaction(int _sig, const struct sigaction *_act, struct sigaction *_oact)
{
  int retval = 0;

  if (_oact)
  {
    void (*installed_sig)(int) = signal (_sig, SIG_IGN);

    /* FIXME */
    if (installed_sig == SIG_ERR)
    {
      retval = -1;
      errno = EINVAL;
    }
    else
      signal (_sig, installed_sig);
    _oact->sa_handler = installed_sig;
    retval = sigemptyset (&_oact->sa_mask);
    _oact->sa_flags = 0;
  }
  if (_act)
  {
    if (signal (_sig, _act->sa_handler) == SIG_ERR)
    {
      retval = -1;
      errno = EINVAL;
    }
  }
  return 0;
}



/* arch-tag: 39526405-3d3a-44fe-af28-82a515e0c8e8
   (do not change this comment) */