Patch title: Release 95 bulk changes
Abstract:
File: /pliant/fullpliant/run.pli
Key:
    Removed line
    Added line
   
abstract
  [This is the script that will start the FullPLiant operati


if (constant this_computer:env:"pliant":"browser":"service"=
  constant (compile_message "Compiling Pliant browser server
  precompile += "/pliant/graphic/browser/server/main.pli[lf]
  module "/pliant/graphic/browser/server/main.pli"
  constant (compile_message "Compiling browser basic applica
  module "/pliant/graphic/browser/sample/run.pli" # FIXME
  compile_message ""
  browser_server
  console "Pliant browser server is running." eol
if (constant this_computer:env:"pliant":"multiplexer":"servi
  constant (compile_message "Compiling Pliant TCP port multi
  precompile += "/pliant/util/pml/multiplexer.pli[lf]"
  module "/pliant/util/pml/multiplexer.pli"
  compile_message ""
  gvar Int mx_port := multiplexer_server
  if mx_port<>undefined
    console "Pliant multiplexer is running on TCP port " mx_
if (constant this_computer:env:"pliant":"browser":"console"=
  constant (compile_message "Compiling Pliant browser client
  precompile += "/pliant/graphic/browser/client/main.pli[lf]
  module "/pliant/graphic/browser/client/main.pli"
  module "/pliant/language/stream/loopback.pli"
  module "/pliant/util/pml/multiplexer.pli"
  multiplexer_port "loopback:/server/browser" "loopback:/cli
  compile_message ""
  function run_browser
    thread
abstract
  [This is the script that will start the FullPLiant operati


if (constant this_computer:env:"pliant":"browser":"service"=
  constant (compile_message "Compiling Pliant browser server
  precompile += "/pliant/graphic/browser/server/main.pli[lf]
  module "/pliant/graphic/browser/server/main.pli"
  constant (compile_message "Compiling browser basic applica
  module "/pliant/graphic/browser/sample/run.pli" # FIXME
  compile_message ""
  browser_server
  console "Pliant browser server is running." eol
if (constant this_computer:env:"pliant":"multiplexer":"servi
  constant (compile_message "Compiling Pliant TCP port multi
  precompile += "/pliant/util/pml/multiplexer.pli[lf]"
  module "/pliant/util/pml/multiplexer.pli"
  compile_message ""
  gvar Int mx_port := multiplexer_server
  if mx_port<>undefined
    console "Pliant multiplexer is running on TCP port " mx_
if (constant this_computer:env:"pliant":"browser":"console"=
  constant (compile_message "Compiling Pliant browser client
  precompile += "/pliant/graphic/browser/client/main.pli[lf]
  module "/pliant/graphic/browser/client/main.pli"
  module "/pliant/language/stream/loopback.pli"
  module "/pliant/util/pml/multiplexer.pli"
  multiplexer_port "loopback:/server/browser" "loopback:/cli
  compile_message ""
  function run_browser
    thread
      browser_client "console [dq]framebuffer[dq] terminal 2
      console "Pliant browser console is running." eol
      var ExtendedStatus status := browser_client "console [dq]framebuffer[dq] terminal 2 url [dq]loopback:/[dq] windows_manager [dq]loopback:/windows_manager[dq]"
      if status=failure
        console "No. in facts, the browser returned error: " status:message eol
  run_browser
  run_browser
  console "Pliant browser console is running." eol


function run_http
  pliant_compiler_semaphore release
  if not (this_computer:env:"pliant":"http":"port" parse (va
    port := 80
  if (constant this_computer:env:"pliant":"system":"distribu
    http_server port port secured log this_computer:env:"pli
  eif os_api="win32"
    http_server port port secured log this_computer:env:"pli
  else
    http_server port port secured log this_computer:env:"pli
run_http


function run_http
  pliant_compiler_semaphore release
  if not (this_computer:env:"pliant":"http":"port" parse (va
    port := 80
  if (constant this_computer:env:"pliant":"system":"distribu
    http_server port port secured log this_computer:env:"pli
  eif os_api="win32"
    http_server port port secured log this_computer:env:"pli
  else
    http_server port port secured log this_computer:env:"pli
run_http