Mercurial > emacs
annotate lisp/progmodes/ld-script.el @ 110592:c06958da83b5
Add fd handling with callbacks to select, dbus needs it for async operation.
* src/dbusbind.c: Include process.h.
(dbus_fd_cb, xd_find_watch_fd, xd_toggle_watch)
(xd_read_message_1): New functions.
(xd_add_watch, xd_remove_watch): Call xd_find_watch_fd. Handle
watch for both read and write.
(Fdbus_init_bus): Also register xd_toggle_watch.
(Fdbus_call_method_asynchronously, Fdbus_method_return_internal)
(Fdbus_method_error_internal, Fdbus_send_signal): Remove call
to dbus_connection_flush.
(xd_read_message): Move most of the code to xd_read_message_1.
Call xd_read_message_1 until status is COMPLETE.
* src/keyboard.c (readable_events, gobble_input): Remove DBUS code.
* src/process.c (gpm_wait_mask, max_gpm_desc): Remove.
(write_mask): New variable.
(max_input_desc): Renamed from max_keyboard_desc.
(fd_callback_info): New variable.
(add_read_fd, delete_read_fd, add_write_fd, delete_write_fd): New
functions.
(Fmake_network_process): FD_SET write_mask.
(deactivate_process): FD_CLR write_mask.
(wait_reading_process_output): Connecting renamed to Writeok.
check_connect removed. check_write is new. Remove references to
gpm. Use Writeok/check_write unconditionally (i.e. no #ifdef
NON_BLOCKING_CONNECT) instead of Connecting.
Loop over file descriptors and call callbacks in fd_callback_info
if file descriptor is ready for I/O.
(add_gpm_wait_descriptor): Just call add_keyboard_wait_descriptor.
(delete_gpm_wait_descriptor): Just call delete_keyboard_wait_descriptor.
(keyboard_bit_set): Use max_input_desc.
(add_keyboard_wait_descriptor, delete_keyboard_wait_descriptor): Remove
#ifdef subprocesses. Use max_input_desc.
(init_process): Initialize write_mask and fd_callback_info.
* src/process.h (add_read_fd, delete_read_fd, add_write_fd)
(delete_write_fd): Declare.
author | Jan D <jan.h.d@swipnet.se> |
---|---|
date | Sun, 26 Sep 2010 18:20:01 +0200 |
parents | 7d1ae818a5d2 |
children | 417b1e4d63cd |
rev | line source |
---|---|
52304 | 1 ;;; ld-script.el --- GNU linker script editing mode for Emacs |
2 | |
110498
7d1ae818a5d2
Define ld-script auto-mode-alist entries in the standard place.
Glenn Morris <rgm@gnu.org>
parents:
106815
diff
changeset
|
3 ;; Copyright (C) 2001, 2002, 2003, 2004, 2005, 2006, 2007, 2008, 2009, |
7d1ae818a5d2
Define ld-script auto-mode-alist entries in the standard place.
Glenn Morris <rgm@gnu.org>
parents:
106815
diff
changeset
|
4 ;; 2010 Free Software Foundation, Inc. |
52304 | 5 |
6 ;; Author: Masatake YAMATO<jet@gyve.org> | |
7 ;; Keywords: languages, faces | |
8 | |
52563
2cb7c7b883e5
Add Commentary section, minor cleanup of file header.
John Paul Wallington <jpw@pobox.com>
parents:
52401
diff
changeset
|
9 ;; This file is part of GNU Emacs. |
2cb7c7b883e5
Add Commentary section, minor cleanup of file header.
John Paul Wallington <jpw@pobox.com>
parents:
52401
diff
changeset
|
10 |
94673
52b7a8c22af5
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
79717
diff
changeset
|
11 ;; GNU Emacs is free software: you can redistribute it and/or modify |
52304 | 12 ;; it under the terms of the GNU General Public License as published by |
94673
52b7a8c22af5
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
79717
diff
changeset
|
13 ;; the Free Software Foundation, either version 3 of the License, or |
52b7a8c22af5
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
79717
diff
changeset
|
14 ;; (at your option) any later version. |
52304 | 15 |
94673
52b7a8c22af5
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
79717
diff
changeset
|
16 ;; GNU Emacs is distributed in the hope that it will be useful, |
52304 | 17 ;; but WITHOUT ANY WARRANTY; without even the implied warranty of |
18 ;; MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the | |
19 ;; GNU General Public License for more details. | |
20 | |
21 ;; You should have received a copy of the GNU General Public License | |
94673
52b7a8c22af5
Switch to recommended form of GPLv3 permissions notice.
Glenn Morris <rgm@gnu.org>
parents:
79717
diff
changeset
|
22 ;; along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. |
52304 | 23 |
52563
2cb7c7b883e5
Add Commentary section, minor cleanup of file header.
John Paul Wallington <jpw@pobox.com>
parents:
52401
diff
changeset
|
24 ;;; Commentary: |
2cb7c7b883e5
Add Commentary section, minor cleanup of file header.
John Paul Wallington <jpw@pobox.com>
parents:
52401
diff
changeset
|
25 |
2cb7c7b883e5
Add Commentary section, minor cleanup of file header.
John Paul Wallington <jpw@pobox.com>
parents:
52401
diff
changeset
|
26 ;; Major mode for editing GNU linker (ld) scripts. |
2cb7c7b883e5
Add Commentary section, minor cleanup of file header.
John Paul Wallington <jpw@pobox.com>
parents:
52401
diff
changeset
|
27 |
2cb7c7b883e5
Add Commentary section, minor cleanup of file header.
John Paul Wallington <jpw@pobox.com>
parents:
52401
diff
changeset
|
28 ;;; Code: |
52304 | 29 |
30 ;; Custom | |
31 (defgroup ld-script nil | |
32 "GNU linker script code editing commands for Emacs." | |
33 :prefix "ld-script-" | |
34 :group 'languages) | |
35 | |
63459
fe2fc708f3ef
Revision: miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-419
Miles Bader <miles@gnu.org>
parents:
52563
diff
changeset
|
36 (defvar ld-script-location-counter-face 'ld-script-location-counter) |
fe2fc708f3ef
Revision: miles@gnu.org--gnu-2005/emacs--cvs-trunk--0--patch-419
Miles Bader <miles@gnu.org>
parents:
52563
diff
changeset
|
37 (defface ld-script-location-counter |
68177
7341c6ea5e74
(auto-mode-alist): Use \' rather than $.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
68162
diff
changeset
|
38 '((t :weight bold :inherit font-lock-builtin-face)) |
52304 | 39 "Face for location counter in GNU ld script." |
40 :group 'ld-script) | |
41 | |
42 ;; Syntax rules | |
52563
2cb7c7b883e5
Add Commentary section, minor cleanup of file header.
John Paul Wallington <jpw@pobox.com>
parents:
52401
diff
changeset
|
43 (defvar ld-script-mode-syntax-table |
52304 | 44 (let ((st (make-syntax-table))) |
45 (modify-syntax-entry ?\ "-" st) | |
46 (modify-syntax-entry ?{ "(}" st) | |
47 (modify-syntax-entry ?} "){" st) | |
48 (modify-syntax-entry ?\( "()" st) | |
49 (modify-syntax-entry ?\) ")(" st) | |
50 (modify-syntax-entry ?\[ "(]" st) | |
51 (modify-syntax-entry ?\] ")[" st) | |
52 (modify-syntax-entry ?_ "w" st) | |
53 (modify-syntax-entry ?. "_" st) | |
54 (modify-syntax-entry ?\\ "\\" st) | |
55 (modify-syntax-entry ?: "." st) | |
56 (modify-syntax-entry ?, "." st) | |
57 (modify-syntax-entry ?? "." st) | |
58 (modify-syntax-entry ?= "." st) | |
59 (modify-syntax-entry ?* ". 23" st) | |
60 (modify-syntax-entry ?/ ". 14" st) | |
61 (modify-syntax-entry ?+ "." st) | |
62 (modify-syntax-entry ?- "." st) | |
63 (modify-syntax-entry ?! "." st) | |
64 (modify-syntax-entry ?~ "." st) | |
65 (modify-syntax-entry ?% "." st) | |
66 (modify-syntax-entry ?< "." st) | |
67 (modify-syntax-entry ?> "." st) | |
68 (modify-syntax-entry ?& "." st) | |
69 (modify-syntax-entry ?| "." st) | |
70 (modify-syntax-entry ?\" "\"" st) | |
71 st) | |
72 "Syntax table used while in `ld-script-mode'.") | |
73 | |
74 ;; Font lock keywords | |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
75 ;; (The section number comes from ld's info.) |
52563
2cb7c7b883e5
Add Commentary section, minor cleanup of file header.
John Paul Wallington <jpw@pobox.com>
parents:
52401
diff
changeset
|
76 (defvar ld-script-keywords |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
77 '( |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
78 ;; 3.4.1 Setting the Entry Point |
110498
7d1ae818a5d2
Define ld-script auto-mode-alist entries in the standard place.
Glenn Morris <rgm@gnu.org>
parents:
106815
diff
changeset
|
79 "ENTRY" |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
80 ;; 3.4.2 Commands Dealing with Files |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
81 "INCLUDE" "INPUT" "GROUP" "AS_NEEDED" "OUTPUT" "SEARCH_DIR" "STARTUP" |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
82 ;; 3.4.3 Commands Dealing with Object File Formats |
52304 | 83 "OUTPUT_FORMAT" "TARGET" |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
84 ;; 3.4.3 Other Linker Script Commands |
110498
7d1ae818a5d2
Define ld-script auto-mode-alist entries in the standard place.
Glenn Morris <rgm@gnu.org>
parents:
106815
diff
changeset
|
85 "ASSERT" "EXTERN" "FORCE_COMMON_ALLOCATION" |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
86 "INHIBIT_COMMON_ALLOCATION" "NOCROSSREFS" "OUTPUT_ARCH" |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
87 ;; 3.5.2 PROVIDE |
52563
2cb7c7b883e5
Add Commentary section, minor cleanup of file header.
John Paul Wallington <jpw@pobox.com>
parents:
52401
diff
changeset
|
88 "PROVIDE" |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
89 ;; 3.5.3 PROVIDE_HIDDEN |
74557
a7d759873ecf
(ld-script-keywords): Fix a typo.
Masatake YAMATO <jet@gyve.org>
parents:
72117
diff
changeset
|
90 "PROVIDE_HIDDEN" |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
91 ;; 3.6 SECTIONS Command |
110498
7d1ae818a5d2
Define ld-script auto-mode-alist entries in the standard place.
Glenn Morris <rgm@gnu.org>
parents:
106815
diff
changeset
|
92 "SECTIONS" |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
93 ;; 3.6.4.2 Input Section Wildcard Patterns |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
94 "SORT" "SORT_BY_NAME" "SORT_BY_ALIGNMENT" |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
95 ;; 3.6.4.3 Input Section for Common Symbols |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
96 "COMMON" |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
97 ;; 3.6.4.4 Input Section and Garbage Collection |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
98 "KEEP" |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
99 ;; 3.6.5 Output Section Data |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
100 "BYTE" "SHORT" "LONG" "QUAD" "SQUAD" "FILL" |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
101 ;; 3.6.6 Output Section Keywords |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
102 "CREATE_OBJECT_SYMBOLS" "CONSTRUCTORS" |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
103 "__CTOR_LIST__" "__CTOR_END__" "__DTOR_LIST__" "__DTOR_END__" |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
104 ;; 3.6.7 Output Section Discarding |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
105 ;; See `ld-script-font-lock-keywords' |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
106 ;; 3.6.8.1 Output Section Type |
52304 | 107 "NOLOAD" "DSECT" "COPY" "INFO" "OVERLAY" |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
108 ;; 3.6.8.2 Output Section LMA |
52304 | 109 "AT" |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
110 ;; 3.6.8.4 Forced Input Alignment |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
111 "SUBALIGN" |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
112 ;; 3.6.8.6 Output Section Phdr |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
113 ":PHDR" |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
114 ;; 3.7 MEMORY Command |
52304 | 115 "MEMORY" |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
116 ;; 3.8 PHDRS Command |
52304 | 117 "PHDRS" "FILEHDR" "FLAGS" |
118 "PT_NULL" "PT_LOAD" "PT_DYNAMIC" "PT_INTERP" "PT_NONE" "PT_SHLIB" "PT_PHDR" | |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
119 ;; 3.9 VERSION Command |
52304 | 120 "VERSION") |
121 "Keywords used of GNU ld script.") | |
122 | |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
123 ;; 3.10.8 Builtin Functions |
52563
2cb7c7b883e5
Add Commentary section, minor cleanup of file header.
John Paul Wallington <jpw@pobox.com>
parents:
52401
diff
changeset
|
124 (defvar ld-script-builtins |
2cb7c7b883e5
Add Commentary section, minor cleanup of file header.
John Paul Wallington <jpw@pobox.com>
parents:
52401
diff
changeset
|
125 '("ABSOLUTE" |
52304 | 126 "ADDR" |
127 "ALIGN" | |
128 "BLOCK" | |
66613
11e1b8967398
(ld-script-builtins): Add more words: "DATA_SEGMENT_ALIGN",
Masatake YAMATO <jet@gyve.org>
parents:
64993
diff
changeset
|
129 "DATA_SEGMENT_ALIGN" |
11e1b8967398
(ld-script-builtins): Add more words: "DATA_SEGMENT_ALIGN",
Masatake YAMATO <jet@gyve.org>
parents:
64993
diff
changeset
|
130 "DATA_SEGMENT_END" |
11e1b8967398
(ld-script-builtins): Add more words: "DATA_SEGMENT_ALIGN",
Masatake YAMATO <jet@gyve.org>
parents:
64993
diff
changeset
|
131 "DATA_SEGMENT_RELRO_END" |
52304 | 132 "DEFINED" |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
133 "LENGTH" "len" "l" |
52304 | 134 "LOADADDR" |
135 "MAX" | |
136 "MIN" | |
137 "NEXT" | |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
138 "ORIGIN" "org" "o" |
66613
11e1b8967398
(ld-script-builtins): Add more words: "DATA_SEGMENT_ALIGN",
Masatake YAMATO <jet@gyve.org>
parents:
64993
diff
changeset
|
139 "SEGMENT_START" |
52304 | 140 "SIZEOF" |
141 "SIZEOF_HEADERS" | |
142 "sizeof_headers") | |
143 "Builtin functions of GNU ld script.") | |
144 | |
145 (defvar ld-script-font-lock-keywords | |
68134
48bf79d0aede
2006-01-06 Masatake YAMATO <jet@gyve.org>
Masatake YAMATO <jet@gyve.org>
parents:
68072
diff
changeset
|
146 (append |
48bf79d0aede
2006-01-06 Masatake YAMATO <jet@gyve.org>
Masatake YAMATO <jet@gyve.org>
parents:
68072
diff
changeset
|
147 `((,(regexp-opt ld-script-keywords 'words) |
48bf79d0aede
2006-01-06 Masatake YAMATO <jet@gyve.org>
Masatake YAMATO <jet@gyve.org>
parents:
68072
diff
changeset
|
148 1 font-lock-keyword-face) |
48bf79d0aede
2006-01-06 Masatake YAMATO <jet@gyve.org>
Masatake YAMATO <jet@gyve.org>
parents:
68072
diff
changeset
|
149 (,(regexp-opt ld-script-builtins 'words) |
48bf79d0aede
2006-01-06 Masatake YAMATO <jet@gyve.org>
Masatake YAMATO <jet@gyve.org>
parents:
68072
diff
changeset
|
150 1 font-lock-builtin-face) |
72117
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
151 ;; 3.6.7 Output Section Discarding |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
152 ;; 3.6.4.1 Input Section Basics |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
153 ;; 3.6.8.6 Output Section Phdr |
25da237ef5a9
(ld-script-keywords) (ld-script-font-lock-keywords, ld-script-builtins): Update keywords and add comments.
Masatake YAMATO <jet@gyve.org>
parents:
68773
diff
changeset
|
154 ("/DISCARD/\\|EXCLUDE_FILE\\|:NONE" . font-lock-warning-face) |
68134
48bf79d0aede
2006-01-06 Masatake YAMATO <jet@gyve.org>
Masatake YAMATO <jet@gyve.org>
parents:
68072
diff
changeset
|
155 ("\\W\\(\\.\\)\\W" 1 ld-script-location-counter-face) |
48bf79d0aede
2006-01-06 Masatake YAMATO <jet@gyve.org>
Masatake YAMATO <jet@gyve.org>
parents:
68072
diff
changeset
|
156 ) |
48bf79d0aede
2006-01-06 Masatake YAMATO <jet@gyve.org>
Masatake YAMATO <jet@gyve.org>
parents:
68072
diff
changeset
|
157 cpp-font-lock-keywords) |
52563
2cb7c7b883e5
Add Commentary section, minor cleanup of file header.
John Paul Wallington <jpw@pobox.com>
parents:
52401
diff
changeset
|
158 "Default font-lock-keywords for `ld-script-mode'.") |
52304 | 159 |
160 ;;;###autoload | |
161 (define-derived-mode ld-script-mode nil "LD-Script" | |
162 "A major mode to edit GNU ld script files" | |
163 (set (make-local-variable 'comment-start) "/* ") | |
164 (set (make-local-variable 'comment-end) " */") | |
68177
7341c6ea5e74
(auto-mode-alist): Use \' rather than $.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
68162
diff
changeset
|
165 (set (make-local-variable 'font-lock-defaults) |
7341c6ea5e74
(auto-mode-alist): Use \' rather than $.
Stefan Monnier <monnier@iro.umontreal.ca>
parents:
68162
diff
changeset
|
166 '(ld-script-font-lock-keywords nil))) |
52304 | 167 |
52563
2cb7c7b883e5
Add Commentary section, minor cleanup of file header.
John Paul Wallington <jpw@pobox.com>
parents:
52401
diff
changeset
|
168 (provide 'ld-script) |
2cb7c7b883e5
Add Commentary section, minor cleanup of file header.
John Paul Wallington <jpw@pobox.com>
parents:
52401
diff
changeset
|
169 |
68162 | 170 ;; arch-tag: 83280b6b-e6fc-4d00-a630-922d7aec5593 |
52304 | 171 ;;; ld-script.el ends here |