From 983a62710bb0e0e5659c48c5f877fe025e4b0fc0 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Sat, 26 Dec 2009 13:34:06 -0800 Subject: [PATCH] Fix over-long line. --- src/microcode/prmhash.c | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/microcode/prmhash.c b/src/microcode/prmhash.c index 2ca98ee6d..8b3d1bc11 100644 --- a/src/microcode/prmhash.c +++ b/src/microcode/prmhash.c @@ -209,7 +209,8 @@ DEFINE_PRIMITIVE ("MHASH", Prim_mhash, 4, 4, 0) CHECK_ARG (2, STRING_P); { SCHEME_OBJECT string = (ARG_REF (2)); - unsigned long end = (arg_ulong_index_integer (4, ((STRING_LENGTH (string)) + 1))); + unsigned long end + = (arg_ulong_index_integer (4, ((STRING_LENGTH (string)) + 1))); unsigned long start = (arg_ulong_index_integer (3, (end + 1))); mhash ((arg_context (1)), (STRING_LOC (string, start)), (end - start)); } -- 2.25.1