@atlisp/lint 0.1.0

package/dist/lib/lint-sbcl.lisp

@@ -0,0 +1,126 @@
+;; @lisp SBCL Lint — syntax validation via SBCL
+;; Usage: sbcl --script lint-sbcl.lisp <src-dir> <stub-packages.json> <walk-exclude-json> <defmacro-allow-files-json>
+
+(require :uiop)
+
+(defparameter *errors* 0)
+(defparameter *warnings* 0)
+(defparameter *checked* 0)
+
+;; ── Stub packages from external file ──────────────────────────────────
+;; File format: alist ((name use*) ...) — valid Lisp data
+(defun load-stub-packages (file-path)
+  (flet ((ensure-pkg (name &optional use-list)
+           (unless (find-package name)
+             (make-package name :use (or use-list '())))))
+    (with-open-file (s file-path :direction :input)
+      (let ((packages (read s)))
+        (dolist (pkg packages)
+          (ensure-pkg (first pkg) (second pkg)))))))
+
+;; ── File walking ──────────────────────────────────────────────────────
+(defun source-files (dir)
+  (sort
+    (remove-if-not
+      (lambda (p)
+        (let ((n (pathname-type p)))
+          (and n (string-equal n "lsp"))))
+      (uiop:directory-files dir))
+    'string< :key #'namestring))
+
+(defun walk-tree (dir exclude-dirs)
+  (let ((result (source-files dir)))
+    (dolist (sub (uiop:subdirectories dir))
+      (let ((name (car (last (pathname-directory sub)))))
+        (unless (find name exclude-dirs :test 'string=)
+          (setf result (append result (walk-tree sub exclude-dirs))))))
+    result))
+
+;; ── Per-file check ────────────────────────────────────────────────────
+(defun check-file (path src-dir defmacro-allow-files)
+  (incf *checked*)
+  (let* ((rel (enough-namestring path src-dir))
+         (fullname (format nil "~a.~a" (pathname-name path) (pathname-type path))))
+    (format t "  ~a ... " rel)
+    (force-output)
+    ;; Syntax check via READ
+    (handler-case
+        (with-open-file (s path :direction :input)
+          (loop for form = (read s nil :eof)
+                until (eq form :eof)))
+      (error (e)
+        (let ((msg (princ-to-string e)))
+          (cond
+            ((search "not found" msg)
+             (format t "~%  [NOTE] ~a: ~a~%" rel
+                     (subseq msg 0 (min 80 (length msg))))
+             (incf *warnings*))
+            (t
+             (format t "FAIL~%  [ERROR] ~a: ~a~%" rel e)
+             (incf *errors*)
+             (return-from check-file))))))
+    ;; Trailing whitespace
+    (with-open-file (s path :direction :input)
+      (loop for line = (read-line s nil nil)
+            for lineno from 1
+            while line
+            when (and (> (length line) 0)
+                      (find (char line (1- (length line))) '(#\Space #\Tab)))
+              do (progn
+                   (format t "~%  [WARN] ~a line ~d: trailing whitespace~%" rel lineno)
+                   (incf *warnings*))))
+    ;; CL-ism checks: raw content scan
+    (with-open-file (s path :direction :input)
+      (let ((content (make-string (file-length s))))
+        (file-position s 0)
+        (read-sequence content s)
+        (when (search "#(" content)
+          (format t "~%  [WARN] ~a: #( vector syntax (not valid in AutoLISP)~%" rel)
+          (incf *warnings*))
+        (when (search "#\\" content)
+          (format t "~%  [WARN] ~a: #\\ character literal syntax (not valid in AutoLISP)~%" rel)
+          (incf *warnings*))
+        (when (search "#." content)
+          (format t "~%  [WARN] ~a: #. read-time eval syntax (not valid in AutoLISP)~%" rel)
+          (incf *warnings*))
+        (when (and (search "defmacro" content)
+                   (not (some (lambda (s) (search s fullname)) defmacro-allow-files)))
+          (format t "~%  [WARN] ~a: defmacro (not valid in AutoLISP)~%" rel)
+          (incf *warnings*))))
+    (format t "OK~%")))
+
+;; ── Main ──────────────────────────────────────────────────────────────
+(defun main ()
+  (let* ((args (uiop:command-line-arguments))
+         (src-dir (first args))
+         (stub-file (second args))
+         (walk-exclude (if (third args)
+                          (read-from-string (third args))
+                          '(".vscode" "test" "experiment" "tools" ".git")))
+         (defmacro-allow (if (fourth args)
+                            (read-from-string (fourth args))
+                            '("compat-cl"))))
+    ;; Load stub packages for CAD runtime symbols
+    (load-stub-packages stub-file)
+
+    (format t "~%==================================================~%")
+    (format t "  @lisp SBCL Lint~%")
+    (format t "  Source: ~a~%" (namestring (pathname src-dir)))
+    (format t "==================================================~%~%")
+    (setf *errors* 0 *warnings* 0 *checked* 0)
+
+    (let ((files (walk-tree src-dir walk-exclude)))
+      (format t "  Found ~d .lsp files~%~%" (length files))
+      (dolist (f files)
+        (check-file f src-dir defmacro-allow)))
+
+    (format t "~%==================================================~%")
+    (format t "  Scanned: ~d files~%" *checked*)
+    (format t "  Errors: ~d~%" *errors*)
+    (format t "  Warnings: ~d~%" *warnings*)
+    (format t "==================================================~%~%")
+    (if (> *errors* 0)
+        (uiop:quit 1)
+        (uiop:quit 0))))
+
+(main)

package/dist/locale.d.ts

@@ -0,0 +1,4 @@
+export declare function setLocale(locale: string): void;
+export declare function getLocale(): string;
+export declare function t(key: string, ...args: (string | number)[]): string;
+//# sourceMappingURL=locale.d.ts.map

package/dist/locale.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"locale.d.ts","sourceRoot":"","sources":["../src/locale.ts"],"names":[],"mappings":"AA6EA,wBAAgB,SAAS,CAAC,MAAM,EAAE,MAAM,GAAG,IAAI,CAE9C;AAED,wBAAgB,SAAS,IAAI,MAAM,CAElC;AAED,wBAAgB,CAAC,CAAC,GAAG,EAAE,MAAM,EAAE,GAAG,IAAI,EAAE,CAAC,MAAM,GAAG,MAAM,CAAC,EAAE,GAAG,MAAM,CAMnE"}

package/dist/locale.js

@@ -0,0 +1,91 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.setLocale = setLocale;
+exports.getLocale = getLocale;
+exports.t = t;
+const messages = {
+    en: {
+        'parens.mismatch': "Paren mismatch: {0} '(' vs {1} ')' ({2})",
+        'encoding.bom': 'UTF-8 BOM detected',
+        'encoding.non_utf8_cad': 'Non-UTF-8 encoding (may cause CAD bracket matching errors)',
+        'encoding.non_utf8': 'Non-UTF-8 encoding detected',
+        'cl_syntax': "Common Lisp syntax '{0}' (not valid in AutoLISP)",
+        'dangerous.quit': 'quit call (terminates CAD process)',
+        'dangerous.exit': 'exit call (terminates CAD process)',
+        'dangerous.command_shell': 'command shell call (shell injection risk)',
+        'dangerous.startapp': 'startapp call (launches external process)',
+        'dangerous.vl_registry_write': 'vl-registry-write call (modifies Windows registry)',
+        'vlax_without_loading': 'vlax-* call without vl-load-com in file',
+        'token_in_url': 'Possible token exposure in string: token= in URL',
+        'open_without_close': 'File has {0} open() calls but {1} close() calls (possible resource leak)',
+        'bare_function_names': "Unnamespaced function '{0}' (missing @:: or C: prefix)",
+        'module_registration': 'Module file missing @::*modules* registration (expected in last lines)',
+        'namespace_header.missing': 'Missing (in-package {0}) header',
+        'namespace_header.wrong': 'in-package target is not {0}',
+        'trailing_whitespace': 'Trailing whitespace',
+        'runner.read_error': 'Cannot read file',
+        'sbcl.script_not_found': 'lint-sbcl.lisp not found at {0}',
+        'sbcl.not_found': "SBCL (Steel Bank Common Lisp) is required but not found.\nInstall it from: https://www.sbcl.org/platform-table.html\nOr on Windows via: winget install sbcl\nOr on macOS via: brew install sbcl\nOr on Linux via: apt install sbcl",
+        'summary.tag_fail': 'FAIL',
+        'summary.tag_warn': 'WARN',
+        'summary.line': 'Line',
+        'summary.header': '=== Summary ===',
+        'summary.all_ok': '  All files OK',
+        'summary.errors_warnings': '  {0} error(s), {1} warning(s)',
+        'summary.done': '=== Done ===',
+        'index.no_files': 'No .lsp files found',
+        'index.config_exists': 'atlisp-lint.json already exists',
+        'index.config_created': 'Created {0}',
+        'index.not_git': 'Not a git repository: no .git/hooks directory',
+        'index.hook_installed': 'Installed pre-commit hook at {0}',
+    },
+    zh: {
+        'parens.mismatch': "括号不匹配：{0} 个 '(' vs {1} 个 ')'（{2}）",
+        'encoding.bom': '检测到 UTF-8 BOM',
+        'encoding.non_utf8_cad': '非 UTF-8 编码（可能导致 CAD 括号匹配错误）',
+        'encoding.non_utf8': '检测到非 UTF-8 编码',
+        'cl_syntax': "Common Lisp 语法 '{0}'（在 AutoLISP 中无效）",
+        'dangerous.quit': 'quit 调用（会终止 CAD 进程）',
+        'dangerous.exit': 'exit 调用（会终止 CAD 进程）',
+        'dangerous.command_shell': 'command shell 调用（存在命令注入风险）',
+        'dangerous.startapp': 'startapp 调用（会启动外部程序）',
+        'dangerous.vl_registry_write': 'vl-registry-write 调用（会修改 Windows 注册表）',
+        'vlax_without_loading': '文件中使用了 vlax-* 函数但未调用 vl-load-com',
+        'token_in_url': '字符串中可能泄露令牌：URL 中包含 token=',
+        'open_without_close': '文件中有 {0} 个 open() 调用，但只有 {1} 个 close() 调用（可能存在资源泄露）',
+        'bare_function_names': "函数 '{0}' 缺少命名空间前缀（缺少 @:: 或 C: 前缀）",
+        'module_registration': '模块文件缺少 @::*modules* 注册（应在文件末尾附近）',
+        'namespace_header.missing': '缺少 (in-package {0}) 头',
+        'namespace_header.wrong': 'in-package 目标不是 {0}',
+        'trailing_whitespace': '行尾有多余空格',
+        'runner.read_error': '无法读取文件',
+        'sbcl.script_not_found': '未找到 lint-sbcl.lisp：{0}',
+        'sbcl.not_found': "未找到 SBCL（Steel Bank Common Lisp）。\n请从以下地址安装：https://www.sbcl.org/platform-table.html\nWindows 下可用：winget install sbcl\nmacOS 下可用：brew install sbcl\nLinux 下可用：apt install sbcl",
+        'summary.tag_fail': '失败',
+        'summary.tag_warn': '警告',
+        'summary.line': '行',
+        'summary.header': '=== 概要 ===',
+        'summary.all_ok': '  所有文件检查通过',
+        'summary.errors_warnings': '  {0} 个错误，{1} 个警告',
+        'summary.done': '=== 完成 ===',
+        'index.no_files': '未找到 .lsp 文件',
+        'index.config_exists': 'atlisp-lint.json 已存在',
+        'index.config_created': '已创建 {0}',
+        'index.not_git': '不是 git 仓库：没有 .git/hooks 目录',
+        'index.hook_installed': '已在 {0} 安装 pre-commit hook',
+    },
+};
+let currentLocale = 'zh';
+function setLocale(locale) {
+    currentLocale = locale;
+}
+function getLocale() {
+    return currentLocale;
+}
+function t(key, ...args) {
+    const msg = messages[currentLocale]?.[key] ||
+        messages['en']?.[key] ||
+        key;
+    return msg.replace(/\{(\d+)\}/g, (_, index) => String(args[Number(index)] ?? ''));
+}
+//# sourceMappingURL=locale.js.map

package/dist/locale.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"locale.js","sourceRoot":"","sources":["../src/locale.ts"],"names":[],"mappings":";;AA6EA,8BAEC;AAED,8BAEC;AAED,cAMC;AAzFD,MAAM,QAAQ,GAAa;IACzB,EAAE,EAAE;QACF,iBAAiB,EAAE,0CAA0C;QAC7D,cAAc,EAAE,oBAAoB;QACpC,uBAAuB,EAAE,4DAA4D;QACrF,mBAAmB,EAAE,6BAA6B;QAClD,WAAW,EAAE,kDAAkD;QAC/D,gBAAgB,EAAE,oCAAoC;QACtD,gBAAgB,EAAE,oCAAoC;QACtD,yBAAyB,EAAE,2CAA2C;QACtE,oBAAoB,EAAE,2CAA2C;QACjE,6BAA6B,EAAE,oDAAoD;QACnF,sBAAsB,EAAE,yCAAyC;QACjE,cAAc,EAAE,kDAAkD;QAClE,oBAAoB,EAAE,0EAA0E;QAChG,qBAAqB,EAAE,wDAAwD;QAC/E,qBAAqB,EAAE,wEAAwE;QAC/F,0BAA0B,EAAE,iCAAiC;QAC7D,wBAAwB,EAAE,8BAA8B;QACxD,qBAAqB,EAAE,qBAAqB;QAC5C,mBAAmB,EAAE,kBAAkB;QACvC,uBAAuB,EAAE,iCAAiC;QAC1D,gBAAgB,EAAE,oOAAoO;QACtP,kBAAkB,EAAE,MAAM;QAC1B,kBAAkB,EAAE,MAAM;QAC1B,cAAc,EAAE,MAAM;QACtB,gBAAgB,EAAE,iBAAiB;QACnC,gBAAgB,EAAE,gBAAgB;QAClC,yBAAyB,EAAE,gCAAgC;QAC3D,cAAc,EAAE,cAAc;QAC9B,gBAAgB,EAAE,qBAAqB;QACvC,qBAAqB,EAAE,iCAAiC;QACxD,sBAAsB,EAAE,aAAa;QACrC,eAAe,EAAE,+CAA+C;QAChE,sBAAsB,EAAE,kCAAkC;KAC3D;IACD,EAAE,EAAE;QACF,iBAAiB,EAAE,mCAAmC;QACtD,cAAc,EAAE,eAAe;QAC/B,uBAAuB,EAAE,6BAA6B;QACtD,mBAAmB,EAAE,eAAe;QACpC,WAAW,EAAE,sCAAsC;QACnD,gBAAgB,EAAE,qBAAqB;QACvC,gBAAgB,EAAE,qBAAqB;QACvC,yBAAyB,EAAE,4BAA4B;QACvD,oBAAoB,EAAE,sBAAsB;QAC5C,6BAA6B,EAAE,uCAAuC;QACtE,sBAAsB,EAAE,kCAAkC;QAC1D,cAAc,EAAE,2BAA2B;QAC3C,oBAAoB,EAAE,qDAAqD;QAC3E,qBAAqB,EAAE,mCAAmC;QAC1D,qBAAqB,EAAE,kCAAkC;QACzD,0BAA0B,EAAE,uBAAuB;QACnD,wBAAwB,EAAE,qBAAqB;QAC/C,qBAAqB,EAAE,SAAS;QAChC,mBAAmB,EAAE,QAAQ;QAC7B,uBAAuB,EAAE,wBAAwB;QACjD,gBAAgB,EAAE,gLAAgL;QAClM,kBAAkB,EAAE,IAAI;QACxB,kBAAkB,EAAE,IAAI;QACxB,cAAc,EAAE,GAAG;QACnB,gBAAgB,EAAE,YAAY;QAC9B,gBAAgB,EAAE,YAAY;QAC9B,yBAAyB,EAAE,mBAAmB;QAC9C,cAAc,EAAE,YAAY;QAC5B,gBAAgB,EAAE,aAAa;QAC/B,qBAAqB,EAAE,sBAAsB;QAC7C,sBAAsB,EAAE,SAAS;QACjC,eAAe,EAAE,4BAA4B;QAC7C,sBAAsB,EAAE,2BAA2B;KACpD;CACF,CAAA;AAED,IAAI,aAAa,GAAG,IAAI,CAAA;AAExB,SAAgB,SAAS,CAAC,MAAc;IACtC,aAAa,GAAG,MAAM,CAAA;AACxB,CAAC;AAED,SAAgB,SAAS;IACvB,OAAO,aAAa,CAAA;AACtB,CAAC;AAED,SAAgB,CAAC,CAAC,GAAW,EAAE,GAAG,IAAyB;IACzD,MAAM,GAAG,GACP,QAAQ,CAAC,aAAa,CAAC,EAAE,CAAC,GAAG,CAAC;QAC9B,QAAQ,CAAC,IAAI,CAAC,EAAE,CAAC,GAAG,CAAC;QACrB,GAAG,CAAA;IACL,OAAO,GAAG,CAAC,OAAO,CAAC,YAAY,EAAE,CAAC,CAAC,EAAE,KAAK,EAAE,EAAE,CAAC,MAAM,CAAC,IAAI,CAAC,MAAM,CAAC,KAAK,CAAC,CAAC,IAAI,EAAE,CAAC,CAAC,CAAA;AACnF,CAAC"}

package/dist/runner.d.ts

@@ -0,0 +1,3 @@
+import { Issue, LintConfig } from './types';
+export declare function lintFiles(files: string[], config: LintConfig, rootDir: string): Issue[];
+//# sourceMappingURL=runner.d.ts.map

package/dist/runner.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"runner.d.ts","sourceRoot":"","sources":["../src/runner.ts"],"names":[],"mappings":"AAEA,OAAO,EAAE,KAAK,EAAE,UAAU,EAAE,MAAM,SAAS,CAAC;AAgB5C,wBAAgB,SAAS,CACvB,KAAK,EAAE,MAAM,EAAE,EAAE,MAAM,EAAE,UAAU,EAAE,OAAO,EAAE,MAAM,GACnD,KAAK,EAAE,CA4ET"}

package/dist/runner.js

@@ -0,0 +1,113 @@
+"use strict";
+var __createBinding = (this && this.__createBinding) || (Object.create ? (function(o, m, k, k2) {
+    if (k2 === undefined) k2 = k;
+    var desc = Object.getOwnPropertyDescriptor(m, k);
+    if (!desc || ("get" in desc ? !m.__esModule : desc.writable || desc.configurable)) {
+      desc = { enumerable: true, get: function() { return m[k]; } };
+    }
+    Object.defineProperty(o, k2, desc);
+}) : (function(o, m, k, k2) {
+    if (k2 === undefined) k2 = k;
+    o[k2] = m[k];
+}));
+var __setModuleDefault = (this && this.__setModuleDefault) || (Object.create ? (function(o, v) {
+    Object.defineProperty(o, "default", { enumerable: true, value: v });
+}) : function(o, v) {
+    o["default"] = v;
+});
+var __importStar = (this && this.__importStar) || (function () {
+    var ownKeys = function(o) {
+        ownKeys = Object.getOwnPropertyNames || function (o) {
+            var ar = [];
+            for (var k in o) if (Object.prototype.hasOwnProperty.call(o, k)) ar[ar.length] = k;
+            return ar;
+        };
+        return ownKeys(o);
+    };
+    return function (mod) {
+        if (mod && mod.__esModule) return mod;
+        var result = {};
+        if (mod != null) for (var k = ownKeys(mod), i = 0; i < k.length; i++) if (k[i] !== "default") __createBinding(result, mod, k[i]);
+        __setModuleDefault(result, mod);
+        return result;
+    };
+})();
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.lintFiles = lintFiles;
+const fs = __importStar(require("fs"));
+const path = __importStar(require("path"));
+const encoding_1 = require("./checks/encoding");
+const parens_1 = require("./checks/parens");
+const cl_syntax_1 = require("./checks/cl-syntax");
+const dangerous_calls_1 = require("./checks/dangerous-calls");
+const vlax_1 = require("./checks/vlax");
+const token_in_url_1 = require("./checks/token-in-url");
+const open_close_1 = require("./checks/open-close");
+const bare_names_1 = require("./checks/bare-names");
+const module_reg_1 = require("./checks/module-reg");
+const namespace_header_1 = require("./checks/namespace-header");
+const trailing_ws_1 = require("./checks/trailing-ws");
+const config_1 = require("./config");
+const locale_1 = require("./locale");
+function lintFiles(files, config, rootDir) {
+    (0, locale_1.setLocale)(config.locale || 'zh');
+    const allIssues = [];
+    for (const filepath of files) {
+        const relPath = path.relative(rootDir, filepath);
+        let content;
+        try {
+            content = fs.readFileSync(filepath, 'utf-8');
+        }
+        catch {
+            allIssues.push({
+                file: relPath, line: 1, severity: 'error', rule: 'read',
+                message: (0, locale_1.t)('runner.read_error'),
+            });
+            continue;
+        }
+        // Encoding
+        if ((0, config_1.getCheckSeverity)(config, 'encoding') !== 'off') {
+            allIssues.push(...(0, encoding_1.checkEncoding)(content, relPath));
+        }
+        // Parens
+        if ((0, config_1.getCheckSeverity)(config, 'parens') !== 'off') {
+            allIssues.push(...(0, parens_1.checkParens)(content, relPath));
+        }
+        // CL syntax
+        if ((0, config_1.getCheckSeverity)(config, 'cl_syntax') !== 'off') {
+            allIssues.push(...(0, cl_syntax_1.checkClSyntax)(content, relPath, config.cl_syntax.keywords));
+        }
+        // Dangerous calls
+        allIssues.push(...(0, dangerous_calls_1.checkDangerousCalls)(content, relPath, config.dangerous_calls));
+        // vlax-* without vl-load-com
+        if ((0, config_1.getCheckSeverity)(config, 'vlax_without_loading') !== 'off') {
+            allIssues.push(...(0, vlax_1.checkVlaxWithoutLoading)(content, relPath));
+        }
+        // Token in URL
+        if ((0, config_1.getCheckSeverity)(config, 'token_in_url') !== 'off') {
+            allIssues.push(...(0, token_in_url_1.checkTokenInUrl)(content, relPath));
+        }
+        // Open/close
+        if ((0, config_1.getCheckSeverity)(config, 'open_without_close') !== 'off') {
+            allIssues.push(...(0, open_close_1.checkOpenWithoutClose)(content, relPath));
+        }
+        // Bare function names
+        if ((0, config_1.getCheckSeverity)(config, 'bare_function_names') !== 'off') {
+            allIssues.push(...(0, bare_names_1.checkBareFunctionNames)(content, relPath, config.bare_function_names.allowlist, config.bare_function_names.namespace_pattern));
+        }
+        // Module registration
+        if (config.module_registration.severity !== 'off') {
+            allIssues.push(...(0, module_reg_1.checkModuleRegistration)(content, relPath, relPath, config.module_registration));
+        }
+        // Namespace header
+        if (config.namespace_header.severity !== 'off') {
+            allIssues.push(...(0, namespace_header_1.checkNamespaceHeader)(content, relPath, config.namespace_header));
+        }
+        // Trailing whitespace
+        if ((0, config_1.getCheckSeverity)(config, 'trailing_whitespace') !== 'off') {
+            allIssues.push(...(0, trailing_ws_1.checkTrailingWhitespace)(content, relPath));
+        }
+    }
+    return allIssues;
+}
+//# sourceMappingURL=runner.js.map

package/dist/runner.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"runner.js","sourceRoot":"","sources":["../src/runner.ts"],"names":[],"mappings":";;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;AAkBA,8BA8EC;AAhGD,uCAAyB;AACzB,2CAA6B;AAE7B,gDAAkD;AAClD,4CAA8C;AAC9C,kDAAmD;AACnD,8DAA+D;AAC/D,wCAAwD;AACxD,wDAAwD;AACxD,oDAA4D;AAC5D,oDAA6D;AAC7D,oDAA8D;AAC9D,gEAAiE;AACjE,sDAA+D;AAC/D,qCAA4C;AAC5C,qCAAwC;AAGxC,SAAgB,SAAS,CACvB,KAAe,EAAE,MAAkB,EAAE,OAAe;IAEpD,IAAA,kBAAS,EAAC,MAAM,CAAC,MAAM,IAAI,IAAI,CAAC,CAAA;IAChC,MAAM,SAAS,GAAY,EAAE,CAAC;IAE9B,KAAK,MAAM,QAAQ,IAAI,KAAK,EAAE,CAAC;QAC7B,MAAM,OAAO,GAAG,IAAI,CAAC,QAAQ,CAAC,OAAO,EAAE,QAAQ,CAAC,CAAC;QACjD,IAAI,OAAe,CAAC;QACpB,IAAI,CAAC;YACH,OAAO,GAAG,EAAE,CAAC,YAAY,CAAC,QAAQ,EAAE,OAAO,CAAC,CAAC;QAC/C,CAAC;QAAC,MAAM,CAAC;YACP,SAAS,CAAC,IAAI,CAAC;gBACb,IAAI,EAAE,OAAO,EAAE,IAAI,EAAE,CAAC,EAAE,QAAQ,EAAE,OAAO,EAAE,IAAI,EAAE,MAAM;gBACvD,OAAO,EAAE,IAAA,UAAC,EAAC,mBAAmB,CAAC;aAChC,CAAC,CAAC;YACH,SAAS;QACX,CAAC;QAED,WAAW;QACX,IAAI,IAAA,yBAAgB,EAAC,MAAM,EAAE,UAAU,CAAC,KAAK,KAAK,EAAE,CAAC;YACnD,SAAS,CAAC,IAAI,CAAC,GAAG,IAAA,wBAAa,EAAC,OAAO,EAAE,OAAO,CAAC,CAAC,CAAC;QACrD,CAAC;QAED,SAAS;QACT,IAAI,IAAA,yBAAgB,EAAC,MAAM,EAAE,QAAQ,CAAC,KAAK,KAAK,EAAE,CAAC;YACjD,SAAS,CAAC,IAAI,CAAC,GAAG,IAAA,oBAAW,EAAC,OAAO,EAAE,OAAO,CAAC,CAAC,CAAC;QACnD,CAAC;QAED,YAAY;QACZ,IAAI,IAAA,yBAAgB,EAAC,MAAM,EAAE,WAAW,CAAC,KAAK,KAAK,EAAE,CAAC;YACpD,SAAS,CAAC,IAAI,CAAC,GAAG,IAAA,yBAAa,EAAC,OAAO,EAAE,OAAO,EAAE,MAAM,CAAC,SAAS,CAAC,QAAQ,CAAC,CAAC,CAAC;QAChF,CAAC;QAED,kBAAkB;QAClB,SAAS,CAAC,IAAI,CAAC,GAAG,IAAA,qCAAmB,EAAC,OAAO,EAAE,OAAO,EAAE,MAAM,CAAC,eAAe,CAAC,CAAC,CAAC;QAEjF,6BAA6B;QAC7B,IAAI,IAAA,yBAAgB,EAAC,MAAM,EAAE,sBAAsB,CAAC,KAAK,KAAK,EAAE,CAAC;YAC/D,SAAS,CAAC,IAAI,CAAC,GAAG,IAAA,8BAAuB,EAAC,OAAO,EAAE,OAAO,CAAC,CAAC,CAAC;QAC/D,CAAC;QAED,eAAe;QACf,IAAI,IAAA,yBAAgB,EAAC,MAAM,EAAE,cAAc,CAAC,KAAK,KAAK,EAAE,CAAC;YACvD,SAAS,CAAC,IAAI,CAAC,GAAG,IAAA,8BAAe,EAAC,OAAO,EAAE,OAAO,CAAC,CAAC,CAAC;QACvD,CAAC;QAED,aAAa;QACb,IAAI,IAAA,yBAAgB,EAAC,MAAM,EAAE,oBAAoB,CAAC,KAAK,KAAK,EAAE,CAAC;YAC7D,SAAS,CAAC,IAAI,CAAC,GAAG,IAAA,kCAAqB,EAAC,OAAO,EAAE,OAAO,CAAC,CAAC,CAAC;QAC7D,CAAC;QAED,sBAAsB;QACtB,IAAI,IAAA,yBAAgB,EAAC,MAAM,EAAE,qBAAqB,CAAC,KAAK,KAAK,EAAE,CAAC;YAC9D,SAAS,CAAC,IAAI,CAAC,GAAG,IAAA,mCAAsB,EACtC,OAAO,EAAE,OAAO,EAChB,MAAM,CAAC,mBAAmB,CAAC,SAAS,EACpC,MAAM,CAAC,mBAAmB,CAAC,iBAAiB,CAC7C,CAAC,CAAC;QACL,CAAC;QAED,sBAAsB;QACtB,IAAI,MAAM,CAAC,mBAAmB,CAAC,QAAQ,KAAK,KAAK,EAAE,CAAC;YAClD,SAAS,CAAC,IAAI,CAAC,GAAG,IAAA,oCAAuB,EAAC,OAAO,EAAE,OAAO,EAAE,OAAO,EAAE,MAAM,CAAC,mBAAmB,CAAC,CAAC,CAAC;QACpG,CAAC;QAED,mBAAmB;QACnB,IAAI,MAAM,CAAC,gBAAgB,CAAC,QAAQ,KAAK,KAAK,EAAE,CAAC;YAC/C,SAAS,CAAC,IAAI,CAAC,GAAG,IAAA,uCAAoB,EAAC,OAAO,EAAE,OAAO,EAAE,MAAM,CAAC,gBAAgB,CAAC,CAAC,CAAC;QACrF,CAAC;QAED,sBAAsB;QACtB,IAAI,IAAA,yBAAgB,EAAC,MAAM,EAAE,qBAAqB,CAAC,KAAK,KAAK,EAAE,CAAC;YAC9D,SAAS,CAAC,IAAI,CAAC,GAAG,IAAA,qCAAuB,EAAC,OAAO,EAAE,OAAO,CAAC,CAAC,CAAC;QAC/D,CAAC;IACH,CAAC;IAED,OAAO,SAAS,CAAC;AACnB,CAAC"}

package/dist/sbcl.d.ts

@@ -0,0 +1,3 @@
+import { Issue, SbclConfig } from './types';
+export declare function runSbclLint(srcDir: string, sbclConfig: SbclConfig, stubPackagesPath: string): Issue[];
+//# sourceMappingURL=sbcl.d.ts.map

package/dist/sbcl.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"sbcl.d.ts","sourceRoot":"","sources":["../src/sbcl.ts"],"names":[],"mappings":"AAGA,OAAO,EAAE,KAAK,EAAE,UAAU,EAAE,MAAM,SAAS,CAAC;AAmB5C,wBAAgB,WAAW,CACzB,MAAM,EAAE,MAAM,EAAE,UAAU,EAAE,UAAU,EAAE,gBAAgB,EAAE,MAAM,GAC/D,KAAK,EAAE,CAoCT"}

package/dist/sbcl.js

@@ -0,0 +1,121 @@
+"use strict";
+var __createBinding = (this && this.__createBinding) || (Object.create ? (function(o, m, k, k2) {
+    if (k2 === undefined) k2 = k;
+    var desc = Object.getOwnPropertyDescriptor(m, k);
+    if (!desc || ("get" in desc ? !m.__esModule : desc.writable || desc.configurable)) {
+      desc = { enumerable: true, get: function() { return m[k]; } };
+    }
+    Object.defineProperty(o, k2, desc);
+}) : (function(o, m, k, k2) {
+    if (k2 === undefined) k2 = k;
+    o[k2] = m[k];
+}));
+var __setModuleDefault = (this && this.__setModuleDefault) || (Object.create ? (function(o, v) {
+    Object.defineProperty(o, "default", { enumerable: true, value: v });
+}) : function(o, v) {
+    o["default"] = v;
+});
+var __importStar = (this && this.__importStar) || (function () {
+    var ownKeys = function(o) {
+        ownKeys = Object.getOwnPropertyNames || function (o) {
+            var ar = [];
+            for (var k in o) if (Object.prototype.hasOwnProperty.call(o, k)) ar[ar.length] = k;
+            return ar;
+        };
+        return ownKeys(o);
+    };
+    return function (mod) {
+        if (mod && mod.__esModule) return mod;
+        var result = {};
+        if (mod != null) for (var k = ownKeys(mod), i = 0; i < k.length; i++) if (k[i] !== "default") __createBinding(result, mod, k[i]);
+        __setModuleDefault(result, mod);
+        return result;
+    };
+})();
+Object.defineProperty(exports, "__esModule", { value: true });
+exports.runSbclLint = runSbclLint;
+const fs = __importStar(require("fs"));
+const path = __importStar(require("path"));
+const child_process_1 = require("child_process");
+const locale_1 = require("./locale");
+function findSbcl() {
+    const { env } = process;
+    const paths = (env.PATH || '').split(path.delimiter);
+    for (const dir of paths) {
+        const candidate = path.join(dir, process.platform === 'win32' ? 'sbcl.exe' : 'sbcl');
+        if (fs.existsSync(candidate))
+            return candidate;
+    }
+    // last resort: just try the command
+    try {
+        (0, child_process_1.execFileSync)('sbcl', ['--version'], { stdio: 'pipe' });
+        return 'sbcl';
+    }
+    catch {
+        throw new Error((0, locale_1.t)('sbcl.not_found'));
+    }
+}
+function runSbclLint(srcDir, sbclConfig, stubPackagesPath) {
+    const sbcl = findSbcl();
+    // Locate lint-sbcl.lisp bundled with the package
+    const scriptPath = path.join(__dirname, '..', 'lib', 'lint-sbcl.lisp');
+    if (!fs.existsSync(scriptPath)) {
+        return [{
+                file: 'internal', line: 1, severity: 'error', rule: 'sbcl',
+                message: (0, locale_1.t)('sbcl.script_not_found', scriptPath),
+            }];
+    }
+    try {
+        // Convert arrays to Lisp-readable format: ("a" "b")
+        const toLispList = (arr) => '(' + arr.map(s => `"${s}"`).join(' ') + ')';
+        const result = (0, child_process_1.execFileSync)(sbcl, [
+            '--script', scriptPath,
+            srcDir,
+            stubPackagesPath,
+            toLispList(sbclConfig.walk_exclude),
+            toLispList(sbclConfig.defmacro_allow_files),
+        ], {
+            encoding: 'utf-8',
+            maxBuffer: 50 * 1024 * 1024,
+            timeout: 180_000,
+        });
+        return parseSbclOutput(result, srcDir);
+    }
+    catch (err) {
+        if (err instanceof Error && 'stdout' in err) {
+            const e = err;
+            const output = e.stdout || e.stderr || err.message;
+            return parseSbclOutput(output || '', srcDir);
+        }
+        throw err;
+    }
+}
+function parseSbclOutput(output, srcDir) {
+    const issues = [];
+    for (const line of output.split('\n')) {
+        const trimmed = line.trim();
+        if (trimmed.startsWith('[ERROR]')) {
+            const msg = trimmed.replace(/^\[ERROR\]\s*/, '');
+            issues.push({
+                file: srcDir, line: 1, severity: 'error', rule: 'sbcl',
+                message: `SBCL: ${msg}`,
+            });
+        }
+        else if (trimmed.startsWith('[WARN]')) {
+            const msg = trimmed.replace(/^\[WARN\]\s*/, '');
+            issues.push({
+                file: srcDir, line: 1, severity: 'warn', rule: 'sbcl',
+                message: `SBCL: ${msg}`,
+            });
+        }
+        else if (trimmed.startsWith('[NOTE]')) {
+            const msg = trimmed.replace(/^\[NOTE\]\s*/, '');
+            issues.push({
+                file: srcDir, line: 1, severity: 'warn', rule: 'sbcl',
+                message: `SBCL: ${msg}`,
+            });
+        }
+    }
+    return issues;
+}
+//# sourceMappingURL=sbcl.js.map

package/dist/sbcl.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"sbcl.js","sourceRoot":"","sources":["../src/sbcl.ts"],"names":[],"mappings":";;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;AAsBA,kCAsCC;AA5DD,uCAAyB;AACzB,2CAA6B;AAC7B,iDAA6C;AAE7C,qCAA6B;AAE7B,SAAS,QAAQ;IACf,MAAM,EAAE,GAAG,EAAE,GAAG,OAAO,CAAC;IACxB,MAAM,KAAK,GAAG,CAAC,GAAG,CAAC,IAAI,IAAI,EAAE,CAAC,CAAC,KAAK,CAAC,IAAI,CAAC,SAAS,CAAC,CAAC;IACrD,KAAK,MAAM,GAAG,IAAI,KAAK,EAAE,CAAC;QACxB,MAAM,SAAS,GAAG,IAAI,CAAC,IAAI,CAAC,GAAG,EAAE,OAAO,CAAC,QAAQ,KAAK,OAAO,CAAC,CAAC,CAAC,UAAU,CAAC,CAAC,CAAC,MAAM,CAAC,CAAC;QACrF,IAAI,EAAE,CAAC,UAAU,CAAC,SAAS,CAAC;YAAE,OAAO,SAAS,CAAC;IACjD,CAAC;IACD,oCAAoC;IACpC,IAAI,CAAC;QACH,IAAA,4BAAY,EAAC,MAAM,EAAE,CAAC,WAAW,CAAC,EAAE,EAAE,KAAK,EAAE,MAAM,EAAE,CAAC,CAAC;QACvD,OAAO,MAAM,CAAC;IAChB,CAAC;IAAC,MAAM,CAAC;QACP,MAAM,IAAI,KAAK,CAAC,IAAA,UAAC,EAAC,gBAAgB,CAAC,CAAC,CAAC;IACvC,CAAC;AACH,CAAC;AAED,SAAgB,WAAW,CACzB,MAAc,EAAE,UAAsB,EAAE,gBAAwB;IAEhE,MAAM,IAAI,GAAG,QAAQ,EAAE,CAAC;IAExB,iDAAiD;IACjD,MAAM,UAAU,GAAG,IAAI,CAAC,IAAI,CAAC,SAAS,EAAE,IAAI,EAAE,KAAK,EAAE,gBAAgB,CAAC,CAAC;IACvE,IAAI,CAAC,EAAE,CAAC,UAAU,CAAC,UAAU,CAAC,EAAE,CAAC;QAC/B,OAAO,CAAC;gBACN,IAAI,EAAE,UAAU,EAAE,IAAI,EAAE,CAAC,EAAE,QAAQ,EAAE,OAAO,EAAE,IAAI,EAAE,MAAM;gBAC1D,OAAO,EAAE,IAAA,UAAC,EAAC,uBAAuB,EAAE,UAAU,CAAC;aAChD,CAAC,CAAC;IACL,CAAC;IAED,IAAI,CAAC;QACH,oDAAoD;QACpD,MAAM,UAAU,GAAG,CAAC,GAAa,EAAE,EAAE,CAAC,GAAG,GAAG,GAAG,CAAC,GAAG,CAAC,CAAC,CAAC,EAAE,CAAC,IAAI,CAAC,GAAG,CAAC,CAAC,IAAI,CAAC,GAAG,CAAC,GAAG,GAAG,CAAC;QACnF,MAAM,MAAM,GAAG,IAAA,4BAAY,EAAC,IAAI,EAAE;YAChC,UAAU,EAAE,UAAU;YACtB,MAAM;YACN,gBAAgB;YAChB,UAAU,CAAC,UAAU,CAAC,YAAY,CAAC;YACnC,UAAU,CAAC,UAAU,CAAC,oBAAoB,CAAC;SAC5C,EAAE;YACD,QAAQ,EAAE,OAAO;YACjB,SAAS,EAAE,EAAE,GAAG,IAAI,GAAG,IAAI;YAC3B,OAAO,EAAE,OAAO;SACjB,CAAC,CAAC;QAEH,OAAO,eAAe,CAAC,MAAM,EAAE,MAAM,CAAC,CAAC;IACzC,CAAC;IAAC,OAAO,GAAY,EAAE,CAAC;QACtB,IAAI,GAAG,YAAY,KAAK,IAAI,QAAQ,IAAI,GAAG,EAAE,CAAC;YAC5C,MAAM,CAAC,GAAG,GAA2C,CAAC;YACtD,MAAM,MAAM,GAAG,CAAC,CAAC,MAAM,IAAI,CAAC,CAAC,MAAM,IAAI,GAAG,CAAC,OAAO,CAAC;YACnD,OAAO,eAAe,CAAC,MAAM,IAAI,EAAE,EAAE,MAAM,CAAC,CAAC;QAC/C,CAAC;QACD,MAAM,GAAG,CAAC;IACZ,CAAC;AACH,CAAC;AAED,SAAS,eAAe,CAAC,MAAc,EAAE,MAAc;IACrD,MAAM,MAAM,GAAY,EAAE,CAAC;IAC3B,KAAK,MAAM,IAAI,IAAI,MAAM,CAAC,KAAK,CAAC,IAAI,CAAC,EAAE,CAAC;QACtC,MAAM,OAAO,GAAG,IAAI,CAAC,IAAI,EAAE,CAAC;QAE5B,IAAI,OAAO,CAAC,UAAU,CAAC,SAAS,CAAC,EAAE,CAAC;YAClC,MAAM,GAAG,GAAG,OAAO,CAAC,OAAO,CAAC,eAAe,EAAE,EAAE,CAAC,CAAC;YACjD,MAAM,CAAC,IAAI,CAAC;gBACV,IAAI,EAAE,MAAM,EAAE,IAAI,EAAE,CAAC,EAAE,QAAQ,EAAE,OAAO,EAAE,IAAI,EAAE,MAAM;gBACtD,OAAO,EAAE,SAAS,GAAG,EAAE;aACxB,CAAC,CAAC;QACL,CAAC;aAAM,IAAI,OAAO,CAAC,UAAU,CAAC,QAAQ,CAAC,EAAE,CAAC;YACxC,MAAM,GAAG,GAAG,OAAO,CAAC,OAAO,CAAC,cAAc,EAAE,EAAE,CAAC,CAAC;YAChD,MAAM,CAAC,IAAI,CAAC;gBACV,IAAI,EAAE,MAAM,EAAE,IAAI,EAAE,CAAC,EAAE,QAAQ,EAAE,MAAM,EAAE,IAAI,EAAE,MAAM;gBACrD,OAAO,EAAE,SAAS,GAAG,EAAE;aACxB,CAAC,CAAC;QACL,CAAC;aAAM,IAAI,OAAO,CAAC,UAAU,CAAC,QAAQ,CAAC,EAAE,CAAC;YACxC,MAAM,GAAG,GAAG,OAAO,CAAC,OAAO,CAAC,cAAc,EAAE,EAAE,CAAC,CAAC;YAChD,MAAM,CAAC,IAAI,CAAC;gBACV,IAAI,EAAE,MAAM,EAAE,IAAI,EAAE,CAAC,EAAE,QAAQ,EAAE,MAAM,EAAE,IAAI,EAAE,MAAM;gBACrD,OAAO,EAAE,SAAS,GAAG,EAAE;aACxB,CAAC,CAAC;QACL,CAAC;IACH,CAAC;IACD,OAAO,MAAM,CAAC;AAChB,CAAC"}

package/dist/stub-packages.json

@@ -0,0 +1,41 @@
+((AUTOLISP ())
+ (@ (COMMON-LISP AUTOLISP))
+ (C ())
+ (JSON ())
+ (SIDEBAR ())
+ (FUN ())
+ (DCL ())
+ (BASE ())
+ (STRING ())
+ (BLOCK ())
+ (ENTITY ())
+ (LAYER ())
+ (LAYOUT ())
+ (CURVE ())
+ (LIST ())
+ (M ())
+ (P ())
+ (UI ())
+ (SYS ())
+ (EXCEL ())
+ (WORD ())
+ (RE ())
+ (VECTRA ())
+ (DOS ())
+ (AT-PM ())
+ (QRENCODE ())
+ (NETWORK ())
+ (PKGMAN ())
+ (DATETIME ())
+ (DICT ())
+ (@NLP ())
+ (AT-SIDEBAR ())
+ (S ())
+ (VL ())
+ (VLR ())
+ (VLAX ())
+ (THEME ())
+ (AJAX ())
+ (ATLISP ())
+ (LOG ())
+ (ATLISP-CORE ()))

package/dist/types.d.ts

@@ -0,0 +1,60 @@
+export type Severity = 'off' | 'warn' | 'error';
+export interface Issue {
+    file: string;
+    line: number;
+    severity: Severity;
+    rule: string;
+    message: string;
+}
+export interface CheckConfig {
+    severity: Severity;
+    [key: string]: unknown;
+}
+export interface ClSyntaxConfig {
+    keywords: string[];
+}
+export interface DangerousCallsConfig {
+    quit: Severity;
+    exit: Severity;
+    command_shell: Severity;
+    startapp: Severity;
+    vl_registry_write: Severity;
+}
+export interface ModuleRegistrationConfig extends CheckConfig {
+    patterns: string[];
+    dirs: string[];
+}
+export interface NamespaceHeaderConfig extends CheckConfig {
+    package: string;
+    deps: string[];
+    search_lines: number;
+}
+export interface BareFunctionNamesConfig {
+    allowlist: string[];
+    namespace_pattern: string;
+}
+export interface SbclConfig {
+    walk_exclude: string[];
+    defmacro_allow_files: string[];
+}
+export interface SourceConfig {
+    globs: string[];
+    exclude: string[];
+}
+export interface LintConfig {
+    locale: string;
+    source: SourceConfig;
+    checks: Record<string, Severity>;
+    cl_syntax: ClSyntaxConfig;
+    dangerous_calls: DangerousCallsConfig;
+    module_registration: ModuleRegistrationConfig;
+    namespace_header: NamespaceHeaderConfig;
+    bare_function_names: BareFunctionNamesConfig;
+    sbcl: SbclConfig;
+}
+export interface FormattedResult {
+    issues: Issue[];
+    error_count: number;
+    warning_count: number;
+}
+//# sourceMappingURL=types.d.ts.map

package/dist/types.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"types.d.ts","sourceRoot":"","sources":["../src/types.ts"],"names":[],"mappings":"AAAA,MAAM,MAAM,QAAQ,GAAG,KAAK,GAAG,MAAM,GAAG,OAAO,CAAC;AAEhD,MAAM,WAAW,KAAK;IACpB,IAAI,EAAE,MAAM,CAAC;IACb,IAAI,EAAE,MAAM,CAAC;IACb,QAAQ,EAAE,QAAQ,CAAC;IACnB,IAAI,EAAE,MAAM,CAAC;IACb,OAAO,EAAE,MAAM,CAAC;CACjB;AAED,MAAM,WAAW,WAAW;IAC1B,QAAQ,EAAE,QAAQ,CAAC;IACnB,CAAC,GAAG,EAAE,MAAM,GAAG,OAAO,CAAC;CACxB;AAED,MAAM,WAAW,cAAc;IAC7B,QAAQ,EAAE,MAAM,EAAE,CAAC;CACpB;AAED,MAAM,WAAW,oBAAoB;IACnC,IAAI,EAAE,QAAQ,CAAC;IACf,IAAI,EAAE,QAAQ,CAAC;IACf,aAAa,EAAE,QAAQ,CAAC;IACxB,QAAQ,EAAE,QAAQ,CAAC;IACnB,iBAAiB,EAAE,QAAQ,CAAC;CAC7B;AAED,MAAM,WAAW,wBAAyB,SAAQ,WAAW;IAC3D,QAAQ,EAAE,MAAM,EAAE,CAAC;IACnB,IAAI,EAAE,MAAM,EAAE,CAAC;CAChB;AAED,MAAM,WAAW,qBAAsB,SAAQ,WAAW;IACxD,OAAO,EAAE,MAAM,CAAC;IAChB,IAAI,EAAE,MAAM,EAAE,CAAC;IACf,YAAY,EAAE,MAAM,CAAC;CACtB;AAED,MAAM,WAAW,uBAAuB;IACtC,SAAS,EAAE,MAAM,EAAE,CAAC;IACpB,iBAAiB,EAAE,MAAM,CAAC;CAC3B;AAED,MAAM,WAAW,UAAU;IACzB,YAAY,EAAE,MAAM,EAAE,CAAC;IACvB,oBAAoB,EAAE,MAAM,EAAE,CAAC;CAChC;AAED,MAAM,WAAW,YAAY;IAC3B,KAAK,EAAE,MAAM,EAAE,CAAC;IAChB,OAAO,EAAE,MAAM,EAAE,CAAC;CACnB;AAED,MAAM,WAAW,UAAU;IACzB,MAAM,EAAE,MAAM,CAAC;IACf,MAAM,EAAE,YAAY,CAAC;IACrB,MAAM,EAAE,MAAM,CAAC,MAAM,EAAE,QAAQ,CAAC,CAAC;IACjC,SAAS,EAAE,cAAc,CAAC;IAC1B,eAAe,EAAE,oBAAoB,CAAC;IACtC,mBAAmB,EAAE,wBAAwB,CAAC;IAC9C,gBAAgB,EAAE,qBAAqB,CAAC;IACxC,mBAAmB,EAAE,uBAAuB,CAAC;IAC7C,IAAI,EAAE,UAAU,CAAC;CAClB;AAED,MAAM,WAAW,eAAe;IAC9B,MAAM,EAAE,KAAK,EAAE,CAAC;IAChB,WAAW,EAAE,MAAM,CAAC;IACpB,aAAa,EAAE,MAAM,CAAC;CACvB"}

package/dist/types.js

@@ -0,0 +1,3 @@
+"use strict";
+Object.defineProperty(exports, "__esModule", { value: true });
+//# sourceMappingURL=types.js.map

package/dist/types.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"types.js","sourceRoot":"","sources":["../src/types.ts"],"names":[],"mappings":""}

package/dist/utils.d.ts

@@ -0,0 +1,12 @@
+/** Strip string contents and comments from a line of AutoLISP code */
+export declare function stripLine(line: string): string;
+export declare function stripLineRaw(line: string): string;
+/** Iterate lines with string-aware content */
+export declare function codeLines(content: string): Generator<{
+    lineno: number;
+    text: string;
+    stripped: string;
+}>;
+/** Extract string literals from a line */
+export declare function extractStrings(line: string): string[];
+//# sourceMappingURL=utils.d.ts.map

package/dist/utils.d.ts.map

@@ -0,0 +1 @@
+{"version":3,"file":"utils.d.ts","sourceRoot":"","sources":["../src/utils.ts"],"names":[],"mappings":"AAAA,sEAAsE;AACtE,wBAAgB,SAAS,CAAC,IAAI,EAAE,MAAM,GAAG,MAAM,CAoB9C;AAED,wBAAgB,YAAY,CAAC,IAAI,EAAE,MAAM,GAAG,MAAM,CAuBjD;AAED,8CAA8C;AAC9C,wBAAiB,SAAS,CAAC,OAAO,EAAE,MAAM,GAAG,SAAS,CAAC;IAAE,MAAM,EAAE,MAAM,CAAC;IAAC,IAAI,EAAE,MAAM,CAAC;IAAC,QAAQ,EAAE,MAAM,CAAA;CAAE,CAAC,CASzG;AAED,0CAA0C;AAC1C,wBAAgB,cAAc,CAAC,IAAI,EAAE,MAAM,GAAG,MAAM,EAAE,CA2BrD"}