r942 - ofw/fs/fatfs

Author: wmb
Date: 2008-09-23 17:29:21 +0200 (Tue, 23 Sep 2008)
New Revision: 942

Modified:
   ofw/fs/fatfs/fdisk2.fth
Log:
Disk formatting - r939 had a typo that caused a compilation error.

Modified: ofw/fs/fatfs/fdisk2.fth
===================================================================
--- ofw/fs/fatfs/fdisk2.fth	2008-09-17 05:40:18 UTC (rev 941)
+++ ofw/fs/fatfs/fdisk2.fth	2008-09-23 15:29:21 UTC (rev 942)
@@ -149,7 +149,7 @@
    fat32? to type32?
    dup type32? compute-cluster-size swap 2>r	( R: spc #mbytes )
    1 h# 40 h# 20 			( #hid-sec #heads sec/trk ) ( R: spc #mbytes )
-   r> h# 10.0000 /sector /*		( #hid-sec #heads sec/trk #secs ) ( R: spc )
+   r> h# 10.0000 /sector */		( #hid-sec #heads sec/trk #secs ) ( R: spc )
    dup r@ / swap >r			( #hid-sec #heads sec/trk #clusters ) ( R: spc #secs )
    type32?  if
       4 *