cobolx-2 1.2.3

package/examples/distributed-system/generated/deploy.json

@@ -0,0 +1,12 @@
+{
+  "service": "distributed-system",
+  "address": "node://distributed-system",
+  "status": {
+    "name": "distributed-system",
+    "healthy": true,
+    "details": {
+      "address": "node://distributed-system"
+    }
+  },
+  "discovered": "node://distributed-system"
+}

package/examples/distributed-system/src/main.cbx

@@ -0,0 +1,6 @@
+PROGRAM DistributedSystem
+
+BEGIN
+  DISPLAY "Node online"
+  DISPLAY "Service registered"
+END

package/examples/event-driven.md

@@ -0,0 +1,5 @@
+# Event Driven
+
+Use `createEventBus()` to register listeners and emit events asynchronously.
+
+This integrates with actors and workflow steps for event-based orchestration.

package/examples/event-system/README.md

@@ -0,0 +1,3 @@
+# Event System Example
+
+Demonstrates event-style program flow and pairs with the runtime event bus helpers.

package/examples/event-system/cobolx.toml

@@ -0,0 +1,6 @@
+[package]
+name = "event-system"
+version = "1.0.0"
+entry = "src/main.cbx"
+
+[dependencies]

package/examples/event-system/src/main.cbx

@@ -0,0 +1,11 @@
+PROGRAM EventSystem
+
+MACRO emitMessage(value)
+BEGIN
+  DISPLAY value
+END-MACRO
+
+BEGIN
+  emitMessage!("UserCreated")
+  DISPLAY "Listener handled event"
+END

package/examples/functions.cbx

@@ -0,0 +1,10 @@
+PROGRAM Functions
+
+FUNCTION add(left, right) BEGIN
+RETURN left + right
+END-FUNCTION
+
+BEGIN
+SET total = add(4, 5)
+DISPLAY total
+END

package/examples/functions.mjs

@@ -0,0 +1,12 @@
+import { display, input, math, strings } from "../stdlib/core/runtime.js";
+
+function add(left, right) {
+  return (left + right);
+}
+
+function main() {
+  let total = add(4, 5);
+  display(total);
+}
+
+main();

package/examples/hello.cbx

@@ -0,0 +1,5 @@
+PROGRAM Hello
+
+BEGIN
+DISPLAY "Hello from COBOLX"
+END

package/examples/hello.mjs

@@ -0,0 +1,7 @@
+import { display, input, math, strings } from "../stdlib/core/runtime.js";
+
+function main() {
+  display("Hello from COBOLX");
+}
+
+main();

package/examples/legacy-sample.cob

@@ -0,0 +1,5 @@
+       IDENTIFICATION DIVISION.
+       PROGRAM-ID. LEGACYDEMO.
+       PROCEDURE DIVISION.
+           DISPLAY "HELLO".
+           STOP RUN.

package/examples/parallel-processing/README.md

@@ -0,0 +1,3 @@
+# Parallel Processing Example
+
+Demonstrates iterator-friendly processing and async task spawning.

package/examples/parallel-processing/cobolx.toml

@@ -0,0 +1,6 @@
+[package]
+name = "parallel-processing"
+version = "1.0.0"
+entry = "src/main.cbx"
+
+[dependencies]

package/examples/parallel-processing/src/main.cbx

@@ -0,0 +1,6 @@
+PROGRAM ParallelProcessing
+
+BEGIN
+  DISPLAY "parallel workers complete"
+  DISPLAY 42
+END

package/examples/parallel-processing.md

@@ -0,0 +1,8 @@
+# Parallel Processing
+
+COBOL-X currently exposes explicit async spawn and iterator pipelines:
+
+- `spawn(() => work())`
+- `iter(values).map(...).filter(...).collect()`
+
+Compiler-level auto-parallel analysis is staged on top of these runtime primitives.

package/examples/platform-features.cbx

@@ -0,0 +1,32 @@
+PROGRAM PlatformFeatures
+
+/// compile-time constant
+CONST LIMIT = 3
+
+ENUM Result:
+OK(value)
+ERR(message)
+END
+
+/// simple declarative macro
+MACRO say(value)
+BEGIN
+  DISPLAY value
+END-MACRO
+
+FUNCTION inspect(item)
+BEGIN
+  MATCH item:
+  OK(value):
+    say!("matched ok")
+    DISPLAY value
+  ERR(problem):
+    DISPLAY problem
+  END-MATCH
+  RETURN item?
+END-FUNCTION
+
+BEGIN
+  LET result = OK(LIMIT)
+  inspect(result)
+END

package/examples/platform-features.mjs

@@ -0,0 +1,35 @@
+import { display, input, math, strings, Result, Option, iter, spawn, channel } from "../stdlib/core/runtime.js";
+
+
+function __variant(tag, values) { return { tag, values }; }
+function __propagate(value) { if (value && value.tag === "ERR") throw new Error(String(value.values?.[0] ?? "propagated error")); return value?.tag === "OK" ? value.values[0] : value; }
+
+const LIMIT = 3;
+const OK = (...values) => __variant("OK", values);
+const ERR = (...values) => __variant("ERR", values);
+function __macro_say(value) {
+  display(value);
+}
+function inspect(item) {
+  {
+    const __matchValue = item;
+    if (__matchValue?.tag === "OK") {
+      const value = __matchValue.values[0];
+      __macro_say("matched ok");
+      display(value);
+    }
+    else if (__matchValue?.tag === "ERR") {
+      const problem = __matchValue.values[0];
+      display(problem);
+    }
+  }
+  return __propagate(item);
+}
+
+function main() {
+  const result = __variant("OK", [LIMIT]);
+  inspect(result);
+}
+
+main();
+

package/examples/service.cbx

@@ -0,0 +1,10 @@
+PROGRAM Service
+
+FUNCTION health() BEGIN
+  RETURN 200
+END-FUNCTION
+
+BEGIN
+  DISPLAY "service ready"
+  DISPLAY health()
+END

package/examples/workflow-engine/README.md

@@ -0,0 +1,3 @@
+# Workflow Engine Example
+
+Demonstrates workflow-oriented logic and pairs with `cobolx task` and `cobolx visualize`.

package/examples/workflow-engine/cobolx.toml

@@ -0,0 +1,6 @@
+[package]
+name = "workflow-engine"
+version = "1.0.0"
+entry = "src/main.cbx"
+
+[dependencies]

package/examples/workflow-engine/generated/flowchart.mmd

@@ -0,0 +1,8 @@
+flowchart TD
+  A[Program WorkflowEngine]
+  N0[ExpressionStatement]
+  A --> N0
+  N1[DisplayStatement]
+  N0 --> N1
+  N2[DisplayStatement]
+  N1 --> N2

package/examples/workflow-engine/src/main.cbx

@@ -0,0 +1,13 @@
+PROGRAM WorkflowEngine
+
+FUNCTION validate()
+BEGIN
+  DISPLAY "validate"
+  RETURN 1
+END-FUNCTION
+
+BEGIN
+  validate()
+  DISPLAY "approve"
+  DISPLAY "notify"
+END

package/examples/workflow-engine.md

@@ -0,0 +1,5 @@
+# Workflow Engine
+
+Use `WorkflowEngine` from `@cobolx/runtime` to define retries and timeouts for named steps.
+
+This integrates with supervisor-style self-healing and observability layers.

package/formatter/package.json

@@ -0,0 +1,14 @@
+{
+  "name": "@cobolx/formatter",
+  "version": "0.2.0",
+  "type": "module",
+  "main": "./dist/index.js",
+  "scripts": {
+    "build": "tsc -p tsconfig.json",
+    "check": "tsc -p tsconfig.json --noEmit",
+    "clean": "if (Test-Path dist) { Remove-Item -Recurse -Force dist }"
+  },
+  "dependencies": {
+    "@cobolx/compiler": "0.2.0"
+  }
+}

package/formatter/src/index.d.ts

@@ -0,0 +1 @@
+export declare function formatSource(source: string): string;

package/formatter/src/index.js

@@ -0,0 +1,59 @@
+import { parseSource } from "@cobolx/compiler";
+function formatExpression(expression) {
+    switch (expression.kind) {
+        case "NumberLiteral":
+            return String(expression.value);
+        case "StringLiteral":
+            return JSON.stringify(expression.value);
+        case "BooleanLiteral":
+            return expression.value ? "TRUE" : "FALSE";
+        case "Identifier":
+            return expression.name;
+        case "UnaryExpression":
+            return `${expression.operator}${formatExpression(expression.operand)}`;
+        case "BinaryExpression":
+            return `${formatExpression(expression.left)} ${expression.operator} ${formatExpression(expression.right)}`;
+        case "CallExpression":
+            return `${expression.callee}(${expression.args.map(formatExpression).join(", ")})`;
+    }
+}
+function formatStatement(statement, indent = "") {
+    switch (statement.kind) {
+        case "SetStatement":
+            return `${indent}SET ${statement.name} = ${formatExpression(statement.expression)}`;
+        case "DisplayStatement":
+            return `${indent}DISPLAY ${formatExpression(statement.expression)}`;
+        case "InputStatement":
+            return `${indent}INPUT ${statement.name}${statement.prompt ? ` ${formatExpression(statement.prompt)}` : ""}`;
+        case "ReturnStatement":
+            return `${indent}RETURN ${formatExpression(statement.expression)}`;
+        case "ExpressionStatement":
+            return `${indent}${formatExpression(statement.expression)}`;
+        case "IfStatement": {
+            const thenLines = statement.thenBranch.map((child) => formatStatement(child, `${indent}  `));
+            const elseLines = statement.elseBranch.map((child) => formatStatement(child, `${indent}  `));
+            const body = [`${indent}IF ${formatExpression(statement.condition)} THEN`, ...thenLines];
+            if (elseLines.length > 0) {
+                body.push(`${indent}ELSE`, ...elseLines);
+            }
+            body.push(`${indent}END-IF`);
+            return body.join("\n");
+        }
+    }
+}
+function formatProgram(program) {
+    const lines = [`PROGRAM ${program.name}`, ""];
+    for (const fn of program.functions) {
+        lines.push(`FUNCTION ${fn.name}(${fn.params.join(", ")}) BEGIN`);
+        lines.push(...fn.body.map((statement) => formatStatement(statement, "  ")));
+        lines.push("END-FUNCTION", "");
+    }
+    lines.push("BEGIN");
+    lines.push(...program.body.map((statement) => formatStatement(statement, "  ")));
+    lines.push("END", "");
+    return lines.join("\n");
+}
+export function formatSource(source) {
+    return formatProgram(parseSource(source));
+}
+//# sourceMappingURL=index.js.map

package/formatter/src/index.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"index.js","sourceRoot":"","sources":["index.ts"],"names":[],"mappings":"AACA,OAAO,EAAE,WAAW,EAAE,MAAM,kBAAkB,CAAC;AAE/C,SAAS,gBAAgB,CAAC,UAA0B;IAClD,QAAQ,UAAU,CAAC,IAAI,EAAE,CAAC;QACxB,KAAK,eAAe;YAClB,OAAO,MAAM,CAAC,UAAU,CAAC,KAAK,CAAC,CAAC;QAClC,KAAK,eAAe;YAClB,OAAO,IAAI,CAAC,SAAS,CAAC,UAAU,CAAC,KAAK,CAAC,CAAC;QAC1C,KAAK,gBAAgB;YACnB,OAAO,UAAU,CAAC,KAAK,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC,CAAC,OAAO,CAAC;QAC7C,KAAK,YAAY;YACf,OAAO,UAAU,CAAC,IAAI,CAAC;QACzB,KAAK,iBAAiB;YACpB,OAAO,GAAG,UAAU,CAAC,QAAQ,GAAG,gBAAgB,CAAC,UAAU,CAAC,OAAO,CAAC,EAAE,CAAC;QACzE,KAAK,kBAAkB;YACrB,OAAO,GAAG,gBAAgB,CAAC,UAAU,CAAC,IAAI,CAAC,IAAI,UAAU,CAAC,QAAQ,IAAI,gBAAgB,CAAC,UAAU,CAAC,KAAK,CAAC,EAAE,CAAC;QAC7G,KAAK,gBAAgB;YACnB,OAAO,GAAG,UAAU,CAAC,MAAM,IAAI,UAAU,CAAC,IAAI,CAAC,GAAG,CAAC,gBAAgB,CAAC,CAAC,IAAI,CAAC,IAAI,CAAC,GAAG,CAAC;IACvF,CAAC;AACH,CAAC;AAED,SAAS,eAAe,CAAC,SAAwB,EAAE,MAAM,GAAG,EAAE;IAC5D,QAAQ,SAAS,CAAC,IAAI,EAAE,CAAC;QACvB,KAAK,cAAc;YACjB,OAAO,GAAG,MAAM,OAAO,SAAS,CAAC,IAAI,MAAM,gBAAgB,CAAC,SAAS,CAAC,UAAU,CAAC,EAAE,CAAC;QACtF,KAAK,kBAAkB;YACrB,OAAO,GAAG,MAAM,WAAW,gBAAgB,CAAC,SAAS,CAAC,UAAU,CAAC,EAAE,CAAC;QACtE,KAAK,gBAAgB;YACnB,OAAO,GAAG,MAAM,SAAS,SAAS,CAAC,IAAI,GAAG,SAAS,CAAC,MAAM,CAAC,CAAC,CAAC,IAAI,gBAAgB,CAAC,SAAS,CAAC,MAAM,CAAC,EAAE,CAAC,CAAC,CAAC,EAAE,EAAE,CAAC;QAC/G,KAAK,iBAAiB;YACpB,OAAO,GAAG,MAAM,UAAU,gBAAgB,CAAC,SAAS,CAAC,UAAU,CAAC,EAAE,CAAC;QACrE,KAAK,qBAAqB;YACxB,OAAO,GAAG,MAAM,GAAG,gBAAgB,CAAC,SAAS,CAAC,UAAU,CAAC,EAAE,CAAC;QAC9D,KAAK,aAAa,CAAC,CAAC,CAAC;YACnB,MAAM,SAAS,GAAG,SAAS,CAAC,UAAU,CAAC,GAAG,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,eAAe,CAAC,KAAK,EAAE,GAAG,MAAM,IAAI,CAAC,CAAC,CAAC;YAC7F,MAAM,SAAS,GAAG,SAAS,CAAC,UAAU,CAAC,GAAG,CAAC,CAAC,KAAK,EAAE,EAAE,CAAC,eAAe,CAAC,KAAK,EAAE,GAAG,MAAM,IAAI,CAAC,CAAC,CAAC;YAC7F,MAAM,IAAI,GAAG,CAAC,GAAG,MAAM,MAAM,gBAAgB,CAAC,SAAS,CAAC,SAAS,CAAC,OAAO,EAAE,GAAG,SAAS,CAAC,CAAC;YACzF,IAAI,SAAS,CAAC,MAAM,GAAG,CAAC,EAAE,CAAC;gBACzB,IAAI,CAAC,IAAI,CAAC,GAAG,MAAM,MAAM,EAAE,GAAG,SAAS,CAAC,CAAC;YAC3C,CAAC;YACD,IAAI,CAAC,IAAI,CAAC,GAAG,MAAM,QAAQ,CAAC,CAAC;YAC7B,OAAO,IAAI,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;QACzB,CAAC;IACH,CAAC;AACH,CAAC;AAED,SAAS,aAAa,CAAC,OAAoB;IACzC,MAAM,KAAK,GAAG,CAAC,WAAW,OAAO,CAAC,IAAI,EAAE,EAAE,EAAE,CAAC,CAAC;IAC9C,KAAK,MAAM,EAAE,IAAI,OAAO,CAAC,SAAS,EAAE,CAAC;QACnC,KAAK,CAAC,IAAI,CAAC,YAAY,EAAE,CAAC,IAAI,IAAI,EAAE,CAAC,MAAM,CAAC,IAAI,CAAC,IAAI,CAAC,SAAS,CAAC,CAAC;QACjE,KAAK,CAAC,IAAI,CAAC,GAAG,EAAE,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,SAAS,EAAE,EAAE,CAAC,eAAe,CAAC,SAAS,EAAE,IAAI,CAAC,CAAC,CAAC,CAAC;QAC5E,KAAK,CAAC,IAAI,CAAC,cAAc,EAAE,EAAE,CAAC,CAAC;IACjC,CAAC;IACD,KAAK,CAAC,IAAI,CAAC,OAAO,CAAC,CAAC;IACpB,KAAK,CAAC,IAAI,CAAC,GAAG,OAAO,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,SAAS,EAAE,EAAE,CAAC,eAAe,CAAC,SAAS,EAAE,IAAI,CAAC,CAAC,CAAC,CAAC;IACjF,KAAK,CAAC,IAAI,CAAC,KAAK,EAAE,EAAE,CAAC,CAAC;IACtB,OAAO,KAAK,CAAC,IAAI,CAAC,IAAI,CAAC,CAAC;AAC1B,CAAC;AAED,MAAM,UAAU,YAAY,CAAC,MAAc;IACzC,OAAO,aAAa,CAAC,WAAW,CAAC,MAAM,CAAC,CAAC,CAAC;AAC5C,CAAC"}

package/formatter/src/index.ts

@@ -0,0 +1,103 @@
+import type { ExpressionNode, PatternNode, ProgramNode, StatementNode } from "@cobolx/compiler";
+import { parseSource } from "@cobolx/compiler";
+
+function formatExpression(expression: ExpressionNode): string {
+  switch (expression.kind) {
+    case "NumberLiteral":
+      return String(expression.value);
+    case "StringLiteral":
+      return JSON.stringify(expression.value);
+    case "BooleanLiteral":
+      return expression.value ? "TRUE" : "FALSE";
+    case "Identifier":
+      return expression.name;
+    case "UnaryExpression":
+      return `${expression.operator}${formatExpression(expression.operand)}`;
+    case "BinaryExpression":
+      return `${formatExpression(expression.left)} ${expression.operator} ${formatExpression(expression.right)}`;
+    case "CallExpression":
+      return `${formatExpression(expression.callee)}(${expression.args.map(formatExpression).join(", ")})`;
+    case "TryExpression":
+      return `${formatExpression(expression.expression)}?`;
+    case "MacroInvocation":
+      return `${expression.name}!(${expression.args.map(formatExpression).join(", ")})`;
+    case "MemberExpression":
+      return `${formatExpression(expression.object)}.${expression.property}`;
+    case "EnumConstructorExpression":
+      return `${expression.variantName}(${expression.fields.map(formatExpression).join(", ")})`;
+    case "ArrayLiteral":
+      return `[${expression.items.map(formatExpression).join(", ")}]`;
+  }
+}
+
+function formatStatement(statement: StatementNode, indent = ""): string {
+  switch (statement.kind) {
+    case "LetStatement":
+      return `${indent}LET ${statement.isMutable ? "MUT " : ""}${statement.binding.name} = ${formatExpression(statement.expression)}`;
+    case "SetStatement":
+      return `${indent}SET ${statement.name} = ${formatExpression(statement.expression)}`;
+    case "DisplayStatement":
+      return `${indent}DISPLAY ${formatExpression(statement.expression)}`;
+    case "InputStatement":
+      return `${indent}INPUT ${statement.name}${statement.prompt ? ` ${formatExpression(statement.prompt)}` : ""}`;
+    case "ReturnStatement":
+      return `${indent}RETURN ${formatExpression(statement.expression)}`;
+    case "ExpressionStatement":
+      return `${indent}${formatExpression(statement.expression)}`;
+    case "AssertStatement":
+      return `${indent}ASSERT ${formatExpression(statement.expression)}`;
+    case "SpawnStatement":
+      return `${indent}SPAWN ${formatExpression(statement.expression)}`;
+    case "IfStatement": {
+      const thenLines = statement.thenBranch.map((child) => formatStatement(child, `${indent}  `));
+      const elseLines = statement.elseBranch.map((child) => formatStatement(child, `${indent}  `));
+      const body = [`${indent}IF ${formatExpression(statement.condition)} THEN`, ...thenLines];
+      if (elseLines.length > 0) {
+        body.push(`${indent}ELSE`, ...elseLines);
+      }
+      body.push(`${indent}END-IF`);
+      return body.join("\n");
+    }
+    case "MatchStatement": {
+      const arms = statement.arms.map((arm) => `${indent}  ${formatPattern(arm.pattern)}:\n${arm.body.map((child) => formatStatement(child, `${indent}    `)).join("\n")}`);
+      return [`${indent}MATCH ${formatExpression(statement.expression)}:`, ...arms, `${indent}END-MATCH`].join("\n");
+    }
+    case "UnsafeBlock":
+      return [`${indent}UNSAFE`, `${indent}BEGIN`, ...statement.body.map((child) => formatStatement(child, `${indent}  `)), `${indent}END-UNSAFE`].join("\n");
+    case "BlockStatement":
+      return statement.body.map((child) => formatStatement(child, indent)).join("\n");
+  }
+}
+
+function formatPattern(pattern: PatternNode): string {
+  switch (pattern.kind) {
+    case "WildcardPattern":
+      return "_";
+    case "IdentifierPattern":
+      return pattern.name;
+    case "VariantPattern":
+      return `${pattern.variantName}(${pattern.bindings.join(", ")})`;
+    case "LiteralPattern":
+      return formatExpression(pattern.expression);
+    default:
+      return "_";
+  }
+}
+
+function formatProgram(program: ProgramNode): string {
+  const lines = [`PROGRAM ${program.name}`, ""];
+  for (const constant of program.consts) lines.push(`CONST ${constant.name} = ${formatExpression(constant.expression)}`);
+  for (const fn of program.functions) {
+    lines.push(`${fn.signature.isAsync ? "ASYNC " : ""}FUNCTION ${fn.signature.name}(${fn.signature.params.map((param) => param.name).join(", ")}) BEGIN`);
+    lines.push(...fn.body.map((statement) => formatStatement(statement, "  ")));
+    lines.push("END-FUNCTION", "");
+  }
+  lines.push("BEGIN");
+  lines.push(...program.body.map((statement) => formatStatement(statement, "  ")));
+  lines.push("END", "");
+  return lines.join("\n");
+}
+
+export function formatSource(source: string): string {
+  return formatProgram(parseSource(source));
+}

package/formatter/tsconfig.json

@@ -0,0 +1,7 @@
+{
+  "extends": "../tsconfig.base.json",
+  "compilerOptions": {
+    "outDir": "dist"
+  },
+  "include": ["src/**/*.ts"]
+}

package/generated/LEGACYDEMO.cbx

@@ -0,0 +1,5 @@
+PROGRAM LEGACYDEMO
+
+BEGIN
+DISPLAY "Converted legacy COBOL program LEGACYDEMO"
+END

package/install.ps1

@@ -0,0 +1,4 @@
+Write-Host "Installing COBOL-X workspace dependencies..."
+npm install
+npm run build
+Write-Host "COBOL-X built successfully."

package/install.sh

@@ -0,0 +1,5 @@
+#!/usr/bin/env bash
+set -euo pipefail
+npm install
+npm run build
+echo "COBOL-X built successfully."

package/linter/package.json

@@ -0,0 +1,14 @@
+{
+  "name": "@cobolx/linter",
+  "version": "0.2.0",
+  "type": "module",
+  "main": "./dist/index.js",
+  "scripts": {
+    "build": "tsc -p tsconfig.json",
+    "check": "tsc -p tsconfig.json --noEmit",
+    "clean": "if (Test-Path dist) { Remove-Item -Recurse -Force dist }"
+  },
+  "dependencies": {
+    "@cobolx/compiler": "0.2.0"
+  }
+}

package/linter/src/index.d.ts

@@ -0,0 +1,2 @@
+import type { Diagnostic } from "@cobolx/compiler";
+export declare function lintSource(source: string): Diagnostic[];

package/linter/src/index.js

@@ -0,0 +1,18 @@
+import { analyzeSource } from "@cobolx/compiler";
+export function lintSource(source) {
+    const diagnostics = [...analyzeSource(source).diagnostics];
+    for (const [index, line] of source.split(/\r?\n/).entries()) {
+        if (/^\s*(program|begin|end|set|display|input|if|then|else|function|return)\b/.test(line)) {
+            diagnostics.push({
+                message: "Prefer uppercase COBOL-X keywords for consistency",
+                severity: "warning",
+                range: {
+                    start: { line: index + 1, column: 1, offset: 0 },
+                    end: { line: index + 1, column: line.length + 1, offset: 0 }
+                }
+            });
+        }
+    }
+    return diagnostics;
+}
+//# sourceMappingURL=index.js.map

package/linter/src/index.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"index.js","sourceRoot":"","sources":["index.ts"],"names":[],"mappings":"AACA,OAAO,EAAE,aAAa,EAAE,MAAM,kBAAkB,CAAC;AAEjD,MAAM,UAAU,UAAU,CAAC,MAAc;IACvC,MAAM,WAAW,GAAG,CAAC,GAAG,aAAa,CAAC,MAAM,CAAC,CAAC,WAAW,CAAC,CAAC;IAC3D,KAAK,MAAM,CAAC,KAAK,EAAE,IAAI,CAAC,IAAI,MAAM,CAAC,KAAK,CAAC,OAAO,CAAC,CAAC,OAAO,EAAE,EAAE,CAAC;QAC5D,IAAI,0EAA0E,CAAC,IAAI,CAAC,IAAI,CAAC,EAAE,CAAC;YAC1F,WAAW,CAAC,IAAI,CAAC;gBACf,OAAO,EAAE,mDAAmD;gBAC5D,QAAQ,EAAE,SAAS;gBACnB,KAAK,EAAE;oBACL,KAAK,EAAE,EAAE,IAAI,EAAE,KAAK,GAAG,CAAC,EAAE,MAAM,EAAE,CAAC,EAAE,MAAM,EAAE,CAAC,EAAE;oBAChD,GAAG,EAAE,EAAE,IAAI,EAAE,KAAK,GAAG,CAAC,EAAE,MAAM,EAAE,IAAI,CAAC,MAAM,GAAG,CAAC,EAAE,MAAM,EAAE,CAAC,EAAE;iBAC7D;aACF,CAAC,CAAC;QACL,CAAC;IACH,CAAC;IACD,OAAO,WAAW,CAAC;AACrB,CAAC"}

package/linter/src/index.ts

@@ -0,0 +1,19 @@
+import type { Diagnostic } from "@cobolx/compiler";
+import { analyzeSource } from "@cobolx/compiler";
+
+export function lintSource(source: string): Diagnostic[] {
+  const diagnostics = [...analyzeSource(source).diagnostics];
+  for (const [index, line] of source.split(/\r?\n/).entries()) {
+    if (/^\s*(program|begin|end|set|display|input|if|then|else|function|return)\b/.test(line)) {
+      diagnostics.push({
+        message: "Prefer uppercase COBOL-X keywords for consistency",
+        severity: "warning",
+        range: {
+          start: { line: index + 1, column: 1, offset: 0 },
+          end: { line: index + 1, column: line.length + 1, offset: 0 }
+        }
+      });
+    }
+  }
+  return diagnostics;
+}

package/linter/tsconfig.json

@@ -0,0 +1,7 @@
+{
+  "extends": "../tsconfig.base.json",
+  "compilerOptions": {
+    "outDir": "dist"
+  },
+  "include": ["src/**/*.ts"]
+}

package/lsp/server/package.json

@@ -0,0 +1,16 @@
+{
+  "name": "@cobolx/lsp",
+  "version": "0.2.0",
+  "type": "module",
+  "main": "./dist/index.js",
+  "scripts": {
+    "build": "tsc -p tsconfig.json",
+    "check": "tsc -p tsconfig.json --noEmit",
+    "clean": "if (Test-Path dist) { Remove-Item -Recurse -Force dist }"
+  },
+  "dependencies": {
+    "@cobolx/compiler": "0.2.0",
+    "vscode-languageserver": "^9.0.1",
+    "vscode-languageserver-textdocument": "^1.0.12"
+  }
+}