;ELC ;;; Compiled ;;; in Emacs version 28.2 ;;; with all optimizations. (custom-declare-group 'ld-script nil "GNU linker script code editing commands for Emacs." :prefix "ld-script-" :group 'languages) (defvar ld-script-location-counter-face 'ld-script-location-counter) (custom-declare-face 'ld-script-location-counter '((t :weight bold :inherit font-lock-builtin-face)) "Face for location counter in GNU ld script.") #@46 Syntax table used while in `ld-script-mode'. (defvar ld-script-mode-syntax-table (byte-code "\300 \301\302\303#\210\301\304\305#\210\301\306\307#\210\301\310\311#\210\301\312\313#\210\301\314\315#\210\301\316\317#\210\301\320\321#\210\301\322\321#\210\301\323\324#\210\301\325\326#\210\301\327\326#\210\301\330\326#\210\301\331\326#\210\301\332\333#\210\301\334\335#\210\301\336\326#\210\301\337\326#\210\301\340\326#\210\301\341\326#\210\301\342\326#\210\301\343\326#\210\301\344\326#\210\301\345\326#\210\301\346\326#\210\301\347\350#\210\207" [make-syntax-table modify-syntax-entry 32 "-" 123 "(}" 125 "){" 40 "()" 41 ")(" 91 "(]" 93 ")[" 95 "_" 46 92 "\\" 58 "." 44 63 61 42 ". 23" 47 ". 14" 43 45 33 126 37 60 62 38 124 34 "\""] 5) (#$ . 431)) #@33 Keywords used of GNU ld script. (defvar ld-script-keywords '("ENTRY" "INCLUDE" "INPUT" "GROUP" "AS_NEEDED" "OUTPUT" "SEARCH_DIR" "STARTUP" "OUTPUT_FORMAT" "TARGET" "REGION_ALIAS" "ASSERT" "EXTERN" "FORCE_COMMON_ALLOCATION" "INHIBIT_COMMON_ALLOCATION" "INSERT" "AFTER" "BEFORE" "NOCROSSREFS" "NOCROSSREFS_TO" "OUTPUT_ARCH" "LD_FEATURE" "HIDDEN" "PROVIDE" "PROVIDE_HIDDEN" "SECTIONS" "SORT" "SORT_BY_NAME" "SORT_BY_ALIGNMENT" "SORT_BY_INIT_PRIORITY" "COMMON" "KEEP" "BYTE" "SHORT" "LONG" "QUAD" "SQUAD" "FILL" "CREATE_OBJECT_SYMBOLS" "CONSTRUCTORS" "__CTOR_LIST__" "__CTOR_END__" "__DTOR_LIST__" "__DTOR_END__" "NOLOAD" "DSECT" "COPY" "INFO" "OVERLAY" "AT" "SUBALIGN" "ONLY_IF_RO" "ONLY_IF_RW" ":PHDR" "MEMORY" "PHDRS" "FILEHDR" "FLAGS" "PT_NULL" "PT_LOAD" "PT_DYNAMIC" "PT_INTERP" "PT_NOTE" "PT_SHLIB" "PT_PHDR" "VERSION") (#$ . 1212)) #@37 Builtin functions of GNU ld script. (defvar ld-script-builtins '("CONSTANT" "MAXPAGESIZE" "COMMONPAGESIZE" "ABSOLUTE" "ADDR" "ALIGN" "ALIGNOF" "BLOCK" "DATA_SEGMENT_ALIGN" "DATA_SEGMENT_END" "DATA_SEGMENT_RELRO_END" "DEFINED" "LENGTH" "len" "l" "LOADADDR" "LOG2CEIL" "MAX" "MIN" "NEXT" "ORIGIN" "org" "o" "SEGMENT_START" "SIZEOF" "SIZEOF_HEADERS" "sizeof_headers") (#$ . 2053)) #@52 Default `font-lock-keywords' for `ld-script-mode'. (defvar ld-script-font-lock-keywords (byte-code "\303\304\305!\306Q\307B\304\305 !\306Q\310B\311BB\n\"\207" [ld-script-keywords ld-script-builtins cpp-font-lock-keywords append "\\_<" regexp-opt "\\_>" (0 font-lock-keyword-face) (0 font-lock-builtin-face) (("/DISCARD/\\|EXCLUDE_FILE\\|:NONE" . font-lock-warning-face) ("\\W\\(\\.\\)\\W" 1 ld-script-location-counter-face))] 5) (#$ . 2437)) (defvar ld-script-mode-hook nil) (byte-code "\300\301N\204\f\302\300\301\303#\210\304\305!\204\302\305\306\307#\210\300\207" [ld-script-mode-hook variable-documentation put "Hook run after entering LD-Script mode.\nNo problems result if this variable is not bound.\n`add-hook' automatically binds it. (This is true for all hook variables.)" boundp ld-script-mode-map definition-name ld-script-mode] 4) (defvar ld-script-mode-map (make-sparse-keymap)) (byte-code "\301\302N\204\303\301\302\304\305!#\210\306\307!\204\303\307\310\311#\210\312\313 !\210\307\302N\204-\303\307\302\304\314!#\210\306\300!\204B\303\300\310\311#\210\315\316\300\317\"\210!\210\300\302N\204P\303\300\302\304\320!#\210\303\311\321\322#\207" [ld-script-mode-abbrev-table ld-script-mode-map variable-documentation put purecopy "Keymap for `ld-script-mode'." boundp ld-script-mode-syntax-table definition-name ld-script-mode (lambda (#1=#:def-tmp-var) (defvar ld-script-mode-syntax-table #1#)) make-syntax-table "Syntax table for `ld-script-mode'." (lambda (#1#) (defvar ld-script-mode-abbrev-table #1#)) define-abbrev-table nil "Abbrev table for `ld-script-mode'." derived-mode-parent prog-mode] 5) #@239 A major mode to edit GNU ld script files. In addition to any hooks its parent mode `prog-mode' might have run, this mode runs the hook `ld-script-mode-hook', as the final or penultimate step during initialization. \{ld-script-mode-map} (defalias 'ld-script-mode #[0 "\306\300!\210\307\310 \210\311\312\310\313N\203\314\311\313\310\313N#\210\315 !\204'\316 \317 \"\210\320\f!\211\2035\211\321 =\203;\322\f\323 \"\210\210\324 \325\"\204R !=\204R\326 \325!C#\210\327 !\210\330\f!\210 !\306\331!\210\332\306\333!\210\334\306\335!\210\336)\337\340!\207" [delay-mode-hooks major-mode mode-name ld-script-mode-map ld-script-mode-syntax-table ld-script-mode-abbrev-table make-local-variable t prog-mode ld-script-mode "LD-Script" mode-class put keymap-parent set-keymap-parent current-local-map char-table-parent standard-syntax-table set-char-table-parent syntax-table abbrev-table-get :parents abbrev-table-put use-local-map set-syntax-table comment-start "/* " comment-end " */" font-lock-defaults (ld-script-font-lock-keywords nil) run-mode-hooks ld-script-mode-hook local-abbrev-table] 5 (#$ . 4070) nil]) (provide 'ld-script)