aboutsummaryrefslogtreecommitdiffstats
path: root/admin
diff options
context:
space:
mode:
authorJuanma Barranquero2003-02-04 14:56:31 +0000
committerJuanma Barranquero2003-02-04 14:56:31 +0000
commit177c0ea74342272645959b82cf219faa0b3dba16 (patch)
tree44e22b210a9904eab25a66d12e708804b671df75 /admin
parentdb95369be096960245dd38678f68464627698678 (diff)
downloademacs-177c0ea74342272645959b82cf219faa0b3dba16.tar.gz
emacs-177c0ea74342272645959b82cf219faa0b3dba16.zip
Trailing whitespace deleted.
Diffstat (limited to 'admin')
-rw-r--r--admin/alloc-colors.c4
-rwxr-xr-xadmin/build-configs4
-rw-r--r--admin/emacs-pretesters16
-rwxr-xr-xadmin/make-emacs6
-rw-r--r--admin/nt/README-ftp-server4
-rwxr-xr-xadmin/revdiff28
6 files changed, 31 insertions, 31 deletions
diff --git a/admin/alloc-colors.c b/admin/alloc-colors.c
index d293007bb7b..4be2038ef1c 100644
--- a/admin/alloc-colors.c
+++ b/admin/alloc-colors.c
@@ -60,7 +60,7 @@ main (int argc, char **argv)
60 case 'n': 60 case 'n':
61 ncolors = atoi (optarg); 61 ncolors = atoi (optarg);
62 break; 62 break;
63 63
64 case '?': 64 case '?':
65 usage (argv[0]); 65 usage (argv[0]);
66 } 66 }
@@ -98,7 +98,7 @@ main (int argc, char **argv)
98 ++nallocated; 98 ++nallocated;
99 } 99 }
100 } 100 }
101 101
102 ++color.red; 102 ++color.red;
103 ++color.green; 103 ++color.green;
104 ++color.blue; 104 ++color.blue;
diff --git a/admin/build-configs b/admin/build-configs
index 5827276bf5e..06ea9cb2875 100755
--- a/admin/build-configs
+++ b/admin/build-configs
@@ -80,14 +80,14 @@ foreach $config (@configs)
80 unlink "config.cache"; 80 unlink "config.cache";
81 81
82 $rc = system ("$root/configure $configure_options >>$log 2>&1"); 82 $rc = system ("$root/configure $configure_options >>$log 2>&1");
83 if ($rc != 0) 83 if ($rc != 0)
84 { 84 {
85 print "configure failed\n"; 85 print "configure failed\n";
86 exit 1; 86 exit 1;
87 } 87 }
88 88
89 $rc = system ("make-emacs --all $make_options >>$log 2>&1"); 89 $rc = system ("make-emacs --all $make_options >>$log 2>&1");
90 if ($rc != 0) 90 if ($rc != 0)
91 { 91 {
92 print "Make failed\n"; 92 print "Make failed\n";
93 exit 1; 93 exit 1;
diff --git a/admin/emacs-pretesters b/admin/emacs-pretesters
index 05ce8f40bde..10ab3fd0da6 100644
--- a/admin/emacs-pretesters
+++ b/admin/emacs-pretesters
@@ -173,7 +173,7 @@ of function calling.
173 173
174By printing the remaining elements of args, you can see the argument 174By printing the remaining elements of args, you can see the argument
175values. Here's how to print the first argument: 175values. Here's how to print the first argument:
176 176
177 p args[1] 177 p args[1]
178 pr 178 pr
179 179
@@ -194,7 +194,7 @@ First, use these commands:
194 cd src 194 cd src
195 gdb emacs 195 gdb emacs
196 b xmenu.c:1209 196 b xmenu.c:1209
197 r -q 197 r -q
198 198
199Then type C-x 5 2 to create a new frame, and it hits the breakpoint: 199Then type C-x 5 2 to create a new frame, and it hits the breakpoint:
200 200
@@ -207,9 +207,9 @@ Then type C-x 5 2 to create a new frame, and it hits the breakpoint:
207 $2 = (struct frame *) 0x3f0800 207 $2 = (struct frame *) 0x3f0800
208 (gdb) p *$ 208 (gdb) p *$
209 $3 = { 209 $3 = {
210 size = 536871989, 210 size = 536871989,
211 next = 0x366240, 211 next = 0x366240,
212 name = 809661752, 212 name = 809661752,
213 [...] 213 [...]
214 } 214 }
215 (gdb) p $3->name 215 (gdb) p $3->name
@@ -258,7 +258,7 @@ this vector. `recent_keys' is updated in keyboard.c by the command
258 XVECTOR (recent_keys)->contents[recent_keys_index] = c; 258 XVECTOR (recent_keys)->contents[recent_keys_index] = c;
259 259
260So we define a GDB command `xvector-elts', so the last 10 keystrokes 260So we define a GDB command `xvector-elts', so the last 10 keystrokes
261are printed by 261are printed by
262 262
263 xvector-elts recent_keys recent_keys_index 10 263 xvector-elts recent_keys recent_keys_index 10
264 264
@@ -270,7 +270,7 @@ where you can define xvector-elts as follows:
270 xvector 270 xvector
271 set $foo = $ 271 set $foo = $
272 while $i < $arg2 272 while $i < $arg2
273 p $foo->contents[$arg1-($i++)] 273 p $foo->contents[$arg1-($i++)]
274 pr 274 pr
275 end 275 end
276 document xvector-elts 276 document xvector-elts
@@ -339,7 +339,7 @@ configure makes a mistake. But note that config.cache reads:
339 339
340# Giving --cache-file=/dev/null disables caching, for debugging configure. 340# Giving --cache-file=/dev/null disables caching, for debugging configure.
341 341
342or more simply, 342or more simply,
343 343
344rm config.cache 344rm config.cache
345./configure 345./configure
diff --git a/admin/make-emacs b/admin/make-emacs
index ac9d9d763d2..fa7310ce94d 100755
--- a/admin/make-emacs
+++ b/admin/make-emacs
@@ -111,7 +111,7 @@ if (@ARGV && $ARGV[0] eq "all")
111 111
112system ("$make clean versionclean") if $all; 112system ("$make clean versionclean") if $all;
113 113
114if ($wall) 114if ($wall)
115 { 115 {
116 $warn = "-Wall"; 116 $warn = "-Wall";
117 } 117 }
@@ -125,14 +125,14 @@ $defs = "-DGLYPH_DEBUG=1" unless $optim;
125$defs = "$defs -DGC_CHECK_MARKED_OBJECTS=1" if $check_marked; 125$defs = "$defs -DGC_CHECK_MARKED_OBJECTS=1" if $check_marked;
126$defs = "$defs -DENABLE_CHECKING=1" if $enable_checking; 126$defs = "$defs -DENABLE_CHECKING=1" if $enable_checking;
127 127
128if ($profile) 128if ($profile)
129 { 129 {
130 $opts = "-pg"; 130 $opts = "-pg";
131 $defs = "$defs -DPROFILING=1"; 131 $defs = "$defs -DPROFILING=1";
132 } 132 }
133else 133else
134 { 134 {
135 if ($use_stabs) 135 if ($use_stabs)
136 { 136 {
137 $opts = "-gstabs"; 137 $opts = "-gstabs";
138 } 138 }
diff --git a/admin/nt/README-ftp-server b/admin/nt/README-ftp-server
index 29f8e36d340..20b8e9f87cf 100644
--- a/admin/nt/README-ftp-server
+++ b/admin/nt/README-ftp-server
@@ -4,7 +4,7 @@
4 Version 20.7 4 Version 20.7
5 5
6 June 13, 2000 6 June 13, 2000
7 7
8 This directory contains source and precompiled distributions for GNU 8 This directory contains source and precompiled distributions for GNU
9 Emacs on Windows NT and Windows 95/98/2000. This port is a part of 9 Emacs on Windows NT and Windows 95/98/2000. This port is a part of
10 the standard GNU Emacs distribution from the Free Software Foundation; 10 the standard GNU Emacs distribution from the Free Software Foundation;
@@ -116,7 +116,7 @@
116* Unpacking distributions 116* Unpacking distributions
117 117
118 Programs for handling the distribution file formats can be found in 118 Programs for handling the distribution file formats can be found in
119 the utilities directory: 119 the utilities directory:
120 120
121 ftp://ftp.gnu.org/gnu/windows/emacs/utilities 121 ftp://ftp.gnu.org/gnu/windows/emacs/utilities
122 122
diff --git a/admin/revdiff b/admin/revdiff
index f145da19c4a..416c572d196 100755
--- a/admin/revdiff
+++ b/admin/revdiff
@@ -21,11 +21,11 @@
21 21
22use File::Basename; 22use File::Basename;
23 23
24if (@ARGV < 3) 24if (@ARGV < 3)
25{ 25{
26 print <<USAGE; 26 print <<USAGE;
27revdiff FILE OLD NEW 27revdiff FILE OLD NEW
28 28
29Get a diff of FILE between revisions OLD and NEW. Store the 29Get a diff of FILE between revisions OLD and NEW. Store the
30diff in a file named FILE-OLD-NEW.diff. 30diff in a file named FILE-OLD-NEW.diff.
31 31
@@ -48,7 +48,7 @@ USAGE
48$file = shift @ARGV; 48$file = shift @ARGV;
49$old = shift @ARGV; 49$old = shift @ARGV;
50 50
51sub diffit 51sub diffit
52{ 52{
53 my ($old, $new) = @_; 53 my ($old, $new) = @_;
54 print "cvs diff -r$old -r$new $file >$file-$old-$new.diff\n"; 54 print "cvs diff -r$old -r$new $file >$file-$old-$new.diff\n";
@@ -64,9 +64,9 @@ sub current_revision ($)
64 die "Can't find $entries" unless -f $entries; 64 die "Can't find $entries" unless -f $entries;
65 open (IN, "<$entries") or die "Cannot open $entries"; 65 open (IN, "<$entries") or die "Cannot open $entries";
66 my $rev; 66 my $rev;
67 while ($line = <IN>) 67 while ($line = <IN>)
68 { 68 {
69 if ($line =~ m,/$base/([^/]+),) 69 if ($line =~ m,/$base/([^/]+),)
70 { 70 {
71 $rev = $1; 71 $rev = $1;
72 break; 72 break;
@@ -81,7 +81,7 @@ if ($old eq "-")
81 { 81 {
82 $old = current_revision ($file); 82 $old = current_revision ($file);
83 } 83 }
84elsif ($old =~ /^-(\d+)$/) 84elsif ($old =~ /^-(\d+)$/)
85 { 85 {
86 my $offset = $1; 86 my $offset = $1;
87 $old = current_revision ($file); 87 $old = current_revision ($file);
@@ -90,15 +90,15 @@ elsif ($old =~ /^-(\d+)$/)
90 $old = sprintf ("%d.%d", $1, $minor); 90 $old = sprintf ("%d.%d", $1, $minor);
91 } 91 }
92 92
93while (@ARGV) 93while (@ARGV)
94 { 94 {
95 my $new = shift @ARGV; 95 my $new = shift @ARGV;
96 if ($new =~ /^[+]\d+$/) 96 if ($new =~ /^[+]\d+$/)
97 { 97 {
98 my $n = $new; 98 my $n = $new;
99 for ($i = 0; $i < $n; ++$i) 99 for ($i = 0; $i < $n; ++$i)
100 { 100 {
101 unless ($old =~ /(.*)\.(\d+)$/) 101 unless ($old =~ /(.*)\.(\d+)$/)
102 { 102 {
103 die "Internal error"; 103 die "Internal error";
104 } 104 }
@@ -107,13 +107,13 @@ while (@ARGV)
107 diffit ($old, $new); 107 diffit ($old, $new);
108 $old = $new; 108 $old = $new;
109 } 109 }
110 } 110 }
111 elsif ($new =~ /^[-]\d+$/) 111 elsif ($new =~ /^[-]\d+$/)
112 { 112 {
113 my $n = - $new; 113 my $n = - $new;
114 for ($i = 0; $i < $n; ++$i) 114 for ($i = 0; $i < $n; ++$i)
115 { 115 {
116 unless ($old =~ /(.*)\.(\d+)$/) 116 unless ($old =~ /(.*)\.(\d+)$/)
117 { 117 {
118 die "Internal error"; 118 die "Internal error";
119 } 119 }
@@ -123,7 +123,7 @@ while (@ARGV)
123 $old = $new; 123 $old = $new;
124 } 124 }
125 } 125 }
126 else 126 else
127 { 127 {
128 diffit ($old, $new); 128 diffit ($old, $new);
129 $old = $new; 129 $old = $new;