Added more comments and assertions to all classes; clean up

draft/library/wsf_js_widget/kernel/webcontrol/wsf_control.e

@@ -186,6 +186,18 @@ feature -- Change
 			isolate := p
 		end
 
+	set_control_name_prefix (p: STRING_32)
+			-- Set the control name prefix
+		do
+			control_name_prefix := p
+		end
+
+	set_control_id (d: INTEGER)
+			-- Set the id of this control
+		do
+			control_id := d
+		end
+
 feature -- Properties
 
 	isolate: BOOLEAN
@@ -197,12 +209,6 @@ feature -- Properties
 	control_id: INTEGER assign set_control_id
 			-- The id of this control
 
-	set_control_id (d: INTEGER)
-			-- Set the id of this control
-		do
-			control_id := d
-		end
-
 	control_name: STRING_32
 			-- The name of this control which is composed of the control name prefix and the id of the control
 		do
@@ -213,10 +219,4 @@ feature -- Properties
 			-- Used to avoid name conflicts since the children stateful controls of stateless controls are appended to the parent
 			-- control state and therefore could have the same name (Stateless multi controls do not add a hierarchy level)
 
-	set_control_name_prefix (p: STRING_32)
-			-- Set the control name prefix
-		do
-			control_name_prefix := p
-		end
-
 end

draft/library/wsf_js_widget/kernel/webcontrol/wsf_multi_control.e

@@ -194,8 +194,6 @@ feature
 
 feature -- Properties
 
-	stateless: BOOLEAN
-
 	controls: ARRAYED_LIST [G]
 			-- List of current controls in this multi control
 

draft/library/wsf_js_widget/kernel/webcontrol/wsf_stateless_control.e

@@ -21,19 +21,10 @@ feature {NONE} -- Initialization
 		do
 			tag_name := a_tag_name
 			create css_classes.make (0)
+		ensure
+			tag_name_set: tag_name = a_tag_name
 		end
 
-feature -- Access
-
-	tag_name: STRING_32
-			-- The tag name
-
-	css_classes: ARRAYED_LIST [STRING_32]
-			-- List of classes (appear in the "class" attribute)
-
-	attributes: detachable STRING_32
-			-- Attributes string (without classes)
-
 feature -- Change
 
 	add_class (c: STRING_32)
@@ -121,6 +112,17 @@ feature -- Rendering
 		deferred
 		end
 
+feature -- Properties
+
+	tag_name: STRING_32
+			-- The tag name
+
+	css_classes: ARRAYED_LIST [STRING_32]
+			-- List of classes (appear in the "class" attribute)
+
+	attributes: detachable STRING_32
+			-- Attributes string (without classes)
+
 invariant
 	tag_name_not_empty: not tag_name.is_empty
 

draft/library/wsf_js_widget/kernel/webcontrol/wsf_stateless_multi_control.e

@@ -32,7 +32,6 @@ feature {NONE} -- Initialization
 			-- Initialize
 		do
 			make_with_tag_name ("")
-			stateless := True
 		end
 
 feature