plc, nmps lock wasn't removed at runtime stop

nmps/lib/nmps/src/nmps_plc.c

@@ -112,8 +112,9 @@ void NMpsCell_init( pwr_sClass_NMpsCell  *object)
 {
 	plc_t_DataInfo	*data_index;
 	int		i;
+	pwr_tStatus 	sts;
 
-	// nmps_create_lock( &sts);
+	nmps_create_lock( &sts);
 
 	if ( !(object->Function & NMPS_CELLFUNC_BACKUP))
 	  NMpsCell_init_time( object);
@@ -705,8 +706,9 @@ void NMpsStoreCell_init( pwr_sClass_NMpsStoreCell  *object)
 {
 	plc_t_DataInfo	*data_index;
 	int		i;
+	pwr_tStatus 	sts;
 
-	// nmps_create_lock( &sts);
+	nmps_create_lock( &sts);
 
 	if ( !(object->Function & NMPS_CELLFUNC_BACKUP))
 	  NMpsCell_init_time( (pwr_sClass_NMpsCell *) object);

src/exp/rt/src/rt_plc_process.c

@@ -299,12 +299,12 @@ init_process ( char *name)
     exit(sts);
   }
 
-  nmps_create_lock( &sts);
-  if (EVEN(sts)) {
-    errh_Fatal("nmps_create_lock, %m", sts);
-    errh_SetStatus( PWR__SRVTERM);
-    exit(sts);
-  }
+  // nmps_create_lock( &sts);
+  // if (EVEN(sts)) {
+  //   errh_Fatal("nmps_create_lock, %m", sts);
+  //  errh_SetStatus( PWR__SRVTERM);
+  //  exit(sts);
+  //}
 
   if ( strstr( name, "rt_plc_core") != 0)
     pp->is_core = 1;
@@ -588,8 +588,6 @@ clean_all (
   sts = gdh_UnrefObjectInfoAll();
   if (EVEN(sts))
     errh_Error("gdh_UnrefObjectInfoAll, %m", sts);
-
-  nmps_delete_lock( &sts);
 }
 
 /* Link to I/O base areas.