# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 856174250 -3600
# Node ID 50b841f4851d2a9534acddd4c52ae68e28b7811e
# Parent  3311c88f2a0e1eb86d00c7a1a37eca86ed253856
commentary

diff -r 3311c88f2a0e -r 50b841f4851d WinIconRdr.st
--- a/WinIconRdr.st	Fri Feb 14 21:34:49 1997 +0100
+++ b/WinIconRdr.st	Mon Feb 17 11:10:50 1997 +0100
@@ -566,9 +566,12 @@
     width := header at:(6+1).
     height := header at:(7+1).
     nColor := header at:(8+1).
-    "10, 11, 12, 13, 14 ? (reserve)"
-    "15, 16, 17, 18       pixel array size"
-    "19, 20, 21, 22       offset        "
+    "/ reserved := header at:(9+1).
+    "/ nPlanes := header wordAt:(10+1).
+    "/ nBitsPerPel := header wordAt:(12+1).
+    "/ nBytesInResource := header doubleWordAt:(14+1).
+    "/ ordinal := header wordAt:(18+1).
+    "21, 22               ?"
     "23, ... , 62         ?"
 
     inDepth := header at:16r25.
@@ -639,12 +642,12 @@
      WindowsIconReader new fromWindowsICOFile:'/phys/clam2//LocalLibrary/Images/WIN_icons/ibm.ico'.
     "
 
-    "Modified: 7.6.1996 / 15:46:30 / cg"
+    "Modified: 15.2.1997 / 13:52:52 / cg"
 ! !
 
 !WindowsIconReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/Attic/WinIconRdr.st,v 1.28 1997-02-01 14:07:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/Attic/WinIconRdr.st,v 1.29 1997-02-17 10:10:50 cg Exp $'
 ! !
 WindowsIconReader initialize!
diff -r 3311c88f2a0e -r 50b841f4851d WindowsIconReader.st
--- a/WindowsIconReader.st	Fri Feb 14 21:34:49 1997 +0100
+++ b/WindowsIconReader.st	Mon Feb 17 11:10:50 1997 +0100
@@ -566,9 +566,12 @@
     width := header at:(6+1).
     height := header at:(7+1).
     nColor := header at:(8+1).
-    "10, 11, 12, 13, 14 ? (reserve)"
-    "15, 16, 17, 18       pixel array size"
-    "19, 20, 21, 22       offset        "
+    "/ reserved := header at:(9+1).
+    "/ nPlanes := header wordAt:(10+1).
+    "/ nBitsPerPel := header wordAt:(12+1).
+    "/ nBytesInResource := header doubleWordAt:(14+1).
+    "/ ordinal := header wordAt:(18+1).
+    "21, 22               ?"
     "23, ... , 62         ?"
 
     inDepth := header at:16r25.
@@ -639,12 +642,12 @@
      WindowsIconReader new fromWindowsICOFile:'/phys/clam2//LocalLibrary/Images/WIN_icons/ibm.ico'.
     "
 
-    "Modified: 7.6.1996 / 15:46:30 / cg"
+    "Modified: 15.2.1997 / 13:52:52 / cg"
 ! !
 
 !WindowsIconReader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview2/WindowsIconReader.st,v 1.28 1997-02-01 14:07:04 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview2/WindowsIconReader.st,v 1.29 1997-02-17 10:10:50 cg Exp $'
 ! !
 WindowsIconReader initialize!