core _null fix (#1051)

* Create draft PR for #1050

* create new issue script modified, clean dev check added

* wip

* _NULL_MESSENGER_SERVICE test passed localy

* Remove commented-out IAxoMessagingServices declaration from NULL_MESSENGER_SERVICE

Author: TomKovac

scripts/create_new_issue.ps1

@@ -4,6 +4,21 @@ param
     [string]$IssueBody 
 )
 
+# Get the current script directory
+$scriptDir = Split-Path -Path $MyInvocation.MyCommand.Definition -Parent
+# Construct the full path to _is_on_dev_nothing_to_commit.ps1
+$_is_on_dev_nothing_to_commit = Join-Path -Path $scriptDir -ChildPath "_is_on_dev_nothing_to_commit.ps1"
+
+# Call _is_on_dev_nothing_to_commit.ps1 
+$is_on_dev_nothing_to_commit = & $_is_on_dev_nothing_to_commit
+
+if($is_on_dev_nothing_to_commit -ne 1)
+{
+    Write-Host "You are not currently on the 'dev' branch, or you have some uncommited changes " -ForegroundColor Red
+    Write-Host "Commit your local changes, sync your local 'dev' branch with the remote and start this script again." -ForegroundColor Red
+    exit 1
+}
+
 if (-not $IssueTitle) 
 {
     $IssueTitle = Read-Host "Please enter an issue title."

src/core/ctrl/src/AxoMessaging/Static/AxoMessengerService.st

@@ -5,7 +5,7 @@ USING AXOpen.Messaging.Static;
 
 NAMESPACE AXOpen.Messaging    
     {S7.extern=ReadWrite}
-    CLASS PUBLIC AxoMessengerService EXTENDS AxoObject IMPLEMENTS IAxoMessagingServices
+    CLASS PUBLIC AxoMessengerService EXTENDS AxoObject IMPLEMENTS AXOpen.Core.IAxoMessagingServices
         VAR PRIVATE
             _messages : REF_TO ARRAY[*] OF REF_TO AxoMessenger; // Array to hold message references
             _nextMessageIndex : DINT;

src/core/ctrl/src/Mocks/MockAxoContext.st

@@ -144,6 +144,7 @@ NAMESPACE AXOpen.Core.Dummies
 
         VAR PRIVATE            
             NULL_MESSENGER_SERVICE : _NULL_MESSENGER_SERVICE;
+            // NULL_MESSENGER_SERVICE : IAxoMessagingServices;
             _messengerService : IAxoMessagingServices;
         END_VAR
 

src/core/ctrl/src/abstractions/NULLs.st

@@ -47,12 +47,12 @@ NAMESPACE AXOpen.Core
         END_METHOD
     END_CLASS    
 
-
+    INTERFACE IAxoNullObject EXTENDS IAxoObject END_INTERFACE
 
     ///<summary>
     /// Provides an empty object for uninitialized objects.
     ///</summary>    
-    CLASS PUBLIC _NULL_OBJECT IMPLEMENTS IAxoObject
+    CLASS PUBLIC _NULL_OBJECT IMPLEMENTS IAxoNullObject
         VAR PRIVATE
             {S7.extern=Hidden}
             NULL_CONTEXT : _NULL_CONTEXT;
@@ -156,11 +156,13 @@ NAMESPACE AXOpen.Core
         END_METHOD
     END_CLASS 
 
+    INTERFACE PUBLIC IAxoNullMessagingServices EXTENDS IAxoMessagingServices END_INTERFACE 
+
     ///<summary>
     /// Provides an empty RTC object for uninitialized RTC.
     ///</summary>
     {S7.extern=ReadWrite}
-    CLASS PUBLIC _NULL_MESSENGER_SERVICE IMPLEMENTS IAxoMessagingServices
+    CLASS PUBLIC _NULL_MESSENGER_SERVICE IMPLEMENTS IAxoNullMessagingServices
         // Due to compiler issues with interface inheritance, we will temporarily implement methods related to messaging suspension also here.
         METHOD PUBLIC QueueMessage : BOOL
             VAR_INPUT