From 84497c3087d9395fc66ef5cc376e1a67889af051 Mon Sep 17 00:00:00 2001 From: vdelachaux Date: Mon, 9 Dec 2024 17:44:59 +0100 Subject: [PATCH] log event --- Project/Sources/Classes/beautifier.4dm | 10 +++++++++- Project/Sources/Classes/macro.4dm | 2 ++ 2 files changed, 11 insertions(+), 1 deletion(-) diff --git a/Project/Sources/Classes/beautifier.4dm b/Project/Sources/Classes/beautifier.4dm index 197d78b..4d84d67 100644 --- a/Project/Sources/Classes/beautifier.4dm +++ b/Project/Sources/Classes/beautifier.4dm @@ -16,6 +16,8 @@ Class extends macro Class constructor() + LOG EVENT:C667(Into system standard outputs:K38:9; "MACROS constructor"; Error message:K38:3) + var $t : Text var $c : Collection var $file : 4D:C1709.File @@ -63,7 +65,7 @@ Class constructor() "splitLiterals"\ ]) - This:C1470.options[$t]:=This:C1470.options[$t]#Null:C1517 ? This:C1470.options[$t] : True:C214 + This:C1470.options[$t]:=This:C1470.options[$t] ? This:C1470.options[$t] : True:C214 End for each @@ -181,6 +183,8 @@ Class constructor() // === === === === === === === === === === === === === === === === === === === === === === === === === === Function beautify() + LOG EVENT:C667(Into system standard outputs:K38:9; "MACROS beautify()"; Error message:K38:3) + var $line; $raw : Text var $code : Text:=This:C1470.withSelection ? This:C1470.highlighted : This:C1470.method @@ -457,6 +461,8 @@ A comment line is preceded by an empty line if: // === === === === === === === === === === === === === === === === === === === === === === === === === === Function before($code : Text) : Text + LOG EVENT:C667(Into system standard outputs:K38:9; "MACROS before()"; Error message:K38:3) + var $pattern; $t : Text // Mark:Use var instead of (_o_)C_xxx @@ -522,6 +528,8 @@ Function before($code : Text) : Text // === === === === === === === === === === === === === === === === === === === === === === === === === === Function after() : Text + LOG EVENT:C667(Into system standard outputs:K38:9; "MACROS after()"; Error message:K38:3) + var $t : Text var $indx : Integer diff --git a/Project/Sources/Classes/macro.4dm b/Project/Sources/Classes/macro.4dm index e90eb31..1cd6d8d 100755 --- a/Project/Sources/Classes/macro.4dm +++ b/Project/Sources/Classes/macro.4dm @@ -95,6 +95,8 @@ Function setHighlightedText($text : Text) // === === === === === === === === === === === === === === === === === === === === === === === === === === Function paste($text : Text; $useSelection : Boolean) + LOG EVENT:C667(Into system standard outputs:K38:9; "MACROS paste()"; Error message:K38:3) + var $i : Integer If (Count parameters:C259>=2)