openrat-cms

commit 9c63719d0882f86e13849257b99b33784c8e0ec3
parent 8f213b6c51839f58dd0ab8187b0c5017503a777b
Author: Jan Dankert <develop@jandankert.de>
Date:   Sun, 26 Jun 2022 13:18:47 +0200

New: DSL ouput the parsed source.

Diffstat:
M
modules/dsl/standard/Script.class.php
 | 
15
+++++++++++++++

1 file changed, 15 insertions(+), 0 deletions(-)
diff --git a/modules/dsl/standard/Script.class.php b/modules/dsl/standard/Script.class.php
@@ -34,6 +34,21 @@ class Script implements DslObject
 	}
 
 
+	public function getSource()
+	{
+		$line   = 0;
+		$source = '';
+
+		foreach( $this->tokens as $token ) {
+
+			$source .= ($line != $token->lineNumber ? "\n" . str_pad($token->lineNumber, 4, '0', STR_PAD_LEFT).': ' : '') . $token->value;
+			$line = $token->lineNumber;
+		}
+
+		return $source."\n";
+	}
+
+
 	public function getSyntaxTree()
 	{
 		return print_r($this->ast,true);