HOME

Mini Shell 1.0
DIR:/proc/self/root/usr/share/emacs/26.1/lisp/term/
Current File : //proc/self/root/usr/share/emacs/26.1/lisp/term/common-win.elc
;ELC
;;; Compiled
;;; in Emacs version 26.1
;;; with all optimizations.

;;; This file uses dynamic docstrings, first added in Emacs 19.29.

;;; This file does not contain utf-8 non-ASCII characters,
;;; and so can be loaded in Emacs versions earlier than 23.

;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;


#@56 Keymap of possible alternative meanings for some keys.
(defvar x-alternatives-map (byte-code "\302 \303\304\305#\210\303\306\307#\210\303\310\311#\210\303\312\313#\210\303\314\315#\210\303\316\317#\210\303\320\321#\210\322\323!\204?\303\324\325#\210\303\326\327#\210	\330=\204K\322\323!\203Q\303\331\332#\210)\207" [map system-type make-sparse-keymap define-key [M-backspace] [134217855] [M-delete] [134217855] [M-tab] [134217737] [M-linefeed] [134217738] [M-clear] [134217740] [M-return] [134217741] [M-escape] [134217755] featurep ns [iso-lefttab] [backtab] [S-iso-lefttab] [backtab] windows-nt [S-tab] [backtab]] 4) (#$ . 408))
#@57 Set up `function-key-map' on the graphical frame FRAME.
(defalias 'x-setup-function-keys #[(frame) "\306\307\"?\205\241\310 p\311\216\312\313\"\210\314!\315\f\316
!\"\210\315
\f\"\210)\317\320!\203\233\321\322\323\324\"\325\"\326B\321\322\323\324\"\327\"\330B\321\322\323\324\"\331\"\332B\321\322\323\324\"\333\"\334B\321\322\323\324\"\335\"\336B\321\322\323\324\"\337\"\340B\321\322\323\324\"\341\"\342B\321\322\323\324\"\343\"\344B\321\322\323\324\"\345\"\346B\321\322\323\324\"\347\"\350B\321\322\323\324\"\351\"\352B\321\322\323\324\"\353\"\354B\257\f/+\355\307\356#\207" [frame #1=#:old-buffer #2=#:old-frame x-alternatives-map map local-function-key-map terminal-parameter x-setup-function-keys selected-frame #[nil "\302!\203\303\304\"\210\305	!\205	q\207" [#2# #1# frame-live-p select-frame norecord buffer-live-p] 3] select-frame norecord copy-keymap set-keymap-parent keymap-parent featurep ns logior lsh 0 16 1 ns-power-off 2 ns-open-file 3 ns-open-temp-file 4 ns-drag-file 5 ns-drag-color 6 ns-drag-text 7 ns-change-font 8 ns-open-file-line 11 ns-spi-service-call 12 ns-new-frame 13 ns-toggle-toolbar 14 ns-show-prefs set-terminal-parameter t system-key-alist] 15 (#$ . 1060)])
(defvar x-command-line-resources nil)
(defalias 'x-handle-switch #[(switch &optional numeric) "\306	\"\211\205*\307\n8\203\310\f\211A\242!\202%\311\n8\206%\f\211A\242B
B\211)\207" [switch command-line-x-option-alist aelt numeric x-invocation-args default-frame-alist assoc 3 string-to-number 4] 5])
(defalias 'x-handle-numeric-switch #[(switch) "\301\302\"\207" [switch x-handle-switch t] 3])
(defalias 'x-handle-initial-switch #[(switch) "\305	\"\211\205\306\n8\307\n8\206\211A\242B\fB\211)\207" [switch command-line-x-option-alist aelt x-invocation-args initial-frame-alist assoc 3 4] 4])
(defalias 'x-handle-iconic #[(_switch) "\301B\211\207" [initial-frame-alist (visibility . icon)] 2])
(defalias 'x-handle-xrm-switch #[(switch) ":\204\f\303\304\305 	#\210\n\204\211A\242\202 \n\306\211A\242Q\211\207" [x-invocation-args switch x-command-line-resources error "%s: missing argument to `%s' option" invocation-name "\n"] 4])
(defalias 'x-handle-geometry #[(_switch) "\306\211A\242!\302	\236\303	\236\304	\236\305	\236\f\204 
\203F\307\310\f\205*\fC
\2050
C$\307\f\311\f\205=\fC
\205C
C$\f\n\204N\205b\307\f\312\n\205X\nC\205^C$\211\f-\207" [x-invocation-args geo left top height width x-parse-geometry append ((user-size . t)) ((user-size . t)) ((user-position . t)) default-frame-alist initial-frame-alist] 5])
(defalias 'x-handle-name-switch #[(switch) ":\204\f\304\305\306 	#\210\211A\242\307\nBB\211\207" [x-invocation-args switch x-resource-name initial-frame-alist error "%s: missing argument to `%s' option" invocation-name name] 4])
#@152 The name of the window display on which Emacs was started.
On X, the display name of individual X frames is recorded in the
`display' frame parameter.
(defvar x-display-name nil (#$ . 3885))
#@33 Handle -display DISPLAY option.
(defalias 'x-handle-display #[(_switch) "\211A\242\302\303	\"\207" [x-invocation-args x-display-name setenv "DISPLAY"] 3 (#$ . 4082)])
#@479 Process the X (or Nextstep) related command line options in ARGS.
This is done before the user's startup file is loaded.
Copies the options in ARGS to `x-invocation-args'.  It then extracts
the X (or Nextstep) options according to the handlers defined in
`command-line-x-option-alist' (or `command-line-ns-option-alist').
For example, `x-handle-switch' handles a switch like "-fg" and its
value "black".  This function returns ARGS minus the arguments that
have been processed.
(defalias 'x-handle-args #[(args) "\306	\203\256	@\307\232\204\256	\211A\242\211\310\311!\203!\f\202\"
\306\211\306\211\312\313\n\"\203E\n\314\225\306O\n\314\211\225SO\312\315\n\"\203t\316\n\"\211\317=\204t;\203t\320\"\211\204p\321\322\n\"\210)\320\n\"\211\203\205\3238\203\245\203\235	B\n!\210)\202\251\n!\210\202\251B.\202\237	\244\207" [args x-invocation-args this-switch orig-this-switch command-line-ns-option-alist command-line-x-option-alist nil "--" featurep ns string-match "^--[^=]*=" 0 "^--" try-completion t assoc error "Option `%s' is ambiguous" 2 option-alist completion argval aelt handler elt] 4 (#$ . 4259)])
#@200 List of basic colors available on color displays.
For X, the list comes from the `rgb.txt' file,v 10.41 94/02/20.
For Nextstep, this is a list of non-PANTONE colors returned by
the operating system.
(defvar x-colors (byte-code "\300\301!\203	\302 \207\303\304!\207" [featurep ns ns-list-colors purecopy ("gray100" "grey100" "gray99" "grey99" "gray98" "grey98" "gray97" "grey97" "gray96" "grey96" "gray95" "grey95" "gray94" "grey94" "gray93" "grey93" "gray92" "grey92" "gray91" "grey91" "gray90" "grey90" "gray89" "grey89" "gray88" "grey88" "gray87" "grey87" "gray86" "grey86" "gray85" "grey85" "gray84" "grey84" "gray83" "grey83" "gray82" "grey82" "gray81" "grey81" "gray80" "grey80" "gray79" "grey79" "gray78" "grey78" "gray77" "grey77" "gray76" "grey76" "gray75" "grey75" "gray74" "grey74" "gray73" "grey73" "gray72" "grey72" "gray71" "grey71" "gray70" "grey70" "gray69" "grey69" "gray68" "grey68" "gray67" "grey67" "gray66" "grey66" "gray65" "grey65" "gray64" "grey64" "gray63" "grey63" "gray62" "grey62" "gray61" "grey61" "gray60" "grey60" "gray59" "grey59" "gray58" "grey58" "gray57" "grey57" "gray56" "grey56" "gray55" "grey55" "gray54" "grey54" "gray53" "grey53" "gray52" "grey52" "gray51" "grey51" "gray50" "grey50" "gray49" "grey49" "gray48" "grey48" "gray47" "grey47" "gray46" "grey46" "gray45" "grey45" "gray44" "grey44" "gray43" "grey43" "gray42" "grey42" "gray41" "grey41" "gray40" "grey40" "gray39" "grey39" "gray38" "grey38" "gray37" "grey37" "gray36" "grey36" "gray35" "grey35" "gray34" "grey34" "gray33" "grey33" "gray32" "grey32" "gray31" "grey31" "gray30" "grey30" "gray29" "grey29" "gray28" "grey28" "gray27" "grey27" "gray26" "grey26" "gray25" "grey25" "gray24" "grey24" "gray23" "grey23" "gray22" "grey22" "gray21" "grey21" "gray20" "grey20" "gray19" "grey19" "gray18" "grey18" "gray17" "grey17" "gray16" "grey16" "gray15" "grey15" "gray14" "grey14" "gray13" "grey13" "gray12" "grey12" "gray11" "grey11" "gray10" "grey10" "gray9" "grey9" "gray8" "grey8" "gray7" "grey7" "gray6" "grey6" "gray5" "grey5" "gray4" "grey4" "gray3" "grey3" "gray2" "grey2" "gray1" "grey1" "gray0" "grey0" "LightPink1" "LightPink2" "LightPink3" "LightPink4" "pink1" "pink2" "pink3" "pink4" "PaleVioletRed1" "PaleVioletRed2" "PaleVioletRed3" "PaleVioletRed4" "LavenderBlush1" "LavenderBlush2" "LavenderBlush3" "LavenderBlush4" "VioletRed1" "VioletRed2" "VioletRed3" "VioletRed4" "HotPink1" "HotPink2" "HotPink3" "HotPink4" "DeepPink1" "DeepPink2" "DeepPink3" "DeepPink4" "maroon1" "maroon2" "maroon3" "maroon4" "orchid1" "orchid2" "orchid3" "orchid4" "plum1" "plum2" "plum3" "plum4" "thistle1" "thistle2" "thistle3" "thistle4" "MediumOrchid1" "MediumOrchid2" "MediumOrchid3" "MediumOrchid4" "DarkOrchid1" "DarkOrchid2" "DarkOrchid3" "DarkOrchid4" "purple1" "purple2" "purple3" "purple4" "MediumPurple1" "MediumPurple2" "MediumPurple3" "MediumPurple4" "SlateBlue1" "SlateBlue2" "SlateBlue3" "SlateBlue4" "RoyalBlue1" "RoyalBlue2" "RoyalBlue3" "RoyalBlue4" "LightSteelBlue1" "LightSteelBlue2" "LightSteelBlue3" "LightSteelBlue4" "SlateGray1" "SlateGray2" "SlateGray3" "SlateGray4" "DodgerBlue1" "DodgerBlue2" "DodgerBlue3" "DodgerBlue4" "SteelBlue1" "SteelBlue2" "SteelBlue3" "SteelBlue4" "SkyBlue1" "SkyBlue2" "SkyBlue3" "SkyBlue4" "LightSkyBlue1" "LightSkyBlue2" "LightSkyBlue3" "LightSkyBlue4" "LightBlue1" "LightBlue2" "LightBlue3" "LightBlue4" "CadetBlue1" "CadetBlue2" "CadetBlue3" "CadetBlue4" "azure1" "azure2" "azure3" "azure4" "LightCyan1" "LightCyan2" "LightCyan3" "LightCyan4" "PaleTurquoise1" "PaleTurquoise2" "PaleTurquoise3" "PaleTurquoise4" "DarkSlateGray1" "DarkSlateGray2" "DarkSlateGray3" "DarkSlateGray4" "aquamarine1" "aquamarine2" "aquamarine3" "aquamarine4" "SeaGreen1" "SeaGreen2" "SeaGreen3" "SeaGreen4" "honeydew1" "honeydew2" "honeydew3" "honeydew4" "DarkSeaGreen1" "DarkSeaGreen2" "DarkSeaGreen3" "DarkSeaGreen4" "PaleGreen1" "PaleGreen2" "PaleGreen3" "PaleGreen4" "DarkOliveGreen1" "DarkOliveGreen2" "DarkOliveGreen3" "DarkOliveGreen4" "OliveDrab1" "OliveDrab2" "OliveDrab3" "OliveDrab4" "ivory1" "ivory2" "ivory3" "ivory4" "LightYellow1" "LightYellow2" "LightYellow3" "LightYellow4" "khaki1" "khaki2" "khaki3" "khaki4" "LemonChiffon1" "LemonChiffon2" "LemonChiffon3" "LemonChiffon4" "LightGoldenrod1" "LightGoldenrod2" "LightGoldenrod3" "LightGoldenrod4" "cornsilk1" "cornsilk2" "cornsilk3" "cornsilk4" "goldenrod1" "goldenrod2" "goldenrod3" "goldenrod4" "DarkGoldenrod1" "DarkGoldenrod2" "DarkGoldenrod3" "DarkGoldenrod4" "wheat1" "wheat2" "wheat3" "wheat4" "NavajoWhite1" "NavajoWhite2" "NavajoWhite3" "NavajoWhite4" "burlywood1" "burlywood2" "burlywood3" "burlywood4" "AntiqueWhite1" "AntiqueWhite2" "AntiqueWhite3" "AntiqueWhite4" "bisque1" "bisque2" "bisque3" "bisque4" "tan1" "tan2" "tan3" "tan4" "PeachPuff1" "PeachPuff2" "PeachPuff3" "PeachPuff4" "seashell1" "seashell2" "seashell3" "seashell4" "chocolate1" "chocolate2" "chocolate3" "chocolate4" "sienna1" "sienna2" "sienna3" "sienna4" "LightSalmon1" "LightSalmon2" "LightSalmon3" "LightSalmon4" "salmon1" "salmon2" "salmon3" "salmon4" "coral1" "coral2" "coral3" "coral4" "tomato1" "tomato2" "tomato3" "tomato4" "MistyRose1" "MistyRose2" "MistyRose3" "MistyRose4" "snow1" "snow2" "snow3" "snow4" "RosyBrown1" "RosyBrown2" "RosyBrown3" "RosyBrown4" "IndianRed1" "IndianRed2" "IndianRed3" "IndianRed4" "firebrick1" "firebrick2" "firebrick3" "firebrick4" "brown1" "brown2" "brown3" "brown4" "magenta1" "magenta2" "magenta3" "magenta4" "blue1" "blue2" "blue3" "blue4" "DeepSkyBlue1" "DeepSkyBlue2" "DeepSkyBlue3" "DeepSkyBlue4" "turquoise1" "turquoise2" "turquoise3" "turquoise4" "cyan1" "cyan2" "cyan3" "cyan4" "SpringGreen1" "SpringGreen2" "SpringGreen3" "SpringGreen4" "green1" "green2" "green3" "green4" "chartreuse1" "chartreuse2" "chartreuse3" "chartreuse4" "yellow1" "yellow2" "yellow3" "yellow4" "gold1" "gold2" "gold3" "gold4" "orange1" "orange2" "orange3" "orange4" "DarkOrange1" "DarkOrange2" "DarkOrange3" "DarkOrange4" "OrangeRed1" "OrangeRed2" "OrangeRed3" "OrangeRed4" "red1" "red2" "red3" "red4" "lavender blush" "LavenderBlush" "ghost white" "GhostWhite" "lavender" "alice blue" "AliceBlue" "azure" "light cyan" "LightCyan" "mint cream" "MintCream" "honeydew" "ivory" "light goldenrod yellow" "LightGoldenrodYellow" "light yellow" "LightYellow" "beige" "floral white" "FloralWhite" "old lace" "OldLace" "blanched almond" "BlanchedAlmond" "moccasin" "papaya whip" "PapayaWhip" "bisque" "antique white" "AntiqueWhite" "linen" "peach puff" "PeachPuff" "seashell" "misty rose" "MistyRose" "snow" "light pink" "LightPink" "pink" "hot pink" "HotPink" "deep pink" "DeepPink" "maroon" "pale violet red" "PaleVioletRed" "violet red" "VioletRed" "medium violet red" "MediumVioletRed" "violet" "plum" "thistle" "orchid" "medium orchid" "MediumOrchid" "dark orchid" "DarkOrchid" "purple" "blue violet" "BlueViolet" "medium purple" "MediumPurple" "light slate blue" "LightSlateBlue" "medium slate blue" "MediumSlateBlue" "slate blue" "SlateBlue" "dark slate blue" "DarkSlateBlue" "midnight blue" "MidnightBlue" "navy" "navy blue" "NavyBlue" "dark blue" "DarkBlue" "light steel blue" "LightSteelBlue" "cornflower blue" "CornflowerBlue" "dodger blue" "DodgerBlue" "royal blue" "RoyalBlue" "light slate gray" "light slate grey" "LightSlateGray" "LightSlateGrey" "slate gray" "slate grey" "SlateGray" "SlateGrey" "dark slate gray" "dark slate grey" "DarkSlateGray" "DarkSlateGrey" "steel blue" "SteelBlue" "cadet blue" "CadetBlue" "light sky blue" "LightSkyBlue" "sky blue" "SkyBlue" "light blue" "LightBlue" "powder blue" "PowderBlue" "pale turquoise" "PaleTurquoise" "turquoise" "medium turquoise" "MediumTurquoise" "dark turquoise" "DarkTurquoise" "dark cyan" "DarkCyan" "aquamarine" "medium aquamarine" "MediumAquamarine" "light sea green" "LightSeaGreen" "medium sea green" "MediumSeaGreen" "sea green" "SeaGreen" "dark sea green" "DarkSeaGreen" "pale green" "PaleGreen" "lime green" "LimeGreen" "dark green" "DarkGreen" "forest green" "ForestGreen" "light green" "LightGreen" "green yellow" "GreenYellow" "yellow green" "YellowGreen" "olive drab" "OliveDrab" "dark olive green" "DarkOliveGreen" "lemon chiffon" "LemonChiffon" "khaki" "dark khaki" "DarkKhaki" "cornsilk" "pale goldenrod" "PaleGoldenrod" "light goldenrod" "LightGoldenrod" "goldenrod" "dark goldenrod" "DarkGoldenrod" "wheat" "navajo white" "NavajoWhite" "tan" "burlywood" "sandy brown" "SandyBrown" "peru" "chocolate" "saddle brown" "SaddleBrown" "sienna" "rosy brown" "RosyBrown" "dark salmon" "DarkSalmon" "coral" "tomato" "light salmon" "LightSalmon" "salmon" "light coral" "LightCoral" "indian red" "IndianRed" "firebrick" "brown" "dark red" "DarkRed" "magenta" "dark magenta" "DarkMagenta" "dark violet" "DarkViolet" "medium blue" "MediumBlue" "blue" "deep sky blue" "DeepSkyBlue" "cyan" "medium spring green" "MediumSpringGreen" "spring green" "SpringGreen" "green" "lawn green" "LawnGreen" "chartreuse" "yellow" "gold" "orange" "dark orange" "DarkOrange" "orange red" "OrangeRed" "red" "white" "white smoke" "WhiteSmoke" "gainsboro" "light gray" "light grey" "LightGray" "LightGrey" "gray" "grey" "dark gray" "dark grey" "DarkGray" "DarkGrey" "dim gray" "dim grey" "DimGray" "DimGrey" "black")] 2) (#$ . 5444))
#@58 Internal function called by `defined-colors', which see.
(defalias 'xw-defined-colors #[(&optional frame) "\306\307!\203\207	\204\310 \311\312=\203\"\313\314\f\"\206#\202#\311\211\203D@\315
	\316#\203;
\nBA\211\204+*\n)\207" [x-colors frame defined-colors system-type w32-color-map this-color featurep ns selected-frame nil windows-nt mapcar car color-supported-p t --dolist-tail--] 5 (#$ . 14621)])
(provide 'term/common-win)