pack: fix signature for signed-endian>.

diff --git a/basis/pack/pack.factor b/basis/pack/pack.factor
index e254563458ba9886b859bbf333b7de78735a4b94..c6686452d97a1e5855d58e586420d37912520f58 100644 (file)
--- a/basis/pack/pack.factor
+++ b/basis/pack/pack.factor
@@ -58,15 +58,15 @@ CONSTANT: pack-table
 
 CONSTANT: unpack-table
     H{
-        { CHAR: c [ 8 signed-endian> ] }
+        { CHAR: c [ signed-endian> ] }
         { CHAR: C [ unsigned-endian> ] }
-        { CHAR: s [ 16 signed-endian> ] }
+        { CHAR: s [ signed-endian> ] }
         { CHAR: S [ unsigned-endian> ] }
-        { CHAR: t [ 24 signed-endian> ] }
+        { CHAR: t [ signed-endian> ] }
         { CHAR: T [ unsigned-endian> ] }
-        { CHAR: i [ 32 signed-endian> ] }
+        { CHAR: i [ signed-endian> ] }
         { CHAR: I [ unsigned-endian> ] }
-        { CHAR: q [ 64 signed-endian> ] }
+        { CHAR: q [ signed-endian> ] }
         { CHAR: Q [ unsigned-endian> ] }
         { CHAR: f [ unsigned-endian> bits>float ] }
         { CHAR: F [ unsigned-endian> bits>float ] }