From 8eb788c5c9dee1fbc26c7f417b9507627c6ed0a2 Mon Sep 17 00:00:00 2001 From: Chris Hanson Date: Thu, 28 May 1987 16:09:22 +0000 Subject: [PATCH] Fix randomness in switch statements for wrong_type_arg and bad_range_arg. --- v7/src/microcode/utils.c | 46 ++++++++++++++++++++-------------------- 1 file changed, 23 insertions(+), 23 deletions(-) diff --git a/v7/src/microcode/utils.c b/v7/src/microcode/utils.c index 5dd130b1f..b1eb3966c 100644 --- a/v7/src/microcode/utils.c +++ b/v7/src/microcode/utils.c @@ -30,7 +30,7 @@ Technology nor of any adaptation thereof in any advertising, promotional, or sales literature without prior written consent from MIT in each case. */ -/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/utils.c,v 9.29 1987/05/27 14:50:43 cph Exp $ */ +/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/utils.c,v 9.30 1987/05/28 16:09:22 cph Exp $ */ /* This file contains utilities for interrupts, errors, etc. */ @@ -309,17 +309,17 @@ error_wrong_type_arg (n) switch (n) { - case 1: error_code = ERR_ARG_1_WRONG_TYPE; - case 2: error_code = ERR_ARG_2_WRONG_TYPE; - case 3: error_code = ERR_ARG_3_WRONG_TYPE; - case 4: error_code = ERR_ARG_4_WRONG_TYPE; - case 5: error_code = ERR_ARG_5_WRONG_TYPE; - case 6: error_code = ERR_ARG_6_WRONG_TYPE; - case 7: error_code = ERR_ARG_7_WRONG_TYPE; - case 8: error_code = ERR_ARG_8_WRONG_TYPE; - case 9: error_code = ERR_ARG_9_WRONG_TYPE; - case 10: error_code = ERR_ARG_10_WRONG_TYPE; - default: error_code = ERR_EXTERNAL_RETURN; + case 1: error_code = ERR_ARG_1_WRONG_TYPE; break; + case 2: error_code = ERR_ARG_2_WRONG_TYPE; break; + case 3: error_code = ERR_ARG_3_WRONG_TYPE; break; + case 4: error_code = ERR_ARG_4_WRONG_TYPE; break; + case 5: error_code = ERR_ARG_5_WRONG_TYPE; break; + case 6: error_code = ERR_ARG_6_WRONG_TYPE; break; + case 7: error_code = ERR_ARG_7_WRONG_TYPE; break; + case 8: error_code = ERR_ARG_8_WRONG_TYPE; break; + case 9: error_code = ERR_ARG_9_WRONG_TYPE; break; + case 10: error_code = ERR_ARG_10_WRONG_TYPE; break; + default: error_code = ERR_EXTERNAL_RETURN; break; } signal_error_from_primitive (error_code); } @@ -332,17 +332,17 @@ error_bad_range_arg (n) switch (n) { - case 1: error_code = ERR_ARG_1_BAD_RANGE; - case 2: error_code = ERR_ARG_2_BAD_RANGE; - case 3: error_code = ERR_ARG_3_BAD_RANGE; - case 4: error_code = ERR_ARG_4_BAD_RANGE; - case 5: error_code = ERR_ARG_5_BAD_RANGE; - case 6: error_code = ERR_ARG_6_BAD_RANGE; - case 7: error_code = ERR_ARG_7_BAD_RANGE; - case 8: error_code = ERR_ARG_8_BAD_RANGE; - case 9: error_code = ERR_ARG_9_BAD_RANGE; - case 10: error_code = ERR_ARG_10_BAD_RANGE; - default: error_code = ERR_EXTERNAL_RETURN; + case 1: error_code = ERR_ARG_1_BAD_RANGE; break; + case 2: error_code = ERR_ARG_2_BAD_RANGE; break; + case 3: error_code = ERR_ARG_3_BAD_RANGE; break; + case 4: error_code = ERR_ARG_4_BAD_RANGE; break; + case 5: error_code = ERR_ARG_5_BAD_RANGE; break; + case 6: error_code = ERR_ARG_6_BAD_RANGE; break; + case 7: error_code = ERR_ARG_7_BAD_RANGE; break; + case 8: error_code = ERR_ARG_8_BAD_RANGE; break; + case 9: error_code = ERR_ARG_9_BAD_RANGE; break; + case 10: error_code = ERR_ARG_10_BAD_RANGE; break; + default: error_code = ERR_EXTERNAL_RETURN; break; } signal_error_from_primitive (error_code); } -- 2.25.1