谷歌代码美化德尔福评论答案

【问题标题】：google code prettify Delphi comment谷歌代码美化德尔福评论
【发布时间】：2016-06-22 14:55:36
【问题描述】：

我正在尝试让谷歌代码美化工作，显示类似于 Delphi IDE 的内容，但遇到了 cmets 问题

这是一条评论：

{text in here}

这是一个编译器指令（不是注释）：

{$text in here}

有谁知道如何更改下面的评论部分，如果{ 之后的字符是$ 字符，则它不是评论

这是我一直在使用的 lang-Pascal.js

PR.registerLangHandler(
    PR.createSimpleLexer(
        [ // shortcutStylePatterns
          // 'single-line-string'
          [PR.PR_STRING,        /^(?:\'(?:[^\\\'\r\n]|\\.)*(?:\'|$))/, null, '\''],
          // Whitespace
          [PR.PR_PLAIN,         /^\s+/, null, ' \r\n\t\xA0']
        ],
        [ // fallthroughStylePatterns
          // A cStyleComments comment (* *) or {}
          [PR.PR_COMMENT,       /^(?:\/\/[^\r\n]*)|\(\*[\s\S]*?(?:\*\)|$)|^\{[\s\S]*?(?:\}|$)/, null],
          //[PR.PR_COMMENT,       /^\(\*[\s\S]*?(?:\*\)|$)|^\{[\s\S]*?(?:\}|$)/, null],
          [PR.PR_KEYWORD,       /^(?:TRY|EXCEPT|PUBLIC|PRIVATE|CLASS|PROPERTY|ABSOLUTE|AND|ARRAY|ASM|ASSEMBLER|BEGIN|CASE|CONST|CONSTRUCTOR|DESTRUCTOR|DIV|DO|DOWNTO|ELSE|END|EXTERNAL|FOR|FORWARD|FUNCTION|GOTO|IF|IMPLEMENTATION|IN|INLINE|INTERFACE|INTERRUPT|LABEL|MOD|NOT|OBJECT|ON|OF|OR|PACKED|PROCEDURE|PROGRAM|RECORD|REPEAT|SET|SHL|SHR|STRICT|THEN|TO|TYPE|UNIT|UNTIL|USES|VAR|VIRTUAL|WHILE|WITH|XOR)\b/i, null],
          [PR.PR_LITERAL,       /^(?:true|false|self|nil)/i, null],
          [PR.PR_PLAIN,         /^[a-z][a-z0-9]*/i, null],
          // Literals .0, 0, 0.0 0E13
          [PR.PR_LITERAL,       /^(?:\$[a-f0-9]+|(?:\d+(?:\.\d*)?|\.\d+)(?:e[+\-]?\d+)?)/i,  null, '0123456789'],
          [PR.PR_PUNCTUATION,   /^.[^\s\w\.$@\'\/]*/, null]
        ]),
    ['pascal']);

【问题讨论】：

我添加了正则表达式标签。您还应该为使用的特定正则表达式添加一个标签。虽然它不是专门为您使用而设置的，但您应该能够修改 (?:[/]{2}[^\r\n]*)|^(?:$\*[\s\w\d]+\*$)|(?:({[^$][\s\w]+})) 以适合您；它匹配//、{} 和(* *) 注释标记（包括多行注释标记），但不包括{$ }。

标签： regex delphi google-code-prettify

【解决方案1】：

由于语法是 JS（并且文件是 lang-Pascal.js），我还假设正则表达式符合 ECMAScript 5。

一个非常简单的解决方法是在{ 之后添加一个(?!\$) 否定前瞻：

^(?:\/\/[^\r\n]*)|\(\*[\s\S]*?(?:\*\)|$)|^\{(?!\$)[\s\S]*?(?:\}|$) 
                                            ^^^^^

见regex demo

如果在字符串/行开头的文字 { 后面有一个 $，则此先行将导致匹配失败。

【讨论】：