diff options
| author | Joakim Verona | 2012-06-13 18:00:21 +0200 |
|---|---|---|
| committer | Joakim Verona | 2012-06-13 18:00:21 +0200 |
| commit | 13d6898b0656b38da837261ec20a055a1be4a7e5 (patch) | |
| tree | b3399abf9cbea221b083b5bd8368915169b02fb1 /admin | |
| parent | 5259b41aab32e82ff06d977877f2e456541b3c0b (diff) | |
| parent | 8cca97031d60136b3bdebef0d978ee3fe40eddec (diff) | |
| download | emacs-13d6898b0656b38da837261ec20a055a1be4a7e5.tar.gz emacs-13d6898b0656b38da837261ec20a055a1be4a7e5.zip | |
upstream, doesn build yet
Diffstat (limited to 'admin')
| -rw-r--r-- | admin/CPP-DEFINES | 3 | ||||
| -rw-r--r-- | admin/ChangeLog | 16 | ||||
| -rw-r--r-- | admin/admin.el | 52 | ||||
| -rwxr-xr-x | admin/make-emacs | 6 | ||||
| -rw-r--r-- | admin/make-tarball.txt | 8 | ||||
| -rwxr-xr-x | admin/quick-install-emacs | 4 |
6 files changed, 60 insertions, 29 deletions
diff --git a/admin/CPP-DEFINES b/admin/CPP-DEFINES index 94bb94357b9..35de784f852 100644 --- a/admin/CPP-DEFINES +++ b/admin/CPP-DEFINES | |||
| @@ -46,7 +46,7 @@ HAVE_PROCFS The /proc filesystem is supported. | |||
| 46 | REL_ALLOC Compile in the relocatable memory allocator ralloc.c. | 46 | REL_ALLOC Compile in the relocatable memory allocator ralloc.c. |
| 47 | SYSTEM_MALLOC Use the system library's malloc. | 47 | SYSTEM_MALLOC Use the system library's malloc. |
| 48 | subprocesses System can use subprocesses (for M-x shell for example). Defined by default, only MSDOS undefines it. | 48 | subprocesses System can use subprocesses (for M-x shell for example). Defined by default, only MSDOS undefines it. |
| 49 | USE_LISP_UNION_TYPE Define it in lisp.h to make Lisp_Object be a union type instead of the default int. | 49 | DEBUG_LISP_OBJECT_TYPE Define it in lisp.h enable compile time checks on Lisp_Object use. |
| 50 | 50 | ||
| 51 | ** System specific macros, described in detail in src/s/template.h | 51 | ** System specific macros, described in detail in src/s/template.h |
| 52 | CLASH_DETECTION | 52 | CLASH_DETECTION |
| @@ -156,7 +156,6 @@ HAVE_STRERROR | |||
| 156 | HAVE_STRFTIME | 156 | HAVE_STRFTIME |
| 157 | HAVE_STRING_H | 157 | HAVE_STRING_H |
| 158 | HAVE_STRUCT_UTIMBUF | 158 | HAVE_STRUCT_UTIMBUF |
| 159 | HAVE_SYSV_SIGPAUSE | ||
| 160 | HAVE_SYS_SELECT_H | 159 | HAVE_SYS_SELECT_H |
| 161 | HAVE_SYS_SYSTEMINFO_H | 160 | HAVE_SYS_SYSTEMINFO_H |
| 162 | HAVE_SYS_TIMEB_H | 161 | HAVE_SYS_TIMEB_H |
diff --git a/admin/ChangeLog b/admin/ChangeLog index 0c3bbf93873..e3b35906ace 100644 --- a/admin/ChangeLog +++ b/admin/ChangeLog | |||
| @@ -1,3 +1,19 @@ | |||
| 1 | 2012-06-13 Andreas Schwab <schwab@linux-m68k.org> | ||
| 2 | |||
| 3 | * make-emacs: Rename --union-type to --check-lisp-type. Define | ||
| 4 | CHECK_LISP_OBJECT_TYPE insted of USE_LISP_UNION_TYPE. | ||
| 5 | * CPP-DEFINES (DEBUG_LISP_OBJECT_TYPE): Renamed from | ||
| 6 | USE_LISP_UNION_TYPE. | ||
| 7 | |||
| 8 | 2012-06-03 Glenn Morris <rgm@gnu.org> | ||
| 9 | |||
| 10 | * quick-install-emacs (PUBLIC_LIBSRC_SCRIPTS): Remove rcs-checkin. | ||
| 11 | |||
| 12 | 2012-06-01 Paul Eggert <eggert@cs.ucla.edu> | ||
| 13 | |||
| 14 | Remove --disable-maintainer-mode option from 'configure'. (Bug#11555) | ||
| 15 | * make-tarball.txt: Don't worry about maintainer mode. | ||
| 16 | |||
| 1 | 2012-05-28 Paul Eggert <eggert@cs.ucla.edu> | 17 | 2012-05-28 Paul Eggert <eggert@cs.ucla.edu> |
| 2 | 18 | ||
| 3 | * CPP-DEFINES: Remove HAVE_SYSINFO. | 19 | * CPP-DEFINES: Remove HAVE_SYSINFO. |
diff --git a/admin/admin.el b/admin/admin.el index 27b2b3ab648..9fcc5795d21 100644 --- a/admin/admin.el +++ b/admin/admin.el | |||
| @@ -240,7 +240,7 @@ Root must be the root of an Emacs source tree." | |||
| 240 | (manual-txt texi (expand-file-name "emacs.txt" txt-dir)) | 240 | (manual-txt texi (expand-file-name "emacs.txt" txt-dir)) |
| 241 | (manual-pdf texi (expand-file-name "emacs.pdf" dest)) | 241 | (manual-pdf texi (expand-file-name "emacs.pdf" dest)) |
| 242 | (manual-dvi texi (expand-file-name "emacs.dvi" dvi-dir) | 242 | (manual-dvi texi (expand-file-name "emacs.dvi" dvi-dir) |
| 243 | (expand-file-name "emacs.ps" ps-dir))) | 243 | (expand-file-name "emacs.ps" ps-dir))) |
| 244 | ;; Lisp manual | 244 | ;; Lisp manual |
| 245 | (let ((texi (expand-file-name "doc/lispref/elisp.texi" root))) | 245 | (let ((texi (expand-file-name "doc/lispref/elisp.texi" root))) |
| 246 | (manual-html-node texi (expand-file-name "elisp" html-node-dir)) | 246 | (manual-html-node texi (expand-file-name "elisp" html-node-dir)) |
| @@ -248,7 +248,20 @@ Root must be the root of an Emacs source tree." | |||
| 248 | (manual-txt texi (expand-file-name "elisp.txt" txt-dir)) | 248 | (manual-txt texi (expand-file-name "elisp.txt" txt-dir)) |
| 249 | (manual-pdf texi (expand-file-name "elisp.pdf" dest)) | 249 | (manual-pdf texi (expand-file-name "elisp.pdf" dest)) |
| 250 | (manual-dvi texi (expand-file-name "elisp.dvi" dvi-dir) | 250 | (manual-dvi texi (expand-file-name "elisp.dvi" dvi-dir) |
| 251 | (expand-file-name "elisp.ps" ps-dir))) | 251 | (expand-file-name "elisp.ps" ps-dir))) |
| 252 | ;; Misc manuals | ||
| 253 | (let ((manuals '("ada-mode" "auth" "autotype" "calc" "cc-mode" | ||
| 254 | "cl" "dbus" "dired-x" "ebrowse" "ede" "ediff" | ||
| 255 | "edt" "eieio" "emacs-mime" "epa" "erc" "ert" | ||
| 256 | "eshell" "eudc" "faq" "flymake" "forms" | ||
| 257 | "gnus" "emacs-gnutls" "idlwave" "info" | ||
| 258 | "mairix-el" "message" "mh-e" "newsticker" | ||
| 259 | "nxml-mode" "org" "pcl-cvs" "pgg" "rcirc" | ||
| 260 | "remember" "reftex" "sasl" "sc" "semantic" | ||
| 261 | "ses" "sieve" "smtpmail" "speedbar" "tramp" | ||
| 262 | "url" "vip" "viper" "widget" "woman"))) | ||
| 263 | (dolist (manual manuals) | ||
| 264 | (manual-misc-html manual root html-node-dir html-mono-dir))) | ||
| 252 | (message "Manuals created in %s" dest))) | 265 | (message "Manuals created in %s" dest))) |
| 253 | 266 | ||
| 254 | (defconst manual-doctype-string | 267 | (defconst manual-doctype-string |
| @@ -265,6 +278,12 @@ Root must be the root of an Emacs source tree." | |||
| 265 | (defconst manual-style-string "<style type=\"text/css\"> | 278 | (defconst manual-style-string "<style type=\"text/css\"> |
| 266 | @import url('/style.css');\n</style>\n") | 279 | @import url('/style.css');\n</style>\n") |
| 267 | 280 | ||
| 281 | (defun manual-misc-html (name root html-node-dir html-mono-dir) | ||
| 282 | (let ((texi (expand-file-name (format "doc/misc/%s.texi" name) root))) | ||
| 283 | (manual-html-node texi (expand-file-name name html-node-dir)) | ||
| 284 | (manual-html-mono texi (expand-file-name (concat name ".html") | ||
| 285 | html-mono-dir)))) | ||
| 286 | |||
| 268 | (defun manual-html-mono (texi-file dest) | 287 | (defun manual-html-mono (texi-file dest) |
| 269 | "Run Makeinfo on TEXI-FILE, emitting mono HTML output to DEST. | 288 | "Run Makeinfo on TEXI-FILE, emitting mono HTML output to DEST. |
| 270 | This function also edits the HTML files so that they validate as | 289 | This function also edits the HTML files so that they validate as |
| @@ -307,13 +326,15 @@ the @import directive." | |||
| 307 | (let (copyright-text) | 326 | (let (copyright-text) |
| 308 | (manual-html-fix-index-1) | 327 | (manual-html-fix-index-1) |
| 309 | ;; Move copyright notice to the end. | 328 | ;; Move copyright notice to the end. |
| 310 | (re-search-forward "[ \t]*<p>Copyright ©") | 329 | (when (re-search-forward "[ \t]*<p>Copyright ©" nil t) |
| 311 | (setq opoint (match-beginning 0)) | 330 | (setq opoint (match-beginning 0)) |
| 312 | (re-search-forward "</blockquote>") | 331 | (re-search-forward "</blockquote>") |
| 313 | (setq copyright-text (buffer-substring opoint (point))) | 332 | (setq copyright-text (buffer-substring opoint (point))) |
| 314 | (delete-region opoint (point)) | 333 | (delete-region opoint (point))) |
| 315 | (manual-html-fix-index-2) | 334 | (manual-html-fix-index-2) |
| 316 | (insert copyright-text "\n</div>\n")) | 335 | (if copyright-text |
| 336 | (insert copyright-text)) | ||
| 337 | (insert "\n</div>\n")) | ||
| 317 | ;; For normal nodes, give the header div a blue bg. | 338 | ;; For normal nodes, give the header div a blue bg. |
| 318 | (manual-html-fix-node-div)) | 339 | (manual-html-fix-node-div)) |
| 319 | (save-buffer)))))) | 340 | (save-buffer)))))) |
| @@ -369,9 +390,9 @@ Also generate PostScript output in PS-DEST." | |||
| 369 | 390 | ||
| 370 | (defun manual-html-fix-index-1 () | 391 | (defun manual-html-fix-index-1 () |
| 371 | (let (opoint) | 392 | (let (opoint) |
| 372 | (re-search-forward "<body>\n\\(<h1 class=\"settitle\\)") | 393 | (re-search-forward "<body>\n") |
| 373 | (setq opoint (match-beginning 1)) | 394 | (setq opoint (match-end 0)) |
| 374 | (search-forward "<h2 class=\"unnumbered") | 395 | (search-forward "<h2 class=\"") |
| 375 | (goto-char (match-beginning 0)) | 396 | (goto-char (match-beginning 0)) |
| 376 | (delete-region opoint (point)) | 397 | (delete-region opoint (point)) |
| 377 | (insert "<div id=\"content\" class=\"inner\">\n\n"))) | 398 | (insert "<div id=\"content\" class=\"inner\">\n\n"))) |
| @@ -380,7 +401,8 @@ Also generate PostScript output in PS-DEST." | |||
| 380 | "Replace the index list in the current buffer with a HTML table." | 401 | "Replace the index list in the current buffer with a HTML table." |
| 381 | (let (done open-td tag desc) | 402 | (let (done open-td tag desc) |
| 382 | ;; Convert the list that Makeinfo made into a table. | 403 | ;; Convert the list that Makeinfo made into a table. |
| 383 | (search-forward "<ul class=\"menu\">") | 404 | (or (search-forward "<ul class=\"menu\">" nil t) |
| 405 | (search-forward "<ul>")) | ||
| 384 | (replace-match "<table style=\"float:left\" width=\"100%\">") | 406 | (replace-match "<table style=\"float:left\" width=\"100%\">") |
| 385 | (forward-line 1) | 407 | (forward-line 1) |
| 386 | (while (not done) | 408 | (while (not done) |
| @@ -413,7 +435,7 @@ Also generate PostScript output in PS-DEST." | |||
| 413 | (replace-match " </td></tr></table>\n | 435 | (replace-match " </td></tr></table>\n |
| 414 | <h3>Detailed Node Listing</h3>\n\n" t t) | 436 | <h3>Detailed Node Listing</h3>\n\n" t t) |
| 415 | (search-forward "<p>") | 437 | (search-forward "<p>") |
| 416 | (search-forward "<p>") | 438 | (search-forward "<p>" nil t) |
| 417 | (goto-char (match-beginning 0)) | 439 | (goto-char (match-beginning 0)) |
| 418 | (skip-chars-backward "\n ") | 440 | (skip-chars-backward "\n ") |
| 419 | (setq open-td nil) | 441 | (setq open-td nil) |
| @@ -427,8 +449,8 @@ Also generate PostScript output in PS-DEST." | |||
| 427 | (setq open-td nil)) | 449 | (setq open-td nil)) |
| 428 | (insert " <tr> | 450 | (insert " <tr> |
| 429 | <th colspan=\"2\" align=\"left\" style=\"text-align:left\">") | 451 | <th colspan=\"2\" align=\"left\" style=\"text-align:left\">") |
| 430 | (re-search-forward "</p>[ \t\n]*<ul class=\"menu\">") | 452 | (if (re-search-forward "</p>[ \t\n]*<ul class=\"menu\">" nil t) |
| 431 | (replace-match " </th></tr>")) | 453 | (replace-match " </th></tr>"))) |
| 432 | ((looking-at "[ \t]*</ul>[ \t]*$") | 454 | ((looking-at "[ \t]*</ul>[ \t]*$") |
| 433 | (replace-match | 455 | (replace-match |
| 434 | (if open-td | 456 | (if open-td |
diff --git a/admin/make-emacs b/admin/make-emacs index f64d51b0c41..688f5c196bf 100755 --- a/admin/make-emacs +++ b/admin/make-emacs | |||
| @@ -42,7 +42,7 @@ $rc = GetOptions ("help" => \$help, | |||
| 42 | "check-marked" => \$check_marked, | 42 | "check-marked" => \$check_marked, |
| 43 | "all" => \$all, | 43 | "all" => \$all, |
| 44 | "no-optim" => \$no_optim, | 44 | "no-optim" => \$no_optim, |
| 45 | "union-type" => \$union_type, | 45 | "check-lisp-type" => \$check_lisp_type, |
| 46 | "gprof" => \$profile, | 46 | "gprof" => \$profile, |
| 47 | "malloc-check" => \$malloc_check, | 47 | "malloc-check" => \$malloc_check, |
| 48 | "no-mcheck" => \$no_mcheck, | 48 | "no-mcheck" => \$no_mcheck, |
| @@ -70,7 +70,7 @@ Build Emacs. | |||
| 70 | --check-marked GC_CHECK_MARKED_OBJECTS=1 | 70 | --check-marked GC_CHECK_MARKED_OBJECTS=1 |
| 71 | --optim no debug defines | 71 | --optim no debug defines |
| 72 | --gprof make Emacs for profiling | 72 | --gprof make Emacs for profiling |
| 73 | --union-type define USE_LISP_UNION_TYPE (bad for GDB) | 73 | --check-lisp-type define CHECK_LISP_OBJECT_TYPE |
| 74 | --malloc-check define GC_MALLOC_CHECK | 74 | --malloc-check define GC_MALLOC_CHECK |
| 75 | --no-mcheck don't define GC_MCHECK | 75 | --no-mcheck don't define GC_MCHECK |
| 76 | --wall compile with -Wall | 76 | --wall compile with -Wall |
| @@ -140,7 +140,7 @@ else | |||
| 140 | } | 140 | } |
| 141 | } | 141 | } |
| 142 | 142 | ||
| 143 | $defs = "$defs -DUSE_LISP_UNION_TYPE" if $union_type; | 143 | $defs = "$defs -DCHECK_LISP_OBJECT_TYPE" if $check_lisp_type; |
| 144 | $defs = "$defs -DGC_MALLOC_CHECK=1 -DGC_PROTECT_MALLOC_STATE=1" if $malloc_check; | 144 | $defs = "$defs -DGC_MALLOC_CHECK=1 -DGC_PROTECT_MALLOC_STATE=1" if $malloc_check; |
| 145 | $defs = "$defs -DGC_MCHECK=1" unless $no_mcheck; | 145 | $defs = "$defs -DGC_MCHECK=1" unless $no_mcheck; |
| 146 | 146 | ||
diff --git a/admin/make-tarball.txt b/admin/make-tarball.txt index 0acd29bbc13..ea9c4a3c2d1 100644 --- a/admin/make-tarball.txt +++ b/admin/make-tarball.txt | |||
| @@ -28,13 +28,7 @@ For each step, check for possible errors. | |||
| 28 | refer to a newer release of Emacs. (This is probably needed only | 28 | refer to a newer release of Emacs. (This is probably needed only |
| 29 | when preparing a major Emacs release, or branching for it.) | 29 | when preparing a major Emacs release, or branching for it.) |
| 30 | 30 | ||
| 31 | 5. Edit configure.in so that maintainer-mode is off by default. | 31 | 5. autoreconf -i -I m4 --force |
| 32 | (FIXME - need to find a better way of dealing with this. | ||
| 33 | Or maybe it's fine and indeed correct to leave it on? | ||
| 34 | See http://lists.gnu.org/archive/html/emacs-devel/2011-03/msg00859.html | ||
| 35 | and subsequent.) | ||
| 36 | |||
| 37 | autoreconf -i -I m4 --force | ||
| 38 | make bootstrap | 32 | make bootstrap |
| 39 | 33 | ||
| 40 | 6. Commit etc/AUTHORS, all the files changed by M-x set-version, and | 34 | 6. Commit etc/AUTHORS, all the files changed by M-x set-version, and |
diff --git a/admin/quick-install-emacs b/admin/quick-install-emacs index 06cd2d40901..7004e8f1b27 100755 --- a/admin/quick-install-emacs +++ b/admin/quick-install-emacs | |||
| @@ -1,7 +1,7 @@ | |||
| 1 | #!/bin/sh | 1 | #!/bin/sh |
| 2 | ### quick-install-emacs --- do a halfway-decent job of installing emacs quickly | 2 | ### quick-install-emacs --- do a halfway-decent job of installing emacs quickly |
| 3 | 3 | ||
| 4 | ## Copyright (C) 2001-2012 Free Software Foundation, Inc. | 4 | ## Copyright (C) 2001-2012 Free Software Foundation, Inc. |
| 5 | 5 | ||
| 6 | ## Author: Miles Bader <miles@gnu.org> | 6 | ## Author: Miles Bader <miles@gnu.org> |
| 7 | 7 | ||
| @@ -28,7 +28,7 @@ | |||
| 28 | 28 | ||
| 29 | 29 | ||
| 30 | PUBLIC_LIBSRC_BINARIES='emacsclient etags ctags ebrowse' | 30 | PUBLIC_LIBSRC_BINARIES='emacsclient etags ctags ebrowse' |
| 31 | PUBLIC_LIBSRC_SCRIPTS='grep-changelog rcs-checkin' | 31 | PUBLIC_LIBSRC_SCRIPTS='grep-changelog' |
| 32 | 32 | ||
| 33 | AVOID="CVS -DIC README COPYING ChangeLog ~ [.]orig$ [.]rej$ Makefile$ Makefile.in$ makefile$ makefile.w32-in$ stamp-subdir [.]cvsignore [.]arch-ids [{]arch[}] [.][cho]$ make-docfile testfile test-distrib" | 33 | AVOID="CVS -DIC README COPYING ChangeLog ~ [.]orig$ [.]rej$ Makefile$ Makefile.in$ makefile$ makefile.w32-in$ stamp-subdir [.]cvsignore [.]arch-ids [{]arch[}] [.][cho]$ make-docfile testfile test-distrib" |
| 34 | 34 | ||