refactor(cobc):ゼロ除算のコンフィグ名称を変更

#39 で追加したゼロ除算機能のコンフィグでのパラメータ名称を、他のオプションと同様になるように修正した

Author: n-isaka

cobc/codegen.c

@@ -6,12 +6,12 @@
  * it under the terms of the GNU General Public License as published by
  * the Free Software Foundation; either version 2, or (at your option)
  * any later version.
- * 
+ *
  * This program is distributed in the hope that it will be useful,
  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  * GNU General Public License for more details.
- * 
+ *
  * You should have received a copy of the GNU General Public License
  * along with this software; see the file COPYING.  If not, write to
  * the Free Software Foundation, 51 Franklin Street, Fifth Floor
@@ -1594,7 +1594,7 @@ initialize_type (struct cb_initialize *p, struct cb_field *f, int topfield)
 			} else if (cb_tree_type (CB_TREE (f)) == COB_TYPE_NUMERIC_DISPLAY) {
 				if (f->flag_sign_separate) {
 					return INITIALIZE_ONE;
-				} else if (cb_display_sign == COB_DISPLAY_SIGN_EBCDIC 
+				} else if (cb_display_sign == COB_DISPLAY_SIGN_EBCDIC
 				             && f->pic->have_sign) {
 					return INITIALIZE_ONE;
 				} else {
@@ -3267,7 +3267,7 @@ output_stmt (cb_tree x)
 			output_line ("cob_exception_code = 0;");
 		}
 
-		if (cb_zero_division_error && p->name &&
+		if (cb_enable_zero_division_error && p->name &&
 			((strcmp (p->name, "DIVIDE") == 0) || (strcmp (p->name, "COMPUTE") == 0)) &&
 				(!p->handler1 && !p->handler2)) {
 			output_line ("cob_error_on_exit_flag = 1;");

cobc/config.def

@@ -6,12 +6,12 @@
  * it under the terms of the GNU General Public License as published by
  * the Free Software Foundation; either version 2, or (at your option)
  * any later version.
- * 
+ *
  * This program is distributed in the hope that it will be useful,
  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  * GNU General Public License for more details.
- * 
+ *
  * You should have received a copy of the GNU General Public License
  * along with this software; see the file COPYING.  If not, write to
  * the Free Software Foundation, 51 Franklin Street, Fifth Floor
@@ -59,7 +59,7 @@ CB_CONFIG_BOOLEAN (cb_switch_no_mnemonic, "switch-no-mnemonic")
 CB_CONFIG_BOOLEAN (cb_allow_is_in_sort_key_spec, "allow-is-in-sort-key-spec")
 CB_CONFIG_BOOLEAN (cb_allow_search_key_in_rhs, "allow-search-key-in-rhs")
 CB_CONFIG_BOOLEAN (cb_ignore_invalid_record_contains, "ignore-invalid-record-contains")
-CB_CONFIG_BOOLEAN (cb_zero_division_error, "zero_division_error")
+CB_CONFIG_BOOLEAN (cb_enable_zero_division_error, "enable-zero-division-error")
 CB_CONFIG_BOOLEAN (cb_enable_check_subscript_out_of_bounds, "enable-check-subscript-out-of-bounds")
 CB_CONFIG_BOOLEAN (cb_enable_expect_numeric_error, "enable-expect-numeric-error")
 CB_CONFIG_BOOLEAN (cb_enable_expect_compute_string_error, "enable-expect-compute-string-error")

cobc/tree.c

@@ -1324,7 +1324,7 @@ cb_build_picture (const char *str)
 			if (count_value == 0) {
 				goto error;
 			} else if (count_value == CHARACTER_LENGTH_OVERFLOW) {
-				n = CHARACTER_LENGTH_OVERFLOW;	
+				n = CHARACTER_LENGTH_OVERFLOW;
 			} else if (n != CHARACTER_LENGTH_OVERFLOW) {
 				remain = INT_MAX - n;
 				if (remain < (count_value - 1)) {
@@ -1837,7 +1837,7 @@ static void
 compute_composite_key (cb_tree key, struct cb_key_component *component_list)
 {
 	int cb;
-	char pic[32]; 
+	char pic[32];
 	struct cb_key_component *key_component;
 	struct cb_field *composite_key;
 
@@ -1883,7 +1883,7 @@ finalize_file (struct cb_file *f, struct cb_field *records)
 				compute_composite_key (alt_key->key, alt_key->component_list);
 			}
 		}
-	} 
+	}
 
 	/* check the record size if it is limited */
 	if (cb_ignore_invalid_record_contains) {
@@ -2251,7 +2251,7 @@ cb_build_binary_op (cb_tree x, int op, cb_tree y)
 		if (x == cb_error_node || y == cb_error_node) {
 			return cb_error_node;
 		}
-		if (cb_zero_division_error && op == '/') {
+		if (cb_enable_zero_division_error && op == '/') {
 			y = cb_check_zero_division (y);
 			if (y == cb_error_node) {
 				return cb_error_node;

config/default-en.conf

@@ -22,7 +22,7 @@ assign-clause: mf
 #  3. the value of environment variable 'DATAFILE' or
 #  4. the literal "DATAFILE"
 # If no, the value of the assign clause is the file name.
-# 
+#
 # Value: 'yes', 'no'
 filename-mapping: yes
 
@@ -87,7 +87,7 @@ sticky-linkage: no
 
 # If yes, set the file assign to the external file
 # Value: 'yes', 'no'
-assign_external: no 
+assign_external: no
 
 # If yes, allow non-matching level numbers
 # Value: 'yes', 'no'
@@ -147,7 +147,7 @@ switch-no-mnemonic:			no
 allow-is-in-sort-key-spec:		no
 allow-search-key-in-rhs:		no
 ignore-invalid-record-contains:		no
-zero_division_error:			no
+enable-zero-division-error:		no
 enable-check-subscript-out-of-bounds:	yes
 enable-expect-numeric-error:		yes
 enable-expect-compute-string-error:	yes

config/default-jp.conf

@@ -22,7 +22,7 @@ assign-clause: mf
 #  3. the value of environment variable 'DATAFILE' or
 #  4. the literal "DATAFILE"
 # If no, the value of the assign clause is the file name.
-# 
+#
 # Value: 'yes', 'no'
 filename-mapping: yes
 
@@ -87,7 +87,7 @@ sticky-linkage: no
 
 # If yes, set the file assign to the external file
 # Value: 'yes', 'no'
-assign_external: no 
+assign_external: no
 
 # If yes, allow non-matching level numbers
 # Value: 'yes', 'no'
@@ -147,7 +147,7 @@ switch-no-mnemonic:			no
 allow-is-in-sort-key-spec:		no
 allow-search-key-in-rhs:		no
 ignore-invalid-record-contains:		no
-zero_division_error:			yes
+enable-zero-division-error:		yes
 enable-check-subscript-out-of-bounds:	yes
 enable-expect-numeric-error:		yes
 enable-expect-compute-string-error:	yes

config/default.conf

@@ -22,7 +22,7 @@ assign-clause: mf
 #  3. the value of environment variable 'DATAFILE' or
 #  4. the literal "DATAFILE"
 # If no, the value of the assign clause is the file name.
-# 
+#
 # Value: 'yes', 'no'
 filename-mapping: yes
 
@@ -87,7 +87,7 @@ sticky-linkage: no
 
 # If yes, set the file assign to the external file
 # Value: 'yes', 'no'
-assign_external: no 
+assign_external: no
 
 # If yes, allow non-matching level numbers
 # Value: 'yes', 'no'
@@ -147,7 +147,7 @@ switch-no-mnemonic:			no
 allow-is-in-sort-key-spec:		no
 allow-search-key-in-rhs:		no
 ignore-invalid-record-contains:		no
-zero_division_error:			no
+enable-zero-division-error:		no
 enable-check-subscript-out-of-bounds:	no
 enable-expect-numeric-error:		no
 enable-expect-compute-string-error:	no

config/jp-compat.conf

@@ -22,11 +22,10 @@ switch-no-mnemonic:			yes
 allow-is-in-sort-key-spec:		yes
 allow-search-key-in-rhs:		yes
 ignore-invalid-record-contains:		yes
-zero_division_error:			yes
+enable-zero-division-error:		yes
 enable-check-subscript-out-of-bounds:	yes
 enable-expect-numeric-error:		yes
 enable-expect-compute-string-error:	yes
 
 # Value: 'any', 'fatal', 'never'
 abort-on-io-exception: 			fatal
-