add lark

server/src/common/completion_list.json

@@ -187,6 +187,52 @@
                 "set cutter_list \"UGTI0202_030 UGTI0202_025 UGTI0201_062\"\nMOM_ask_cutter_info cutter_list"
             ]
         },
+        {
+            "label": "MOM_ask_definition_element",
+            "kind": "function",
+            "description": "Gets the content of an element or an element plus an optional sub-element which is defined in a definition file. If the element is defined, returns 1 and sets mom_result with the format {key \"value\"}{key1 \"value1, \\opt\"}. If the element or sub-element does not exist, returns 0 and sets mom_result to \"UNDEFINED ELEMENT\" or \"UNDEFINED SUB-ELEMENT\".",
+            "format": "MOM_ask_definition_element <FORMAT|ADDRESS|BLOCK> <element> [<sub-element>]",
+            "parameters": [
+                {
+                    "name": "FORMAT|ADDRESS|BLOCK",
+                    "desc": "The type of definition element (format, address, or block)."
+                },
+                {
+                    "name": "element",
+                    "desc": "The name of the definition element."
+                },
+                {
+                    "name": "sub-element",
+                    "desc": "The name of the definition sub-element."
+                }
+            ],
+            "returns": [
+                "1 - Element is defined.",
+                "0 - Does not exist."
+            ],
+            "example": [
+                "MOM_ask_definition_element BLOCK \"linear_move\" \"X\"",
+                "# The command returns 1 and sets mom_result = {X \"$mom_pos(0)\"}."
+            ]
+        },
+        {
+            "label": "MOM_ask_env_var",
+            "kind": "function",
+            "description": "This extension allows you to determine how an environment variable is set.",
+            "format": "MOM_ask_env_var <variable_name>",
+            "parameters": [
+                {
+                    "name": "variable_name",
+                    "desc": "Name of environment variable."
+                }
+            ],
+            "returns": [
+                "Value of environment variable."
+            ],
+            "example": [
+                "set path [MOM_ask_env_var UGII_CAM_POST_CONFIG_FILE]"
+            ]
+        },
         {
             "label": "MOM_ask_ude_info",
             "kind": "function",

server/src/parser/tcl.lark

@@ -1,3 +1,8 @@
+%import common.WS_INLINE
+%import common.NUMBER
+%import common.STRING
+%ignore WS_INLINE
+
 start: statement*
 
 ?statement: command | COMMENT
@@ -23,5 +28,3 @@ cmdsubst: "[" start "]"
 
 bare: /[^\s{}$"]+/
 
-%import common.WS_INLINE
-%ignore WS_INLINE