test/unit_tests.vim | 22 +++++++++++++++++-----

diff --git a/test/unit_tests.vim b/test/unit_tests.vim
index 8e7f72a94973eb37d552b86b813c447b5b8b8a11..9f4593b238c8930d5fbbf1956d3435ccdc876645 100644
--- a/test/unit_tests.vim
+++ b/test/unit_tests.vim
@@ -25,6 +25,7 @@       path: (exepath('clangd-14') ?? exepath('clangd')),
       args: ['--background-index', '--clang-tidy']
   }]
 call LspAddServer(lspServers)
+echomsg system($'{lspServers[0].path} --version')
 
 g:LSPTest = true
 
@@ -895,11 +896,8 @@   autocmd_delete([{event: 'User', pattern: 'LspDiagsUpdated'}])
   assert_equal(3, g:LspAutoCmd)
 enddef
 
-def LspRunTests()
-  :set nomore
-  :set debug=beep
-  delete('results.txt')
-
+# Start the C language server.  Returns true on success and false on failure.
+def StartLangServer(): bool
   # Edit a dummy C file to start the LSP server
   :edit Xtest.c
   # Wait for the LSP server to become ready (max 10 seconds)
@@ -908,7 +906,21 @@   while maxcount > 0 && !g:LspServerReady()
     :sleep 100m
     maxcount -= 1
   endwhile
+  var serverStatus: bool = g:LspServerReady()
   :%bw!
+
+  return serverStatus
+enddef
+
+def LspRunTests()
+  :set nomore
+  :set debug=beep
+  delete('results.txt')
+
+  if !StartLangServer()
+    writefile(['FAIL: Not able to start the C language server'], 'results.txt')
+    return
+  endif
 
   # Get the list of test functions in this file and call them
   var fns: list<string> = execute('function /Test_')