--- a/Cface__GeneratorCommand.st	Fri Jul 04 12:05:15 2008 +0000
+++ b/Cface__GeneratorCommand.st	Thu Jul 10 07:31:14 2008 +0000
@@ -3,7 +3,7 @@
 "{ NameSpace: Cface }"
 
 Object subclass:#GeneratorCommand
-	instanceVariableNames:'platform mappings definitions module'
+	instanceVariableNames:'platform mappings definitions unixLibraryName win32LibraryName'
 	classVariableNames:''
 	poolDictionaries:''
 	category:'Cface-Generators'
@@ -74,18 +74,6 @@
     "Created: / 18-02-2008 / 15:35:04 / janfrog"
 !
 
-module
-    ^ module
-
-    "Created: / 04-07-2008 / 07:40:38 / Jan Vrany <vranyj1@fel.cvut.cz>"
-!
-
-module:something
-    module := something.
-
-    "Created: / 04-07-2008 / 07:40:38 / Jan Vrany <vranyj1@fel.cvut.cz>"
-!
-
 platform
 
     platform ifNil:[platform := Cface::Platform theInstance].
@@ -112,6 +100,30 @@
     ^platform typeResolver
 
     "Created: / 18-02-2008 / 15:30:32 / janfrog"
+!
+
+unixLibraryName
+    ^ unixLibraryName
+
+    "Created: / 10-07-2008 / 09:07:56 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+unixLibraryName:something
+    unixLibraryName := something.
+
+    "Created: / 10-07-2008 / 09:07:56 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+win32LibraryName
+    ^ win32LibraryName
+
+    "Created: / 10-07-2008 / 09:07:56 / Jan Vrany <vranyj1@fel.cvut.cz>"
+!
+
+win32LibraryName:something
+    win32LibraryName := something.
+
+    "Created: / 10-07-2008 / 09:07:56 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
 !GeneratorCommand methodsFor:'processing'!
@@ -122,11 +134,12 @@
     self platform typeResolver process: definitions.
     self platform typeMapper process: definitions using: self mappings.
     ^self platform generator 
-        module: module;
+        unixLibraryName: unixLibraryName;
+        win32LibraryName: win32LibraryName;
         process: definitions.
 
     "Created: / 18-02-2008 / 15:25:54 / janfrog"
-    "Modified: / 04-07-2008 / 07:40:53 / Jan Vrany <vranyj1@fel.cvut.cz>"
+    "Modified: / 10-07-2008 / 09:08:18 / Jan Vrany <vranyj1@fel.cvut.cz>"
 ! !
 
 !GeneratorCommand class methodsFor:'documentation'!