annotate netinstall/win32.h @ 5067:7d7ae8db0341

add functions `stable-union' and `stable-intersection' to do stable set operations -------------------- ChangeLog entries follow: -------------------- lisp/ChangeLog addition: 2010-02-22 Ben Wing <ben@xemacs.org> * cl-seq.el: * cl-seq.el (stable-union): New. * cl-seq.el (stable-intersection): New. New functions to do stable set operations, i.e. preserve the order of the elements in the argument lists, and prefer LIST1 over LIST2 when ordering the combined result. The result looks as much like LIST1 as possible, followed (in the case of `stable-union') by any necessary elements from LIST2, in order. This is contrary to `union' and `intersection', which are not required to be order- preserving and are not -- they prefer LIST2 and output results in backwards order.
author Ben Wing <ben@xemacs.org>
date Mon, 22 Feb 2010 21:23:02 -0600
parents a307f9a2021d
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
448
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
1 /*
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
2 * Copyright (c) 2000, Red Hat, Inc.
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
3 *
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
4 * This program is free software; you can redistribute it and/or modify
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
5 * it under the terms of the GNU General Public License as published by
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
6 * the Free Software Foundation; either version 2 of the License, or
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
7 * (at your option) any later version.
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
8 *
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
9 * A copy of the GNU General Public License can be found at
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
10 * http://www.gnu.org/
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
11 *
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
12 * Written by DJ Delorie <dj@cygnus.com>
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
13 *
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
14 */
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
15
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
16 /* The purpose of this file is to limit the number of Win32 headers we
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
17 actually have to parse. The Setup program only uses a few of them,
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
18 so there's no point in parsing them all (even lean-n-mean). Doing
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
19 this cuts compile time in half. */
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
20
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
21 #ifndef _MINI_WIN32_
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
22 #define _MINI_WIN32_
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
23
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
24 #define NOCOMATTRIBUTE
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
25
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
26 /* Cope with native win32 & mingw differences. Written by F. Popineau
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
27 <Fabrice.Popineau@supelec.fr> */
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
28 #ifdef WIN32_NATIVE
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
29 # pragma warning( disable : 4007 4096 4018 4244 )
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
30 # define strdup _strdup
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
31 # define stat _stat
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
32 # define strnicmp _strnicmp
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
33 #endif
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
34
707
a307f9a2021d [xemacs-hg @ 2001-12-20 05:49:28 by andyp]
andyp
parents: 657
diff changeset
35 #include <stdarg.h>
a307f9a2021d [xemacs-hg @ 2001-12-20 05:49:28 by andyp]
andyp
parents: 657
diff changeset
36
a307f9a2021d [xemacs-hg @ 2001-12-20 05:49:28 by andyp]
andyp
parents: 657
diff changeset
37 #define WIN32_LEAN_AND_MEAN
a307f9a2021d [xemacs-hg @ 2001-12-20 05:49:28 by andyp]
andyp
parents: 657
diff changeset
38 #include <windows.h>
a307f9a2021d [xemacs-hg @ 2001-12-20 05:49:28 by andyp]
andyp
parents: 657
diff changeset
39
a307f9a2021d [xemacs-hg @ 2001-12-20 05:49:28 by andyp]
andyp
parents: 657
diff changeset
40 #include <wininet.h>
a307f9a2021d [xemacs-hg @ 2001-12-20 05:49:28 by andyp]
andyp
parents: 657
diff changeset
41 #include <windowsx.h>
a307f9a2021d [xemacs-hg @ 2001-12-20 05:49:28 by andyp]
andyp
parents: 657
diff changeset
42
448
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
43 #ifndef CDECL
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
44 #define CDECL __cdecl
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
45 #endif
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
46
3078fd1074e8 Import from CVS: tag r21-2-39
cvs
parents:
diff changeset
47 #endif /* _MINI_WIN32_ */