From d901c73f7d51e6d414b2583ea6bd6984faf857d5 Mon Sep 17 00:00:00 2001
From: Berner Martin <martin.berner@qualitasag.ch>
Date: Fri, 15 Sep 2017 11:34:56 +0200
Subject: [PATCH] Add PL/SQL to FunctionList

Close #3741
---
 PowerEditor/src/functionList.xml | 15 +++++++++++++++
 1 file changed, 15 insertions(+)

diff --git a/PowerEditor/src/functionList.xml b/PowerEditor/src/functionList.xml
index 17cee11fd..8d3a7f9c1 100644
--- a/PowerEditor/src/functionList.xml
+++ b/PowerEditor/src/functionList.xml
@@ -78,6 +78,7 @@
 			<association id=         "xml_node"       langID= "9"                          />
 			<association id=       "batch_label"      langID="12"                          />
 			<association id=         "ini_section"    langID="13"                          />
+			<association id=       "plsql_function"   langID="17"                          />
 			<association id=        "perl_function"   langID="21"                          />
 			<association id=      "python_syntax"     langID="22"                          />
 			<association id=        "bash_function"   langID="26"                          />
@@ -108,6 +109,20 @@
 		</associationMap>
 		<parsers>
 
+			<!-- ========================================================= [ PL/SQL ] -->
+			<parser id="plsql_function" displayName="PL/SQL" commentExpr="((/\*.*?\*)/|(//.*?$))">
+        			<function
+				    mainExpr="((PROCEDURE)|(FUNCTION))[\s]+[A-Za-z][\w_]*([\s]*\([^\)]*\)[\s]*)?(([\s]*;)|([\s]*([ia]s))|([\s]+(RETURN)([\s]+[\w%\.]+)+(([\s]*;)|([\s]+([ia]s)))))"
+				    displayMode="$className->$functionName"
+			 	>
+					<functionName>
+						<nameExpr expr="[\s]+[A-Za-z][\w_]*([\s]*\([^\)]*\))?(([\s]*;)|([\s]*([ia]s))|([\s]+(RETURN)([\s]+[\w%\.]+)+(([\s]*;)|([\s]+([ia]s)))))"/>
+						<nameExpr expr="[A-Za-z][\w_]*([\s]*\([^\)]*\))?(([\s]*;)|([\s]*([ia]s))|([\s]+(RETURN)([\s]+[\w%\.]+)+(([\s]*;)|([\s]+([ia]s)))))"/>
+						<nameExpr expr="[A-Za-z][\w_]*([\s]*\([^\)]*\))?(([\s]+(RETURN)([\s]+[\w%\.]+)+))*"/>
+					</functionName>
+				</function>
+			</parser>
+
 			<!-- ========================================================= [ PHP ] -->
 			<!-- PHP - Personal Home Page / PHP Hypertext Preprocessor             -->