--- a/AbstractTime.st	Tue Jun 27 04:15:21 1995 +0200
+++ b/AbstractTime.st	Sun Jul 02 03:08:30 1995 +0200
@@ -44,7 +44,7 @@
 
 version
 "
-$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.2 1995-02-21 01:05:47 claus Exp $
+$Header: /cvs/stx/stx/libbasic/AbstractTime.st,v 1.3 1995-07-02 01:05:19 claus Exp $
 "
 ! !
 
@@ -70,9 +70,9 @@
    ^ self basicNew setSeconds:seconds
 
     "
-     Time fromSeconds:0            "/ should return midnight
-     AbsoluteTime fromSeconds:0    "/ on UNIX: returns 1st. Jan 1970
-				   "/ on others: dont know
+     Time fromSeconds:0             should return midnight
+     AbsoluteTime fromSeconds:0     on UNIX: returns 1st. Jan 1970
+				    on others: dont know
     "
 !
 
@@ -118,16 +118,26 @@
 !
 
 fromOSTimeTimeLow:lowTime and:hiTime
-    "set my time, from operatingSystems time parts"
+    "set my time, from operatingSystems time parts.
+     Since I am abstract (not knowing how the time is actually
+     represented), this must be done by a concrete class."
 
     ^ self subclassResponsibility
 !
 
 setSeconds:secs
+    "set the seconds.
+     Since I am abstract (not knowing how the time is actually
+     represented), this must be done by a concrete class."
+
     ^ self subclassResponsibility
 !
 
 getSeconds
+    "get the seconds.
+     Since I am abstract (not knowing how the time is actually
+     represented), this must be done by a concrete class."
+
     ^ self subclassResponsibility
 ! !