blob: eec53ceaa180a1c0d2cb76271903e678d26c3912 (plain)

ofs	hex dump	ascii
0000	3b 45 4c 43 1c 00 00 00 0a 3b 3b 3b 20 43 6f 6d 70 69 6c 65 64 0a 3b 3b 3b 20 69 6e 20 45 6d 61	;ELC.....;;;.Compiled.;;;.in.Ema
0020	63 73 20 76 65 72 73 69 6f 6e 20 32 38 2e 31 0a 3b 3b 3b 20 77 69 74 68 20 61 6c 6c 20 6f 70 74	cs.version.28.1.;;;.with.all.opt
0040	69 6d 69 7a 61 74 69 6f 6e 73 2e 0a 0a 0a 0a 28 72 65 71 75 69 72 65 20 27 6c 73 70 2d 6d 6f 64	imizations.....(require.'lsp-mod
0060	65 29 0a 23 40 33 31 20 4e 61 6d 65 20 6f 66 20 74 68 65 20 56 48 44 4c 20 54 6f 6f 6c 20 62 69	e).#@31.Name.of.the.VHDL.Tool.bi
0080	6e 61 72 79 2e 1f 0a 28 64 65 66 76 61 72 20 76 68 64 6c 2d 74 6f 6f 6c 2d 62 69 6e 2d 6e 61 6d	nary...(defvar.vhdl-tool-bin-nam
00a0	65 20 22 76 68 64 6c 2d 74 6f 6f 6c 22 20 28 23 24 20 2e 20 31 30 34 29 29 0a 23 40 32 39 20 4e	e."vhdl-tool".(#$...104)).#@29.N
00c0	61 6d 65 20 6f 66 20 48 44 4c 20 43 68 65 63 6b 65 72 20 62 69 6e 61 72 79 2e 1f 0a 28 64 65 66	ame.of.HDL.Checker.binary...(def
00e0	76 61 72 20 68 64 6c 2d 63 68 65 63 6b 65 72 2d 62 69 6e 2d 6e 61 6d 65 20 22 68 64 6c 5f 63 68	var.hdl-checker-bin-name."hdl_ch
0100	65 63 6b 65 72 22 20 28 23 24 20 2e 20 31 39 31 29 29 0a 23 40 32 39 20 4e 61 6d 65 20 6f 66 20	ecker".(#$...191)).#@29.Name.of.
0120	74 68 65 20 56 48 44 4c 20 4c 53 20 62 69 6e 61 72 79 2e 1f 0a 28 64 65 66 76 61 72 20 76 68 64	the.VHDL.LS.binary...(defvar.vhd
0140	6c 2d 6c 73 2d 62 69 6e 2d 6e 61 6d 65 20 22 76 68 64 6c 5f 6c 73 22 20 28 23 24 20 2e 20 32 38	l-ls-bin-name."vhdl_ls".(#$...28
0160	30 29 29 0a 23 40 32 39 20 4e 61 6d 65 20 6f 66 20 74 68 65 20 47 48 44 4c 20 4c 53 20 62 69 6e	0)).#@29.Name.of.the.GHDL.LS.bin
0180	61 72 79 2e 1f 0a 28 64 65 66 76 61 72 20 67 68 64 6c 2d 6c 73 2d 62 69 6e 2d 6e 61 6d 65 20 22	ary...(defvar.ghdl-ls-bin-name."
01a0	67 68 64 6c 2d 6c 73 22 20 28 23 24 20 2e 20 33 36 31 29 29 0a 28 62 79 74 65 2d 63 6f 64 65 20	ghdl-ls".(#$...361)).(byte-code.
01c0	22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c 33 30 34 5c 33 30 35 25 5c 32 31 30 5c 33	"\300\301\302\303\304\305%\210\3
01e0	30 36 5c 33 30 37 5c 33 31 30 5c 33 31 31 5c 33 31 32 44 44 5c 33 31 33 5c 33 31 34 5c 33 31 35	06\307\310\311\312DD\313\314\315
0200	5c 33 30 34 5c 33 30 31 26 07 5c 32 31 30 5c 33 30 36 5c 33 31 36 5c 33 31 30 5c 33 31 31 5c 33	\304\301&.\210\306\316\310\311\3
0220	31 37 44 44 5c 33 32 30 5c 33 30 34 5c 33 30 31 5c 33 32 31 5c 33 32 32 5c 33 31 34 5c 33 32 33	17DD\320\304\301\321\322\314\323
0240	26 09 5c 32 30 37 22 20 5b 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 65 2d 67 72 6f 75 70 20 6c 73	&.\207".[custom-declare-group.ls
0260	70 2d 76 68 64 6c 20 6e 69 6c 20 22 4c 53 50 20 73 75 70 70 6f 72 74 20 66 6f 72 20 56 48 44 4c	p-vhdl.nil."LSP.support.for.VHDL
0280	2e 20 53 65 74 20 6c 73 70 2d 76 68 64 6c 2d 73 65 72 76 65 72 20 74 6f 20 73 65 6c 65 63 74 20	..Set.lsp-vhdl-server.to.select.
02a0	73 65 72 76 65 72 2e 20 54 68 65 20 64 65 66 61 75 6c 74 20 69 73 20 74 6f 20 75 73 65 20 56 48	server..The.default.is.to.use.VH
02c0	44 4c 2d 74 6f 6f 6c 2e 22 20 3a 67 72 6f 75 70 20 6c 73 70 2d 6d 6f 64 65 20 63 75 73 74 6f 6d	DL-tool.".:group.lsp-mode.custom
02e0	2d 64 65 63 6c 61 72 65 2d 76 61 72 69 61 62 6c 65 20 6c 73 70 2d 76 68 64 6c 2d 73 65 72 76 65	-declare-variable.lsp-vhdl-serve
0300	72 20 66 75 6e 63 61 6c 6c 20 66 75 6e 63 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 30 5c 32 30 37	r.funcall.function.#[0."\300\207
0320	22 20 5b 76 68 64 6c 2d 74 6f 6f 6c 5d 20 31 20 23 31 3d 22 22 5d 20 22 53 65 6c 65 63 74 20 77	".[vhdl-tool].1.#1=""]."Select.w
0340	68 69 63 68 20 73 65 72 76 65 72 20 74 6f 20 75 73 65 3a 5c 6e 56 48 44 4c 2d 74 6f 6f 6c 3a 20	hich.server.to.use:\nVHDL-tool:.
0360	41 20 73 79 6e 74 61 78 20 63 68 65 63 6b 69 6e 67 2c 20 74 79 70 65 20 63 68 65 63 6b 69 6e 67	A.syntax.checking,.type.checking
0380	20 61 6e 64 20 6c 69 6e 74 69 6e 67 20 74 6f 6f 6c 20 28 68 74 74 70 3a 2f 2f 76 68 64 6c 74 6f	.and.linting.tool.(http://vhdlto
03a0	6f 6c 2e 63 6f 6d 29 2e 5c 6e 48 44 4c 20 43 68 65 63 6b 65 72 3a 20 41 20 77 72 61 70 70 65 72	ol.com).\nHDL.Checker:.A.wrapper
03c0	20 66 6f 72 20 74 68 69 72 64 20 70 61 72 74 79 20 74 6f 6f 6c 73 20 73 75 63 68 20 61 73 20 47	.for.third.party.tools.such.as.G
03e0	48 44 4c 2c 20 4d 6f 64 65 6c 53 69 6d 2c 20 56 69 76 61 64 6f 20 53 69 6d 75 6c 61 74 6f 72 20	HDL,.ModelSim,.Vivado.Simulator.
0400	28 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 73 75 6f 74 6f 2f 68 64 6c 5f 63 68	(https://github.com/suoto/hdl_ch
0420	65 63 6b 65 72 29 2e 5c 6e 56 48 44 4c 20 4c 53 3a 20 41 20 63 6f 6d 70 6c 65 74 65 20 56 48 44	ecker).\nVHDL.LS:.A.complete.VHD
0440	4c 20 6c 61 6e 67 75 61 67 65 20 73 65 72 76 65 72 20 70 72 6f 74 6f 63 6f 6c 20 69 6d 70 6c 65	L.language.server.protocol.imple
0460	6d 65 6e 74 61 74 69 6f 6e 20 77 69 74 68 20 64 69 61 67 6e 6f 73 74 69 63 73 2c 20 6e 61 76 69	mentation.with.diagnostics,.navi
0480	67 61 74 65 20 74 6f 20 73 79 6d 62 6f 6c 2c 20 66 69 6e 64 20 61 6c 6c 20 72 65 66 65 72 65 6e	gate.to.symbol,.find.all.referen
04a0	63 65 73 20 65 74 63 2e 20 28 68 74 74 70 73 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 6b 72 61	ces.etc..(https://github.com/kra
04c0	69 67 68 65 72 2f 72 75 73 74 5f 68 64 6c 29 2e 22 20 3a 74 79 70 65 20 28 63 68 6f 69 63 65 20	igher/rust_hdl).".:type.(choice.
04e0	28 63 6f 6e 73 74 20 3a 74 61 67 20 22 56 48 44 4c 2d 74 6f 6f 6c 22 20 76 68 64 6c 2d 74 6f 6f	(const.:tag."VHDL-tool".vhdl-too
0500	6c 29 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 48 44 4c 20 43 68 65 63 6b 65 72 22 20 68 64 6c	l).(const.:tag."HDL.Checker".hdl
0520	2d 63 68 65 63 6b 65 72 29 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 56 48 44 4c 20 4c 53 22 20	-checker).(const.:tag."VHDL.LS".
0540	76 68 64 6c 2d 6c 73 29 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 47 48 44 4c 20 4c 53 22 20 67	vhdl-ls).(const.:tag."GHDL.LS".g
0560	68 64 6c 2d 6c 73 29 29 20 6c 73 70 2d 76 68 64 6c 2d 73 65 72 76 65 72 2d 70 61 74 68 20 23 5b	hdl-ls)).lsp-vhdl-server-path.#[
0580	30 20 22 5c 33 30 30 5c 32 30 37 22 20 5b 6e 69 6c 5d 20 31 20 23 31 23 5d 20 22 50 61 74 68 20	0."\300\207".[nil].1.#1#]."Path.
05a0	74 6f 20 62 69 6e 61 72 79 20 73 65 72 76 65 72 20 66 69 6c 65 2e 22 20 3a 72 69 73 6b 79 20 74	to.binary.server.file.".:risky.t
05c0	20 66 69 6c 65 5d 20 31 30 29 0a 28 64 65 66 76 61 72 20 6c 73 70 2d 76 68 64 6c 2d 2d 70 61 72	.file].10).(defvar.lsp-vhdl--par
05e0	61 6d 73 20 6e 69 6c 29 0a 23 40 35 39 20 52 65 74 75 72 6e 73 20 6c 73 70 2d 73 74 64 69 6f 2d	ams.nil).#@59.Returns.lsp-stdio-
0600	63 6f 6e 6e 65 63 74 69 6f 6e 20 62 61 73 65 64 20 6f 6e 20 74 68 65 20 73 65 6c 65 63 74 65 64	connection.based.on.the.selected
0620	20 73 65 72 76 65 72 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6c 73 70 2d 76 68 64 6c 2d 2d 63 72	.server..(defalias.'lsp-vhdl--cr
0640	65 61 74 65 2d 63 6f 6e 6e 65 63 74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 30 20 5c 32 31 30 5c 33	eate-connection.#[0."\300.\210\3
0660	30 31 20 5c 32 31 30 5c 33 30 32 5c 33 30 33 5c 33 30 34 5c 22 5c 32 30 37 22 20 5b 6c 73 70 2d	01.\210\302\303\304\"\207".[lsp-
0680	76 68 64 6c 2d 2d 73 65 74 2d 73 65 72 76 65 72 2d 70 61 74 68 20 6c 73 70 2d 76 68 64 6c 2d 2d	vhdl--set-server-path.lsp-vhdl--
06a0	73 65 74 2d 73 65 72 76 65 72 2d 61 72 67 73 20 6c 73 70 2d 73 74 64 69 6f 2d 63 6f 6e 6e 65 63	set-server-args.lsp-stdio-connec
06c0	74 69 6f 6e 20 23 5b 30 20 22 5c 33 30 31 08 5c 33 30 32 5c 22 5c 33 30 31 08 5c 33 30 33 5c 22	tion.#[0."\301.\302\"\301.\303\"
06e0	42 5c 32 30 37 22 20 5b 6c 73 70 2d 76 68 64 6c 2d 2d 70 61 72 61 6d 73 20 70 6c 69 73 74 2d 67	B\207".[lsp-vhdl--params.plist-g
0700	65 74 20 73 65 72 76 65 72 2d 70 61 74 68 20 73 65 72 76 65 72 2d 61 72 67 73 5d 20 34 5d 20 23	et.server-path.server-args].4].#
0720	5b 30 20 22 5c 33 30 31 5c 33 30 32 08 5c 33 30 33 5c 22 21 5c 32 30 37 22 20 5b 6c 73 70 2d 76	[0."\301\302.\303\"!\207".[lsp-v
0740	68 64 6c 2d 2d 70 61 72 61 6d 73 20 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20 70 6c 69 73	hdl--params.executable-find.plis
0760	74 2d 67 65 74 20 73 65 72 76 65 72 2d 70 61 74 68 5d 20 34 5d 5d 20 33 20 28 23 24 20 2e 20 31	t-get.server-path].4]].3.(#$...1
0780	35 31 38 29 5d 29 0a 23 40 36 36 20 53 65 74 20 70 61 74 68 20 74 6f 20 73 65 72 76 65 72 20 62	518)]).#@66.Set.path.to.server.b
07a0	69 6e 61 72 79 20 62 61 73 65 64 20 6f 6e 20 73 65 6c 65 63 74 69 6f 6e 20 69 6e 20 6c 73 70 2d	inary.based.on.selection.in.lsp-
07c0	76 68 64 6c 2d 73 65 72 76 65 72 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6c 73 70 2d 76 68 64	vhdl-server...(defalias.'lsp-vhd
07e0	6c 2d 2d 73 65 74 2d 73 65 72 76 65 72 2d 70 61 74 68 20 23 5b 30 20 22 08 5c 33 30 36 5c 32 36	l--set-server-path.#[0.".\306\26
0800	37 5c 32 30 32 57 00 09 5c 32 30 34 12 00 5c 33 30 37 5c 6e 5c 33 31 30 0b 23 5c 32 31 31 12 5c	7\202W..\204..\307\n\310.#\211.\
0820	32 30 37 5c 33 30 37 5c 6e 5c 33 31 30 09 23 5c 32 31 31 12 5c 32 30 37 09 5c 32 30 34 26 00 5c	207\307\n\310.#\211.\207.\204&.\
0840	33 30 37 5c 6e 5c 33 31 30 5c 66 23 5c 32 31 31 12 5c 32 30 37 5c 33 30 37 5c 6e 5c 33 31 30 09	307\n\310\f#\211.\207\307\n\310.
0860	23 5c 32 31 31 12 5c 32 30 37 09 5c 32 30 34 3a 00 5c 33 30 37 5c 6e 5c 33 31 30 0d 23 5c 32 31	#\211.\207.\204:.\307\n\310.#\21
0880	31 12 5c 32 30 37 5c 33 30 37 5c 6e 5c 33 31 30 09 23 5c 32 31 31 12 5c 32 30 37 09 5c 32 30 34	1.\207\307\n\310.#\211.\207.\204
08a0	4f 00 5c 33 30 37 5c 6e 5c 33 31 30 0e 5c 6e 23 5c 32 31 31 12 5c 32 30 37 5c 33 30 37 5c 6e 5c	O.\307\n\310.\n#\211.\207\307\n\
08c0	33 31 30 09 23 5c 32 31 31 12 5c 32 30 37 5c 33 31 31 5c 32 30 37 22 20 5b 6c 73 70 2d 76 68 64	310.#\211.\207\311\207".[lsp-vhd
08e0	6c 2d 73 65 72 76 65 72 20 6c 73 70 2d 76 68 64 6c 2d 73 65 72 76 65 72 2d 70 61 74 68 20 6c 73	l-server.lsp-vhdl-server-path.ls
0900	70 2d 76 68 64 6c 2d 2d 70 61 72 61 6d 73 20 68 64 6c 2d 63 68 65 63 6b 65 72 2d 62 69 6e 2d 6e	p-vhdl--params.hdl-checker-bin-n
0920	61 6d 65 20 76 68 64 6c 2d 74 6f 6f 6c 2d 62 69 6e 2d 6e 61 6d 65 20 76 68 64 6c 2d 6c 73 2d 62	ame.vhdl-tool-bin-name.vhdl-ls-b
0940	69 6e 2d 6e 61 6d 65 20 23 73 28 68 61 73 68 2d 74 61 62 6c 65 20 73 69 7a 65 20 34 20 74 65 73	in-name.#s(hash-table.size.4.tes
0960	74 20 65 71 20 72 65 68 61 73 68 2d 73 69 7a 65 20 31 2e 35 20 72 65 68 61 73 68 2d 74 68 72 65	t.eq.rehash-size.1.5.rehash-thre
0980	73 68 6f 6c 64 20 30 2e 38 31 32 35 20 70 75 72 65 63 6f 70 79 20 74 20 64 61 74 61 20 28 68 64	shold.0.8125.purecopy.t.data.(hd
09a0	6c 2d 63 68 65 63 6b 65 72 20 36 20 76 68 64 6c 2d 74 6f 6f 6c 20 32 36 20 76 68 64 6c 2d 6c 73	l-checker.6.vhdl-tool.26.vhdl-ls
09c0	20 34 36 20 67 68 64 6c 2d 6c 73 20 36 36 29 29 20 70 6c 69 73 74 2d 70 75 74 20 73 65 72 76 65	.46.ghdl-ls.66)).plist-put.serve
09e0	72 2d 70 61 74 68 20 6e 69 6c 20 67 68 64 6c 2d 6c 73 2d 62 69 6e 2d 6e 61 6d 65 5d 20 34 20 28	r-path.nil.ghdl-ls-bin-name].4.(
0a00	23 24 20 2e 20 31 39 33 32 29 5d 29 0a 23 40 34 39 20 53 65 74 20 73 65 72 76 65 72 20 61 72 67	#$...1932)]).#@49.Set.server.arg
0a20	75 6d 65 6e 74 73 20 62 61 73 65 64 20 6f 6e 20 73 65 72 76 65 72 20 73 65 6c 65 63 74 69 6f 6e	uments.based.on.server.selection
0a40	2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6c 73 70 2d 76 68 64 6c 2d 2d 73 65 74 2d 73 65 72 76	...(defalias.'lsp-vhdl--set-serv
0a60	65 72 2d 61 72 67 73 20 23 5b 30 20 22 08 5c 33 30 32 5c 32 36 37 5c 32 30 32 26 00 5c 33 30 33	er-args.#[0.".\302\267\202&.\303
0a80	09 5c 33 30 34 5c 33 30 35 23 5c 32 31 31 11 5c 32 30 37 5c 33 30 33 09 5c 33 30 34 5c 33 30 36	.\304\305#\211.\207\303.\304\306
0aa0	23 5c 32 31 31 11 5c 32 30 37 5c 33 30 33 09 5c 33 30 34 5c 33 30 37 23 5c 32 31 31 11 5c 32 30	#\211.\207\303.\304\307#\211.\20
0ac0	37 5c 33 30 33 09 5c 33 30 34 5c 33 30 37 23 5c 32 31 31 11 5c 32 30 37 5c 33 30 37 5c 32 30 37	7\303.\304\307#\211.\207\307\207
0ae0	22 20 5b 6c 73 70 2d 76 68 64 6c 2d 73 65 72 76 65 72 20 6c 73 70 2d 76 68 64 6c 2d 2d 70 61 72	".[lsp-vhdl-server.lsp-vhdl--par
0b00	61 6d 73 20 23 73 28 68 61 73 68 2d 74 61 62 6c 65 20 73 69 7a 65 20 34 20 74 65 73 74 20 65 71	ams.#s(hash-table.size.4.test.eq
0b20	20 72 65 68 61 73 68 2d 73 69 7a 65 20 31 2e 35 20 72 65 68 61 73 68 2d 74 68 72 65 73 68 6f 6c	.rehash-size.1.5.rehash-threshol
0b40	64 20 30 2e 38 31 32 35 20 70 75 72 65 63 6f 70 79 20 74 20 64 61 74 61 20 28 68 64 6c 2d 63 68	d.0.8125.purecopy.t.data.(hdl-ch
0b60	65 63 6b 65 72 20 36 20 76 68 64 6c 2d 74 6f 6f 6c 20 31 34 20 76 68 64 6c 2d 6c 73 20 32 32 20	ecker.6.vhdl-tool.14.vhdl-ls.22.
0b80	67 68 64 6c 2d 6c 73 20 33 30 29 29 20 70 6c 69 73 74 2d 70 75 74 20 73 65 72 76 65 72 2d 61 72	ghdl-ls.30)).plist-put.server-ar
0ba0	67 73 20 28 22 2d 2d 6c 73 70 22 29 20 28 22 6c 73 70 22 29 20 6e 69 6c 5d 20 34 20 28 23 24 20	gs.("--lsp").("lsp").nil].4.(#$.
0bc0	2e 20 32 35 37 38 29 5d 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 5c 33	..2578)]).(byte-code."\300\301\3
0be0	30 32 5c 33 30 33 20 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 33 31 31 5c	02\303.\304\305\306\307\310\311\
0c00	33 31 32 5c 33 31 33 26 5c 6e 21 5c 32 30 37 22 20 5b 6c 73 70 2d 72 65 67 69 73 74 65 72 2d 63	312\313&\n!\207".[lsp-register-c
0c20	6c 69 65 6e 74 20 6d 61 6b 65 2d 6c 73 70 2d 63 6c 69 65 6e 74 20 3a 6e 65 77 2d 63 6f 6e 6e 65	lient.make-lsp-client.:new-conne
0c40	63 74 69 6f 6e 20 6c 73 70 2d 76 68 64 6c 2d 2d 63 72 65 61 74 65 2d 63 6f 6e 6e 65 63 74 69 6f	ction.lsp-vhdl--create-connectio
0c60	6e 20 3a 6d 61 6a 6f 72 2d 6d 6f 64 65 73 20 28 76 68 64 6c 2d 6d 6f 64 65 29 20 3a 6c 61 6e 67	n.:major-modes.(vhdl-mode).:lang
0c80	75 61 67 65 2d 69 64 20 22 56 48 44 4c 22 20 3a 70 72 69 6f 72 69 74 79 20 2d 31 20 3a 73 65 72	uage-id."VHDL".:priority.-1.:ser
0ca0	76 65 72 2d 69 64 20 6c 73 70 2d 76 68 64 6c 5d 20 31 32 29 0a 28 64 65 66 63 6f 6e 73 74 20 6c	ver-id.lsp-vhdl].12).(defconst.l
0cc0	73 70 2d 76 68 64 6c 2d 70 6c 69 73 74 2d 76 61 6c 75 65 2d 77 68 65 6e 2d 63 6f 6d 70 69 6c 65	sp-vhdl-plist-value-when-compile
0ce0	64 20 6e 69 6c 29 0a 28 70 72 6f 76 69 64 65 20 27 6c 73 70 2d 76 68 64 6c 29 0a	d.nil).(provide.'lsp-vhdl).