Pass PROCESSORS env variable to Builder

(no-issue-check)

Author: AnthonyLeonardoGracio

gnat/lsp.gpr

@@ -15,6 +15,7 @@ project LSP is
      ("../liblsp_3_16/source/",
       "../liblsp_3_16/source/generated/");
    for Object_Dir use "../.obj/" & LSP_Common.Superproject & "/lsp";
+   package Builder renames LSP_Common.Builder;
 
    package Compiler renames LSP_Common.Compiler;
 

gnat/lsp_client.gpr

@@ -24,5 +24,6 @@ project LSP_Client is
    for Object_Dir use "../.obj/client";
 
    package Compiler renames LSP.Compiler;
+   package Builder renames LSP.Builder;
 
 end LSP_Client;

gnat/lsp_common.gpr

@@ -23,6 +23,12 @@ abstract project LSP_Common is
 
    Superproject := external ("SUPERPROJECT", "");
 
+   Processors := external ("PROCESSORS", "1");
+
+   package Builder is
+      for Switches ("Ada") use ("-m", "-j" & Processors);
+   end Builder;
+
    type Any_Boolean is ("false", "true");
 
    --  By default, treat warnings as errors in dev mode, but not in prod

gnat/lsp_server.gpr

@@ -104,6 +104,7 @@ project LSP_Server is
 
    package Builder is
       for Executable ("lsp-ada_driver") use "ada_language_server";
+      for Switches ("Ada") use Lsp_Common.Builder'Switches ("Ada");
    end Builder;
 
 end LSP_Server;