EgtInterface :

- aggiunta funzione EgtGetCurrMachineName.

API_MachMgr.cpp

@@ -37,6 +37,19 @@ __stdcall EgtSetCurrMachine( const wchar_t* wsMachineName)
    return ( ExeSetCurrMachine( wstrztoA( wsMachineName)) ? TRUE : FALSE) ;
 }
 
+//-----------------------------------------------------------------------------
+BOOL
+__stdcall EgtGetCurrMachineName( wchar_t*& wsMachineName)
+{
+   if ( &wsMachineName == nullptr)
+      return FALSE ;
+   string sMachineName ;
+   if ( ! ExeGetCurrMachineName( sMachineName))
+      return FALSE ;
+   wsMachineName = _wcsdup( stringtoW( sMachineName)) ;
+   return  (( wsMachineName == nullptr) ? FALSE : TRUE) ;
+}
+
 //-----------------------------------------------------------------------------
 //   Machining Groups
 //-----------------------------------------------------------------------------