Don't create diagnostics with blank messages

Author: mediremi

server/src/utils.ts

@@ -700,26 +700,31 @@ export let parseCompilerLogOutput = async (
       result[file] = [];
     }
 
-    let diagnostic: p.Diagnostic = {
-      severity: parsedDiagnostic.severity,
-      tags: parsedDiagnostic.tag === undefined ? [] : [parsedDiagnostic.tag],
-      code: parsedDiagnostic.code,
-      range,
-      source: "ReScript",
-      // remove start and end whitespaces/newlines
-      message: diagnosticMessage.join("\n").trim(),
-    };
+    // remove start and end whitespaces/newlines
+    let message = diagnosticMessage.join("\n").trim()
+
+    // vscode.Diagnostic throws an error if `message` is a blank string
+    if (message != "") {
+      let diagnostic: p.Diagnostic = {
+        severity: parsedDiagnostic.severity,
+        tags: parsedDiagnostic.tag === undefined ? [] : [parsedDiagnostic.tag],
+        code: parsedDiagnostic.code,
+        range,
+        source: "ReScript",
+        message,
+      };
 
-    // Check for potential code actions
-    await codeActions.findCodeActionsInDiagnosticsMessage({
-      addFoundActionsHere: foundCodeActions,
-      diagnostic,
-      diagnosticMessage,
-      file,
-      range,
-    });
+      // Check for potential code actions
+      await codeActions.findCodeActionsInDiagnosticsMessage({
+        addFoundActionsHere: foundCodeActions,
+        diagnostic,
+        diagnosticMessage,
+        file,
+        range,
+      });
 
-    result[file].push(diagnostic);
+      result[file].push(diagnostic);
+    }
   }
 
   return {