--- a/SHA1Stream.st	Wed Feb 12 15:14:07 2014 +0100
+++ b/SHA1Stream.st	Wed Feb 12 15:14:16 2014 +0100
@@ -557,6 +557,7 @@
                 case SWORDARRAY:
                 case SLONGARRAY:
                 case FLOATARRAY:
+                    break;
                 case DOUBLEARRAY:
 #ifdef __NEED_DOUBLE_ALIGN
                     nInstBytes = (nInstBytes-1+__DOUBLE_ALIGN) &~ (__DOUBLE_ALIGN-1);
@@ -567,6 +568,7 @@
 #ifdef __NEED_LONGLONG_ALIGN
                     nInstBytes = (nInstBytes-1+__LONGLONG_ALIGN) &~ (__LONGLONG_ALIGN-1);
 #endif
+                    break;
                 default:
                     goto bad;
             }
@@ -589,11 +591,11 @@
 !SHA1Stream class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.41 2014-02-12 12:54:54 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.42 2014-02-12 14:14:16 stefan Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.41 2014-02-12 12:54:54 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/SHA1Stream.st,v 1.42 2014-02-12 14:14:16 stefan Exp $'
 ! !