# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1487898307 -3600
# Node ID 993f8921185d28189ceefedf24a846eeef44091f
# Parent  b4af58284a848d4f3e3b97982abd608883262ca1
#FEATURE by cg
class: MacOSXIconReader
added:
	#read_icm4_from:
	#read_icm8_from:
	#read_icm__from:
	#read_icnV_from:
changed: #read_h8mk_from:

diff -r b4af58284a84 -r 993f8921185d MacOSXIconReader.st
--- a/MacOSXIconReader.st	Fri Feb 24 01:37:16 2017 +0100
+++ b/MacOSXIconReader.st	Fri Feb 24 02:05:07 2017 +0100
@@ -800,12 +800,12 @@
 
     offset := 0.
     (bytes from:1 to:4) = #[0 0 0 0] ifTrue:[
-        self halt.
+        self breakPoint:#cg.
         offset := 4.
     ].    
     ^ self readPackBitsImageFrom:bytes asByteArray offset:offset width:48 height:48 depth:8.
 
-    "Modified: / 22-02-2017 / 10:32:07 / cg"
+    "Modified: / 24-02-2017 / 01:39:56 / cg"
 !
 
 read_ic07_from:bytes
@@ -966,6 +966,42 @@
     "
 !
 
+read_icm4_from:bytes
+    "read (actually: skip) an icm4 record."
+
+    self breakPoint:#cg.
+    ^ nil
+
+    "Created: / 24-02-2017 / 01:40:13 / cg"
+!
+
+read_icm8_from:bytes
+    "read (actually: skip) an icm8 record."
+
+    self breakPoint:#cg.
+    ^ nil
+
+    "Created: / 24-02-2017 / 01:40:23 / cg"
+!
+
+read_icm__from:bytes
+    "read (actually: skip) an icm# record."
+
+    self breakPoint:#cg.
+    ^ nil
+
+    "Created: / 24-02-2017 / 01:39:43 / cg"
+!
+
+read_icnV_from:bytes
+    "read (actually: skip) an icnV record."
+
+    self breakPoint:#cg.
+    ^ nil
+
+    "Created: / 24-02-2017 / 01:43:21 / cg"
+!
+
 read_icp4_from:bytes
     "read an ipc4 (PNG or JPEG, 16x16) format icon"