--- parser3/www/htdocs/Attic/index.html	2002/08/08 14:04:48	1.100
+++ parser3/www/htdocs/Attic/index.html	2002/08/12 10:32:54	1.105
@@ -1,5 +1,5 @@
-#@USE
-#t.p
+@USE
+/derived.p
 
 @auto[filespec]
 $selffilespec[$filespec]
@@ -192,7 +192,6 @@ $selffilespec[$filespec]
 #^sergestrandef[]
 #^tstdin[]
 #^tfind[]
-#^calendar[]
 #^mimet[]
 #^cgit[]
 #^joinlimit[]
@@ -205,10 +204,33 @@ $selffilespec[$filespec]
 #^mail3[]
 #^mail4[]
 #^datesaving[]
-^badconstructor[]
+#^badconstructor[]
+#^calendar[]
+#^monthdays(8)
+#^xdoctypetest[]
+#^xtabletest[]
+^staticstest[]
 <hr>
 OK
 
+@staticstest[]
+$derived[^derived::create[]]
+^derived.test[]
+
+@xdoctypetest[]
+$xdoc[^xdoc::create[x]]
+^if($xdoc is xdoc){y}{n}
+
+@xtabletest[]
+$xtableo[^xtable::create[]]
+^if($xtableo is table){y}{n}
+#^xtableo.columns[]
+
+@monthdays[month]
+$from[^date::create(2000;$month;1)]
+$to[^date::create($from)] ^to.roll[month](+1)
+$result($to-$from)
+
 @badconstructor[]
 ^date::now[]
 
@@ -1699,11 +1721,11 @@ $abc[abc]
 
 @calendar[]
 $year(2002)
-$month(8)
+$month(12)
 ${year}-${month}:<br>
 $week_days[^date:calendar[rus]($year;$month)]
 <pre>
-^week_days.menu{^for[wday](0;6){^if($week_days.$wday){$week_days.$wday;&nbsp^;&nbsp^;} }=$week_days.week=<br>}
+^week_days.menu{^for[wday](0;6){^if($week_days.$wday){$week_days.$wday;&nbsp^;&nbsp^;} }=$week_days.week,$week_days.year=<br>}
 </pre>
 
 @thash[]