annotate src/s/hpux10-20.h @ 112361:116a3428737d

* xdisp.c (emacs_scroll_step): Rename from scroll_step. (try_scrolling): Rename argument to 'arg_scroll_conservatively'. (redisplay_window): Update. (syms_of_xdisp): Update.
author Tom Tromey <tromey@redhat.com>
date Tue, 18 Jan 2011 10:34:08 -0700
parents 61f7601898b1
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
96303
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
1 /* System description file for hpux version 10.20.
112284
61f7601898b1 Refill some copyright headers.
Glenn Morris <rgm@gnu.org>
parents: 112278
diff changeset
2
61f7601898b1 Refill some copyright headers.
Glenn Morris <rgm@gnu.org>
parents: 112278
diff changeset
3 Copyright (C) 1999, 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008,
61f7601898b1 Refill some copyright headers.
Glenn Morris <rgm@gnu.org>
parents: 112278
diff changeset
4 2009, 2010, 2011 Free Software Foundation, Inc.
96303
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
5
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
6 This file is part of GNU Emacs.
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
7
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
8 GNU Emacs is free software: you can redistribute it and/or modify
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
9 it under the terms of the GNU General Public License as published by
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
10 the Free Software Foundation, either version 3 of the License, or
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
11 (at your option) any later version.
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
12
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
13 GNU Emacs is distributed in the hope that it will be useful,
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
14 but WITHOUT ANY WARRANTY; without even the implied warranty of
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
15 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
16 GNU General Public License for more details.
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
17
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
18 You should have received a copy of the GNU General Public License
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
19 along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
20
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
21
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
22 #define RUN_TIME_REMAP
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
23
108511
f8e62c2bf3e9 Reformat some comments in src/s/*.h.
Glenn Morris <rgm@gnu.org>
parents: 108382
diff changeset
24 /* Define symbols to identify the version of Unix this is.
f8e62c2bf3e9 Reformat some comments in src/s/*.h.
Glenn Morris <rgm@gnu.org>
parents: 108382
diff changeset
25 Define all the symbols that apply correctly. */
96303
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
26 #define USG /* System III, System V, etc */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
27 #define USG5
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
28 #define HPUX
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
29
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
30 /* SYSTEM_TYPE should indicate the kind of system you are using.
108511
f8e62c2bf3e9 Reformat some comments in src/s/*.h.
Glenn Morris <rgm@gnu.org>
parents: 108382
diff changeset
31 It sets the Lisp variable system-type. */
96303
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
32 #define SYSTEM_TYPE "hpux"
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
33
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
34 /* Letter to use in finding device name of first pty,
108511
f8e62c2bf3e9 Reformat some comments in src/s/*.h.
Glenn Morris <rgm@gnu.org>
parents: 108382
diff changeset
35 if system supports pty's. 'p' means it is /dev/ptym/ptyp0 */
96303
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
36 #define FIRST_PTY_LETTER 'p'
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
37
109916
fef8d4c0b9d4 * src/s/hpux10-20.h (HAVE_TERMIOS, NO_TERMIO, ORDINARY_LINK): New
Dan Nicolaescu <dann@ics.uci.edu>
parents: 106815
diff changeset
38 #define NO_TERMIO
96303
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
39
108511
f8e62c2bf3e9 Reformat some comments in src/s/*.h.
Glenn Morris <rgm@gnu.org>
parents: 108382
diff changeset
40 /* Define HAVE_PTYS if the system supports pty devices. */
96303
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
41 #define HAVE_PTYS
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
42
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
43 /* Define HAVE_SOCKETS if system supports 4.2-compatible sockets. */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
44 #define HAVE_SOCKETS
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
45
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
46 /* Define CLASH_DETECTION if you want lock files to be written
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
47 so that Emacs can tell instantly when you try to modify
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
48 a file that someone else has modified in his Emacs. */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
49 #define CLASH_DETECTION
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
50
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
51 /* The symbol in the kernel where the load average is found
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
52 depends on the cpu type, so we let the m- files define LDAV_SYMBOL. */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
53
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
54 /* Special hacks needed to make Emacs run on this system. */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
55
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
56 /* In hpux, the symbol SIGIO is defined, but the feature
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
57 doesn't work in the way Emacs needs it to. */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
58 #define BROKEN_SIGIO
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
59
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
60 /* Some additional system facilities exist. */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
61 #define HAVE_PERROR /* Delete this line for version 6. */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
62
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
63 /* This is how to get the device name of the tty end of a pty. */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
64 #define PTY_TTY_NAME_SPRINTF \
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
65 sprintf (pty_name, "/dev/pty/tty%c%x", c, i);
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
66
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
67 /* This is how to get the device name of the control end of a pty. */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
68 #define PTY_NAME_SPRINTF \
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
69 sprintf (pty_name, "/dev/ptym/pty%c%x", c, i);
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
70
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
71 /* This triggers a conditional in xfaces.c. */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
72 #define XOS_NEEDS_TIME_H
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
73
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
74 /* Assar Westerlund <assar@sics.se> says this is necessary for
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
75 HP-UX 10.20, and that it works for HP-UX 0 as well. */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
76 #define NO_EDITRES
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
77
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
78 /* Eric Backus <ericb@lsid.hp.com> says, HP-UX 9.x on HP 700 machines
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
79 has a broken `rint' in some library versions including math library
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
80 version number A.09.05.
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
81
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
82 You can fix the math library by installing patch number PHSS_4630.
108511
f8e62c2bf3e9 Reformat some comments in src/s/*.h.
Glenn Morris <rgm@gnu.org>
parents: 108382
diff changeset
83 But we can fix it more reliably for Emacs like this. */
96303
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
84 #undef HAVE_RINT
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
85
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
86 /* We have to go this route, rather than hpux9's approach of renaming the
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
87 functions via macros. The system's stdlib.h has fully prototyped
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
88 declarations, which yields a conflicting definition of srand48; it
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
89 tries to redeclare what was once srandom to be srand48. So we go
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
90 with HAVE_LRAND48 being defined. */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
91 #undef srandom
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
92 #undef random
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
93 #undef HAVE_RANDOM
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
94
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
95 /* AlainF 20-Jul-1996 says this is right. */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
96 #define KERNEL_FILE "/stand/vmunix"
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
97
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
98
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
99 /* Rainer Malzbender <rainer@displaytech.com> says definining
108511
f8e62c2bf3e9 Reformat some comments in src/s/*.h.
Glenn Morris <rgm@gnu.org>
parents: 108382
diff changeset
100 HAVE_XRMSETDATABASE allows Emacs to compile on HP-UX 10.20 using GCC. */
96303
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
101 #ifndef HAVE_XRMSETDATABASE
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
102 #define HAVE_XRMSETDATABASE
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
103 #endif
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
104
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
105 /* 2000-11-21: Temporarily disable Unix 98 large file support found by
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
106 configure. It fails on HPUX 11, at least, because it enables
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
107 header sections which lose when `static' is defined away, as it is
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
108 on HP-UX. (You get duplicate symbol errors on linking). */
ddedcecb18ef * unexnext.c:
Dan Nicolaescu <dann@ics.uci.edu>
parents: 52401
diff changeset
109 #undef _FILE_OFFSET_BITS
49891
a8c3025eb05a New file.
Juanma Barranquero <lekktu@gmail.com>
parents:
diff changeset
110
108032
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
111 /* Define VIRT_ADDR_VARIES if the virtual addresses of
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
112 pure and impure space as loaded can vary, and even their
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
113 relative order cannot be relied on.
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
114
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
115 Otherwise Emacs assumes that text space precedes data space,
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
116 numerically. */
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
117 #define VIRT_ADDR_VARIES
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
118
108511
f8e62c2bf3e9 Reformat some comments in src/s/*.h.
Glenn Morris <rgm@gnu.org>
parents: 108382
diff changeset
119 /* The data segment on this machine always starts at address 0x40000000. */
108032
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
120 #define DATA_SEG_BITS 0x40000000
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
121
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
122 #define DATA_START 0x40000000
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
123
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
124 /* Data type of load average, as read out of kmem. */
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
125 #define LOAD_AVE_TYPE double
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
126
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
127 /* Convert that into an integer that is 100 for a load average of 1.0 */
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
128 #define LOAD_AVE_CVT(x) ((int) (x * 100.0))
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
129
108511
f8e62c2bf3e9 Reformat some comments in src/s/*.h.
Glenn Morris <rgm@gnu.org>
parents: 108382
diff changeset
130 /* The kernel symbol where the load average is found is named _avenrun.
f8e62c2bf3e9 Reformat some comments in src/s/*.h.
Glenn Morris <rgm@gnu.org>
parents: 108382
diff changeset
131 At this time there are two major flavors of hp-ux (there is the s800
f8e62c2bf3e9 Reformat some comments in src/s/*.h.
Glenn Morris <rgm@gnu.org>
parents: 108382
diff changeset
132 and s300 (s200) flavors). The differences are thusly moved to the
f8e62c2bf3e9 Reformat some comments in src/s/*.h.
Glenn Morris <rgm@gnu.org>
parents: 108382
diff changeset
133 corresponding machine description file. */
108032
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
134
108511
f8e62c2bf3e9 Reformat some comments in src/s/*.h.
Glenn Morris <rgm@gnu.org>
parents: 108382
diff changeset
135 /* No underscore please. */
108032
9e4618c4ed12 Clean up HP-UX files.
Dan Nicolaescu <dann@ics.uci.edu>
parents: 108017
diff changeset
136 #define LDAV_SYMBOL "avenrun"
49891
a8c3025eb05a New file.
Juanma Barranquero <lekktu@gmail.com>
parents:
diff changeset
137