lsp_server_requests

Author: TeamSPoon

.Attic/metta_lang/metta_interp.pl

@@ -101,6 +101,7 @@
 % This library provides tools for generating and interacting with Prolog documentation.
 :- ensure_loaded(library(pldoc)).
 
+/*
 % Set the encoding of the `current_input` stream to UTF-8.
 % This ensures that any input read from `current_input` (which is typically `user_input`) is interpreted as UTF-8.
 :- set_stream(current_input, encoding(utf8)).
@@ -128,7 +129,7 @@
 % Flush any pending output to ensure that anything waiting to be written to output is immediately written.
 % Useful to make sure output is synchronized and nothing is left in the buffer.
 :- flush_output.
-
+*/
 %:- set_prolog_flag(debug_on_interrupt,true).
 %:- set_prolog_flag(compile_meta_arguments,control).
 :- (prolog_load_context(directory, Value);Value='.'), absolute_file_name('../packs/',Dir,[relative_to(Value)]),
@@ -296,14 +297,15 @@
 keep_output:- is_win64,!.
 keep_output:- is_mettalog,!.
 keep_output:- is_testing,!.
+
 keep_output:- is_compatio,!,fail.
 
 
 :- volatile(original_user_output/1).
 :- dynamic(original_user_output/1).
 original_user_output(X):- stream_property(X,file_no(1)).
 original_user_error(X):- stream_property(X,file_no(2)).
-:- original_user_output(_)->true;current_output(Out),asserta(original_user_output(Out)).
+:- original_user_output(_)->true;(current_output(Out),asserta(original_user_output(Out))).
 unnullify_output:- current_output(MFS),  original_user_output(OUT), MFS==OUT, !.
 unnullify_output:- original_user_output(MFS), set_prolog_IO(user_input,MFS,user_error).
 
@@ -639,6 +641,7 @@
     ).
 
 null_io(G):- null_user_output(Out), !, with_output_to(Out,G).
+user_io(G):- current_prolog_flag(mettalog_rt, true), !, original_user_error(Out), ttyflush, !, with_output_to(Out,G), flush_output(Out), ttyflush.
 user_io(G):- original_user_output(Out), ttyflush, !, with_output_to(Out,G), flush_output(Out), ttyflush.
 user_err(G):- original_user_error(Out), !, with_output_to(Out,G).
 with_output_to_s(Out,G):- current_output(COut),

hyperon-wam.vpj

@@ -201,7 +201,43 @@
 		<Folder Name="src">
 			<Folder Name="packs">
 				<Folder Name="lsp_server_metta">
+					<Folder Name="prolog">
+						<F N="src/packs/lsp_server_metta/prolog/lsp_metta_checking.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_metta_code_actions.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_metta_colours.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_metta_completion.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_metta_formater.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_metta_hover.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_metta_include.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_metta_outline.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_metta_parser.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_metta_references.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_metta_save_actions.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_metta_split.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_metta_utils.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_metta_workspace.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_metta_xref.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_prolog_changes.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_prolog_checking.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_prolog_colours.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_prolog_utils.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_server_hooks.pl"/>
+						<F N="src/packs/lsp_server_metta/prolog/lsp_server_metta.pl"/>
+					</Folder>
+					<Folder Name="vscode">
+						<Folder Name="syntaxes">
+							<F N="src/packs/lsp_server_metta/vscode/syntaxes/mettalanguage.json"/>
+						</Folder>
+						<F N="src/packs/lsp_server_metta/vscode/extension.js"/>
+						<F N="src/packs/lsp_server_metta/vscode/metta.config.json"/>
+						<F N="src/packs/lsp_server_metta/vscode/package - Copy.json"/>
+						<F N="src/packs/lsp_server_metta/vscode/package-lock.json"/>
+						<F N="src/packs/lsp_server_metta/vscode/package.json"/>
+						<F N="src/packs/lsp_server_metta/vscode/README.md"/>
+					</Folder>
 					<F N="src/packs/lsp_server_metta/lsp-metta.el"/>
+					<F N="src/packs/lsp_server_metta/pack.pl"/>
+					<F N="src/packs/lsp_server_metta/README.md"/>
 				</Folder>
 			</Folder>
 			<F