Author: Augustin Fabre Date: 2023-02-27T01:56:24-08:00 New Revision: 95c3c2b8570d307ad91c603856336acf32e5021f
URL: https://github.com/llvm/llvm-project/commit/95c3c2b8570d307ad91c603856336acf32e5021f DIFF: https://github.com/llvm/llvm-project/commit/95c3c2b8570d307ad91c603856336acf32e5021f.diff LOG: [clang-format] clang-format.el: fix warnings Differential Revision: https://reviews.llvm.org/D143560 Added: Modified: clang/tools/clang-format/clang-format.el Removed: ################################################################################ diff --git a/clang/tools/clang-format/clang-format.el b/clang/tools/clang-format/clang-format.el index 4e6daa82d4ade..30ac7501afcb6 100644 --- a/clang/tools/clang-format/clang-format.el +++ b/clang/tools/clang-format/clang-format.el @@ -82,7 +82,7 @@ in such buffers." (let* ((children (xml-node-children node)) (text (car children))) (cl-case (xml-node-name node) - ('replacement + (replacement (let* ((offset (xml-get-attribute-or-nil node 'offset)) (length (xml-get-attribute-or-nil node 'length))) (when (or (null offset) (null length)) @@ -93,7 +93,7 @@ in such buffers." (setq offset (string-to-number offset)) (setq length (string-to-number length)) (push (list offset length text) replacements))) - ('cursor + (cursor (setq cursor (string-to-number text))))))) ;; Sort by decreasing offset, length. _______________________________________________ cfe-commits mailing list cfe-commits@lists.llvm.org https://lists.llvm.org/cgi-bin/mailman/listinfo/cfe-commits
