Mercurial > emacs

annotate src/w32inevt.h @ 61403:008bb0675c5b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(readevalloop): Add args START and END as region in current buffer to read. Callers changed. When specified, narrow to this region only when reading, not during eval. Track next point to read from during eval. Also restore point to "real" buffer position before eval. (Feval_region): Don't save excursion and restriction here, and don't narrow to region. Just pass region to readevalloop. Note: Point is now preserved even when PRINTFLAG is nil.
author Kim F. Storm <storm@cua.dk>
date Fri, 08 Apr 2005 23:33:28 +0000
parents 9f3ff0d515be
children a8fa7c632ee4
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
16886
c686d4f3728a Change all uses of win95, winnt, and win32 into Windows 95, Windows
Geoff Voelker <voelker@cs.washington.edu>
parents: 16588
diff changeset
1 /* Input routines for GNU Emacs on the Microsoft W32 API.
11387
b2d5260a5da0 Fixed function prototypes.
Karl Heuer <kwzh@gnu.org>
parents: 11378
diff changeset
2 Copyright (C) 1995 Free Software Foundation, Inc.
b2d5260a5da0 Fixed function prototypes.
Karl Heuer <kwzh@gnu.org>
parents: 11378
diff changeset
3
14186
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11387
diff changeset
4 This file is part of GNU Emacs.
11387
b2d5260a5da0 Fixed function prototypes.
Karl Heuer <kwzh@gnu.org>
parents: 11378
diff changeset
5
14186
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11387
diff changeset
6 GNU Emacs is free software; you can redistribute it and/or modify
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11387
diff changeset
7 it under the terms of the GNU General Public License as published by
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11387
diff changeset
8 the Free Software Foundation; either version 2, or (at your option)
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11387
diff changeset
9 any later version.
11387
b2d5260a5da0 Fixed function prototypes.
Karl Heuer <kwzh@gnu.org>
parents: 11378
diff changeset
10
14186
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11387
diff changeset
11 GNU Emacs is distributed in the hope that it will be useful,
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11387
diff changeset
12 but WITHOUT ANY WARRANTY; without even the implied warranty of
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11387
diff changeset
13 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11387
diff changeset
14 GNU General Public License for more details.
11387
b2d5260a5da0 Fixed function prototypes.
Karl Heuer <kwzh@gnu.org>
parents: 11378
diff changeset
15
14186
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11387
diff changeset
16 You should have received a copy of the GNU General Public License
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11387
diff changeset
17 along with GNU Emacs; see the file COPYING. If not, write to
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11387
diff changeset
18 the Free Software Foundation, Inc., 59 Temple Place - Suite 330,
ee40177f6c68 Update FSF's address in the preamble.
Erik Naggum <erik@naggum.no>
parents: 11387
diff changeset
19 Boston, MA 02111-1307, USA. */
11387
b2d5260a5da0 Fixed function prototypes.
Karl Heuer <kwzh@gnu.org>
parents: 11378
diff changeset
20
29606
f16690808171 *** empty log message ***
Jason Rumney <jasonr@gnu.org>
parents: 21830
diff changeset
21 #ifndef EMACS_W32INEVT_H
f16690808171 *** empty log message ***
Jason Rumney <jasonr@gnu.org>
parents: 21830
diff changeset
22 #define EMACS_W32INEVT_H
11378
9020ac98e9d3 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
23
54170
9f3ff0d515be (w32_console_mouse_position): Fix prototype.
Kim F. Storm <storm@cua.dk>
parents: 52401
diff changeset
24 extern int w32_console_read_socket (int sd, int numchars,
9f3ff0d515be (w32_console_mouse_position): Fix prototype.
Kim F. Storm <storm@cua.dk>
parents: 52401
diff changeset
25 struct input_event *hold_quit);
49600
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 29606
diff changeset
26 extern void w32_console_mouse_position (FRAME_PTR *f, int insist,
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 29606
diff changeset
27 Lisp_Object *bar_window,
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 29606
diff changeset
28 enum scroll_bar_part *part,
23a1cea22d13 Trailing whitespace deleted.
Juanma Barranquero <lekktu@gmail.com>
parents: 29606
diff changeset
29 Lisp_Object *x, Lisp_Object *y,
21830
56104212fe5c (w32_console_mouse_position, w32_console_read_socket):
Geoff Voelker <voelker@cs.washington.edu>
parents: 16886
diff changeset
30 unsigned long *time);
11378
9020ac98e9d3 Initial revision
Karl Heuer <kwzh@gnu.org>
parents:
diff changeset
31
29606
f16690808171 *** empty log message ***
Jason Rumney <jasonr@gnu.org>
parents: 21830
diff changeset
32 #endif /* EMACS_W32INEVT_H */
52401
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
33
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
34 /* arch-tag: 7641bd54-199f-4552-8e8a-6a2f5340ef13
695cf19ef79e Add arch taglines
Miles Bader <miles@gnu.org>
parents: 49600
diff changeset
35 (do not change this comment) */