diff --git a/funcext/tvclib/utslvclmemstruct.tsf b/funcext/tvclib/utslvclmemstruct.tsf
index 0ec150a..58e344c 100644
--- a/funcext/tvclib/utslvclmemstruct.tsf
+++ b/funcext/tvclib/utslvclmemstruct.tsf
@@ -1341,8 +1341,6 @@ type TWSADATA=class(tslcstructureobj)             //
     property szdescription index "szdescription" read _getvalue_ write _setvalue_;
     property szsystemstatus index "szsystemstatus" read _getvalue_ write _setvalue_;
 end
-implementation
-(*
 type Ttagprocessentry32=class(tslcstructureobj)
     private
     static SSTRUCT;
@@ -1414,6 +1412,9 @@ type Ttagmoduleentry32=class(tslcstructureobj)
     property szmodule index "szmodule" read _getvalue_ write _setvalue_;
     property szexepath index "szexepath" read _getvalue_ write _setvalue_;
 end
+implementation
+(*
+
 type TMONITORINFO=class(tslcstructureobj)
     private
     static SSTRUCT;