checksums.adler-32: make adler-32 instance checksum.

diff --git a/basis/checksums/adler-32/adler-32.factor b/basis/checksums/adler-32/adler-32.factor
index f66860dc63f404765af7f9fc25e4a4d32f373b72..1937503dd99a7b207bd0dd31eabcea5b68243c15 100644 (file)
--- a/basis/checksums/adler-32/adler-32.factor
+++ b/basis/checksums/adler-32/adler-32.factor
@@ -13,3 +13,5 @@ M: adler-32 checksum-bytes ( bytes checksum -- value )
     [ sum 1 + ]
     [ [ dup length [1,b] <reversed> v. ] [ length ] bi + ] bi
     [ adler-32-modulus mod ] bi@ 16 shift bitor ;
+
+INSTANCE: adler-32 checksum