-First, generate the `configure' script:

- $1 --version 2>&1 | sed -n '1 s/.* \([1-9][0-9\.]*\).*/\1/p'

- have_version=`get_version $1`

-/* Define as the return type of signal handlers (`int' or `void'). */

-#undef RETSIGTYPE

-

-/* SIGTYPE is the macro we actually use. */

-#ifndef SIGTYPE

-#define SIGTYPE RETSIGTYPE

-#endif

-

-{ $as_echo "$as_me:${as_lineno-$LINENO}: checking return type of signal handlers" >&5

-$as_echo_n "checking return type of signal handlers... " >&6; }

-if test "${ac_cv_type_signal+set}" = set; then :

- $as_echo_n "(cached) " >&6

-else

- cat confdefs.h - <<_ACEOF >conftest.$ac_ext

-/* end confdefs.h. */

-#include <sys/types.h>

-#include <signal.h>

-

-int

-main ()

-{

-return *(signal (0, 0)) (0) == 1;

- ;

- return 0;

-}

-_ACEOF

-if ac_fn_c_try_compile "$LINENO"; then :

- ac_cv_type_signal=int

-else

- ac_cv_type_signal=void

-fi

-rm -f core conftest.err conftest.$ac_objext conftest.$ac_ext

-fi

-{ $as_echo "$as_me:${as_lineno-$LINENO}: result: $ac_cv_type_signal" >&5

-$as_echo "$ac_cv_type_signal" >&6; }

-

-cat >>confdefs.h <<_ACEOF

-#define RETSIGTYPE $ac_cv_type_signal

-_ACEOF

-

-

-

-autoreconf -i -I m4 2>| $tempfile

-these hooks, it terminates execution of the hook, and clears the hook

-variable to @code{nil} so as to prevent an infinite loop of errors.

- (dolist (table abbrev-table-name-list)

- (insert-abbrev-table-description table t)))

-(defvar allout-widgets-tally (make-hash-table :test 'eq :weakness 'key)

- (overlay-put (make-overlay prev next nil 'front-advance)

- 'category 'allout-exposure-category)

- (normal-mode))

- (and history (add-to-history history ido-selected))

- "*Value for `process-connection-type' to use for Kerberos4, GSSAPI and SSL.

-2011-03-27 Paul Eggert <eggert@cs.ucla.edu>

-

-2011-03-26 Paul Eggert <eggert@cs.ucla.edu>

-

- them, return (C & 0xFF).

-

- The argument REV_TBL is now ignored. It will be removed in the

- future. */

-multibyte_char_to_unibyte (int c, Lisp_Object rev_tbl)

- : multibyte_char_to_unibyte (c, Qnil))

- : multibyte_char_to_unibyte (c, Qnil));

- int *, int *,

- unsigned char *);

- int *charbuf_end, unsigned char *dst)

- dst = encode_designation_at_bol (coding, charbuf, charbuf_end, dst);

-EMACS_INT string_buffer_position (struct window *, Lisp_Object,

- EMACS_INT);

- : multibyte_char_to_unibyte (XINT (val), Qnil));

-/* This definition is duplicated in alloc.c and keyboard.c */

-/* Putting it in lisp.h makes cc bomb out! */

- to slot holding list of unevalled args */

- /* Nonzero means call value of debugger when done with this operation. */

-/* unwind-protect function used by call_debugger. */

- /* btp now points at the frame of the innermost function that isn't

- /* btp points to the frame of a Lisp function that called interactive-p.

- /* Make space to hold the values to give the bound variables */

- /* Compute the values and store them in `temps' */

- /* Not defined or definition not suitable */

- if (gcprolist != 0)

- gcpro_level = gcprolist->level + 1;

- else

- gcpro_level = 0;

- /* rms: what's this for? */

-/* dump an error message; called like vprintf */

-/* dump an error message; called like printf */

- /* If function is defined and not as an autoload, don't override */

- backtrace.function = &original_fun; /* This also protects them from gc */

- have values that will be used below */

- if (XINT (numargs) < XSUBR (fun)->min_args ||

- (XSUBR (fun)->max_args >= 0 && XSUBR (fun)->max_args < XINT (numargs)))

- /* Pass a vector of evaluated arguments */

- /* Let funcall get the error */

- goto funcall; /* Let funcall get the error */

- by explicitly supplying nil's for optional values */

-enum run_hooks_condition {to_completion, until_success, until_failure};

-static Lisp_Object run_hook_with_args (size_t, Lisp_Object *,

- enum run_hooks_condition);

- run_hook_with_args (1, hook, to_completion);

- return run_hook_with_args (nargs, args, to_completion);

- return run_hook_with_args (nargs, args, until_success);

- return run_hook_with_args (nargs, args, until_failure);

- COND specifies a condition to test after each call

- to decide whether to stop.

-static Lisp_Object

- enum run_hooks_condition cond)

- Lisp_Object sym, val, ret;

- ret = (cond == until_failure ? Qt : Qnil);

- return Ffuncall (nargs, args);

- CONSP (val) && ((cond == to_completion)

- || (cond == until_success ? NILP (ret)

- : !NILP (ret)));

- ret = Ffuncall (nargs, args);

- (CONSP (global_vals)

- && (cond == to_completion

- || (cond == until_success

- ? NILP (ret)

- : !NILP (ret))));

- ret = Ffuncall (nargs, args);

- ret = Ffuncall (nargs, args);

-/* Apply fn to arg */

-/* Call function fn on no arguments */

-/* Call function fn with 1 argument arg1 */

-/* Call function fn with 2 arguments arg1, arg2 */

-/* Call function fn with 3 arguments arg1, arg2, arg3 */

-/* Call function fn with 4 arguments arg1, arg2, arg3, arg4 */

-/* Call function fn with 5 arguments arg1, arg2, arg3, arg4, arg5 */

-/* Call function fn with 6 arguments arg1, arg2, arg3, arg4, arg5, arg6 */

-/* Call function fn with 7 arguments arg1, arg2, arg3, arg4, arg5, arg6, arg7 */

-/* specpdl_ptr->symbol is a field which describes which variable is

- Fprin1 (tem, Qnil); /* This can QUIT */

-Lisp_Object Qcommand_hook_internal;

- return Frun_hooks (1, &Vinhibit_quit);

-/* Subroutine for safe_run_hooks: handle an error by clearing out the hook. */

-safe_run_hooks_error (Lisp_Object data)

- Lisp_Object args[3];

- args[0] = build_string ("Error in %s: %s");

- args[1] = Vinhibit_quit;

- args[2] = data;

- Fmessage (3, args);

- return Fset (Vinhibit_quit, Qnil);

- internal_condition_case (safe_run_hooks_1, Qt, safe_run_hooks_error);

- Qcommand_hook_internal = intern_c_string ("command-hook-internal");

- staticpro (&Qcommand_hook_internal);

-

- DEFVAR_LISP ("command-hook-internal", Vcommand_hook_internal,

- doc: /* Temporary storage of `pre-command-hook' or `post-command-hook'. */);

- Vcommand_hook_internal = Qnil;

-

-the hook value is set to nil, since otherwise the error

-might happen repeatedly and make Emacs nonfunctional. */);

-the hook value is set to nil, since otherwise the error

-might happen repeatedly and make Emacs nonfunctional. */);

- *p++ = multibyte_char_to_unibyte (c, Qnil);

-/* Defined in data.c */

-extern int multibyte_char_to_unibyte (int, Lisp_Object);

-/* Defined in eval.c */

- extern EMACS_TIME timer_check (int do_it_now); /* TODO: add to a header */

- timer_check (1);

- if (f->output_data.ns->dont_constrain)

- Lisp_Object printcharfun, int multibyte)

- strout (buffer, chars, SBYTES (string),

- printcharfun, STRING_MULTIBYTE (string));

- strout (SSDATA (string),

- chars, SBYTES (string),

- printcharfun, STRING_MULTIBYTE (string));

- strout (data, size, size, printcharfun, 0);

- strout (data, size, size, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- strout (pigbuf, -1, -1, printcharfun, 0);

- strout (outbuf, -1, -1, printcharfun, 0);

- strout (outbuf, -1, -1, printcharfun, 0);

- strout ("\\ ", -1, -1, printcharfun, 0);

- strout ("...", -1, -1, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- strout (" . ", 3, 3, printcharfun, 0);

- strout ("...", 3, 3, printcharfun, 0);

- strout (" . ", 3, 3, printcharfun, 0);

- strout ("#<process ", -1, -1, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- strout ("#<subr ", -1, -1, printcharfun, 0);

- strout (XSUBR (obj)->symbol_name, -1, -1, printcharfun, 0);

- strout ("#<window ", -1, -1, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- strout (" on ", -1, -1, printcharfun, 0);

- strout ("#<terminal ", -1, -1, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- strout (" on ", -1, -1, printcharfun, 0);

- strout (t->name, -1, -1, printcharfun, 0);

- strout ("#<hash-table", -1, -1, printcharfun, 0);

- strout (SDATA (SYMBOL_NAME (h->test)), -1, -1, printcharfun, 0);

- strout (SDATA (SYMBOL_NAME (h->weak)), -1, -1, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- strout (" test ", -1, -1, printcharfun, 0);

- strout (" weakness ", -1, -1, printcharfun, 0);

- strout (" rehash-size ", -1, -1, printcharfun, 0);

- strout (" rehash-threshold ", -1, -1, printcharfun, 0);

- strout (" data ", -1, -1, printcharfun, 0);

- strout (" ...", 4, 4, printcharfun, 0);

- strout ("#<killed buffer>", -1, -1, printcharfun, 0);

- strout ("#<buffer ", -1, -1, printcharfun, 0);

- strout ("#<window-configuration>", -1, -1, printcharfun, 0);

- -1, -1, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- strout ("#<font-spec", -1, -1, printcharfun, 0);

- strout ("#<font-entity", -1, -1, printcharfun, 0);

- strout ("#<font-object ", -1, -1, printcharfun, 0);

- strout (" ...", 4, 4, printcharfun, 0);

- strout ("#<marker ", -1, -1, printcharfun, 0);

- strout ("(moves after insertion) ", -1, -1, printcharfun, 0);

- strout ("in no buffer", -1, -1, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- strout (" in ", -1, -1, printcharfun, 0);

- strout ("#<overlay ", -1, -1, printcharfun, 0);

- strout ("in no buffer", -1, -1, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- strout ("#<misc free cell>", -1, -1, printcharfun, 0);

- strout ("#<save_value ", -1, -1, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- strout ("#<EMACS BUG: INVALID DATATYPE ", -1, -1, printcharfun, 0);

- strout (buf, -1, -1, printcharfun, 0);

- -1, -1, printcharfun, 0);

-do_scrolling (struct frame *frame, struct glyph_matrix *current_matrix, struct matrix_elt *matrix, int window_size, int unchanged_at_top)

-scrolling_max_lines_saved (int start, int end, int *oldhash, int *newhash, int *cost)

-line_ins_del (FRAME_PTR frame, int ov1, int pf1, int ovn, int pfn, register int *ov, register int *mf)

-static EMACS_INT boyer_moore (EMACS_INT, unsigned char *, EMACS_INT, EMACS_INT,

- Lisp_Object, Lisp_Object,

- EMACS_INT, EMACS_INT,

- EMACS_INT, EMACS_INT, int);

- len = raw_pattern_size;

- return boyer_moore (n, pat, len, len_byte, trt, inverse_trt,

- pos, pos_byte, lim, lim_byte,

- return simple_search (n, pat, len, len_byte, trt,

- whose length is LEN/LEN_BYTE,

- from buffer position POS/POS_BYTE until LIM/LIM_BYTE.

- EMACS_INT len, EMACS_INT len_byte,

- EMACS_INT pos, EMACS_INT pos_byte,

- EMACS_INT lim, EMACS_INT lim_byte, int char_base)

- /* A translation table is accompanied by its inverse -- see */

- /* comment following downcase_table for details */

- Lisp_Object rev_tbl;

- rev_tbl = Qnil;

-

- c = multibyte_char_to_unibyte (c, rev_tbl);

- c = multibyte_char_to_unibyte (c, rev_tbl);

- {

- HRESULT profile_result;

- /* Dynamically load ShGetFolderPath, as it won't exist on versions

- of Windows 95 and NT4 that have not been updated to include

- MSIE 5. */

- ShGetFolderPath_fn get_folder_path;

- get_folder_path = (ShGetFolderPath_fn)

- GetProcAddress (GetModuleHandle ("shell32.dll"), "SHGetFolderPathA");

-

- if (get_folder_path != NULL)

- {

- profile_result = get_folder_path (NULL, CSIDL_APPDATA, NULL,

- 0, default_home);

- /* If we can't get the appdata dir, revert to old behavior. */

- if (profile_result == S_OK)

- env_vars[0].def_value = default_home;

- }

- }

- {

- char name[ 256 ];

- DWORD serialnum;

- DWORD maxcomp;

- DWORD flags;

- char type[ 256 ];

-

- /* Info is not cached, or is stale. */

- if (!GetVolumeInformation (root_dir,

- name, sizeof (name),

- &serialnum,

- &maxcomp,

- &flags,

- type, sizeof (type)))

- return NULL;

- /* Cache the volume information for future use, overwriting existing

- entry if present. */

- if (info == NULL)

- {

- info = (volume_info_data *) xmalloc (sizeof (volume_info_data));

- add_volume_info (root_dir, info);

- }

- else

- {

- xfree (info->name);

- xfree (info->type);

- }

- info->name = xstrdup (name);

- info->serialnum = serialnum;

- info->maxcomp = maxcomp;

- info->flags = flags;

- info->type = xstrdup (type);

- info->timestamp = GetTickCount ();

- }

- WSAEINTR , "Interrupted function call",

- WSAEBADF , "Bad file descriptor",

- WSAEACCES , "Permission denied",

- WSAEFAULT , "Bad address",

- WSAEINVAL , "Invalid argument",

- WSAEMFILE , "Too many open files",

-

- WSAEWOULDBLOCK , "Resource temporarily unavailable",

- WSAEINPROGRESS , "Operation now in progress",

- WSAEALREADY , "Operation already in progress",

- WSAENOTSOCK , "Socket operation on non-socket",

- WSAEDESTADDRREQ , "Destination address required",

- WSAEMSGSIZE , "Message too long",

- WSAEPROTOTYPE , "Protocol wrong type for socket",

- WSAENOPROTOOPT , "Bad protocol option",

- WSAEPROTONOSUPPORT , "Protocol not supported",

- WSAESOCKTNOSUPPORT , "Socket type not supported",

- WSAEOPNOTSUPP , "Operation not supported",

- WSAEPFNOSUPPORT , "Protocol family not supported",

- WSAEAFNOSUPPORT , "Address family not supported by protocol family",

- WSAEADDRINUSE , "Address already in use",

- WSAEADDRNOTAVAIL , "Cannot assign requested address",

- WSAENETDOWN , "Network is down",

- WSAENETUNREACH , "Network is unreachable",

- WSAENETRESET , "Network dropped connection on reset",

- WSAECONNABORTED , "Software caused connection abort",

- WSAECONNRESET , "Connection reset by peer",

- WSAENOBUFS , "No buffer space available",

- WSAEISCONN , "Socket is already connected",

- WSAENOTCONN , "Socket is not connected",

- WSAESHUTDOWN , "Cannot send after socket shutdown",

- WSAETOOMANYREFS , "Too many references", /* not sure */

- WSAETIMEDOUT , "Connection timed out",

- WSAECONNREFUSED , "Connection refused",

- WSAELOOP , "Network loop", /* not sure */

- WSAENAMETOOLONG , "Name is too long",

- WSAEHOSTDOWN , "Host is down",

- WSAEHOSTUNREACH , "No route to host",

- WSAENOTEMPTY , "Buffer not empty", /* not sure */

- WSAEPROCLIM , "Too many processes",

- WSAEUSERS , "Too many users", /* not sure */

- WSAEDQUOT , "Double quote in host name", /* really not sure */

- WSAESTALE , "Data is stale", /* not sure */

- WSAEREMOTE , "Remote error", /* not sure */

-

- WSASYSNOTREADY , "Network subsystem is unavailable",

- WSAVERNOTSUPPORTED , "WINSOCK.DLL version out of range",

- WSANOTINITIALISED , "Winsock not initialized successfully",

- WSAEDISCON , "Graceful shutdown in progress",

- WSAENOMORE , "No more operations allowed", /* not sure */

- WSAECANCELLED , "Operation cancelled", /* not sure */

- WSAEINVALIDPROCTABLE , "Invalid procedure table from service provider",

- WSAEINVALIDPROVIDER , "Invalid service provider version number",

- WSAEPROVIDERFAILEDINIT , "Unable to initialize a service provider",

- WSASYSCALLFAILURE , "System call failure",

- WSASERVICE_NOT_FOUND , "Service not found", /* not sure */

- WSATYPE_NOT_FOUND , "Class type not found",

- WSA_E_NO_MORE , "No more resources available", /* really not sure */

- WSA_E_CANCELLED , "Operation already cancelled", /* really not sure */

- WSAEREFUSED , "Operation refused", /* not sure */

- WSAHOST_NOT_FOUND , "Host not found",

- WSATRY_AGAIN , "Authoritative host not found during name lookup",

- WSANO_RECOVERY , "Non-recoverable error during name lookup",

- WSANO_DATA , "Valid name, no data record of requested type",

- -1, NULL

-static int cursor_row_p (struct window *, struct glyph_row *);

-static const char *decode_mode_spec (struct window *, int, int, int,

- Lisp_Object *);

-/* Look for STRING in overlays and text properties in W's buffer,

- between character positions FROM and TO (excluding TO).

- W's buffer must be current.

-

-string_buffer_position_lim (struct window *w, Lisp_Object string,

-/* Determine which buffer position in W's buffer STRING comes from.

- W's buffer must be current.

-

-EMACS_INT

-string_buffer_position (struct window *w, Lisp_Object string, EMACS_INT around_charpos)

- EMACS_INT found = string_buffer_position_lim (w, string, around_charpos,

- found = string_buffer_position_lim (w, string, around_charpos,

- : multibyte_char_to_unibyte (c, Qnil));

- : multibyte_char_to_unibyte (c, Qnil));

- tem = string_buffer_position_lim (w, str, pos, pos_after, 0);

- && !cursor_row_p (w, row))

- && !cursor_row_p (w, row))

- && cursor_row_p (w, row))

- && cursor_row_p (w, row));

-/* Value is non-zero if glyph row ROW in window W should be

-cursor_row_p (struct window *w, struct glyph_row *row)

- && cursor_row_p (it->w, row))

- spec = decode_mode_spec (it->w, c, field, prec, &string);

- generated by character C. PRECISION >= 0 means don't return a

- string longer than that value. FIELD_WIDTH > 0 means pad the

- string returned with spaces to that value. Return a Lisp string in

- int precision, Lisp_Object *string)

- pos = string_buffer_position (w, before_string,

- pos = string_buffer_position (w, after_string, end_charpos);

- pos = string_buffer_position (w, before_string, start_charpos);

- pos = string_buffer_position (w, after_string, end_charpos);

- pos = string_buffer_position (w, before_string, start_charpos);

- pos = string_buffer_position (w, after_string, end_charpos);

- pos = string_buffer_position (w, before_string, start_charpos);

- pos = string_buffer_position (w, after_string, end_charpos);

- pos = string_buffer_position (w, object, start);

- EMACS_INT p = string_buffer_position (w, obj, start);

- EMACS_INT p = string_buffer_position (w, obj, start);