diff --git a/ChangeLog b/ChangeLog index b34676236..69a150828 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,6 +1,15 @@ +2023-10-17 David Declerck + + * configure.ac: add checks to allow using stdint.h and inttypes.h + +2023-08-22 Simon Sobisch + + * configure.ac: add -fstack-clash-protection to --enable-hardening[=no] + 2023-07-28 Simon Sobisch + * configure.ac, NEWS: updated for 3.2 * configure.ac: check for mousemask and mmask_t 2023-07-24 Simon Sobisch diff --git a/NEWS b/NEWS index 8526651c6..55977763f 100644 --- a/NEWS +++ b/NEWS @@ -1,5 +1,101 @@ NEWS - user visible changes -*- outline -*- + GnuCOBOL 3.3 (planned January 2023) + + work in progress + +* New GnuCOBOL features + +** cobc now checks for binary files and early exit parsing those; + the error output for format errors (for example invalid indicator column) + is now limitted to 5 per source file + + more work in progress + +* Important Bugfixes + +** #904: MOVE PACKED-DECIMAL unsigned to signed led to bad sign +** Padding bytes of BCD may store a non-truncated digit; while + this has no effect on calculations it can create problems on + later binary comparison of the field as well as on group MOVEs +** #918: COB_LS_VALIDATE (io status 09 and 71) partial broken + +* Changes to the COBOL compiler (cobc) options: + +** New option --copy COPYBOOK to load copybooks before parsing files. This + option can typically be used to perform replacements without modifying + the source code, or to add prototypes for external calls. + +** New option --include FILE.h to add a #include in the generated C file. + This option can typically be used to force the C compiler to check static + calls to externals. The files are put into quotes, unless they start by + '<'. Quoted files are expected to have absolute paths, as the C compiler + is called in a temp directory instead of the project directory. + +** output of unlimited errors may be requested by -fmax-errors=0, + to stop compiliation at first error use -Wfatal-errors +** default value for -fmax-errors was changed from 128 to 20 + +** New option -fdiagnostics-absolute-paths to print the full path of + a file for diagnostics; this flag can be activated if your editor and + build system do not correctly work together to locate files from + diagnostic output + +* More notable changes + +** execution times were significantly reduced for the following: + comparison between a numeric DISPLAY variable to another or to a literal + comparison between numeric DISPLAY or BCD variable to zero + INSPECT CONVERTING (and "simple" INSPECT REPLACING), in general + and especially if both from and to are constants + +* Known issues in 3.x + +** testsuite: + * if built with vbisam, cisam or disam, depending on the version used, some + tests will lead to UNEXPECTED PASS, while others may fail + * possibly failing tests (false positives): + * temporary path invalid + * compiler outputs (assembler) + * compile from stdin + * NIST: OBNC1M.CBL false positive (the test runner uses a nonportable way of + emulating a program kill) + * if build with -fsanitize, then some tests will fail; while we accept patches + to improve that, we don't consider the failing tests as bug in GnuCOBOL + +** the recent additions of ">> TURN" and "variable LIKE variable" may not work + as expected in all cases + +** floating-point comparison for equality may return unexpected results as it + involves a necessary tolerance; you may adjust the default tolerance of + 0.0000001 by compiling GnuCOBOL for example with + LIBCOB_CPPFLAGS="-DCOB_FLOAT_DELTA=0.0000000000001"; + we seek input for a reasonable default for GnuCOBOL 4 (use the mailing list + or discussion board to share your comments on this topic, keeping in mind + that this has to take both mathematical and "C compiler portability" into + account) + +** variables containing PICTURE symbol P may lead to wrong results in rare + cases (especially screenio) - please send a bug report if you catch a case; + since GC 3.2 rc3 all arithmetic operations and MOVE are believed to be + correct + +** features that are known to not be portable to every environment yet + (especially when using a different compiler than GCC) + * function with variable-length RETURNING item + * USAGE POINTER, which may need to be manually aligned + +** all versions of GnuCOBOL so far: EVALUATE evaluates all subjects on *each* + WHEN (the standard explicit requests a one-time evaluation of the subjects, + then comparing the value); to work around possible issues move more complex + subjects like variables with subscripts and reference-modification, as well + as calculated subjects and function calls to a temporary variable and use + this as subject for the EVALUATE + +For more known issues see the bug tracker. + +~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ + GnuCOBOL 3.2 (20230728) GnuCOBOL 3.2rc1 (20230118) GnuCOBOL 3.2rc2 (20230210) @@ -369,7 +465,7 @@ NEWS - user visible changes -*- outline -*- ** the -P flag accepts - as argument for stdout -* Important Bugfixes: +* Important Bugfixes ** for dialects other than the GnuCOBOL default different reserved "alias" words were not usable, for example SYNCHRONIZED or COMPUTATIONAL. This was fixed @@ -502,52 +598,6 @@ NEWS - user visible changes -*- outline -*- ** undocumented option -tsymbols, which was replaced by -ftsymbols in 3.0 - -* Known issues in 3.2 (and 3.1) - -** testsuite: - * if built with vbisam, cisam or disam, depending on the version used, some - tests will lead to UNEXPECTED PASS, while others may fail - * possibly failing tests (false positives): - * temporary path invalid - * compiler outputs (assembler) - * compile from stdin - * NIST: OBNC1M.CBL false positive (the test runner uses a nonportable way of - emulating a program kill) - * if build with -fsanitize, then some tests will fail; while we accept patches - to improve that, we don't consider the failing tests as bug in GnuCOBOL - -** the recent additions of ">> TURN" and "variable LIKE variable" may not work - as expected in all cases - -** floating-point comparison for equality may return unexpected results as it - involves a necessary tolerance; you may adjust the default tolerance of - 0.0000001 by compiling GnuCOBOL for example with - LIBCOB_CPPFLAGS="-DCOB_FLOAT_DELTA=0.0000000000001"; - we seek input for a reasonable default for GnuCOBOL 4 (use the mailing list - or discussion board to share your comments on this topic, keeping in mind - that this has to take both mathematical and "C compiler portability" into - account) - -** variables containing PICTURE symbol P may lead to wrong results in rare - cases (especially screenio) - please send a bug report if you catch a case; - since GC 3.2 rc3 all arithmetic operations and MOVE are believed to be - correct - -** features that are known to not be portable to every environment yet - (especially when using a different compiler than GCC) - * function with variable-length RETURNING item - * USAGE POINTER, which may need to be manually aligned - -** all versions of GnuCOBOL so far: EVALUATE evaluates all subjects on *each* - WHEN (the standard explicit requests a one-time evaluation of the subjects, - then comparing the value); to work around possible issues move more complex - subjects like variables with subscripts and reference-modification, as well - as calculated subjects and function calls to a temporary variable and use - this as subject for the EVALUATE - -For more known issues see the bug tracker. - ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ GnuCOBOL 3.1.2 released (20201223) diff --git a/build_windows/config.h.in b/build_windows/config.h.in index 55a082451..e294ff951 100644 --- a/build_windows/config.h.in +++ b/build_windows/config.h.in @@ -788,7 +788,7 @@ #define PACKAGE_NAME "GnuCOBOL" /* Define to the version of this package. */ -#define PACKAGE_VERSION "3.2-dev" +#define PACKAGE_VERSION "3.3-dev" /* Define to the full name and version of this package. */ #define PACKAGE_STRING PACKAGE_NAME " " PACKAGE_VERSION diff --git a/cobc/ChangeLog b/cobc/ChangeLog index 029563aea..3c5533589 100644 --- a/cobc/ChangeLog +++ b/cobc/ChangeLog @@ -1,4 +1,111 @@ +2023-10-12 Fabrice Le Fessant + + * cobc.c, codegen.c: new option --include FILE, to #include + additional files in the C generated code. Such files can be + used to statically check the number of arguments in static + calls, for example. The files are put into quotes, unless + they start by '<'. Since C files are compiled in a temp dir, + quoted files should be absolute paths. Implementing FR #176 + +2023-10-11 Fabrice Le Fessant + + * cobc.c, pplex.l: new option --copy COPYBOOK, to include a COPYBOOK + before reading the source file + +2023-11-29 Fabrice Le Fessant + + * cobc.c (cobc_clean_up): when save-temps specifies a directory, + do not move object files and preprocess files when they were + specified as an explicit target on the command line (-E, -c) + +2023-09-20 Simon Sobisch + + * typeck.c (cb_build_optim_cond): generate calls to new functions + for numeric zero compare for USAGE DISPLAY and PACKED, as well + as comparison between two USAGE DISPLAY or USAGE DISPLAY to literal + * typeck.c (validate_move): internally change literals like 0.00 + to zero constant allowing use of optimized MOVE code + +2023-10-17 David Declerck + + BUG #923: generated modules init/clear unused decimal constants + * codegen.c (literal_list): removal of the unused x field, + and type moved to tree.h + * tree.h (struct cb_program): new decimal_constant field + to store decimal constants used by the current program, + * codegen.c (cb_cache_program_decimal_constant): new function + that adds constants used by the current program to the new + decimal_constant field in struct cb_prog + * codegen.c (cb_lookup_literal): added the current program as + argument to cb_lookup_literal to account for different + usage contexts (parse/typecheck vs codegen) + * codegen.c (output_internal_function): iterate over + prog->decimal_constants instead of literal_cache so as to only + output decimal constants actually used by the current program + * typeck.c (decimal_expand, cb_build_cond_fields), + codegen.c (output_param) : pass current_program to cb_lookup_literal + + BUG #917: segfault on decimal constant after CANCEL on subprogram + * codegen.c (codegen_internal, codegen_finalize): move declaration + of decimal constants from global storage to local storage + +2023-10-02 Fabrice Le Fessant + + * error.c (print_error_prefix), flag.def: new flag + -fdiagnostics-absolute-paths to print the full path of + a file for diagnostics; this flag can be activated if + your editor and build system do not correctly work + together to locate files from diagnostic output + +2023-09-12 Simon Sobisch + + * codegen.c (literal_list): removed self-reference as tree + * replace.c (ppecho_replace): now inline + * replace.c (cb_free_replace): removed setting child to zero before free + * replace.c: style adjustment + +2023-09-07 Simon Sobisch + + * typeck.c (cb_build_converting): protoype (disabled) to pre-generate + conversion table and call new function cob_inspect_translating instead + of cob_inspect_converting if both operands are literals/alphabets + +2023-09-06 Simon Sobisch + + * typeck.c (validate_inspect): check for identical operands, + check for invalid combination of operands + * typeck.c (cb_build_converting): shortcut when identical operands + are used + * tree.h: change alphabet_target and alphabet_type from defines to enums + +2023-09-01 Simon Sobisch + + FR #443: error handling for non-cobol "sources" + * pplex.l (ppopen_get_file): test for binary file and directly error out + * cobc.c (cobc_terminate_exit), cobc.h: split cobc_terminate and make + the new function available + * pplex.l: check for format errors per file and skip format related + warnings if the file reached a max. of 5 such errors + * error.c, cobc.c (print_program_trailer), flag.def: + implemented -fmax-errors=0 as unlimited + * flag.def (max_errors): reduced default from 128 to 20 + * config.c (cb_load_conf), error.c (configuration_error): count missing + definitions as single error + * cobc.c (process_command_line): passing -O0 by defaut for -g as some + C compilers raise warnings otherwise, breaking the testsuite + +2023-08-25 Simon Sobisch + + * codeoptim.c (cob_gen_optim): fixed to actually skip leading zeros + for COB_GET_NUMDISP and COB_GET_NUMDISPS + +2023-08-22 Simon Sobisch + + * typeck.c (emit_definition_note): renamed from warning_destination + * typeck.c (emit_definition_note), tree.h (cb_field): prevent output + of the same field multiple times by new flag_had_definition_note + 2023-08-17 Fabrice Le Fessant * cobc.c: add new flags to output dependencies following gcc: -M to diff --git a/cobc/cobc.c b/cobc/cobc.c index df6044330..7f30b5fb4 100644 --- a/cobc/cobc.c +++ b/cobc/cobc.c @@ -1,5 +1,5 @@ /* - Copyright (C) 2001-2023 Free Software Foundation, Inc. + Copyright (C) 2001-2024 Free Software Foundation, Inc. Authors: Keisuke Nishida, Roger While, Ron Norman, Simon Sobisch, Brian Tiffin, @@ -90,29 +90,33 @@ enum compile_level { CB_LEVEL_EXECUTABLE = 7 }; -#define CB_FLAG_GETOPT_STACK_SIZE 1 -#define CB_FLAG_GETOPT_IF_CUTOFF 2 -#define CB_FLAG_GETOPT_SIGN 3 -#define CB_FLAG_GETOPT_FOLD_COPY 4 -#define CB_FLAG_GETOPT_FOLD_CALL 5 -#define CB_FLAG_GETOPT_TTITLE 6 -#define CB_FLAG_GETOPT_MAX_ERRORS 7 -#define CB_FLAG_GETOPT_DUMP 8 -#define CB_FLAG_GETOPT_CALLFH 9 -#define CB_FLAG_GETOPT_INTRINSICS 10 -#define CB_FLAG_GETOPT_EC 11 -#define CB_FLAG_GETOPT_NO_EC 12 -#define CB_FLAG_GETOPT_NO_DUMP 13 -#define CB_FLAG_GETOPT_EBCDIC_TABLE 14 -#define CB_FLAG_GETOPT_DEFAULT_COLSEQ 15 -#define CB_FLAG_MEMORY_CHECK 16 -#define CB_FLAG_DEPEND_OUTPUT 17 -#define CB_FLAG_DEPEND_TARGET 18 -#define CB_FLAG_DEPEND_ESCAPE_TARGET 19 -#define CB_FLAG_DEPEND_OUTPUT_FILE 20 -#define CB_FLAG_DEPEND_ADD_PHONY 21 -#define CB_FLAG_DEPEND_KEEP_MISSING 22 -#define CB_FLAG_DEPEND_ON_THE_SIDE 23 +enum cb_flag_getopt { + CB_FLAG_GETOPT_STACK_SIZE = 1 + CB_FLAG_GETOPT_IF_CUTOFF , + CB_FLAG_GETOPT_SIGN , + CB_FLAG_GETOPT_FOLD_COPY , + CB_FLAG_GETOPT_FOLD_CALL , + CB_FLAG_GETOPT_TTITLE , + CB_FLAG_GETOPT_MAX_ERRORS , + CB_FLAG_GETOPT_DUMP , + CB_FLAG_GETOPT_CALLFH , + CB_FLAG_GETOPT_INTRINSICS , + CB_FLAG_GETOPT_EC , + CB_FLAG_GETOPT_NO_EC , + CB_FLAG_GETOPT_NO_DUMP , + CB_FLAG_GETOPT_EBCDIC_TABLE , + CB_FLAG_GETOPT_DEFAULT_COLSEQ , + CB_FLAG_GETOPT_MEMORY_CHECK , + CB_FLAG_GETOPT_COPY_FILE , + CB_FLAG_GETOPT_INCLUDE_FILE , + CB_FLAG_GETOPT_DEPEND_OUTPUT , + CB_FLAG_GETOPT_DEPEND_TARGET , + CB_FLAG_GETOPT_DEPEND_ESCAPE_TARGET, + CB_FLAG_GETOPT_DEPEND_OUTPUT_FILE , + CB_FLAG_GETOPT_DEPEND_ADD_PHONY , + CB_FLAG_GETOPT_DEPEND_KEEP_MISSING , + CB_FLAG_GETOPT_DEPEND_ON_THE_SIDE +}; /* Info display limits */ #define CB_IMSG_SIZE 24 @@ -177,8 +181,8 @@ enum compile_level { #define GC_C_VERSION _("unknown") #endif -#define CB_TEXT_LIST_ADD(y,z) y = cb_text_list_add (y, z) -#define CB_TEXT_LIST_CHK(y,z) y = cb_text_list_chk (y, z) +#define CB_TEXT_LIST_ADD(list,z) list = cb_text_list_add (list, z) +#define CB_TEXT_LIST_CHK(list,z) list = cb_text_list_chk (list, z) #ifdef _MSC_VER #define CB_COPT_0 " /Od" @@ -238,6 +242,8 @@ const char *cb_cobc_build_stamp = NULL; const char *demangle_name = NULL; const char *cb_storage_file_name = NULL; const char *cb_call_extfh = NULL; +struct cb_text_list *cb_copy_list = NULL; +struct cb_text_list *cb_include_file_list = NULL; struct cb_text_list *cb_include_list = NULL; struct cb_text_list *cb_depend_list = NULL; struct cb_text_list *cb_intrinsic_list = NULL; @@ -607,6 +613,8 @@ static const struct option long_options[] = { {"save-temps", CB_OP_ARG, NULL, '_'}, {"std", CB_RQ_ARG, NULL, '$'}, {"conf", CB_RQ_ARG, NULL, '&'}, + {"copy", CB_RQ_ARG, NULL, CB_FLAG_GETOPT_COPY_FILE}, + {"include", CB_RQ_ARG, NULL, CB_FLAG_GETOPT_INCLUDE_FILE}, {"debug", CB_NO_ARG, NULL, 'd'}, {"ext", CB_RQ_ARG, NULL, 'e'}, /* note: kept *undocumented* until GC4, will be changed to '.' */ {"free", CB_NO_ARG, NULL, 'F'}, /* note: not assigned directly as this is only valid for */ @@ -617,13 +625,13 @@ static const struct option long_options[] = { {"j", CB_OP_ARG, NULL, 'j'}, {"Q", CB_RQ_ARG, NULL, 'Q'}, {"A", CB_RQ_ARG, NULL, 'A'}, - {"M", CB_NO_ARG, NULL, CB_FLAG_DEPEND_OUTPUT }, - {"MT", CB_RQ_ARG, NULL, CB_FLAG_DEPEND_TARGET}, - {"MQ", CB_RQ_ARG, NULL, CB_FLAG_DEPEND_ESCAPE_TARGET}, - {"MF", CB_RQ_ARG, NULL, CB_FLAG_DEPEND_OUTPUT_FILE}, - {"MP", CB_NO_ARG, NULL, CB_FLAG_DEPEND_ADD_PHONY}, - {"MG", CB_NO_ARG, NULL, CB_FLAG_DEPEND_KEEP_MISSING}, - {"MD", CB_NO_ARG, NULL, CB_FLAG_DEPEND_ON_THE_SIDE}, + {"M", CB_NO_ARG, NULL, CB_FLAG_GETOPT_DEPEND_OUTPUT }, + {"MT", CB_RQ_ARG, NULL, CB_FLAG_GETOPT_DEPEND_TARGET}, + {"MQ", CB_RQ_ARG, NULL, CB_FLAG_GETOPT_DEPEND_ESCAPE_TARGET}, + {"MF", CB_RQ_ARG, NULL, CB_FLAG_GETOPT_DEPEND_OUTPUT_FILE}, + {"MP", CB_NO_ARG, NULL, CB_FLAG_GETOPT_DEPEND_ADD_PHONY}, + {"MG", CB_NO_ARG, NULL, CB_FLAG_GETOPT_DEPEND_KEEP_MISSING}, + {"MD", CB_NO_ARG, NULL, CB_FLAG_GETOPT_DEPEND_ON_THE_SIDE}, {"coverage", CB_NO_ARG, &cb_coverage_enabled, 1}, {"P", CB_OP_ARG, NULL, 'P'}, {"Xref", CB_NO_ARG, NULL, 'X'}, @@ -2197,7 +2205,8 @@ clean_up_intermediates (struct filename *fn, const int status) if (fn->need_preprocess && (status || cb_compile_level > CB_LEVEL_PREPROCESS - || (cb_compile_level == CB_LEVEL_PREPROCESS && save_temps))) { + || (cb_compile_level == CB_LEVEL_PREPROCESS + && save_temps && !save_temps_dir))) { cobc_check_action (fn->preprocess); } /* CHECKME: we had reports of unexpected intermediate @@ -2304,7 +2313,8 @@ cobc_clean_up (const int status) if (fn->need_assemble && (status || cb_compile_level > CB_LEVEL_ASSEMBLE - || (cb_compile_level == CB_LEVEL_ASSEMBLE && save_temps))) { + || (cb_compile_level == CB_LEVEL_ASSEMBLE + && save_temps && !save_temps_dir))) { cobc_check_action (fn->object); } clean_up_intermediates (fn, status); @@ -2371,18 +2381,18 @@ set_listing_date (void) LISTING_TIMESTAMP_FORMAT, ¤t_compile_tm); } - -DECLNORET static void COB_A_NORETURN -cobc_terminate (const char *str) +void +cobc_terminate_exit (const char *filename, const char *error) { if (cb_src_list_file) { set_listing_date (); set_standard_title (); cb_listing_linecount = cb_lines_per_page; - cobc_elided_strcpy (cb_listing_filename, str, sizeof (cb_listing_filename), 0); + cobc_elided_strcpy (cb_listing_filename, filename, sizeof (cb_listing_filename), 0); print_program_header (); } - cb_perror (0, "cobc: %s: %s", str, cb_get_strerror ()); + cb_source_line = 0; /* no context output for fatal open input/output errors */ + cb_perror (0, "cobc: %s: %s", filename, error); if (cb_src_list_file) { print_program_trailer (); } @@ -2390,6 +2400,12 @@ cobc_terminate (const char *str) exit (EXIT_FAILURE); } +DECLNORET static void COB_A_NORETURN +cobc_terminate (const char *filename) +{ + cobc_terminate_exit (filename, cb_get_strerror ()); +} + static void cobc_abort_msg (void) { @@ -3344,6 +3360,10 @@ process_command_line (const int argc, char **argv) #ifdef COB_DEBUG_FLAGS COBC_ADD_STR (cobc_cflags, " ", cobc_debug_flags, NULL); #endif + if (copt == NULL) { + /* some compilers warn if not explicit passed, so default to -O0 for -g */ + copt = CB_COPT_0; + } break; case 'd': @@ -3355,12 +3375,12 @@ process_command_line (const int argc, char **argv) cobc_wants_debug = 1; break; - case 8: + case CB_FLAG_GETOPT_DUMP: /* 8 */ /* -fdump= : Add sections for dump code generation */ cobc_def_dump_opts (cob_optarg, 1); break; - case 13: + case CB_FLAG_GETOPT_NO_DUMP: /* 13 */ /* -fno-dump= : Suppress sections in dump code generation */ if (cob_optarg) { cobc_def_dump_opts (cob_optarg, 0); @@ -3650,6 +3670,8 @@ process_command_line (const int argc, char **argv) /* -fdiagnostics-plain-output */ cb_diagnostics_show_caret = 0 ; cb_diagnostics_show_line_numbers = 0; + /* in the future, may also disable urls, + colors, text art, flow paths */ break; case 'P': @@ -3707,28 +3729,32 @@ process_command_line (const int argc, char **argv) cb_define_list = p; break; - case CB_FLAG_DEPEND_OUTPUT: /* -M */ + case CB_ + + + + PEND_OUTPUT: /* -M */ cb_depend_output = 1; cb_depend_output_only = 1; cb_compile_level = CB_LEVEL_PREPROCESS; break; - case CB_FLAG_DEPEND_ON_THE_SIDE: /* -MD */ + case CB_FLAG_GETOPT_DEPEND_ON_THE_SIDE: /* -MD */ cb_depend_output = 1; cb_depend_target_auto = 1; break; - case CB_FLAG_DEPEND_ADD_PHONY: /* -MP */ + case CB_FLAG_GETOPT_DEPEND_ADD_PHONY: /* -MP */ cb_depend_add_phony = 1; break; - case CB_FLAG_DEPEND_KEEP_MISSING: /* -MG */ + case CB_FLAG_GETOPT_DEPEND_KEEP_MISSING: /* -MG */ cb_depend_keep_missing = 1; break; - case CB_FLAG_DEPEND_TARGET: /* -MT */ + case CB_FLAG_GETOPT_DEPEND_TARGET: /* -MT */ add_depend_target (cob_optarg); break; - case CB_FLAG_DEPEND_ESCAPE_TARGET: /* -MQ */ + case CB_FLAG_GETOPT_DEPEND_ESCAPE_TARGET: /* -MQ */ add_depend_escape_target (cob_optarg); break; - case CB_FLAG_DEPEND_OUTPUT_FILE: /* -MF */ + case CB_FLAG_GETOPT_DEPEND_OUTPUT_FILE: /* -MF */ cb_depend_filename = cobc_strdup(cob_optarg); break; @@ -3964,7 +3990,7 @@ process_command_line (const int argc, char **argv) } break; - case CB_FLAG_MEMORY_CHECK: /* 16 */ + case CB_FLAG_GETOPT_MEMORY_CHECK: /* 16 */ /* -fmemory-check= : */ if (!cob_optarg) { cb_flag_memory_check = CB_MEMCHK_ALL; @@ -3973,6 +3999,26 @@ process_command_line (const int argc, char **argv) } break; + case CB_FLAG_GETOPT_COPY_FILE: /* 17 */ + /* --copy= : COPY file at beginning */ + if (strlen (cob_optarg) > (COB_MINI_MAX)) { + cobc_err_exit (COBC_INV_PAR, "--copy"); + } + CB_TEXT_LIST_ADD (cb_copy_list, + cobc_strdup (cob_optarg)); + break; + + case CB_FLAG_GETOPT_INCLUDE_FILE: /* 18 */ + /* -include= : add #include "file.h" to + generated C file */ + if (strlen (cob_optarg) > (COB_MINI_MAX)) { + cobc_err_exit (COBC_INV_PAR, "--include"); + } + CB_TEXT_LIST_ADD (cb_include_file_list, + cobc_strdup (cob_optarg)); + cb_flag_c_decl_for_static_call = 0; + break; + case 'A': /* -A : Add options to C compile phase */ COBC_ADD_STR (cobc_cflags, " ", cob_optarg, NULL); @@ -6534,10 +6580,10 @@ print_program_trailer (void) print_program_data (print_data); break; } - if (errorcount > cb_max_errors) { + if (cb_max_errors && errorcount > cb_max_errors) { snprintf (print_data, CB_PRINT_LEN, _("Too many errors in compilation group: %d maximum errors"), - cb_max_errors); + cb_max_errors != -1 ? cb_max_errors : 0); print_program_data (print_data); } force_new_page_for_next_line (); @@ -9419,6 +9465,22 @@ main (int argc, char **argv) finish_setup_compiler_env (); finish_setup_internal_env (); + { + struct cb_text_list *l; + for (l = cb_copy_list; l; l=l->next){ + const char *filename; + int has_ext; + char name[COB_MINI_BUFF]; + int len = strlen (l->text); + memcpy (name, l->text, len+1); + has_ext = (strchr (name, '.') != NULL); + filename = cb_copy_find_file (name, has_ext); + if (!filename){ + cobc_err_exit (_("fatal error: could not find --copy argument %s"), name); + } + } + } + /* Reset source format in case text column has been configured manually. */ cobc_set_source_format (cobc_get_source_format ()); diff --git a/cobc/cobc.h b/cobc/cobc.h index a87364da7..86771c8f2 100644 --- a/cobc/cobc.h +++ b/cobc/cobc.h @@ -475,6 +475,8 @@ extern FILE *cb_depend_file; extern int cb_depend_output; extern int cb_depend_keep_missing; extern struct cb_text_list *cb_depend_list; +extern struct cb_text_list *cb_copy_list; +extern struct cb_text_list *cb_include_file_list; extern struct cb_text_list *cb_include_list; extern struct cb_text_list *cb_intrinsic_list; extern struct cb_text_list *cb_extension_list; @@ -654,6 +656,7 @@ extern void cb_plex_error (const size_t, const char *, ...) COB_A_FORMAT23; extern unsigned int cb_plex_verify (const size_t, const enum cb_support, const char *); +extern const char *cb_copy_find_file (char *name, int has_ext); extern void configuration_warning (const char *, const int, const char *, ...) COB_A_FORMAT34; extern void configuration_error (const char *, const int, @@ -663,6 +666,8 @@ extern void cb_add_error_to_listing (const char *, int, const char *, char *); DECLNORET extern void flex_fatal_error (const char *, const char *, const int) COB_A_NORETURN; +DECLNORET extern void cobc_terminate_exit (const char *, const char *) COB_A_NORETURN; + extern void cobc_set_listing_header_code (void); /* reserved.c */ diff --git a/cobc/codegen.c b/cobc/codegen.c index f32391606..ab323a4f9 100644 --- a/cobc/codegen.c +++ b/cobc/codegen.c @@ -124,14 +124,6 @@ struct attr_list { cob_u32_t flags; }; -struct literal_list { - struct literal_list *next; - struct cb_literal *literal; - cb_tree x; - int id; - int make_decimal; -}; - struct field_list { struct field_list *next; struct cb_field *f; @@ -669,7 +661,12 @@ output_string (const unsigned char *s, const int size, const cob_u32_t llit) for (i = 0; i < size; i++) { c = s[i]; if (!isprint (c)) { +#if 1 /* octal */ output ("\\%03o", c); +#else /* hex (can be useful for a small amount of non-printable characters, + but gets really uggly if the string has a lot of those */ + output ("\" \"\\x%X\" \"", c); +#endif } else if (c == '\"') { output ("\\%c", c); } else if ((c == '\\' || c == '?') && !llit) { @@ -754,7 +751,7 @@ chk_field_variable_address (struct cb_field *fld) { if (!fld->flag_vaddr_done) { /* CHECKME: only sliding odo may create a varying address, no? */ - /* Note: this is called _very_ often and takes 15-20% of parse + codegen time, + /* Note: this was called _very_ often and took 15-20% of parse + codegen time, with about half the time in chk_field_variable_size; so try to not call this function if not necessary (according to the testsuite: as long as cb_odoslide is not set, but the caller's coverage is not that well...) */ @@ -762,7 +759,7 @@ chk_field_variable_address (struct cb_field *fld) struct cb_field *p; for (p = f->parent; p; f = f->parent, p = f->parent) { for (p = p->children; p != f; p = p->sister) { -#if 0 /* CHECKME: why does this fail the testsuite ? */ +#if 0 /* CHECKME: Why does this fail the testsuite ? Most likely "recompute" issue */ if (p->flag_vaddr_done) { if (!p->vaddr) { continue; @@ -772,10 +769,9 @@ chk_field_variable_address (struct cb_field *fld) return 1; } #endif - /* Skip PIC L fields as their representation - have constant length */ - if (p->depending || - (!p->flag_picture_l && chk_field_variable_size (p))) { + if (p->depending /* ODO leads to variable size */ + || (!p->flag_picture_l && chk_field_variable_size (p)) /* skipping PIC L fields */ + ) { #if 0 /* only useful with the code above */ /* as we have a variable address, all sisters will also; store this for next check */ @@ -1323,8 +1319,8 @@ output_size (const cb_tree x) output ("%s%d.size - ", CB_PREFIX_FIELD, f->id); output_index (r->offset); } else if (chk_field_variable_size (f) - && cb_odoslide - && !gen_init_working) { + && cb_odoslide + && !gen_init_working) { out_odoslide_size (f); } else { struct cb_field *p = chk_field_variable_size (f); @@ -1833,6 +1829,17 @@ output_gnucobol_defines (const char *formatted_date) current_compile_tm.tm_sec; output_line ("#define COB_MODULE_TIME\t\t%d", i); + { + struct cb_text_list *l = cb_include_file_list ; + for (;l;l=l->next){ + if (l->text[0] == '<'){ + output_line ("#include %s", l->text); + } else { + output_line ("#include \"%s\"", l->text); + } + } + } + } /* CALL cache */ @@ -2597,7 +2604,7 @@ output_literals_figuratives_and_constants (void) #else output ("static const cob_field %s%d\t= ", CB_PREFIX_CONST, lit->id); - output_field (lit->x); + output_field (CB_TREE(lit->literal)); #endif output (";"); output_newline (); @@ -2763,8 +2770,32 @@ output_source_cache (void) /* Literal */ +/* Add the given literal to the list of "seen" decimal + constants in the given program "prog" */ +static void +cb_cache_program_decimal_constant (struct cb_program *prog, struct literal_list *cached_literal) +{ + struct literal_list *l; + for (l = prog->decimal_constants; l; l = l->next) { + if (cached_literal->id == l->id) { + return; + } + } + + l = cobc_parse_malloc (sizeof (struct literal_list)); + l->id = cached_literal->id; + l->literal = cached_literal->literal; + l->make_decimal = cached_literal->make_decimal; + l->next = prog->decimal_constants; + prog->decimal_constants = l; +} + +/* Resolve literal "x" from the literal cache and return its id. + The literal is added to the literal cache if missing. + Additionally, if the literal is a decimal constant, it is + added to the list of "seen" decimal constant of program "prog". */ int -cb_lookup_literal (cb_tree x, int make_decimal) +cb_lookup_literal (struct cb_program *prog, cb_tree x, int make_decimal) { struct cb_literal *literal; struct literal_list *l; @@ -2781,6 +2812,7 @@ cb_lookup_literal (cb_tree x, int make_decimal) (size_t)literal->size) == 0) { if (make_decimal) { l->make_decimal = 1; + cb_cache_program_decimal_constant (prog, l); } return l->id; } @@ -2794,9 +2826,11 @@ cb_lookup_literal (cb_tree x, int make_decimal) l->id = cb_literal_id; l->literal = literal; l->make_decimal = make_decimal; - l->x = x; l->next = literal_cache; literal_cache = l; + if (make_decimal) { + cb_cache_program_decimal_constant (prog, l); + } return cb_literal_id++; } @@ -3135,7 +3169,7 @@ output_long_integer (cb_tree x) switch (CB_TREE_TAG (x)) { case CB_TAG_CONST: if (x == cb_zero) { - output (CB_FMT_LLD_F, 0LL); + output (CB_FMT_LLD_F, COB_S64_C(0)); } else if (x == cb_null) { output ("(cob_u8_ptr)NULL"); } else { @@ -3655,10 +3689,10 @@ output_param (cb_tree x, int id) } case CB_TAG_LITERAL: if (nolitcast) { - output ("&%s%d", CB_PREFIX_CONST, cb_lookup_literal (x, 0)); + output ("&%s%d", CB_PREFIX_CONST, cb_lookup_literal (current_prog, x, 0)); } else { output ("(cob_field *)&%s%d", CB_PREFIX_CONST, - cb_lookup_literal (x, 0)); + cb_lookup_literal (current_prog, x, 0)); } break; case CB_TAG_FIELD: @@ -12489,7 +12523,7 @@ output_internal_function (struct cb_program *prog, cb_tree parameter_list) /* Check matching version */ #if !defined (HAVE_ATTRIBUTE_CONSTRUCTOR) #ifdef _WIN32 - if (prog->flag_main) /* otherwise we generate that in DllMain*/ + if (prog->flag_main) /* otherwise we generate that in DllMain */ #else if (!prog->nested_level) #endif @@ -12601,21 +12635,18 @@ output_internal_function (struct cb_program *prog, cb_tree parameter_list) } seen = 0; - for (m = literal_cache; m; m = m->next) { - if (CB_TREE_CLASS (m->x) == CB_CLASS_NUMERIC - && m->make_decimal) { - if (!seen) { - seen = 1; - output_line ("/* Set Decimal Constant values */"); - } - output_line ("%s%d = &%s%d;", CB_PREFIX_DEC_CONST, m->id, - CB_PREFIX_DEC_FIELD, m->id); - output_line ("cob_decimal_init (%s%d);", CB_PREFIX_DEC_CONST, m->id); - output_line ("cob_decimal_set_field (%s%d, (cob_field *)&%s%d);", - CB_PREFIX_DEC_CONST, m->id, - CB_PREFIX_CONST, m->id); - output_newline (); - } + for (m = prog->decimal_constants; m; m = m->next) { + if (!seen) { + seen = 1; + output_line ("/* Set Decimal Constant values */"); + } + output_line ("%s%d = &%s%d;", CB_PREFIX_DEC_CONST, m->id, + CB_PREFIX_DEC_FIELD, m->id); + output_line ("cob_decimal_init (%s%d);", CB_PREFIX_DEC_CONST, m->id); + output_line ("cob_decimal_set_field (%s%d, (cob_field *)&%s%d);", + CB_PREFIX_DEC_CONST, m->id, + CB_PREFIX_CONST, m->id); + output_newline (); } if (seen) { output_newline (); @@ -12809,16 +12840,13 @@ output_internal_function (struct cb_program *prog, cb_tree parameter_list) output_newline (); output_line ("P_clear_decimal:"); seen = 0; - for (m = literal_cache; m; m = m->next) { - if (CB_TREE_CLASS (m->x) == CB_CLASS_NUMERIC - && m->make_decimal) { - if (!seen) { - seen = 1; - output_line ("/* Clear Decimal Constant values */"); - } - output_line ("cob_decimal_clear (%s%d);", CB_PREFIX_DEC_CONST, m->id); - output_line ("%s%d = NULL;", CB_PREFIX_DEC_CONST, m->id); + for (m = prog->decimal_constants; m; m = m->next) { + if (!seen) { + seen = 1; + output_line ("/* Clear Decimal Constant values */"); } + output_line ("cob_decimal_clear (%s%d);", CB_PREFIX_DEC_CONST, m->id); + output_line ("%s%d = NULL;", CB_PREFIX_DEC_CONST, m->id); } if (seen) { output_newline (); @@ -13926,6 +13954,27 @@ codegen_internal (struct cb_program *prog, const int subsequent_call) /* Switch to main storage file */ output_target = cb_storage_file; } + + /* Decimal constants */ + { + struct literal_list* m = literal_cache; + int comment_gen = 0; + for (; m; m = m->next) { + if (m->make_decimal) { + if (!comment_gen) { + comment_gen = 1; + output_local ("\n/* Decimal constants */\n"); + } + output_local ("static\tcob_decimal\t%s%d;\n", + CB_PREFIX_DEC_FIELD, m->id); + output_local ("static\tcob_decimal\t*%s%d = NULL;\n", + CB_PREFIX_DEC_CONST, m->id); + } + } + if (comment_gen) { + output_local ("\n"); + } + } } void @@ -13965,28 +14014,6 @@ codegen_finalize (void) } } - /* Decimal constants */ - { - struct literal_list* m; - int comment_gen = 0; - for (m = literal_cache; m; m = m->next) { - if (CB_TREE_CLASS (m->x) == CB_CLASS_NUMERIC - && m->make_decimal) { - if (!comment_gen) { - comment_gen = 1; - output_storage ("\n/* Decimal constants */\n"); - } - output_storage ("static\tcob_decimal\t%s%d;\n", - CB_PREFIX_DEC_FIELD, m->id); - output_storage ("static\tcob_decimal\t*%s%d = NULL;\n", - CB_PREFIX_DEC_CONST, m->id); - } - } - if (comment_gen) { - output_storage ("\n"); - } - } - /* Clean up by clearing these */ attr_cache = NULL; literal_cache = NULL; diff --git a/cobc/codeoptim.c b/cobc/codeoptim.c index ee20dffb6..49c36a8a9 100644 --- a/cobc/codeoptim.c +++ b/cobc/codeoptim.c @@ -235,11 +235,12 @@ cob_gen_optim (const enum cb_optim val) output_storage (" register int n;"); output_storage (" register int val = 0;"); /* Improve performance by skipping leading ZEROs */ - output_storage (" for (n = 0; n < val; ++n, ++p) {"); - output_storage (" if (*p > '0' && *p <= '9')"); + output_storage (" for (n = 0; n < size; ++n) {"); + output_storage (" if (*p & 0x0F)"); output_storage (" break;"); + output_storage (" p++;"); output_storage (" }"); - output_storage (" for (n = 0; n < size; ++n, ++p) {"); + output_storage (" for (; n < size; ++n, ++p) {"); output_storage (" val = (val * 10)"); output_storage (" + (*p & 0x0F);"); output_storage (" }"); @@ -255,11 +256,11 @@ cob_gen_optim (const enum cb_optim val) output_storage (" register int n;"); output_storage (" register int val = 0;"); /* Improve performance by skipping leading ZEROs */ - output_storage (" for (n = 0; n < val; ++n, ++p) {"); - output_storage (" if (*p > '0' && *p <= '9')"); + output_storage (" for (n = 0; n < size; ++n) {"); + output_storage (" if (*p & 0x0F)"); output_storage (" break;"); + output_storage (" p++;"); output_storage (" }"); - output_storage (" val = 0;"); output_storage (" for (; n < size; ++n, ++p) {"); output_storage (" val = (val * 10)"); output_storage (" + (*p & 0x0F);"); diff --git a/cobc/config.c b/cobc/config.c index cc6e0dbaf..1d56ab2d3 100644 --- a/cobc/config.c +++ b/cobc/config.c @@ -448,7 +448,7 @@ cb_load_conf (const char *fname, const int prefix_dir) /* Checks for missing definitions */ if (ret == 0) { - for (i = 10U; i < CB_CONFIG_SIZE; i++) { + for (i = 10; i < CB_CONFIG_SIZE; i++) { #if COBC_STORES_CONFIG_VALUES if (config_table[i].val == NULL) { #else @@ -458,7 +458,7 @@ cb_load_conf (const char *fname, const int prefix_dir) if (ret == 0) { configuration_error (fname, 0, 1, _("missing definitions:")); } - configuration_error (fname, 0, 1, _("\tno definition of '%s'"), + configuration_error (fname, 0, 2, _("\tno definition of '%s'"), config_table[i].name); ret = -1; } @@ -620,8 +620,15 @@ cb_config_entry (char *buff, const char *fname, const int line) snprintf (buff, (size_t)COB_NORMAL_MAX, "%s.words", val); /* check if name.words exists and store the resolved name to words_file */ if (cb_load_conf_file (buff, CB_INCLUDE_RESOLVE_WORDS) != 0) { +#if 0 + /* must be executed before anything that may adjust errno, ... + ...like function call below. */ + const char *errno_str = cb_get_strerror (); configuration_error (fname, line, 1, _("Could not access word list for '%s'"), val); - /*cb_perror (1, "%s: %s", words_file, cb_get_strerror ()); */ + cb_perror (1, "%s: %s", words_file, errno_str); +#else + configuration_error (fname, line, 1, _("Could not access word list for '%s'"), val); +#endif return -1; }; } diff --git a/cobc/error.c b/cobc/error.c index 203b67094..9c971d66e 100644 --- a/cobc/error.c +++ b/cobc/error.c @@ -28,10 +28,20 @@ #include #include #include +#ifdef HAVE_SYS_STAT_H +#include +#endif #include "cobc.h" #include "tree.h" +#ifdef _WIN32 +#if !defined(__BORLANDC__) && !defined(__WATCOMC__) && !defined(__ORANGEC__) +#include // _getcwd +#define getcwd _getcwd +#endif +#endif + enum cb_error_kind { CB_KIND_ERROR, CB_KIND_WARNING, @@ -57,6 +67,32 @@ static void print_error_prefix (const char *file, int line, const char *prefix) { if (file) { + char *absfile = NULL ; + if (cb_diagnostics_absolute_paths + && strcmp (file, COB_DASH) != 0 + && file[0] != '/' + && file[0] != '\\' + && file[1] != ':'){ + int filelen = strlen (file); + int dirlen = 256; + char *cwd ; + absfile = cobc_malloc( dirlen + 1 + filelen + 1 ); + cwd = getcwd (absfile, dirlen); + if (cwd != NULL ){ +#ifdef HAVE_SYS_STAT_H + struct stat st; +#endif + dirlen = strlen (cwd); + absfile[dirlen] = '/'; + memcpy (absfile+dirlen+1, file, filelen+1); +#ifdef HAVE_SYS_STAT_H + if (!stat (absfile,&st)) +#endif + { + file = absfile; + } + } + } if (line <= 0) { fprintf (stderr, "%s: ", file); } else if (cb_msg_style == CB_MSG_STYLE_MSC) { @@ -64,6 +100,7 @@ print_error_prefix (const char *file, int line, const char *prefix) } else { fprintf (stderr, "%s:%d: ", file, line); } + if (absfile) cobc_free (absfile); } if (prefix) { fprintf (stderr, "%s", prefix); @@ -450,7 +487,8 @@ cb_warning_internal (const enum cb_warn_opt opt, const char *fmt, va_list ap) return pref; } if (pref == COBC_WARN_AS_ERROR) { - if (++errorcount > cb_max_errors) { + errorcount++; + if (cb_max_errors && errorcount > cb_max_errors) { cobc_too_many_errors (); } } else { @@ -483,7 +521,8 @@ cb_error_always (const char *fmt, ...) if (sav_lst_file) { return; } - if (++errorcount > cb_max_errors) { + errorcount++; + if (cb_max_errors && errorcount > cb_max_errors) { cobc_too_many_errors (); } } @@ -517,7 +556,8 @@ cb_error_internal (const char *fmt, va_list ap) if (ignore_error && pref != COBC_WARN_AS_ERROR) { warningcount++; } else { - if (++errorcount > cb_max_errors) { + errorcount++; + if (cb_max_errors && errorcount > cb_max_errors) { cobc_too_many_errors (); } } @@ -541,7 +581,7 @@ cb_perror (const int config_error, const char *fmt, ...) va_list ap; if (config_error) { - configuration_error_head(); + configuration_error_head (); } va_start (ap, fmt); @@ -549,7 +589,8 @@ cb_perror (const int config_error, const char *fmt, ...) va_end (ap); - if (++errorcount > cb_max_errors) { + errorcount++; + if (cb_max_errors && errorcount > cb_max_errors) { cobc_too_many_errors (); } } @@ -580,7 +621,8 @@ cb_plex_warning (const enum cb_warn_opt opt, const size_t sline, const char *fmt return; } if (pref == COBC_WARN_AS_ERROR) { - if (++errorcount > cb_max_errors) { + errorcount++; + if (cb_max_errors && errorcount > cb_max_errors) { cobc_too_many_errors (); } } else { @@ -600,7 +642,8 @@ cb_plex_error (const size_t sline, const char *fmt, ...) if (sav_lst_file) { return; } - if (++errorcount > cb_max_errors) { + errorcount++; + if (cb_max_errors && errorcount > cb_max_errors) { cobc_too_many_errors (); } } @@ -706,11 +749,12 @@ configuration_error (const char *fname, const int line, putc ('\n', stderr); fflush (stderr); - if (sav_lst_file) { + if (sav_lst_file || finish_error == 2) { return; } - if (++errorcount > cb_max_errors) { + errorcount++; + if (cb_max_errors && errorcount > cb_max_errors) { cobc_too_many_errors (); } } @@ -733,7 +777,8 @@ cb_warning_x_internal (const enum cb_warn_opt opt, cb_tree x, const char *fmt, v return pref; } if (pref == COBC_WARN_AS_ERROR) { - if (++errorcount > cb_max_errors) { + errorcount++; + if (cb_max_errors && errorcount > cb_max_errors) { cobc_too_many_errors (); } } else { @@ -778,7 +823,8 @@ cb_warning_dialect_x (const enum cb_support tag, cb_tree x, const char *fmt, ... return ret; } if (tag == CB_ERROR || tag == CB_UNCONFORMABLE) { - if (++errorcount > cb_max_errors) { + errorcount++; + if (cb_max_errors && errorcount > cb_max_errors) { cobc_too_many_errors (); } } else { @@ -891,7 +937,8 @@ cb_error_x_internal (cb_tree x, const char *fmt, va_list ap) if (ignore_error && pref != COBC_WARN_AS_ERROR) { warningcount++; } else { - if (++errorcount > cb_max_errors) { + errorcount++; + if (cb_max_errors && errorcount > cb_max_errors) { cobc_too_many_errors (); } } @@ -1209,7 +1256,7 @@ ambiguous_error (cb_tree x) /* error routine for flex */ void -flex_fatal_error (const char *msg, const char * filename, const int line_num) +flex_fatal_error (const char *msg, const char *filename, const int line_num) { /* LCOV_EXCL_START */ cobc_err_msg (_("fatal error: %s"), msg); diff --git a/cobc/field.c b/cobc/field.c index 78974ee60..bcaa2f5f1 100644 --- a/cobc/field.c +++ b/cobc/field.c @@ -413,8 +413,6 @@ cb_build_field_tree (const int level, cb_tree name, struct cb_field *last_field, struct cb_reference *r; struct cb_field *f; struct cb_field *p; - struct cb_field *field_fill; - cb_tree dummy_fill; cb_tree l; cb_tree x; int lv; @@ -449,6 +447,7 @@ cb_build_field_tree (const int level, cb_tree name, struct cb_field *last_field, } else { f->level = lv; } + /* copy EXTERNAL / GLOBAL attribute from file to record */ if (f->level == 01 && storage == CB_STORAGE_FILE && fn) { if (fn->flag_external) { f->flag_external = 1; @@ -524,7 +523,8 @@ cb_build_field_tree (const int level, cb_tree name, struct cb_field *last_field, last_field->children = f; f->parent = last_field; } else if (f->level == last_field->level) { - /* Same level */ + /* Same level; note: + last_field is a group if coming from "goto" */ same_level: last_field->sister = f; f->parent = last_field->parent; @@ -542,8 +542,8 @@ cb_build_field_tree (const int level, cb_tree name, struct cb_field *last_field, /* always generate dummy filler field to prevent parsing of follow-on fields to fail the same way */ if (p) /* <- silence warnings */ { - dummy_fill = cb_build_filler (); - field_fill = CB_FIELD (cb_build_field (dummy_fill)); + cb_tree dummy_fill = cb_build_filler (); + struct cb_field *field_fill = CB_FIELD (cb_build_field (dummy_fill)); field_fill->level = f->level; field_fill->flag_filler = 1; field_fill->storage = storage; @@ -1525,7 +1525,7 @@ validate_pic (struct cb_field *f) } if (f->pic && f->pic->size > f->size) - f->size = f->pic->size; + f->size = f->pic->size; } /* ACUCOBOL/RM-COBOL-style COMP-1 ignores the PICTURE clause. */ @@ -2316,14 +2316,14 @@ validate_elementary_item (struct cb_field *f) n = 2; } else { n = 1; - } + } f->pic->str = cobc_parse_malloc ((size_t)n * sizeof(cob_pic_symbol)); pstr = f->pic->str; if (f->pic->have_sign) { pstr->symbol = '+'; pstr->times_repeated = 1; ++pstr; - } + } pstr->symbol = '9'; pstr->times_repeated = f->pic->digits; } @@ -2350,9 +2350,9 @@ validate_field_1 (struct cb_field *f) #endif if (f->flag_invalid) { - return 1; - } - + return 1; + } + x = CB_TREE (f); if (f->level == 77) { if (f->storage != CB_STORAGE_WORKING @@ -3445,7 +3445,7 @@ cb_validate_field (struct cb_field *f) for (c = f->children; c; c = c->sister) { c->flag_is_global = 1; c->count++; - } + } #else for (c = f->children; c; c = c->sister) { c->flag_is_global = 1; diff --git a/cobc/flag.def b/cobc/flag.def index 15a0efb01..9ba85984f 100644 --- a/cobc/flag.def +++ b/cobc/flag.def @@ -62,10 +62,11 @@ CB_FLAG_RQ (cb_fold_call, 1, "fold-call", 0, CB_FLAG_GETOPT_FOLD_CALL, _(" -ffold-call=[UPPER|LOWER]\tfold PROGRAM-ID, CALL, CANCEL subject to value\n" " * default: no transformation")) -CB_FLAG_RQ (cb_max_errors, 1, "max-errors", 128, CB_FLAG_GETOPT_MAX_ERRORS, +CB_FLAG_RQ (cb_max_errors, 1, "max-errors", 20, CB_FLAG_GETOPT_MAX_ERRORS, _(" -fmax-errors=\tmaximum number of errors to report before\n" " compilation is aborted\n" - " * default: 128")) + " * default: 20\n" + " * if is 0, there's no limit")) /* Flags with required parameter and no associated variable */ @@ -168,7 +169,7 @@ CB_FLAG (cb_flag_stack_check, 1, "stack-check", _(" -fstack-check PERFORM stack checking\n" " * turned on by --debug/-g")) -CB_FLAG_OP (1, "memory-check", CB_FLAG_MEMORY_CHECK, +CB_FLAG_OP (1, "memory-check", CB_FLAG_GETOPT_MEMORY_CHECK, _(" -fmemory-check= checks for invalid writes to internal storage,\n" " may be one of: all, pointer, using, none\n" " * default: none, set to all by --debug")) @@ -257,3 +258,6 @@ CB_FLAG_ON (cb_diagnostics_show_caret, 1, "diagnostics-show-caret", CB_FLAG_ON (cb_diagnostics_show_line_numbers, 1, "diagnostics-show-line-numbers", _(" -fno-diagnostics-show-line-numbers\tsuppress display of line numbers in diagnostics")) + +CB_FLAG (cb_diagnostics_absolute_paths, 1, "diagnostics-absolute-paths", + _(" -fdiagnostics-absolute-paths\tprint absolute paths in diagnostics")) diff --git a/cobc/help.c b/cobc/help.c index a2141bad3..e4f844609 100644 --- a/cobc/help.c +++ b/cobc/help.c @@ -116,7 +116,11 @@ cobc_print_usage_common_options (void) puts (_(" -X, --Xref specify cross reference in listing")); #endif puts (_(" -I add to copy/include search path")); + puts (_(" --copy include at beginning of file,\n" + " as would COPY copybook.")); puts (_(" -L add to library search path")); + puts (_(" --include add a #include \"file.h\" at the beginning of the C\n" + " generated file (implies -fno-gen-c-decl-static-call)")); puts (_(" -l link the library ")); puts (_(" -K generate CALL to as static")); puts (_(" -D define for COBOL compilation")); diff --git a/cobc/parser.y b/cobc/parser.y index b77193c93..3b463150b 100644 --- a/cobc/parser.y +++ b/cobc/parser.y @@ -365,8 +365,8 @@ build_colseq_tree (const char *alphabet_name, int alphabet_target) { const cb_tree name = cb_build_reference (alphabet_name); - struct cb_alphabet_name * alpha; - alpha = CB_ALPHABET_NAME (cb_build_alphabet_name (name)); + struct cb_alphabet_name *alpha + = CB_ALPHABET_NAME (cb_build_alphabet_name (name)); alpha->alphabet_type = alphabet_type; alpha->alphabet_target = alphabet_target; return name; @@ -393,7 +393,6 @@ build_colseq (enum cb_colseq colseq) COBC_ABORT (); } /* LCOV_EXCL_STOP */ - } diff --git a/cobc/pplex.l b/cobc/pplex.l index 1e4b6abea..386a7a88d 100644 --- a/cobc/pplex.l +++ b/cobc/pplex.l @@ -59,19 +59,21 @@ static int ppwrap (void) { return 1; } +static void insert_copy_arg (void); + #define PPLEX_BUFF_LEN 512 #define YY_INPUT(buf,result,max_size) result = ppinput (buf, max_size); #define ECHO fputs (yytext, yyout) +/* The first --copy COPYBOOK is inserted using this macro. The next + ones will be inserted in <>, when we come back to the toplevel + source file. */ #define YY_USER_INIT \ - if (!plexbuff1) { \ - plexbuff1 = cobc_malloc ((size_t)COB_SMALL_BUFF); \ - } \ - if (!plexbuff2) { \ - plexbuff2 = cobc_malloc ((size_t)COB_SMALL_BUFF); \ - } \ requires_listing_line = 1; \ - comment_allowed = 1; + comment_allowed = 1; \ + copy_list_pointer = cb_copy_list; \ + insert_copy_arg (); + #include "config.h" @@ -117,6 +119,7 @@ struct copy_info { int line; int quotation_mark; int source_format; + int indicator_error; }; struct plex_stack { @@ -147,6 +150,7 @@ static int listing_line = 0; static int requires_listing_line; static enum cb_format source_format = CB_FORMAT_AUTO; static int indicator_column = 7; +static int indicator_error = 0; static int text_column = 72; /* end of area B (in single-byte characters) */ static int floating_area_b = 0; /* whether indicator is optional */ @@ -177,6 +181,20 @@ static void output_pending_newlines (FILE *); static struct cb_text_list *pp_text_list_add (struct cb_text_list *, const char *, const size_t); +static struct cb_text_list *copy_list_pointer = NULL; + +static void insert_copy_arg (void) +{ + if (copy_list_pointer != NULL){ + int ret = ppcopy (copy_list_pointer->text, NULL, NULL); + if ( ret < 0 ){ /* This should never happen, as we already test it before */ + cobc_err_msg (_("fatal error: %s"), "could not find --copy argument"); + cobc_abort_terminate (0); + } + copy_list_pointer = copy_list_pointer->next; + } +} + %} WORD [_0-9A-Z\x80-\xFF-]+ @@ -1203,6 +1221,13 @@ ENDIF_DIRECTIVE_STATE>{ copy_stack = current_copy_info->next; cobc_free (current_copy_info->dname); cobc_free (current_copy_info); + + /* Check whether we are back at the toplevel source file. In this case, + check if there is a pending copy argument (--copy COPYBOOK) waiting + to be inserted. */ + if (copy_stack->next == NULL){ + insert_copy_arg(); + } } %% @@ -1280,24 +1305,58 @@ ppopen_get_file (const char *name) /* Check for BOM and, if source-format was not specified, also for free-form */ { - int fseek_to = 0 ; + unsigned char fseek_to = 0 ; #define COBC_LOOKAHEAD 20 unsigned char buffer[COBC_LOOKAHEAD]; - int nread = fread (buffer, 1, COBC_LOOKAHEAD, ppin); + const int nread = fread (buffer, 1, COBC_LOOKAHEAD, ppin); /* check for and skip UTF-8 BOM */ if (nread >= 3 && buffer[0] == 0xEF && buffer[1] == 0xBB && buffer[2] == 0xBF) { fseek_to = 3; + } else + /* check for binary */ + if (nread > 5) { +#if 0 + if ((buffer[0] == 0x7F && buffer[1] == 0x45 && buffer[2] == 0x4C + && buffer[3] == 0x46 && (buffer[4] & 0xF0) == 0x00 /* ELF */) + || (buffer[0] == 0x4D && buffer[1] == 0x5A && buffer[3] == 0x00 + && (buffer[4] & 0xF0) == 0x00 /* PE */)) { + cb_error ("%s: %s", name, _("source file is binary")); + close (ppin); + return 0; + } +#endif + { + int chck_pos = nread - 2; + while (chck_pos > 0) { + unsigned char test = buffer[chck_pos--]; + if (test != 0x00 && test != 0x80 && test != 0x90) { + continue; + } + test = buffer[chck_pos--]; + if (test == 0x00 || test == 0x80 || test == 0x90) { + /* two consecutive NULL / invalid ASCII/EBCDIC -> must be binary */ + fclose (ppin); + ppin = NULL; + if (cb_source_line == 0) { + /* if this is a "main" source, terminate with an error */ + cobc_terminate_exit (name, _("source file is binary")); + } + cb_error ("%s: %s", name, _("source file is binary")); + return 0; + } + } + } } /* try to deduce source format */ if (source_format == CB_FORMAT_AUTO) { - int pos = fseek_to; + unsigned char pos = fseek_to; /* if indicator is wrong on first line with source, switch to free format */ /* skip empty lines */ char last_pos_7 = ' '; - int amount_of_0a_seen = 0; - int line_pos = 0; + unsigned char amount_of_0a_seen = 0; + unsigned char line_pos = 0; while (nread - pos > 7) { switch (buffer[pos]) { case '\r': @@ -1308,7 +1367,7 @@ ppopen_get_file (const char *name) break; case '\t': buffer[pos] = ' '; - line_pos++; + line_pos++; /* move test from run_extensions.at 1809 to -fformat */ while (line_pos % cb_tab_width != 0) { line_pos++; } @@ -1391,6 +1450,7 @@ ppopen (const char *name, struct cb_replace_list *replacing_list) current_copy_info->line = cb_source_line; current_copy_info->quotation_mark = quotation_mark; current_copy_info->source_format = cobc_get_source_format (); + current_copy_info->indicator_error = indicator_error; current_copy_info->next = copy_stack; current_copy_info->containing_files = old_list_file; @@ -1426,7 +1486,8 @@ ppopen (const char *name, struct cb_replace_list *replacing_list) #endif /* switch to new buffer */ - switch_to_buffer (1, dname, yy_create_buffer (ppin, YY_BUF_SIZE)); + switch_to_buffer (1, current_copy_info->dname, yy_create_buffer (ppin, YY_BUF_SIZE)); + indicator_error = 0; /* postponed errror handling */ if (!ppin) { @@ -1442,6 +1503,10 @@ ppcopy_try_open (const char *dir, const char *name, int has_ext) const char *extension = ""; struct stat st; + if (!plexbuff2) { + plexbuff2 = cobc_malloc ((size_t)COB_SMALL_BUFF); + } + for (;;) { if (dir) { snprintf (plexbuff2, (size_t)COB_SMALL_MAX, "%s%c%s%s", @@ -1482,11 +1547,10 @@ ppcopy_try_open (const char *dir, const char *name, int has_ext) each with all known copybook extensions: 1 - as is 2 - all known copybook directories - Beware: the first argument might be modified in this function */ -static const char * -ppcopy_find_file (char *name, int has_ext) +const char * +cb_copy_find_file (char *name, int has_ext) { const char *filename; { @@ -1561,6 +1625,9 @@ ppcopy (const char *name, const char *lib, struct cb_replace_list *replace_list) if (cb_current_file) { cb_current_file->copy_line = cb_source_line; } + if (!plexbuff1) { + plexbuff1 = cobc_malloc ((size_t)COB_SMALL_BUFF); + } if (cb_depend_output && cb_flag_copybook_deps){ @@ -1599,10 +1666,10 @@ ppcopy (const char *name, const char *lib, struct cb_replace_list *replace_list) snprintf (plexbuff1, (size_t)COB_SMALL_MAX, "%s%c%s", lib_env, SLASH_CHAR, name); plexbuff1[COB_SMALL_MAX] = 0; - filename = ppcopy_find_file (plexbuff1, has_ext); + filename = cb_copy_find_file (plexbuff1, has_ext); } else { strcpy (plexbuff1, name); - filename = ppcopy_find_file (plexbuff1, has_ext); + filename = cb_copy_find_file (plexbuff1, has_ext); } } } @@ -1613,13 +1680,13 @@ ppcopy (const char *name, const char *lib, struct cb_replace_list *replace_list) snprintf (plexbuff1, (size_t)COB_SMALL_MAX, "%s%c%s", lib, SLASH_CHAR, name); plexbuff1[COB_SMALL_MAX] = 0; - filename = ppcopy_find_file (plexbuff1, has_ext); + filename = cb_copy_find_file (plexbuff1, has_ext); } /* try without library name, if not resolved by env */ if (!filename && !lib_env) { strcpy (plexbuff1, name); - filename = ppcopy_find_file (plexbuff1, has_ext); + filename = cb_copy_find_file (plexbuff1, has_ext); if (filename) { cb_plex_warning (COBC_WARN_FILLER, 0, _("copybook not found in library '%s', library-name ignored"), @@ -1635,13 +1702,13 @@ ppcopy (const char *name, const char *lib, struct cb_replace_list *replace_list) } } else { strcpy (plexbuff1, name); - filename = ppcopy_find_file (plexbuff1, has_ext); + filename = cb_copy_find_file (plexbuff1, has_ext); } /* expected case: filename found */ if (likely (filename)) { if (ppopen (filename, replace_list) == 0) { - /* expected case: copybook could be processed */ + /* expected case: copybook could be processed */ return 0; } /* otherwise fall-trough to error handling */ @@ -2507,9 +2574,18 @@ start: break; } /* Invalid indicator */ - cb_plex_error (newline_count, - _("invalid indicator '%c' at column %d"), - buff[indicator_column - 1], indicator_column); + if (indicator_error++ < 5) { + cb_plex_error (newline_count, + _("invalid indicator '%c' at column %d"), + buff[indicator_column - 1], indicator_column); + } + if (indicator_error == 5) { + int sav_line = cb_source_line; + cb_source_line = 0; + cb_error (_("too many format errors in file, skip output of further errors")); + cb_source_line = sav_line; + } + /* Note: Treat as comment line to allow further parsing instead of aborting compilation */ newline_count++; @@ -2566,8 +2642,16 @@ start: if (bp[0] == quotation_mark && bp[1] == quotation_mark) { bp++; } else { - cb_plex_error (newline_count, + if (indicator_error++ < 5) { + cb_plex_error (newline_count, _("invalid line continuation")); + } + if (indicator_error == 5) { + int sav_line = cb_source_line; + cb_source_line = 0; + cb_error (_("too many format errors in file, skip output of further errors")); + cb_source_line = sav_line; + } return YY_NULL; } quotation_mark = 0; @@ -2577,16 +2661,33 @@ start: if (*bp == quotation_mark) { bp++; } else { - cb_plex_error (newline_count, + if (indicator_error++ < 5) { + cb_plex_error (newline_count, _("invalid line continuation")); + } + if (indicator_error == 5) { + int sav_line = cb_source_line; + cb_source_line = 0; + cb_error (_("too many format errors in file, skip output of further errors")); + cb_source_line = sav_line; + } return YY_NULL; } } } else { /* Normal line */ if (need_continuation) { - cb_plex_error (newline_count, + /* CHECKME: close the last literal */ + if (indicator_error++ < 5) { + cb_plex_error (newline_count, _("continuation character expected")); + } + if (indicator_error == 5) { + int sav_line = cb_source_line; + cb_source_line = 0; + cb_error (_("too many format errors in file, skip output of further errors")); + cb_source_line = sav_line; + } need_continuation = 0; } quotation_mark = 0; diff --git a/cobc/replace.c b/cobc/replace.c index 49e28619e..6ebe254f3 100644 --- a/cobc/replace.c +++ b/cobc/replace.c @@ -193,6 +193,17 @@ STRING_OF_LIST(token) /* string_of_text_list (...) */ STRING_OF_LIST(text) +static void dump_replacement(struct cb_replacement_state* repls) +{ + fprintf(stderr, "dump_replacement('%s'):\n", repls->name); + struct cb_replace_list *list = repls->replace_list ; + for (;list;list = list->next){ + fprintf(stderr, " replace: %s\n", string_of_text_list (list->src->text_list)); + fprintf(stderr, " by: %s\n", string_of_text_list (list->new_text)); + } + fprintf(stderr, "=================================================================\n"); +} + #endif /* DEBUG_REPLACE */ /* global state */ @@ -200,7 +211,7 @@ static struct cb_replacement_state * replace_repls; static struct cb_replacement_state * copy_repls; /* forward definitions */ -static void ppecho_replace (WITH_DEPTH const char *text, const char* token); +static COB_INLINE COB_A_INLINE void ppecho_replace (WITH_DEPTH const char *text, const char* token); static void do_replace (WITH_DEPTH struct cb_replacement_state* repls); static void check_replace_after_match (WITH_DEPTH struct cb_replacement_state *repls); static void check_replace_all (WITH_DEPTH struct cb_replacement_state *repls, @@ -220,8 +231,7 @@ token_list_add (WITH_DEPTH struct cb_token_list *list, adding on the same head, other `last` fields in the middle of the list not being correctly updated... */ -static -struct cb_token_list * +static struct cb_token_list * token_list_add (WITH_DEPTH struct cb_token_list *list, const char *text, const char *token) { @@ -250,8 +260,8 @@ token_list_add (WITH_DEPTH struct cb_token_list *list, } } -static -void pop_token (WITH_DEPTH struct cb_replacement_state *repls, +static void +pop_token (WITH_DEPTH struct cb_replacement_state *repls, const char **text, const char **token) { const struct cb_token_list *q = repls->token_queue; @@ -264,8 +274,8 @@ void pop_token (WITH_DEPTH struct cb_replacement_state *repls, if (token) *token = q->token; } -static -void ppecho_switch (WITH_DEPTH struct cb_replacement_state *repls, +static void +ppecho_switch (WITH_DEPTH struct cb_replacement_state *repls, const char* text, const char* token) { #ifdef DEBUG_REPLACE_TRACE @@ -283,8 +293,8 @@ void ppecho_switch (WITH_DEPTH struct cb_replacement_state *repls, } } -static -void ppecho_switch_text_list (WITH_DEPTH struct cb_replacement_state *repls, +static void +ppecho_switch_text_list (WITH_DEPTH struct cb_replacement_state *repls, const struct cb_text_list *p) { #ifdef DEBUG_REPLACE_TRACE @@ -298,8 +308,8 @@ void ppecho_switch_text_list (WITH_DEPTH struct cb_replacement_state *repls, } -static -void ppecho_switch_token_list (WITH_DEPTH struct cb_replacement_state *repls, +static void +ppecho_switch_token_list (WITH_DEPTH struct cb_replacement_state *repls, const struct cb_token_list *p) { #ifdef DEBUG_REPLACE_TRACE @@ -312,8 +322,8 @@ void ppecho_switch_token_list (WITH_DEPTH struct cb_replacement_state *repls, } } -static -int is_leading_or_trailing (WITH_DEPTH int leading, +static int +is_leading_or_trailing (WITH_DEPTH int leading, const char* src_text, const char* text, int strict) @@ -342,8 +352,8 @@ int is_leading_or_trailing (WITH_DEPTH int leading, /* after a LEADING or TRAILING match, perform the replacement within the text, and pass the resulting new text to the next stream */ -static -void ppecho_leading_or_trailing (WITH_DEPTH struct cb_replacement_state *repls, +static void +ppecho_leading_or_trailing (WITH_DEPTH struct cb_replacement_state *repls, int leading, const char *src_text, const char *text, @@ -384,8 +394,8 @@ void ppecho_leading_or_trailing (WITH_DEPTH struct cb_replacement_state *repls, * * `replace_list`: the current list of possible replacements on check */ -static -void check_replace (WITH_DEPTH struct cb_replacement_state* repls, +static void +check_replace (WITH_DEPTH struct cb_replacement_state* repls, const struct cb_replace_list *replace_list) { #ifdef DEBUG_REPLACE_TRACE @@ -471,8 +481,8 @@ is_space_or_nl (const char c) * * `src` is the list of texts from the replacement to be matched * * `replace_list` is the next replacements to try in case of failure */ -static -void check_replace_all (WITH_DEPTH +static void +check_replace_all (WITH_DEPTH struct cb_replacement_state *repls, const struct cb_text_list *new_text, struct cb_token_list *texts, @@ -553,8 +563,8 @@ void check_replace_all (WITH_DEPTH } } -static -void check_replace_after_match (WITH_DEPTH struct cb_replacement_state *repls) +static void +check_replace_after_match (WITH_DEPTH struct cb_replacement_state *repls) { #ifdef DEBUG_REPLACE_TRACE fprintf (stderr, "%scheck_replace_after_match(%s)\n", @@ -574,8 +584,8 @@ void check_replace_after_match (WITH_DEPTH struct cb_replacement_state *repls) } } -static -void do_replace (WITH_DEPTH struct cb_replacement_state* repls) +static void +do_replace (WITH_DEPTH struct cb_replacement_state* repls) { #ifdef DEBUG_REPLACE_TRACE fprintf (stderr, "%sdo_replace(%s)\n",DEPTH, repls->name); @@ -599,34 +609,39 @@ void do_replace (WITH_DEPTH struct cb_replacement_state* repls) } /* Whether a word matches the definition of WORD in pplex.l */ -static -int is_word (WITH_DEPTH const char* s) { - int i; - size_t len = strlen (s); +static int +is_word (WITH_DEPTH const char *s) { + for (;;) { + unsigned char c = (unsigned char) *s++; - for (i = 0; i= '0' && c <= '9' ) || ( c >= 'A' && c <= 'Z' ) || ( c >= 'a' && c <= 'z' ) - || ( c >= 128 && c <= 255 ) ) { - /* word character, just go on */ - } else { + || ( c >= 128) ) { + continue; + } + + /* end of string, no previous bad character -> is a word */ + if (c == 0) { #ifdef DEBUG_REPLACE_TRACE - fprintf (stderr, "%sis_word('%s') -> 0\n", DEPTH, s); + fprintf (stderr, "%sis_word('%s') -> 1\n", DEPTH, s); #endif - return 0; + return 1; } - } + + /* string 's' contains non-word characters -> isn't a word */ #ifdef DEBUG_REPLACE_TRACE - fprintf (stderr, "%sis_word('%s') -> 1\n", DEPTH, s); + fprintf (stderr, "%sis_word('%s') -> 0\n", DEPTH, s); #endif - return 1; + return 0; + } } -static void add_text_to_replace (WITH_DEPTH struct cb_replacement_state *repls, +static void +add_text_to_replace (WITH_DEPTH struct cb_replacement_state *repls, int prequeue, const char* text, const char* token ) { @@ -690,7 +705,8 @@ static void add_text_to_replace (WITH_DEPTH struct cb_replacement_state *repls, stream). Use prequeue = 1 so that texts of the same kind are merged into a single text. */ -static void ppecho_replace (WITH_DEPTH const char *text, const char *token) +static void +ppecho_replace (WITH_DEPTH const char *text, const char *token) { #ifdef DEBUG_REPLACE fprintf (stderr, "%sppecho_replace('%s')\n", DEPTH, text); @@ -702,7 +718,8 @@ static void ppecho_replace (WITH_DEPTH const char *text, const char *token) pplex.l). Use prequeue = 0 as texts of the same kind from the source file should not be merged. */ -void cb_ppecho_copy_replace (const char *text, const char *token) +void +cb_ppecho_copy_replace (const char *text, const char *token) { #ifdef DEBUG_REPLACE fprintf (stderr, "cb_ppecho_copy_replace('%s')\n", text); @@ -711,12 +728,11 @@ void cb_ppecho_copy_replace (const char *text, const char *token) } -static -struct cb_replacement_state * create_replacements (enum cb_ppecho ppecho) +static struct cb_replacement_state * +create_replacements (enum cb_ppecho ppecho) { - struct cb_replacement_state * s; - - s = cobc_malloc (sizeof(struct cb_replacement_state)); + struct cb_replacement_state *s + = cobc_malloc (sizeof(struct cb_replacement_state)); s->text_prequeue = NULL; s->token_queue = NULL; @@ -735,48 +751,49 @@ struct cb_replacement_state * create_replacements (enum cb_ppecho ppecho) return s; } -static void reset_replacements (struct cb_replacement_state * s) +#if 0 /* no use in just setting the child elements to zero */ +static void +reset_replacements (struct cb_replacement_state * s) { s->text_prequeue = NULL; s->token_queue = NULL; - s->replace_list = NULL ; - s->current_list = NULL ; + s->replace_list = NULL; + s->current_list = NULL ; } - -static -void init_replace( void ) -{ -#ifdef DEBUG_REPLACE_TRACE - for(int i=0; ireplace_list ; } @@ -784,10 +801,11 @@ struct cb_replace_list *cb_get_copy_replacing_list (void) /* Called by pplex.l, either at the end of a file to restore the previous stack of active copy-replacing, or when a new file is open to set additional copy replacing */ -void cb_set_copy_replacing_list (struct cb_replace_list *list) +void +cb_set_copy_replacing_list (struct cb_replace_list *list) { copy_repls->current_list = NULL; - copy_repls->replace_list = list ; + copy_repls->replace_list = list; #ifdef DEBUG_REPLACE fprintf (stderr, "set_copy_replacing_list(\n"); for(;list != NULL; list=list->next){ @@ -841,4 +859,7 @@ cb_set_replace_list (struct cb_replace_list *list, const int is_pushpop) if (cb_src_list_file) { cb_set_print_replace_list (list); } +#ifdef DEBUG_REPLACE_TRACE + dump_replacement(replace_repls); +#endif } diff --git a/cobc/tree.c b/cobc/tree.c index 8aed921ad..0e945aeaf 100644 --- a/cobc/tree.c +++ b/cobc/tree.c @@ -5998,14 +5998,16 @@ cb_build_binary_op (cb_tree x, const enum cb_binary_op_op op, cb_tree y) && !(CB_FIELD_PTR (x)->usage == CB_USAGE_COMP_5 || CB_FIELD_PTR (x)->usage == CB_USAGE_COMP_X)) { cb_error_x (CB_TREE(current_statement), - _("%s should be COMP-X/COMP-5 for logical operator"), CB_FIELD_PTR (x)->name); + _("%s should be COMP-X/COMP-5 for logical operator"), + CB_FIELD_PTR (x)->name); return cb_error_node; } if ((CB_REF_OR_FIELD_P (y)) && !(CB_FIELD_PTR (y)->usage == CB_USAGE_COMP_5 || CB_FIELD_PTR (y)->usage == CB_USAGE_COMP_X)) { cb_error_x (CB_TREE(current_statement), - _("%s should be COMP-X/COMP-5 for logical operator"), CB_FIELD_PTR (y)->name); + _("%s should be COMP-X/COMP-5 for logical operator"), + CB_FIELD_PTR (y)->name); return cb_error_node; } if (cb_constant_folding @@ -6382,9 +6384,7 @@ cb_build_binary_op (cb_tree x, const enum cb_binary_op_op op, cb_tree y) cb_tree cb_build_binary_list (cb_tree l, const int op) { - cb_tree e; - - e = CB_VALUE (l); + cb_tree e = CB_VALUE (l); for (l = CB_CHAIN (l); l; l = CB_CHAIN (l)) { e = cb_build_binary_op (e, op, CB_VALUE (l)); } diff --git a/cobc/tree.h b/cobc/tree.h index 5fb72a3fb..a9d668772 100644 --- a/cobc/tree.h +++ b/cobc/tree.h @@ -135,18 +135,22 @@ enum cb_tag { }; /* Alphabet target */ -#define CB_ALPHABET_ALPHANUMERIC 0 -#define CB_ALPHABET_NATIONAL 1 +enum cb_alphabet_target { + CB_ALPHABET_ALPHANUMERIC = 0, + CB_ALPHABET_NATIONAL = 1 +}; /* Alphabet type */ -#define CB_ALPHABET_NATIVE 0 -#define CB_ALPHABET_ASCII 1 -#define CB_ALPHABET_EBCDIC 2 -#define CB_ALPHABET_CUSTOM 3 -#define CB_ALPHABET_LOCALE 4 -#define CB_ALPHABET_UTF_8 5 -#define CB_ALPHABET_UTF_16 6 -#define CB_ALPHABET_UCS_4 7 +enum cb_alphabet_type { + CB_ALPHABET_NATIVE = 0, + CB_ALPHABET_ASCII = 1, + CB_ALPHABET_EBCDIC = 2, + CB_ALPHABET_CUSTOM = 3, + CB_ALPHABET_LOCALE = 4, + CB_ALPHABET_UTF_8 = 5, + CB_ALPHABET_UTF_16 = 6, + CB_ALPHABET_UCS_4 = 7 +}; /* Call convention bits */ /* Bit number Meaning Value */ @@ -319,45 +323,45 @@ enum cb_storage { /* Field types */ enum cb_usage { - CB_USAGE_BINARY = 0, /* 0 */ - CB_USAGE_BIT, /* 1 */ - CB_USAGE_COMP_5, /* 2 */ - CB_USAGE_COMP_X, /* 3 */ - CB_USAGE_DISPLAY, /* 4 */ - CB_USAGE_FLOAT, /* 5 */ - CB_USAGE_DOUBLE, /* 6 */ - CB_USAGE_INDEX, /* 7 */ - CB_USAGE_NATIONAL, /* 8 */ - CB_USAGE_OBJECT, /* 9 */ - CB_USAGE_PACKED, /* 10 */ - CB_USAGE_POINTER, /* 11 */ - CB_USAGE_LENGTH, /* 12 */ - CB_USAGE_PROGRAM_POINTER, /* 13 */ - CB_USAGE_UNSIGNED_CHAR, /* 14 */ - CB_USAGE_SIGNED_CHAR, /* 15 */ - CB_USAGE_UNSIGNED_SHORT, /* 16 */ - CB_USAGE_SIGNED_SHORT, /* 17 */ - CB_USAGE_UNSIGNED_INT, /* 18 */ - CB_USAGE_SIGNED_INT, /* 19 */ - CB_USAGE_UNSIGNED_LONG, /* 20 */ - CB_USAGE_SIGNED_LONG, /* 21 */ - CB_USAGE_COMP_6, /* 22 */ - CB_USAGE_FP_DEC64, /* 23 */ - CB_USAGE_FP_DEC128, /* 24 */ - CB_USAGE_FP_BIN32, /* 25 */ - CB_USAGE_FP_BIN64, /* 26 */ - CB_USAGE_FP_BIN128, /* 27 */ - CB_USAGE_LONG_DOUBLE, /* 28 */ - CB_USAGE_HNDL, /* 29 */ - CB_USAGE_HNDL_WINDOW, /* 30 */ - CB_USAGE_HNDL_SUBWINDOW, /* 31 */ - CB_USAGE_HNDL_FONT, /* 32 */ - CB_USAGE_HNDL_THREAD, /* 33 */ - CB_USAGE_HNDL_MENU, /* 34 */ - CB_USAGE_HNDL_VARIANT, /* 35 */ - CB_USAGE_HNDL_LM, /* 36 */ - CB_USAGE_COMP_N, /* 37 */ - CB_USAGE_ERROR /* 38, always last */ + CB_USAGE_BINARY = 0, + CB_USAGE_BIT, + CB_USAGE_COMP_5, + CB_USAGE_COMP_X, + CB_USAGE_DISPLAY, + CB_USAGE_FLOAT, + CB_USAGE_DOUBLE, + CB_USAGE_INDEX, + CB_USAGE_NATIONAL, + CB_USAGE_OBJECT, + CB_USAGE_PACKED, + CB_USAGE_POINTER, + CB_USAGE_LENGTH, + CB_USAGE_PROGRAM_POINTER, + CB_USAGE_UNSIGNED_CHAR, + CB_USAGE_SIGNED_CHAR, + CB_USAGE_UNSIGNED_SHORT, + CB_USAGE_SIGNED_SHORT, + CB_USAGE_UNSIGNED_INT, + CB_USAGE_SIGNED_INT, + CB_USAGE_UNSIGNED_LONG, + CB_USAGE_SIGNED_LONG, + CB_USAGE_COMP_6, + CB_USAGE_FP_DEC64, + CB_USAGE_FP_DEC128, + CB_USAGE_FP_BIN32, + CB_USAGE_FP_BIN64, + CB_USAGE_FP_BIN128, + CB_USAGE_LONG_DOUBLE, + CB_USAGE_HNDL, + CB_USAGE_HNDL_WINDOW, + CB_USAGE_HNDL_SUBWINDOW, + CB_USAGE_HNDL_FONT, + CB_USAGE_HNDL_THREAD, + CB_USAGE_HNDL_MENU, + CB_USAGE_HNDL_VARIANT, + CB_USAGE_HNDL_LM, + CB_USAGE_COMP_N, + CB_USAGE_ERROR /* always last */ }; @@ -687,8 +691,8 @@ struct cb_alphabet_name { const char *name; /* Original name */ char *cname; /* Name used in C */ cb_tree custom_list; /* Custom ALPHABET / LOCALE reference */ - unsigned int alphabet_target; /* ALPHANUMERIC or NATIONAL */ - unsigned int alphabet_type; /* ALPHABET type */ + enum cb_alphabet_target alphabet_target; /* ALPHANUMERIC or NATIONAL */ + enum cb_alphabet_type alphabet_type; /* ALPHABET type */ int low_val_char; /* LOW-VALUE */ int high_val_char; /* HIGH-VALUE */ int values[256]; /* Collating values */ @@ -962,7 +966,7 @@ struct cb_field { unsigned int flag_field : 1; /* Has been internally cached */ unsigned int flag_chained : 1; /* CHAINING item */ unsigned int flag_anylen_done : 1; /* ANY LENGTH is set up */ - unsigned int flag_is_verified : 1; /* Has been verified */ + unsigned int flag_is_typedef : 1; /* TYPEDEF */ unsigned int flag_is_c_long : 1; /* Is BINARY-C-LONG */ unsigned int flag_is_pdiv_parm : 1; /* Is PROC DIV USING */ unsigned int flag_is_pdiv_opt : 1; /* Is PROC DIV USING OPTIONAL */ @@ -991,9 +995,11 @@ struct cb_field { unsigned int flag_sync_left : 1; /* SYNCHRONIZED LEFT */ unsigned int flag_sync_right : 1; /* SYNCHRONIZED RIGHT */ unsigned int flag_internal_register : 1; /* Is an internally generated register */ - unsigned int flag_is_typedef : 1; /* TYPEDEF */ unsigned int flag_picture_l : 1; /* Is USAGE PICTURE L */ unsigned int flag_comp_1 : 1; /* Is USAGE COMP-1 */ + unsigned int flag_is_verified : 1; /* Has been verified */ + + unsigned int flag_had_definition_note : 1; /* had its defintion output */ }; #define CB_FIELD(x) (CB_TREE_CAST (CB_TAG_FIELD, struct cb_field, x)) @@ -1191,7 +1197,7 @@ struct cb_reference { cb_tree value; /* Item referred to */ cb_tree subs; /* List of subscripts */ cb_tree offset; /* Reference mod offset */ - cb_tree length; /* Reference mod length */ + cb_tree length; /* Reference mod length, only set if offset set */ cb_tree check; /* Runtime checks */ enum cob_statement statement; /* statement that uses this reference */ struct cb_word *word; /* Pointer to word list */ @@ -1794,6 +1800,13 @@ struct cb_ml_generate_tree { /* Program */ +struct literal_list { + struct literal_list *next; + struct cb_literal *literal; + int id; + int make_decimal; +}; + struct nested_list { struct nested_list *next; struct cb_program *nested_prog; @@ -1890,6 +1903,7 @@ struct cb_program { unsigned char numeric_separator; /* ',' or '.' */ enum cob_module_type prog_type; /* Program type (program = 0, function = 1) */ cb_tree entry_convention; /* ENTRY convention / PROCEDURE convention */ + struct literal_list *decimal_constants; unsigned int flag_main : 1; /* Gen main function */ unsigned int flag_common : 1; /* COMMON PROGRAM */ @@ -2076,7 +2090,7 @@ extern cb_tree cb_concat_literals (const cb_tree, extern cb_tree cb_build_decimal (const unsigned int); extern cb_tree cb_build_decimal_literal (const int); -extern int cb_lookup_literal (cb_tree x, int make_decimal); +extern int cb_lookup_literal (struct cb_program *prog, cb_tree x, int make_decimal); extern cb_tree cb_build_comment (const char *); extern cb_tree cb_build_direct (const char *, diff --git a/cobc/typeck.c b/cobc/typeck.c index ddc3f567a..7ca5db3f7 100644 --- a/cobc/typeck.c +++ b/cobc/typeck.c @@ -2387,7 +2387,7 @@ cb_build_name_reference (struct cb_field *f1, struct cb_field *f2) static void refmod_checks (cb_tree x, struct cb_field *f, struct cb_reference *r) { - const char *name = r->word->name; + const char *name = r->word->name; const int adjusted_at_runtime = -1; int offset; int length; @@ -3318,7 +3318,7 @@ items_have_same_data_clauses (const struct cb_field * const field_1, } } else { /* only one has any length -> ensure it is the prototype and - that the othr has the same numeric/nonnumeric type */ + that the other has the same numeric/nonnumeric type */ if (!field_1->flag_any_length) { return 1; } @@ -5941,9 +5941,9 @@ cb_build_expr (cb_tree list) } v = CB_VALUE (l); if (op == 'x') { - if( has_var && v == cb_zero ){ - has_rel = 1; - } + if (has_var && v == cb_zero) { + has_rel = 1; + } has_var = 1; if (CB_TREE_TAG (v) == CB_TAG_BINARY_OP) { has_rel = 1; @@ -5951,7 +5951,7 @@ cb_build_expr (cb_tree list) if (CB_TREE_TAG (v) == CB_TAG_FUNCALL) { has_rel = 1; } else - if (CB_REF_OR_FIELD_P (v)) { + if (CB_REF_OR_FIELD_P (v)) { f = CB_FIELD_PTR (v); if (f->level == 88) { has_rel = 1; @@ -6365,18 +6365,18 @@ decimal_expand (cb_tree d, cb_tree x) } break; case CB_TAG_REFERENCE: - /* Set d, X */ + /* set d, X */ f = CB_FIELD_PTR (x); /* Check numeric */ if (cb_flag_correct_numeric && f->usage == CB_USAGE_DISPLAY) { cb_emit (CB_BUILD_FUNCALL_1 ("cob_correct_numeric", x)); } if (CB_EXCEPTION_ENABLE (COB_EC_DATA_INCOMPATIBLE)) { - if (f->usage == CB_USAGE_DISPLAY || - f->usage == CB_USAGE_PACKED || - f->usage == CB_USAGE_COMP_6) { + if (f->usage == CB_USAGE_DISPLAY + || f->usage == CB_USAGE_PACKED + || f->usage == CB_USAGE_COMP_6) { dpush (CB_BUILD_FUNCALL_2 ("cob_check_numeric", - x, CB_BUILD_STRING0 (f->name))); + x, CB_BUILD_STRING0 (f->name))); } } decimal_align (); @@ -6433,7 +6433,7 @@ decimal_expand (cb_tree d, cb_tree x) if (CB_TREE_TAG (p->y) == CB_TAG_LITERAL && CB_TREE_CATEGORY (p->y) == CB_CATEGORY_NUMERIC) { - t = cb_build_decimal_literal (cb_lookup_literal(p->y,1)); + t = cb_build_decimal_literal (cb_lookup_literal(current_program, p->y, 1)); decimal_compute (p->op, d, t); } else { t = decimal_alloc (); @@ -6622,8 +6622,8 @@ cb_emit_arithmetic (cb_tree vars, const int op, cb_tree val) cb_tree l; cb_emit_incompat_data_checks (x); for (l = vars; l; l = CB_CHAIN (l)) { - const cb_tree target = CB_VALUE(l); - const cb_tree round_and_trunc = CB_PURPOSE(l); + const cb_tree target = CB_VALUE (l); + const cb_tree round_and_trunc = CB_PURPOSE (l); cb_emit_incompat_data_checks (target); switch (op) { case '+': @@ -6641,9 +6641,11 @@ cb_emit_arithmetic (cb_tree vars, const int op, cb_tree val) } } cb_emit_list (vars); - } else { - cb_emit_list (build_decimal_assign (vars, op, x)); + return; } + + /* no optimization - needs decimal */ + cb_emit_list (build_decimal_assign (vars, op, x)); } /* Condition */ @@ -6699,7 +6701,7 @@ cb_build_optim_cond (struct cb_binary_op *p) const char *s; size_t n; const cb_tree left = p->x; - const cb_tree right = p->y; + cb_tree right = p->y; struct cb_field *f = CB_REF_OR_FIELD_P (left) ? CB_FIELD_PTR (left) : NULL; @@ -6721,10 +6723,19 @@ cb_build_optim_cond (struct cb_binary_op *p) if (!cb_fits_long_long (right)) { return NULL; } + /* CHECKME: can we have a non-field left and field right? */ return CB_BUILD_FUNCALL_2 ("cob_cmp_llint", left, cb_build_cast_llint (right)); } + /* test for numeric zero literal */ + if (CB_LITERAL_P (right)) { + struct cb_literal *l = CB_LITERAL (right); + if (memcmp (l->data, COB_ZEROES_ALPHABETIC, l->size) == 0) { + right = cb_zero; + } + } + #if 0 /* TODO: if the right side is a literal: then build an ideal memcmp as if it was a field of same attributes as left-side, with the value of the literal */ @@ -6738,6 +6749,39 @@ cb_build_optim_cond (struct cb_binary_op *p) } } #endif + + /* if the field is DISPLAY and the right side either a literal, a constant (ZERO) + or also a DISPLAY field, then no need to convert the field(s) to an integer */ + if (f->usage == CB_USAGE_DISPLAY) { + if (CB_REF_OR_FIELD_P (right)) { + if (CB_FIELD_PTR (right)->usage == CB_USAGE_DISPLAY) { + return CB_BUILD_FUNCALL_2 ("cob_numeric_display_cmp", left, right); + } + } else + if (CB_LITERAL_P (right)) { + if (f->pic->scale + || f->pic->digits >= 19 + || ( CB_LITERAL_P (right) + && ( CB_LITERAL (right)->scale + || CB_LITERAL (right)->size > 19))) { + return CB_BUILD_FUNCALL_2 ("cob_numeric_display_cmp", left, right); + } + } else + if (right == cb_zero) { + if (!f->flag_sign_separate + && !f->flag_any_numeric + && !cb_ebcdic_sign) { + return CB_BUILD_FUNCALL_1 ("cob_numeric_display_cmp_zero", left); + } + /* for simple fields an integer-comparision is fast and inlined, so + we only use the DISPLAY compare if it is "complex" */ + if (f->pic->scale + || f->pic->digits >= 19) { + return CB_BUILD_FUNCALL_2 ("cob_numeric_display_cmp", left, right); + } + } + } + if (f->usage == CB_USAGE_PACKED || f->usage == CB_USAGE_COMP_6) { if (CB_REF_OR_FIELD_P (right)) { @@ -6755,6 +6799,9 @@ cb_build_optim_cond (struct cb_binary_op *p) } } } + } else + if (right == cb_zero) { + return CB_BUILD_FUNCALL_1 ("cob_bcd_cmp_zero", left); } } @@ -7062,7 +7109,7 @@ cb_build_cond_fields (struct cb_binary_op *p, memset (data, ' ', size1 - size2); } new_lit = cb_build_alphanumeric_literal (data, size1); - lit = cb_lookup_literal (new_lit, 0); + lit = cb_lookup_literal (current_program, new_lit, 0); return CB_BUILD_FUNCALL_3 ("memcmp", CB_BUILD_CAST_ADDRESS (left), CB_BUILD_CAST_ADDRESS (lit), @@ -8120,15 +8167,15 @@ cb_emit_accept (cb_tree var, cb_tree pos, struct cb_attr_struct *attr_ptr) cb_tree cursor = NULL; /* CURSOR (position within the field) */ cob_flags_t disp_attrs = 0; - if (current_program->flag_screen) { #ifndef WITH_EXTENDED_SCREENIO - if (!warn_screen_done) { - warn_screen_done = 1; - cb_warning (cb_warn_unsupported, - _("runtime is not configured to support %s"), "SCREEN SECTION"); + if (current_program->flag_screen) { + if (!warn_screen_done) { + warn_screen_done = 1; + cb_warning (cb_warn_unsupported, + _("runtime is not configured to support %s"), "SCREEN SECTION"); + } } #endif - } if (cb_validate_one (var)) { return; } @@ -8201,7 +8248,8 @@ cb_emit_accept (cb_tree var, cb_tree pos, struct cb_attr_struct *attr_ptr) } if (CB_REF_OR_FIELD_P (var) && CB_FIELD_PTR (var)->storage == CB_STORAGE_SCREEN) { - output_screen_from (CB_FIELD_PTR (var), 0); + struct cb_field *var_field = CB_FIELD_PTR (var); + output_screen_from (var_field, 0); gen_screen_ptr = 1; if (pos) { if (CB_LIST_P (pos)) { @@ -8221,7 +8269,7 @@ cb_emit_accept (cb_tree var, cb_tree pos, struct cb_attr_struct *attr_ptr) cb_int (line_col_zero_is_supported ()))); } gen_screen_ptr = 0; - output_screen_to (CB_FIELD (cb_ref (var)), 0); + output_screen_to (var_field, 0); return; } } @@ -10123,14 +10171,12 @@ cb_emit_initialize (cb_tree vars, cb_tree fillinit, cb_tree value, } } -static size_t calc_reference_size (cb_tree xr) +static size_t +calc_reference_size (cb_tree xr, cb_tree ref) { - cb_tree ref = cb_ref (xr); - if (ref == cb_error_node) { - return 0; - } - if (CB_REF_OR_FIELD_P (ref)) { - struct cb_reference *r = CB_REFERENCE (xr); + if (CB_FIELD_P (ref)) { + const struct cb_reference *r = CB_REFERENCE (xr); + const struct cb_field *f = CB_FIELD (ref); if (r->offset) { if (r->length) { if (CB_LITERAL_P (r->length)) { @@ -10138,12 +10184,11 @@ static size_t calc_reference_size (cb_tree xr) } } else { if (CB_LITERAL_P (r->offset)) { - return (size_t)CB_FIELD_PTR (xr)->size - - cb_get_int (r->offset) + 1; + return f->size - cb_get_int (r->offset) + 1; } } } else { - return CB_FIELD_PTR (xr)->size; + return f->size; } } else if (CB_ALPHABET_NAME_P (ref)) { return 256; @@ -10154,15 +10199,25 @@ static size_t calc_reference_size (cb_tree xr) /* INSPECT statement */ -static void +/* validating FROM and TO references and their size to be matching + returns non-zero on error */ +static int validate_inspect (cb_tree x, cb_tree y, const unsigned int replacing_or_converting) { - size_t size1; - size_t size2; + cb_tree refx = NULL, refy = NULL; + int size1, size2; + + const enum cb_tag tag_x = CB_TREE_TAG (x); + const enum cb_tag tag_y = CB_TREE_TAG (y); - switch (CB_TREE_TAG(x)) { + /* get FROM size */ + switch (tag_x) { case CB_TAG_REFERENCE: - size1 = calc_reference_size (x); + refx = cb_ref (x); + if (refx == cb_error_node) { + return -1; + } + size1 = calc_reference_size (x, refx); break; case CB_TAG_LITERAL: size1 = CB_LITERAL(x)->size; @@ -10174,29 +10229,69 @@ validate_inspect (cb_tree x, cb_tree y, const unsigned int replacing_or_converti size1 = 0; break; } - if (size1) { - switch (CB_TREE_TAG(y)) { - case CB_TAG_REFERENCE: - size2 = calc_reference_size (y); - break; - case CB_TAG_LITERAL: - size2 = CB_LITERAL(y)->size; - break; - /* note: in case of CONST the original size is used */ - default: - size2 = 0; - break; + + /* get TO size for comparison with FROM size */ + switch (tag_y) { + case CB_TAG_REFERENCE: + refy = cb_ref (y); + if (refy == cb_error_node) { + return -1; } - if (size2 && size1 != size2) { + size2 = calc_reference_size (y, refy); + /* check for identical reference */ + if (refx == refy) { if (replacing_or_converting == 1) { - cb_error_x (CB_TREE (current_statement), - _("%s operands differ in size"), "REPLACING"); + cb_warning_x (COBC_WARN_FILLER, CB_TREE (current_statement), + _("%s operands are the same"), "REPLACING"); + return 0; } else { - cb_error_x (CB_TREE (current_statement), - _("%s operands differ in size"), "CONVERTING"); + cb_warning_x (COBC_WARN_FILLER, CB_TREE (current_statement), + _("%s operands are the same"), "CONVERTING"); + return 2; /* converting without change, decrease to no-op */ } } + break; + case CB_TAG_LITERAL: + size2 = CB_LITERAL (y)->size; + break; + case CB_TAG_CONST: + /* note: in case of CONST (like SPACES or LOW-VALUES) + the original size is used in libcob */ + /* Fall-through */ + default: + size2 = 0; + break; + } + + if (tag_y != CB_TAG_CONST + && size1 != size2) { + if (replacing_or_converting == 1) { + cb_error_x (CB_TREE (current_statement), + _("%s operands incompatible"), "REPLACING"); + } else { + cb_error_x (CB_TREE (current_statement), + _("%s operands incompatible"), "CONVERTING"); + } + cb_note_x (COB_WARNOPT_NONE, CB_TREE (current_statement), + _("operands differ in size")); + return 1; + } + + if (tag_x == CB_TAG_LITERAL + && tag_y == CB_TAG_LITERAL + && memcmp (CB_LITERAL (x)->data, CB_LITERAL (y)->data, size1) == 0) { + if (replacing_or_converting == 1) { + cb_warning_x (COBC_WARN_FILLER, CB_TREE (current_statement), + _ ("%s operands are the same"), "REPLACING"); + return 0; + } else { + cb_warning_x (COBC_WARN_FILLER, CB_TREE (current_statement), + _ ("%s operands are the same"), "CONVERTING"); + return 2; /* converting without change, decrease to no-op */ + } } + + return 0; } static void @@ -10359,35 +10454,164 @@ cb_build_replacing_characters (cb_tree x, cb_tree l) cb_tree cb_build_replacing_all (cb_tree x, cb_tree y, cb_tree l) { - validate_inspect (x, y, 1); + (void) validate_inspect (x, y, 1); return cb_list_add (l, CB_BUILD_FUNCALL_2 ("cob_inspect_all", y, x)); } cb_tree cb_build_replacing_leading (cb_tree x, cb_tree y, cb_tree l) { - validate_inspect (x, y, 1); + (void) validate_inspect (x, y, 1); return cb_list_add (l, CB_BUILD_FUNCALL_2 ("cob_inspect_leading", y, x)); } cb_tree cb_build_replacing_first (cb_tree x, cb_tree y, cb_tree l) { - validate_inspect (x, y, 1); + (void) validate_inspect (x, y, 1); return cb_list_add (l, CB_BUILD_FUNCALL_2 ("cob_inspect_first", y, x)); } cb_tree cb_build_replacing_trailing (cb_tree x, cb_tree y, cb_tree l) { - validate_inspect (x, y, 1); + (void) validate_inspect (x, y, 1); return cb_list_add (l, CB_BUILD_FUNCALL_2 ("cob_inspect_trailing", y, x)); } +/* pre-filled conversion table */ +static const unsigned char char_tab_0x00_to_0xff[256] = { + 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, + 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, + 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, + 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, + 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, + 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, + 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, + 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, + 144, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159, + 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 175, + 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191, + 192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, 204, 205, 206, 207, + 208, 209, 210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223, + 224, 225, 226, 227, 228, 229, 230, 231, 232, 233, 234, 235, 236, 237, 238, 239, + 240, 241, 242, 243, 244, 245, 246, 247, 248, 249, 250, 251, 252, 253, 254, 255 +}; + cb_tree cb_build_converting (cb_tree x, cb_tree y, cb_tree l) { - validate_inspect (x, y, 2); + const enum cb_tag tag_x = CB_TREE_TAG (x); + const enum cb_tag tag_y = CB_TREE_TAG (y); + + const int ret = validate_inspect (x, y, 2); + if (ret) { + /* assume 2 - if there was another one (=error) we don't use the tree below */ + /* identical FROM/TO - we still need the func call if the variable + is signed-numeric and not sign separate, but don't need to convert anything */ + /* FIXME: add test case ! */ + return cb_list_add (l, CB_BUILD_FUNCALL_0 ("cob_inspect_finish")); + } + +#if 0 /* Simon: unfinished prototype, get back to it later */ + if (tag_x == tag_y) { + switch (tag_x) { + case CB_TAG_LITERAL: + { + unsigned char conv_tab[256]; + const struct cb_literal *lit_x = CB_LITERAL (x); + const unsigned char *conv_to = (tag_y == CB_TAG_CONST) + ? (unsigned char *)CB_CONST (y)->val + : CB_LITERAL (y)->data; + const unsigned char *conv_from = lit_x->data; + const unsigned char *const conv_from_end = conv_from + lit_x->size; + char conv_set[256] = { 0 }; + + /* pre-fill conversion table */ + memcpy (conv_tab, char_tab_0x00_to_0xff, 256); + /* update conversion table with from/to, skipping duplicates */ + while (conv_from < conv_from_end) { + if (conv_set[*conv_from] == 0) { + conv_set[*conv_from] = 1; + conv_tab[*conv_from] = *conv_to; + } + conv_from++; + if (tag_y != CB_TAG_CONST) { + conv_to++; + } + } + /* TODO: not use an alphanumeric literal - generates a cob_field + for the call - possibly a new type that will be used with an own prefix + for generating general collation, too */ + return cb_list_add (l, + CB_BUILD_FUNCALL_1 ("cob_inspect_translating", + cb_build_alphanumeric_literal (conv_tab, 256))); + } + break; + case CB_TAG_REFERENCE: + if (CB_ALPHABET_NAME_P (cb_ref (x)) + && CB_ALPHABET_NAME_P (cb_ref (y))) { + const struct cb_alphabet_name *alph_x = CB_ALPHABET_NAME (cb_ref (x)); + const struct cb_alphabet_name *alph_y = CB_ALPHABET_NAME (cb_ref (y)); + + /* TODO: see note above */ + if ( (alph_x->alphabet_type == CB_ALPHABET_EBCDIC + && alph_y->alphabet_type == CB_ALPHABET_ASCII) + || (alph_y->alphabet_type == CB_ALPHABET_EBCDIC + && alph_x->alphabet_type == CB_ALPHABET_ASCII)) { + /* use the existing and configurable translation table */ + return cb_list_add (l, + CB_BUILD_FUNCALL_1 ("cob_inspect_translating", CB_TREE (alph_y))); + } else { + + // TODO: create conversion tab + struct cb_alphabet_name *alph_conv; + char conv_name[COB_MAX_WORDLEN * 2 + 2 + 1] = { 0 }; + unsigned int i; + + const int *conv_to = alph_y->values; + const int *conv_from = alph_x->values; + /* note: after (validate_alphabet) we have an entry of 256 integer elements */ + const int *const conv_from_end = conv_from + 256; + char conv_set[256] = { 0 }; + + strcat (conv_name, alph_x->name); + strcat (conv_name, "--"); + strcat (conv_name, alph_y->name); + alph_conv = CB_ALPHABET_NAME (cb_build_alphabet_name (cb_build_reference (conv_name))); + + alph_conv->alphabet_type = CB_ALPHABET_CUSTOM; + + /* setup conversion table with from/to, skipping duplicates */ + while (conv_from < conv_from_end) { + const unsigned char to = (unsigned char) *conv_to; + if (conv_set[to] == 0) { + conv_set[to] = 1; + alph_conv->values[to] = *conv_from; + } + conv_from++; + conv_to++; + } + for (i = 0; i < 256; i++) { + if (conv_set[i] == 0) { + alph_conv->values[i] = i; + } + } + return cb_list_add (l, + CB_BUILD_FUNCALL_1 ("cob_inspect_translating", CB_TREE (alph_conv))); + } + + } + break; + default: + cobc_err_msg (_("call to '%s' with invalid parameter '%s'"), + "cb_build_converting", "x"); + CB_TREE_TAG_UNEXPECTED_ABORT (x); + } + } +#endif + return cb_list_add (l, CB_BUILD_FUNCALL_2 ("cob_inspect_converting", x, y)); } @@ -10400,7 +10624,7 @@ cb_build_inspect_region_start (void) /* MOVE statement */ static void -warning_destination (const enum cb_warn_opt warning_opt, cb_tree x) +emit_definition_note (const enum cb_warn_opt warning_opt, cb_tree x) { struct cb_field *f; const char *usage; @@ -10416,10 +10640,15 @@ warning_destination (const enum cb_warn_opt warning_opt, cb_tree x) f = CB_FIELD (x); } else { cobc_err_msg (_("call to '%s' with invalid parameter '%s'"), - "warning_destination", "x"); + "emit_definition_note", "x"); CB_TREE_TAG_UNEXPECTED_ABORT (x); } + if (f->flag_had_definition_note) { + return; + } + f->flag_had_definition_note = 1; + #if 1 /* FIXME: this is wrong, should be removed and register building be adjusted, for example ACU has RETURN-CODE as SIGNED-LONG, EXTERNAL */ if (f->flag_internal_register) { @@ -10493,7 +10722,7 @@ move_warning (cb_tree src, cb_tree dst, const unsigned int value_flag, /* note: src_flag is -1 for numeric literals, contains literal size otherwise */ if (!CB_LITERAL_P (src)) { - warning_destination (warning_opt, src); + emit_definition_note (warning_opt, src); } else if (src_flag == -1) { if (CB_LITERAL_P (src)) { cb_note_x (warning_opt, dst, @@ -10504,7 +10733,7 @@ move_warning (cb_tree src, cb_tree dst, const unsigned int value_flag, _("value size is %d"), src_flag); } } - warning_destination (warning_opt, dst); + emit_definition_note (warning_opt, dst); } } @@ -10886,23 +11115,24 @@ validate_move (cb_tree src, cb_tree dst, const unsigned int is_value, int *move_ } if (leftmost_significant == l->size) { most_significant = -999; + least_significant = 999; } else { most_significant = l->size - l->scale - leftmost_significant; if (most_significant < 1) most_significant--; - } - /* Compute the least significant figure place - in relatation to the decimal point (negative = decimal position) */ - for (i = l->size - 1; i != 0; i--) { - if (l->data[i] != '0') { - break; + /* Compute the least significant figure place + in relatation to the decimal point (negative = decimal position) */ + for (i = l->size - 1; i != 0; i--) { + if (l->data[i] != '0') { + break; + } + } + if (i == 0) { + least_significant = 999; + } else { + least_significant = l->size - l->scale - i; + if (least_significant < 1) least_significant--; } - } - if (i == 0) { - least_significant = 999; - } else { - least_significant = (l->size - l->scale) - i; - if (least_significant < 1) least_significant--; } /* Value check */ @@ -10939,6 +11169,13 @@ validate_move (cb_tree src, cb_tree dst, const unsigned int is_value, int *move_ case CB_CATEGORY_NUMERIC: { const struct cb_picture *pic = fdst->pic; + if (most_significant == -999 + && l->sign == 0) { + /* replace assignments of unsigned 000.0000 to a numeric value + by optimized zero-move */ + *move_zero = 1; + break; + } if (pic->scale < 0) { /* Check for PIC 9(n)P(m) */ if (least_significant <= -pic->scale) { @@ -10984,7 +11221,7 @@ validate_move (cb_tree src, cb_tree dst, const unsigned int is_value, int *move_ /* Size check */ if (fdst->flag_real_binary || ( !cb_binary_truncate - && fdst->pic->scale <= 0 + && fdst->pic->scale <= 0 && ( fdst->usage == CB_USAGE_COMP_5 || fdst->usage == CB_USAGE_COMP_X || fdst->usage == CB_USAGE_COMP_N @@ -12562,6 +12799,7 @@ cb_check_move (cb_tree src, cb_tree dsts, const int emit_error) x = CB_VALUE (l); if (CB_LITERAL_P (x) || CB_CONST_P (x)) { if (emit_error) { + /* this may should be raised in the parser already */ cb_error_x (CB_TREE (current_statement), _("invalid MOVE target: %s"), cb_name (x)); @@ -12586,7 +12824,7 @@ cb_emit_move (cb_tree src, cb_tree dsts) return; } - /* Validate source, if requested. */ + /* validate / fix-up source, if requested */ cb_emit_incompat_data_checks (src); /* FIXME: this is way to much to cater for sum field */ @@ -13427,7 +13665,7 @@ cb_emit_set_to (cb_tree vars, cb_tree src) return; } - /* Validate source, if requested. */ + /* validate / fix-up source, if requested */ cb_emit_incompat_data_checks (src); /* Emit statements. */ diff --git a/config/ChangeLog b/config/ChangeLog index 2baf2f7fd..f6b76e3e2 100644 --- a/config/ChangeLog +++ b/config/ChangeLog @@ -1,4 +1,8 @@ +2023-09-19 Simon Sobisch + + * rm-strict.conf (perform-osvs): enabled as noted in MF docs + 2023-07-25 Simon Sobisch * general: add option using-optional diff --git a/config/rm-strict.conf b/config/rm-strict.conf index cff60f905..4811394f9 100644 --- a/config/rm-strict.conf +++ b/config/rm-strict.conf @@ -115,7 +115,8 @@ ref-mod-zero-length: no # Perform type OSVS - If yes, the exit point of any currently # executing perform is recognized if reached. -perform-osvs: no # TO-DO: Any potentially undefined (i.e. overlapping) PERFORMS prohibited (see p. 374) +perform-osvs: yes # according to MF docs; +# CHECKME: R/M docs say (see p. 374) "Any potentially undefined (i.e. overlapping) PERFORMS prohibited" # Compute intermediate decimal results like IBM OSVS arithmetic-osvs: no diff --git a/configure.ac b/configure.ac index 477f877ce..7d48ddf01 100644 --- a/configure.ac +++ b/configure.ac @@ -25,7 +25,7 @@ dnl AC_PREREQ([2.67]) # note: 2.67 is the one found in old msys, 2.69 is commonly available AC_INIT([GnuCOBOL], - [3.2], + [3.3-dev], [bug-gnucobol@gnu.org], [gnucobol], [https://www.gnu.org/software/gnucobol/]) @@ -206,7 +206,9 @@ AC_ARG_ENABLE([debug], AC_ARG_ENABLE([hardening], [AS_HELP_STRING([--enable-hardening, --disable-hardening], - [Enable GNU C "hardening" options: define _FORTIFY_SOURCE and use -fstack-protector. + [Enable GNU C "hardening" options: define _FORTIFY_SOURCE and use, + depending on the availability -fstack-protector-strong / -fstack-protector, + as well as -fstack-clash-protection. If disabled, these are explicit removed from CFLAGS for building GnuCOBOL. Defaults to "defined by CFLAGS".])],, [enable_hardening="unset"]) @@ -578,12 +580,12 @@ AC_CACHE_SAVE # Checks for header files. dnl entries only used from external includes -> likely no need to check here -dnl AC_CHECK_HEADERS([stdint.h whcar.h malloc.h]) +dnl AC_CHECK_HEADERS([whcar.h malloc.h]) # mandatory: AC_CHECK_HEADERS([sys/types.h signal.h stddef.h], [], [AC_MSG_ERROR([mandatory header could not be found or included])]) # optional: -AC_CHECK_HEADERS([sys/time.h locale.h fcntl.h dlfcn.h]) +AC_CHECK_HEADERS([sys/time.h locale.h fcntl.h dlfcn.h stdint.h inttypes.h]) # Checks for typedefs, structures, and compiler characteristics. @@ -2056,11 +2058,25 @@ AS_IF([test "$enable_hardening" = yes], [ [CFLAGS="$curr_cflags"; cob_temp_flags=""; AC_MSG_RESULT([no])]) ]) if test "x$cob_temp_flags" != x; then - if test "x$COB_LDFLAGS" != x; then - COB_LDFLAGS="$COB_LDFLAGS $cob_temp_flags" - else - COB_LDFLAGS="$cob_temp_flags" - fi + if test "x$COB_LDFLAGS" != x; then + COB_LDFLAGS="$COB_LDFLAGS $cob_temp_flags" + else + COB_LDFLAGS="$cob_temp_flags" + fi + curr_cflags="$curr_cflags $cob_temp_flags" + fi + cob_temp_flags="-fstack-clash-protection" + CFLAGS="$curr_cflags $cob_temp_flags $ERRWARN" + AC_MSG_CHECKING([for $cob_temp_flags option]) + AC_LINK_IFELSE([AC_LANG_PROGRAM([[]], [[return 0;]])], + [AC_MSG_RESULT([yes])], + [CFLAGS="$curr_cflags"; cob_temp_flags=""; AC_MSG_RESULT([no])]) + if test "x$cob_temp_flags" != x; then + if test "x$COB_LDFLAGS" != x; then + COB_LDFLAGS="$COB_LDFLAGS $cob_temp_flags" + else + COB_LDFLAGS="$cob_temp_flags" + fi CFLAGS="$curr_cflags $cob_temp_flags" else CFLAGS="$curr_cflags" @@ -2186,6 +2202,7 @@ if test "$enable_hardening" = no; then -e 's/-fstack-protector-strong//g' \ -e 's/-fstack-protector-all//g' \ -e 's/-fstack-protector//g' \ + -e 's/-fstack-clash-protection//g' \ ) fi diff --git a/doc/gnucobol.texi b/doc/gnucobol.texi index a0ff783b6..7aa0abd4c 100644 --- a/doc/gnucobol.texi +++ b/doc/gnucobol.texi @@ -116,6 +116,7 @@ Compiler options * Build target:: Build target * Source format:: Source format * Warning options:: Warning options +* Diagnostics options:: Diagnostics options * Configuration options:: Configuration options * Listing options:: Listing options * Debug switches:: Debug switches @@ -281,6 +282,7 @@ A complete list of options can be displayed by using the option @option{--help}. * Build target:: Build target * Source format:: Source format * Warning options:: Warning options +* Diagnostics options:: Diagnostics options * Configuration options:: Configuration options * Listing options:: Listing options * Debug switches:: Debug switches @@ -363,10 +365,26 @@ The following options specify the target type produced by the compiler: @table @code @item -E Preprocess only: compiler directives are executed, comment lines are -removed and @code{COPY} statements are expanded. +removed, and @code{COPY} and @code{REPLACE} statements are performed. The output is sent to stdout, allowing you to directly use it as input for another process. You can manually set an output file using @option{-o}. +@item --copy @var{copybook} +Include @file{copybook} at the beginning of the source code, as if +@code{COPY copybook} had been parsed. + +@item --include @var{file.h} +Add a @code{#include} @file{file.h} at the beginning of the generated +C source file. The file name is put into quotes, unless it starts by +@code{<}. Quoted files should be absolute paths, since C files are compiled +in temporary directories. +The option also implies @option{-fno-gen-c-decl-static-call}. +This option can be used to check function prototypes when +static calls are used. When this option is used, the source file is +compiled in the project directory (instead of the temp directory), and +no prototypes are generated, so ALL static call functions must appear +in the header file, with GnuCOBOL compatible types. + @item -C Translation only. COBOL source files are translated into C files. The output is saved in file @file{*.c}. @@ -651,6 +669,34 @@ Warn if statements are likely unreachable. This is @emph{not} set with @option{- Enable warnings that don't have an own warning flag. @end table +@node Diagnostics options +@subsection Diagnostics options + +The compiler provides some options to tune the way errors and warnings +(diagnostics) are displayed to the user. + +@table @code + +@item -fdiagnostics-absolute-paths +Print absolute paths in diagnostics. This option can be useful if your editor is not able +to correctly locate relative paths in your project. + +@item -fdiagnostics-plain-output +Make diagnostic output as plain as possible. + +@item -fno-diagnostics-show-option +Suppress output of option that directly controls the diagnostic, on which +warnings should be displayed. + +@item -fno-diagnostics-show-caret +Do not display source context on warning/error diagnostic. By default, diagnostics +contain an excerpt with two lines before and after the location. + +@item -fno-diagnostics-show-line-numbers +Suppress display of line numbers in the source context in diagnostics + +@end table + @node Configuration options @subsection Configuration options diff --git a/libcob/ChangeLog b/libcob/ChangeLog index c47fc3186..492b5f6e3 100644 --- a/libcob/ChangeLog +++ b/libcob/ChangeLog @@ -1,8 +1,94 @@ +2024-01-19 Simon Sobisch + + * fileio.c (indexed_keylen): signature change to directly take the keydesc + * fileio.c [WITH_ANY_ISAM]: refactored to ease access to keydesc and keypart + * fileio.c (indexed_open) [WITH_ANY_ISAM]: refactored + +2023-12-14 David Declerck + + * common.c (cob_terminate_routines, cob_call_with_exception_check): + add a mechanism to postpone unloading of modules when using longjmp, + as this is not safe on Windows (its implementation of longjmp + performs stack-unwinding) + +2023-11-29 Fabrice Le Fessant + + * common.c (cob_get_strerror), coblocal.h: export as utility function + * common.c (cob_expand_env_string): fix potention buffer overflow + +2023-10-17 David Declerck + + * common.h: use stdint.h and inttypes.h when available to + define cob_s64_t, cob_u64_t and the various CB_FMT_ macros + +2023-10-04 Simon Sobisch + + * fileio.c (lineseq_write, lineseq_rewrite): fix bug #918 partial broken + COB_LS_VALIDATE by incrementing pointer outside of macro IS_BAD_CHAR + +2023-09-20 Simon Sobisch + + * numeric.c (cob_numdisp_cmp): adjusted + * numeric.c (cob_numeric_display_cmp_zero, cob_bcd_cmp_zero), common.h: + new functions for optimized check of common compare + * numeric.c (cob_set_packed_u64): restore cleanup code for padding byte, + but only execute it if we wrote to first data position + +2023-09-19 Chuck Haatvedt + + * numeric.c (cob_numdisp_cmp): new version cob_numeric_display_cmp that + does NOT do any conversion to integer formats, also it does not use any + temporary buffers to do the compare which should improve its performance + +2023-09-15 Simon Sobisch + + Fixing Bug #914 CLOSE LOCK abends program on OPEN + * fileio.c (cob_close, cob_unlock): handle CLOSE WITH LOCK files + * fileio.c (indexed_close): saveguard for broken state + + Fixing Bug #913 DISPLAY and ACCEPT with simple attributes SIGSEGV + * screenio.c (cob_accept_field, cob_display_field): check for extended + params to be passed before using them + +2023-09-07 Simon Sobisch + + * strings.c (alloc_figurative): optimized handling for SPACES and ZEROES + * strings.c (cob_inspect_translating), common.h: variant of + cob_inspect_converting that is called with a pre-computed translation + table (COBOL source using only constants) + * strings.c (cob_inspect_converting): replaced partial conversion table + with full table, which saves a check on each replaced byte + * strings.c (cob_inspect_converting): also call cob_real_put_sign for + early exits + +2023-09-04 Simon Sobisch + + * numeric.c (cob_add_int): minor adjustment to scale handling + * numeric.c (packed_is_negative): optimized by memcmp instead of loop + * numeric.c (cob_decimal_get_display): fixed broken sign in + diff calculation + +2023-08-30 Simon Sobisch + + * move.c (cob_move_display_to_packed), numeric.c (cob_decimal_get_packed): + fix C RTS check raising overflow by replacing casting to char by "& 0xFF" + * cconv.c (cob_field_to_string): fix analyzer warnings + +2023-08-22 Simon Sobisch + + * version.h: bump to 3.3 + +2023-08-17 Simon Sobisch + + * numeric.c (cob_move_bcd): fix bug #904 unsigned to signed must write + positive sign + 2023-07-28 Simon Sobisch * screenio.c, common.c: replace use of NCURSES_MOUSE_VERSION by HAVE_MOUSEMASK + * fileio.c (cob_file_sort_giving_internal): fix memory cleanup 2023-07-27 Chuck Haatvedt @@ -516,7 +602,7 @@ after suggestions by Chuck Haatvedt * fileio.c (open_next): set binary file mode, minor refactoring * fileio.c (cob_file_close) [_WIN32]: don't try to unlock invalid file handles; mark file descriptor as closed when file handle was closed - + 2023-02-06 Simon Sobisch * numeric.c (cob_decimal_get_packed, cob_decimal_get_display): @@ -5270,7 +5356,7 @@ after suggestions by Chuck Haatvedt 2005-04-13 Keisuke Nishida * byteswap.h: #include . Use u_int16_t, u_int32_t, and - u_int64_t instead of unsigned short, etc. + u_int64_t instead of unsigned short, etc. 2005-03-03 Roger While @@ -6159,7 +6245,7 @@ after suggestions by Chuck Haatvedt * call.c, common.c, move.c, Makefile.am: gettextized -Copyright 2002-2023 Free Software Foundation, Inc. +Copyright 2002-2024 Free Software Foundation, Inc. Copying and distribution of this file, with or without modification, are permitted provided the copyright notice and this notice are preserved. diff --git a/libcob/call.c b/libcob/call.c index 67833b669..9df2cfd4d 100644 --- a/libcob/call.c +++ b/libcob/call.c @@ -50,13 +50,15 @@ FILE *fmemopen (void *buf, size_t size, const char *mode); #define COB_LIB_EXPIMP #include "coblocal.h" -/* NOTE - The following variable should be uncommented when - it is known that dlopen(NULL) is borked. - This is known to be true for some PA-RISC HP-UX 11.11 systems. +/* NOTE: + COB_BORKED_DLOPEN should be set with LIBCOB_CFFLAGS=-DCOB_BORKED_DLOPEN + when it is known that either dlopen(NULL) is borked or dlclose is a no-op. + The first is known to be true for some PA-RISC HP-UX 11.11 systems. This is fixed with HP patch PHSS_28871. (There are newer but this fixes dlopen/dlsym problems) + The second (no-op dlclose) is the case with musl, see + https://wiki.musl-libc.org/functional-differences-from-glibc.html#Unloading_libraries */ -/* #define COB_BORKED_DLOPEN */ #ifdef _WIN32 @@ -300,7 +302,6 @@ cob_set_library_path () char *p; char *pstr; size_t i; - struct stat st; int flag; @@ -391,9 +392,12 @@ cob_set_library_path () /* check if directory (note: entries like X:\ _must_ be specified with trailing slash !) */ - if (stat (p, &st) || !(S_ISDIR (st.st_mode))) { - /* possibly raise a warning, maybe only if explicit asked */ - continue; + { + struct stat st; + if (stat (p, &st) || !(S_ISDIR (st.st_mode))) { + /* possibly raise a warning, maybe only if explicit asked */ + continue; + } } /* remove trailing slash from entry (always added on use) */ diff --git a/libcob/cconv.c b/libcob/cconv.c index d06343a94..337a83e93 100644 --- a/libcob/cconv.c +++ b/libcob/cconv.c @@ -106,8 +106,8 @@ cob_convert_hex_digit (char h) static int cob_convert_hex_byte (const char *h) { - int d1 = cob_convert_hex_digit (h[0]); - int d2 = cob_convert_hex_digit (h[1]); + const int d1 = cob_convert_hex_digit (h[0]); + const int d2 = cob_convert_hex_digit (h[1]); if (d1 < 0 || d2 < 0) { return -1; } else { @@ -324,17 +324,18 @@ cob_field_to_string (const cob_field *f, void *str, const size_t maxsize, break; case CCM_LOWER_LOCALE: while (data <= end) { - *s++ = tolower (*data++); + *s++ = (unsigned char)tolower (*data++); } break; case CCM_UPPER_LOCALE: while (data <= end) { - *s++ = toupper (*data++); + *s++ = (unsigned char)toupper (*data++); } break; } *s = 0; - return end + 1 - f->data; + /* note: we limit individual fields to be of size < INT_MAX in the compiler */ + return (int)(end + 1 - f->data); } diff --git a/libcob/coblocal.h b/libcob/coblocal.h index 835f972fe..27f8de170 100644 --- a/libcob/coblocal.h +++ b/libcob/coblocal.h @@ -487,6 +487,7 @@ COB_HIDDEN int cob_check_env_true (char*); COB_HIDDEN int cob_check_env_false (char*); COB_HIDDEN const char *cob_get_last_exception_name (void); COB_HIDDEN void cob_parameter_check (const char *, const int); +COB_HIDDEN char* cob_get_strerror (void); enum cob_case_modifier { CCM_NONE, diff --git a/libcob/common.c b/libcob/common.c index eef27ffc1..9dacd1d94 100644 --- a/libcob/common.c +++ b/libcob/common.c @@ -280,6 +280,14 @@ struct cob_external { int esize; /* Item size */ }; +/* How should modules be unloaded */ + +enum cob_module_unload { + COB_IMMEDIATE = 0, /* Module unloading must be performed immediately */ + COB_POSTPONE = 1, /* Module unloading must be postponed */ + COB_REQUESTED = 2 /* Module unloaded has been requested after being postponed */ +}; + #define COB_ERRBUF_SIZE 1024 /* Local variables */ @@ -297,6 +305,8 @@ static const char *cob_last_progid = NULL; static cob_global *cobglobptr = NULL; static cob_settings *cobsetptr = NULL; +static enum cob_module_unload module_unload = COB_IMMEDIATE; + static int last_exception_code; /* Last exception: code */ static int active_error_handler = 0; @@ -877,8 +887,13 @@ cob_terminate_routines (void) cob_exit_numeric (); cob_exit_common_modules (); - cob_exit_call (); - cob_exit_common (); + if (module_unload == COB_IMMEDIATE) { + cob_exit_call (); + cob_exit_common (); + /* If module unloading has been postponed, "remember" unloading has indeed been requested */ + } else if (module_unload == COB_POSTPONE) { + module_unload = COB_REQUESTED; + } } static void @@ -907,7 +922,7 @@ cob_get_source_line () } /* reentrant version of strerror */ -static char * +char * cob_get_strerror (void) { size_t size; @@ -1586,21 +1601,20 @@ cob_get_sign_ebcdic (unsigned char *p) *p = sign_nibble; } switch (sign_nibble) { - /* negative */ + /* positive */ case 0xC0: - /* negative, non-preferred */ + /* positive, non-preferred */ case 0xA0: case 0xE0: return 1; - /* positive */ + /* negative */ case 0xD0: - /* positive, non-preferred */ + /* negative, non-preferred */ case 0xB0: return -1; /* unsigned */ case 0xF0: return 0; - return -1; default: /* What to do here outside of sign nibbles? */ return 1; @@ -3983,25 +3997,28 @@ cob_is_numeric (const cob_field *f) { const char sign = *end & 0x0F; if (COB_FIELD_NO_SIGN_NIBBLE (f)) { - /* COMP-6 - Check last nibble */ + /* COMP-6 - check low nibble as digit */ if (sign > 0x09) { return 0; } } else if (COB_FIELD_HAVE_SIGN (f)) { if (COB_MODULE_PTR->flag_host_sign && sign == 0x0F) { - /* all fine, go on */ + /* hostsign: "no sign" == "positive", so go on */ } else if (sign != 0x0C && sign != 0x0D) { + /* expect explicit "positive" 0x0C + or "negative" 0x0D sign */ return 0; } } else if (sign != 0x0F) { + /* unsigned must be "no sign" 0x0F */ return 0; } } - /* Check high nibble of last byte */ + /* Check high nibble of last byte for digit */ if ((*end & 0xF0) > 0x90) { return 0; } @@ -6382,7 +6399,7 @@ cob_sys_system (const void *cmdline) while GNU/Linux returns -1 */ status = system (command); if (cobglobptr->cob_screen_initialized) { - cob_screen_set_mode (1U); + cob_screen_set_mode (1); } #ifdef WIFSIGNALED if (WIFSIGNALED (status)) { @@ -6892,7 +6909,7 @@ get_sleep_nanoseconds_from_seconds (cob_field *decimal_seconds) { } if (seconds >= MAX_SLEEP_TIME) { return (cob_s64_t)MAX_SLEEP_TIME * 1000000000; -} else { + } else { cob_s64_t nanoseconds; cob_field temp; temp.size = 8; @@ -7785,9 +7802,10 @@ cob_expand_env_string (char *strval) } } if (penv != NULL) { - if ((strlen (penv) + j) > (envlen - 128)) { - env = cob_realloc (env, envlen, strlen (penv) + 256); - envlen = strlen (penv) + 256; + size_t copy_len = strlen (penv); + if (copy_len + j + 128 > envlen) { + env = cob_realloc (env, envlen, j + copy_len + 256); + envlen = j + copy_len + 256; } j += sprintf (&env[j], "%s", penv); penv = NULL; @@ -10014,17 +10032,26 @@ cob_common_init (void *setptr) errors (-1), hard errors (-2) or signals (-3) */ int cob_call_with_exception_check (const char *name, const int argc, void **argv) -{ +{ #ifndef COB_WITHOUT_JMP int ret; return_jmp_buffer_set = 1; ret = setjmp (return_jmp_buf); if (ret) { return_jmp_buffer_set = 0; + /* Module unloading has been requested (after being postponed): perform it */ + if (module_unload == COB_REQUESTED) { + cob_exit_call (); + cob_exit_common (); + } + module_unload = COB_IMMEDIATE; return ret; } + /* Set module unloading to be postponed (until longjmp is performed) */ + module_unload = COB_POSTPONE; #endif exit_code = cob_call (name, argc, argv); + module_unload = COB_IMMEDIATE; return 0; } diff --git a/libcob/common.h b/libcob/common.h index c01965eff..e81d175ba 100644 --- a/libcob/common.h +++ b/libcob/common.h @@ -45,7 +45,34 @@ typedef __mpz_struct mpz_t[1]; #define cob_sli_t long int #define cob_uli_t unsigned long int -#if defined(_WIN32) && !defined(__MINGW32__) +/* If both stdint.h and inttypes.h from C99 are present, use them. + Note that recent Visual C++ (>= 2012) and most MinGW versions are + C99-compliant (even when MinGW uses the old MSVCRT, it provides + a printf compatiblity layer to support standard format strings). */ +#if defined(HAVE_STDINT_H) && defined(HAVE_INTTYPES_H) + +#include +#include + +#define cob_s64_t int64_t +#define cob_u64_t uint64_t + +#define COB_S64_C(x) INT64_C(x) +#define COB_U64_C(x) UINT64_C(x) + +#define CB_FMT_LLD "%"PRId64 +#define CB_FMT_LLU "%"PRIu64 +#define CB_FMT_LLX "%"PRIx64 +#define CB_FMT_PLLD "%+*.*"PRId64 +#define CB_FMT_PLLU "%*.*"PRIu64 +#define CB_FMT_LLD_F "COB_S64_C(%"PRId64")" +#define CB_FMT_LLU_F "COB_U64_C(%"PRIu64")" + +/* If the compiler is not C99-compliant and is MSVC, then it is an old version + (stdint.h was introduced in Visual C++ 2010 and inttypes.h in 2012) ; + in this case we use the Microsoft-specific __int64 type and the + corresponding suffixes and format strings */ +#elif defined(_MSC_VER) #define cob_s64_t __int64 #define cob_u64_t unsigned __int64 @@ -53,7 +80,19 @@ typedef __mpz_struct mpz_t[1]; #define COB_S64_C(x) x ## I64 #define COB_U64_C(x) x ## UI64 -#else +#define CB_FMT_LLD "%I64d" +#define CB_FMT_LLU "%I64u" +#define CB_FMT_LLX "%I64x" +#define CB_FMT_PLLD "%+*.*I64d" +#define CB_FMT_PLLU "%*.*I64u" +#define CB_FMT_LLD_F "COB_S64_C(%I64d)" +#define CB_FMT_LLU_F "COB_U64_C(%I64u)" + +/* If the compiler is not C99-compliant and is MinGW, then it is a VERY old + MinGW-32 version (all MinGW-64 versions are C99-compliant) ; we use + the standard long long type and LL suffixes, however we have to use + the MSVCRT-specific format strings */ +#elif defined(__MINGW32__) #define cob_s64_t long long #define cob_u64_t unsigned long long @@ -61,33 +100,32 @@ typedef __mpz_struct mpz_t[1]; #define COB_S64_C(x) x ## LL #define COB_U64_C(x) x ## ULL -#endif - -#if defined(_WIN32) - #define CB_FMT_LLD "%I64d" #define CB_FMT_LLU "%I64u" #define CB_FMT_LLX "%I64x" #define CB_FMT_PLLD "%+*.*I64d" #define CB_FMT_PLLU "%*.*I64u" +#define CB_FMT_LLD_F "COB_S64_C(%I64d)" +#define CB_FMT_LLU_F "COB_U64_C(%I64u)" -#if defined (__MINGW32__) -#define CB_FMT_LLD_F "%I64dLL" -#define CB_FMT_LLU_F "%I64uULL" +/* Finally, if the compiler is not C99-compliant and is neither MSVC not MinGW, + then we assume it provides the long long type as an extension, with + the usual suffixes and format strings. */ #else -#define CB_FMT_LLD_F "%I64dI64" -#define CB_FMT_LLU_F "%I64uUI64" -#endif -#else +#define cob_s64_t long long +#define cob_u64_t unsigned long long + +#define COB_S64_C(x) x ## LL +#define COB_U64_C(x) x ## ULL #define CB_FMT_LLD "%lld" #define CB_FMT_LLU "%llu" #define CB_FMT_LLX "%llx" #define CB_FMT_PLLD "%+*.*lld" #define CB_FMT_PLLU "%*.*llu" -#define CB_FMT_LLD_F "%lldLL" -#define CB_FMT_LLU_F "%lluULL" +#define CB_FMT_LLD_F "COB_S64_C(%lld)" +#define CB_FMT_LLU_F "COB_U64_C(%llu)" #endif @@ -1327,8 +1365,8 @@ typedef struct __cob_file_key { int flag; /* ASCENDING/DESCENDING (for SORT) [3.x only] */ int tf_duplicates; /* WITH DUPLICATES (for RELATIVE/INDEXED) */ int tf_ascending; /* ASCENDING/DESCENDING (for SORT) [4.x only, for now: unused] */ - int tf_suppress; /* supress keys where all chars = char_suppress */ - int char_suppress; /* key supression character */ + int tf_suppress; /* supress keys where all chars = char_suppress (for INDEXED) */ + int char_suppress; /* key supression character (for INDEXED) */ unsigned int offset; /* Offset of field */ int count_components; /* 0..1::simple-key 2..n::split-key */ cob_field *component[COB_MAX_KEYCOMP]; /* key-components iff split-key */ @@ -1897,6 +1935,9 @@ COB_EXPIMP int cob_check_linkage_size (const char *, /* Comparison functions */ COB_EXPIMP int cob_numeric_cmp (cob_field *, cob_field *); COB_EXPIMP int cob_bcd_cmp (cob_field *, cob_field *); +COB_EXPIMP int cob_numeric_display_cmp (cob_field *, cob_field *); +COB_EXPIMP int cob_numeric_display_cmp_zero (cob_field *); +COB_EXPIMP int cob_bcd_cmp_zero (cob_field *); /*******************************/ /* Functions in strings.c */ @@ -1912,6 +1953,7 @@ COB_EXPIMP void cob_inspect_leading (cob_field *, cob_field *); COB_EXPIMP void cob_inspect_first (cob_field *, cob_field *); COB_EXPIMP void cob_inspect_trailing (cob_field *, cob_field *); COB_EXPIMP void cob_inspect_converting (const cob_field *, const cob_field *); +COB_EXPIMP void cob_inspect_translating (const unsigned char *); COB_EXPIMP void cob_inspect_finish (void); COB_EXPIMP void cob_string_init (cob_field *, cob_field *); diff --git a/libcob/fileio.c b/libcob/fileio.c index 00878decb..7272878f7 100644 --- a/libcob/fileio.c +++ b/libcob/fileio.c @@ -1,5 +1,5 @@ /* - Copyright (C) 2002-2012, 2014-2023 Free Software Foundation, Inc. + Copyright (C) 2002-2012, 2014-2024 Free Software Foundation, Inc. Written by Keisuke Nishida, Roger While, Simon Sobisch, Ron Norman This file is part of GnuCOBOL. @@ -191,12 +191,12 @@ struct indexfile { /* Return total length of the key */ static int -indexed_keylen (struct indexfile *fh, int idx) +indexed_keylen (const struct keydesc *key) { int totlen, part; totlen = 0; - for (part = 0; part < fh->key[idx].k_nparts; part++) { - totlen += fh->key[idx].k_part[part].kp_leng; + for (part = 0; part < key->k_nparts; part++) { + totlen += key->k_part[part].kp_leng; } return totlen; } @@ -206,16 +206,16 @@ indexed_keylen (struct indexfile *fh, int idx) static int indexed_savekey (struct indexfile *fh, unsigned char *data, int idx) { - int totlen, part; - totlen = 0; + const struct keydesc *key = &fh->key[idx]; + int totlen = 0; + int part; if (data == NULL) { data = (unsigned char*)fh->recwrk; } - for (part = 0; part < fh->key[idx].k_nparts; part++) { - memcpy (fh->savekey + totlen, - data + fh->key[idx].k_part[part].kp_start, - fh->key[idx].k_part[part].kp_leng); - totlen += fh->key[idx].k_part[part].kp_leng; + for (part = 0; part < key->k_nparts; part++) { + const struct keypart *k_part = &key->k_part[part]; + memcpy (fh->savekey + totlen, data + k_part->kp_start, k_part->kp_leng); + totlen += k_part->kp_leng; } return totlen; } @@ -225,16 +225,16 @@ indexed_savekey (struct indexfile *fh, unsigned char *data, int idx) static int indexed_restorekey (struct indexfile *fh, unsigned char *data, int idx) { + const struct keydesc *key = &fh->key[idx]; int totlen, part; totlen = 0; if (data == NULL) { data = (unsigned char*)fh->recwrk; } - for (part = 0; part < fh->key[idx].k_nparts; part++) { - memcpy (data + fh->key[idx].k_part[part].kp_start, - fh->savekey + totlen, - fh->key[idx].k_part[part].kp_leng); - totlen += fh->key[idx].k_part[part].kp_leng; + for (part = 0; part < key->k_nparts; part++) { + const struct keypart *k_part = &key->k_part[part]; + memcpy (data + k_part->kp_start, fh->savekey + totlen, k_part->kp_leng); + totlen += k_part->kp_leng; } return totlen; } @@ -244,20 +244,21 @@ indexed_restorekey (struct indexfile *fh, unsigned char *data, int idx) static int indexed_cmpkey (struct indexfile *fh, unsigned char *data, int idx, int partlen) { - int sts, part, totlen,cl; + const struct keydesc *key = &fh->key[idx]; + int sts, part, totlen; totlen = sts = 0; if (partlen <= 0) { - partlen = indexed_keylen(fh, idx); + partlen = indexed_keylen (key); } - for (part = 0; part < fh->key[idx].k_nparts && partlen > 0; part++) { - cl = partlen > fh->key[idx].k_part[part].kp_leng ? fh->key[idx].k_part[part].kp_leng : partlen; - sts = memcmp( data + fh->key[idx].k_part[part].kp_start, - fh->savekey + totlen, cl); + for (part = 0; part < key->k_nparts && partlen > 0; part++) { + const struct keypart *k_part = &key->k_part[part]; + const int cl = partlen > k_part->kp_leng ? k_part->kp_leng : partlen; + sts = memcmp (data + k_part->kp_start, fh->savekey + totlen, cl); if (sts != 0) { return sts; } - totlen += fh->key[idx].k_part[part].kp_leng; - partlen -= fh->key[idx].k_part[part].kp_leng; + totlen += k_part->kp_leng; + partlen -= k_part->kp_leng; } return sts; } @@ -267,7 +268,7 @@ indexed_cmpkey (struct indexfile *fh, unsigned char *data, int idx, int partlen) static int indexed_keydesc (cob_file *f, struct keydesc *kd, cob_file_key *key) { - int keylen,part; + int keylen, part; memset (kd,0,sizeof (struct keydesc)); kd->k_flags = key->tf_duplicates ? ISDUPS : ISNODUPS; if (key->count_components < 1) { @@ -301,14 +302,15 @@ indexed_keydesc (cob_file *f, struct keydesc *kd, cob_file_key *key) /* LCOV_EXCL_STOP */ keylen = 0; for (part=0; part < key->count_components; part++) { - kd->k_part[part].kp_start = key->component[part]->data - f->record->data; - kd->k_part[part].kp_leng = key->component[part]->size; - keylen += kd->k_part[part].kp_leng; - kd->k_part[part].kp_type = CHARTYPE; + struct keypart *k_part = &kd->k_part[part]; + k_part->kp_start = key->component[part]->data - f->record->data; + k_part->kp_leng = key->component[part]->size; + keylen += k_part->kp_leng; + k_part->kp_type = CHARTYPE; if (key->tf_suppress) { #ifdef NULLKEY kd->k_flags |= NULLKEY; - kd->k_part[part].kp_type = CHARTYPE | (key->char_suppress << 8); + k_part->kp_type = CHARTYPE | (key->char_suppress << 8); #else #if 0 /* TODO: SUPPRESS string not merged yet */ f->flag_write_chk_dups = 1; @@ -331,20 +333,16 @@ static int indexed_keycmp (struct keydesc *k1, struct keydesc *k2) { int part; - if (k1->k_flags != k2->k_flags) { - return 1; - } - if (k1->k_nparts != k2->k_nparts) { + if (k1->k_flags != k2->k_flags + || k1->k_nparts != k2->k_nparts) { return 1; } - for (part=0; part < k1->k_nparts; part++) { - if (k1->k_part[part].kp_start != k2->k_part[part].kp_start) { - return 1; - } - if (k1->k_part[part].kp_leng != k2->k_part[part].kp_leng) { - return 1; - } - if (k1->k_part[part].kp_type != k2->k_part[part].kp_type) { + for (part = 0; part < k1->k_nparts; part++) { + const struct keypart *k_part1 = &k1->k_part[part]; + const struct keypart *k_part2 = &k2->k_part[part]; + if (k_part1->kp_start != k_part2->kp_start + || k_part1->kp_leng != k_part2->kp_leng + || k_part1->kp_type != k_part2->kp_type) { return 1; } } @@ -377,7 +375,7 @@ cob_findkey_attr (cob_file *f, cob_field *kf, int *fullkeylen, int *partlen) && key->data == kf->data && key->size == kf->size) || (f->keys[k].component[0]->data == kf->data)) { - for (part=0; part < f->keys[k].count_components; part++) { + for (part = 0; part < f->keys[k].count_components; part++) { *fullkeylen += f->keys[k].component[part]->size; } if (key @@ -1111,7 +1109,7 @@ cob_chk_file_mapping (void) /* Simple case - No separators [note: this is also the ACU and Fujitsu way] */ if (!looks_absolute (src) && !has_directory_separator (src)) { - + /* Drop surrounding quotes, some implementations need those to support filename with embedded spaces (like MF), while others (like GC before 3.2) don't like them */ @@ -2064,6 +2062,7 @@ cob_file_close (cob_file *f, const int opt) case COB_CLOSE_NO_REWIND: if (f->organization == COB_ORG_LINE_SEQUENTIAL) { if (f->flag_needs_nl + && f->file && !(f->flag_select_features & COB_SELECT_LINAGE)) { f->flag_needs_nl = 0; putc ('\n', (FILE *)f->file); @@ -2504,7 +2503,7 @@ lineseq_read (cob_file *f, const int read_opts) dataptr = f->record->data; again: fp = (FILE *)f->file; - /* save last position at start of line; needed for REWRITE (I-O only) */ + /* save last position at start of line; needed for REWRITE (I-O only) */ if (f->open_mode == COB_OPEN_I_O) { f->record_off = ftell (fp); /* Note: at least on Win32 the offset resolved does only return the right values @@ -2726,7 +2725,7 @@ lineseq_write (cob_file *f, const int opt) f->flag_needs_nl = 1; } - /* save last position at start of line; needed for REWRITE (I-O only) */ + /* save last position at start of line; needed for REWRITE (I-O only) */ if (f->open_mode == COB_OPEN_I_O) { f->record_off = ftell (fp); /* Note: at least on Win32 the offset resolved does only return the right values @@ -2748,9 +2747,10 @@ lineseq_write (cob_file *f, const int opt) register unsigned char *p = f->record->data; const unsigned char *p_max = p + size; while (p < p_max) { - if (IS_BAD_CHAR (*p++)) { + if (IS_BAD_CHAR (*p)) { return COB_STATUS_71_BAD_CHAR; } + p++; } COB_CHECKED_FWRITE (fp, f->record->data, size); } else if (cobsetptr->cob_ls_nulls) { @@ -2864,9 +2864,10 @@ lineseq_rewrite (cob_file *f, const int opt) register unsigned char *p = f->record->data; const unsigned char *p_max = p + size; while (p < p_max) { - if (IS_BAD_CHAR (*p++)) { + if (IS_BAD_CHAR (*p)) { return COB_STATUS_71_BAD_CHAR; } + p++; } COB_CHECKED_FWRITE (fp, f->record->data, size); } else @@ -3404,12 +3405,11 @@ freefh (struct indexfile *fh) static void restorefileposition (cob_file *f) { - struct indexfile *fh; - struct keydesc k0; + struct indexfile *fh = f->file; - fh = f->file; - memset ((void *)&k0, 0, sizeof (k0)); if (fh->saverecnum >= 0) { + struct keydesc *key = &fh->key[f->curkey]; + struct keydesc k0 = { 0 }; /* Switch back to index */ ISRECNUM = fh->saverecnum; /* Switch to recnum mode */ @@ -3417,8 +3417,7 @@ restorefileposition (cob_file *f) /* Read by record number */ isread (fh->isfd, (void *)fh->recwrk, ISEQUAL); /* Read by current key value */ - isstart (fh->isfd, &fh->key[f->curkey], 0, - (void *)fh->recwrk, ISGTEQ); + isstart (fh->isfd, key, 0, (void *)fh->recwrk, ISGTEQ); isread (fh->isfd, (void *)fh->recwrk, ISGTEQ); while (ISRECNUM != fh->saverecnum) { /* Read back into position */ @@ -3435,9 +3434,9 @@ restorefileposition (cob_file *f) } } } else if (fh->readdone && f->curkey == 0) { + struct keydesc *key = &fh->key[0]; indexed_restorekey(fh, NULL, 0); - isstart (fh->isfd, &fh->key[f->curkey], 0, - (void *)fh->recwrk, ISGTEQ); + isstart (fh->isfd, key, 0, (void *)fh->recwrk, ISGTEQ); } } @@ -3723,13 +3722,8 @@ static int indexed_write_internal (cob_file *f, const int rewrite, const int opt) { struct indexed_file *p = f->file; - cob_u32_t i, len; - unsigned int dupno; - cob_u32_t flags = 0; - int close_cursor, ret; - - close_cursor = bdb_open_cursor (f, 1); - ret = COB_STATUS_00_SUCCESS; + const int close_cursor = bdb_open_cursor (f, 1); + cob_u32_t i; /* Check duplicate alternate keys */ if (f->nkeys > 1 && !rewrite) { @@ -3758,6 +3752,8 @@ indexed_write_internal (cob_file *f, const int rewrite, const int opt) /* Write secondary keys */ p->data = p->key; for (i = 1; i < f->nkeys; ++i) { + cob_u32_t flags, len; + int ret; if (rewrite && ! p->rewrite_sec_key[i]) { continue; } @@ -3767,8 +3763,8 @@ indexed_write_internal (cob_file *f, const int rewrite, const int opt) bdb_setkey (f, i); memset ((void*)&p->data, 0, sizeof (DBT)); if (f->keys[i].tf_duplicates) { + unsigned int dupno = get_dupno (f, i); flags = 0; - dupno = get_dupno (f, i); if (dupno > 1) { ret = COB_STATUS_02_SUCCESS_DUPLICATE; } @@ -3783,7 +3779,6 @@ indexed_write_internal (cob_file *f, const int rewrite, const int opt) p->data.data = p->temp_key; p->data.size = (cob_dbtsize_t)len; flags = DB_NOOVERWRITE; - dupno = 0; } bdb_setkey (f, i); @@ -3816,7 +3811,7 @@ indexed_write_internal (cob_file *f, const int rewrite, const int opt) return COB_STATUS_51_RECORD_LOCKED; } } - return ret; + return COB_STATUS_00_SUCCESS; } static int @@ -4196,15 +4191,13 @@ indexed_open (cob_file *f, char *filename, struct indexfile *fh; size_t k; - int ret,len; + int ret, len; int omode; int lmode; int vmode; int dobld; int isfd; int checkvalue; - struct keydesc kd; - struct dictinfo di; /* Defined in (c|d|vb)isam.h */ COB_UNUSED (sharing); @@ -4302,20 +4295,23 @@ indexed_open (cob_file *f, char *filename, lmode = ISEXCLLOCK; omode = ISINOUT; break; + default: + /* CLOSED / LOCKED-CLOSED */ + break; } fh = cob_malloc (sizeof (struct indexfile) + ((sizeof (struct keydesc)) * (f->nkeys + 1))); - /* Copy index information */ - for (k = 0; k < f->nkeys; ++k) { - len = indexed_keydesc(f, &fh->key[k], &f->keys[k]); - if (fh->lenkey < len) { - fh->lenkey = len; - } - } ISERRNO = 0; fh->lmode = 0; if (dobld) { dobuild: + /* copy index information cob_file_key -> keydesc */ + for (k = 0; k < f->nkeys; ++k) { + len = indexed_keydesc (f, &fh->key[k], &f->keys[k]); + if (fh->lenkey < len) { + fh->lenkey = len; + } + } isfd = isbuild ((void *)filename, (int)f->record_max, &fh->key[0], vmode | ISINOUT | ISEXCLLOCK); #if 0 /* activate on later merge of locking enhancements */ @@ -4340,9 +4336,41 @@ indexed_open (cob_file *f, char *filename, lmode = ISMANULOCK; } isfd = isopen ((void *)filename, omode | lmode | vmode); - if (isfd < 0) { - if (ISERRNO == EFLOCKED) + if (isfd >= 0) { + struct dictinfo di = { 0 }; /* Defined in (c|d|vb)isam.h */ + isindexinfo (isfd, (void *)&di, 0); + /* Mask off ISVARLEN */ + fh->nkeys = di.di_nkeys & 0x7F; + if (fh->nkeys != f->nkeys + || f->record_max != di.di_recsize) { + ret = COB_STATUS_39_CONFLICT_ATTRIBUTE; + } + for (k = 0; k < fh->nkeys && !ret; ++k) { + struct keydesc kd = { 0 }; + /* get key info from ISAM */ + struct keydesc key = { 0 }; /* init to prevent analyzer warning */ + int len_key; + isindexinfo (isfd, &key, (int)(k + 1)); + len = indexed_keylen (&key); + if (fh->lenkey < len) { + fh->lenkey = len; + } + /* get key info from cob_key */ + len_key = indexed_keydesc (f, &kd, &f->keys[k]); + /* verify that COBOL keys match exactly to real ISAM keys */ + if (len_key != len + || indexed_keycmp (&kd, &key) != 0) { + ret = COB_STATUS_39_CONFLICT_ATTRIBUTE; + break; + } + /* store ISAM key definition */ + memcpy (&fh->key[k], &key, sizeof (struct keydesc)); + } + } else { /* opening the file is not possible */ + if (ISERRNO == EFLOCKED) { + freefh (fh); return COB_STATUS_61_FILE_SHARING; + } if (f->flag_optional) { if (mode == COB_OPEN_EXTEND || mode == COB_OPEN_I_O) { @@ -4360,33 +4388,6 @@ indexed_open (cob_file *f, char *filename, f->flag_nonexistent = 1; return COB_STATUS_05_SUCCESS_OPTIONAL; } - } else { - memset(&di, 0, sizeof (di)); - isindexinfo (isfd, (void *)&di, 0); - /* Mask off ISVARLEN */ - fh->nkeys = di.di_nkeys & 0x7F; - if (fh->nkeys != f->nkeys) { - ret = COB_STATUS_39_CONFLICT_ATTRIBUTE; - } - if (f->record_max != di.di_recsize) { - ret = COB_STATUS_39_CONFLICT_ATTRIBUTE; - } - for (k = 0; k < fh->nkeys && !ret; ++k) { - memset (&fh->key[k], 0, sizeof (struct keydesc)); - isindexinfo (isfd, &fh->key[k], (int)(k+1)); - if (fh->lenkey < indexed_keylen(fh, k)) { - fh->lenkey = indexed_keylen(fh, k); - } - /* Verify that COBOL keys match exactly to real ISAM keys */ - len = indexed_keydesc(f, &kd, &f->keys[k]); - if (fh->lenkey < len) { - fh->lenkey = len; - } - if(indexed_keycmp(&kd, &fh->key[k]) != 0) { - ret = COB_STATUS_39_CONFLICT_ATTRIBUTE; - break; - } - } } } if (isfd < 0) { @@ -4739,13 +4740,13 @@ indexed_close (cob_file *f, const int opt) #elif defined(WITH_ANY_ISAM) - struct indexfile *fh; + struct indexfile *fh = f->file; COB_UNUSED (opt); - fh = f->file; if (fh == NULL) { - return COB_STATUS_00_SUCCESS; + /* should we raise COB_STATUS_42_NOT_OPEN ? */ + return COB_STATUS_30_PERMANENT_ERROR; } if (fh->isfd >= 0) { isfullclose (fh->isfd); @@ -4762,6 +4763,10 @@ indexed_close (cob_file *f, const int opt) COB_UNUSED (opt); /* Close DB's */ + if (p == NULL) { + /* should we raise COB_STATUS_42_NOT_OPEN ? */ + return COB_STATUS_30_PERMANENT_ERROR; + } for (i = 0; i < (int)f->nkeys; ++i) { if (p->cursor[i]) { bdb_close_index (f, i); @@ -4821,13 +4826,13 @@ indexed_start (cob_file *f, const int cond, cob_field *key) #elif defined(WITH_ANY_ISAM) - struct indexfile *fh; + struct indexfile *fh = f->file; int k; int mode; int klen,fullkeylen,partlen; int savecond; + struct keydesc *keyd; - fh = f->file; f->flag_read_done = 0; f->flag_first_read = 0; fh->readdone = 0; @@ -4842,6 +4847,7 @@ indexed_start (cob_file *f, const int cond, cob_field *key) return COB_STATUS_23_KEY_NOT_EXISTS; } f->mapkey = k; + keyd = &fh->key[k]; /* Use size of data field; This may indicate a partial key */ klen = partlen; if (klen < 1 || klen > fullkeylen) { @@ -4883,9 +4889,9 @@ indexed_start (cob_file *f, const int cond, cob_field *key) default: return COB_STATUS_21_KEY_INVALID; } - if (isstart (fh->isfd, &fh->key[k], klen, (void *)f->record->data, mode)) { + if (isstart (fh->isfd, keyd, klen, (void *)f->record->data, mode)) { if (cond == COB_LE || cond == COB_LT) { - if (isstart (fh->isfd, &fh->key[k], klen, (void *)f->record->data, ISLAST)) { + if (isstart (fh->isfd, keyd, klen, (void *)f->record->data, ISLAST)) { f->curkey = -1; f->mapkey = -1; fh->startcond = -1; @@ -4905,7 +4911,7 @@ indexed_start (cob_file *f, const int cond, cob_field *key) } } fh->startcond = savecond; - indexed_savekey(fh, f->record->data, k); + indexed_savekey (fh, f->record->data, k); f->curkey = k; f->flag_end_of_file = 0; f->flag_begin_of_file = 0; @@ -4998,7 +5004,7 @@ indexed_read (cob_file *f, cob_field *key, const int read_opts) fh->readdone = 1; f->flag_end_of_file = 0; f->flag_begin_of_file = 0; - indexed_savekey(fh, f->record->data, 0); + indexed_savekey (fh, f->record->data, 0); fh->recnum = ISRECNUM; #ifdef ISVARLEN if (f->record_min != f->record_max) { @@ -5130,7 +5136,7 @@ indexed_read_next (cob_file *f, const int read_opts) case COB_GE: domoveback = 0; while (ISERRNO == 0 - && indexed_cmpkey(fh, f->record->data, f->curkey, 0) == 0) { + && indexed_cmpkey (fh, f->record->data, f->curkey, 0) == 0) { isread (fh->isfd, (void *)f->record->data, ISPREV); domoveback = 1; } @@ -5141,7 +5147,7 @@ indexed_read_next (cob_file *f, const int read_opts) case COB_LE: domoveback = 0; while (ISERRNO == 0 - && indexed_cmpkey(fh, f->record->data, f->curkey, 0) == 0) { + && indexed_cmpkey (fh, f->record->data, f->curkey, 0) == 0) { isread (fh->isfd, (void *)f->record->data, ISNEXT); domoveback = 1; } @@ -5150,15 +5156,17 @@ indexed_read_next (cob_file *f, const int read_opts) } break; case COB_LT: +#if 0 /* CHECKME, not in GC4 */ isread (fh->isfd, (void *)f->record->data, ISPREV); +#endif while (ISERRNO == 0 - && indexed_cmpkey(fh, f->record->data, f->curkey, 0) >= 0) { + && indexed_cmpkey (fh, f->record->data, f->curkey, 0) >= 0) { isread (fh->isfd, (void *)f->record->data, ISPREV); } break; case COB_GT: while (ISERRNO == 0 - && indexed_cmpkey(fh, f->record->data, f->curkey, 0) <= 0) { + && indexed_cmpkey (fh, f->record->data, f->curkey, 0) <= 0) { isread (fh->isfd, (void *)f->record->data, ISNEXT); } break; @@ -5208,12 +5216,12 @@ indexed_read_next (cob_file *f, const int read_opts) } else { switch (fh->startcond) { case COB_LE: - if(indexed_cmpkey(fh, f->record->data, f->curkey, 0) > 0) + if (indexed_cmpkey (fh, f->record->data, f->curkey, 0) > 0) domoveback = 1; else domoveback = 0; while (ISERRNO == 0 - && indexed_cmpkey(fh, f->record->data, f->curkey, 0) == 0) { + && indexed_cmpkey (fh, f->record->data, f->curkey, 0) == 0) { isread (fh->isfd, (void *)f->record->data, ISNEXT); domoveback = 1; } @@ -5223,19 +5231,19 @@ indexed_read_next (cob_file *f, const int read_opts) break; case COB_LT: while (ISERRNO == 0 - && indexed_cmpkey(fh, f->record->data, f->curkey, 0) >= 0) { + && indexed_cmpkey (fh, f->record->data, f->curkey, 0) >= 0) { isread (fh->isfd, (void *)f->record->data, ISPREV); } break; case COB_GT: while (ISERRNO == 0 - && indexed_cmpkey(fh, f->record->data, f->curkey, 0) <= 0) { + && indexed_cmpkey (fh, f->record->data, f->curkey, 0) <= 0) { isread (fh->isfd, (void *)f->record->data, ISNEXT); } break; case COB_GE: while (ISERRNO == 0 - && indexed_cmpkey(fh, f->record->data, f->curkey, 0) < 0) { + && indexed_cmpkey (fh, f->record->data, f->curkey, 0) < 0) { isread (fh->isfd, (void *)f->record->data, ISNEXT); } break; @@ -5297,7 +5305,7 @@ indexed_read_next (cob_file *f, const int read_opts) fh->readdone = 1; f->flag_end_of_file = 0; f->flag_begin_of_file = 0; - indexed_savekey(fh, f->record->data, 0); + indexed_savekey (fh, f->record->data, 0); fh->recnum = ISRECNUM; #ifdef ISVARLEN if (f->record_min != f->record_max) { @@ -5306,11 +5314,12 @@ indexed_read_next (cob_file *f, const int read_opts) #endif #ifdef COB_WITH_STATUS_02 - if((isstat1 == '0') && (isstat2 == '2')) { + if (isstat1 == '0' + && isstat2 == '2') { return COB_STATUS_02_SUCCESS_DUPLICATE; } #endif - return 0; + return COB_STATUS_00_SUCCESS; #elif defined(WITH_DB) @@ -5417,7 +5426,7 @@ indexed_read_next (cob_file *f, const int read_opts) if (nextprev == DB_FIRST || nextprev == DB_LAST) { read_nextprev = 1; } else { - p->key.size = (cob_dbtsize_t) bdb_keylen(f,p->key_index); + p->key.size = (cob_dbtsize_t) bdb_keylen (f, p->key_index); p->key.data = p->last_readkey[p->key_index]; ret = DB_SEQ (p->cursor[p->key_index], &p->key, &p->data, DB_SET_RANGE); /* ret != 0 possible, records may be deleted since last read */ @@ -5500,7 +5509,7 @@ indexed_read_next (cob_file *f, const int read_opts) } p->key.data = p->data.data; p->key.size = p->primekeylen; - ret = DB_GET (p->db[0], &p->key, &p->data, 0); + ret = DB_GET (p->db[0], &p->key, &p->data, 0); if (ret != 0) { bdb_close_index (f, p->key_index); bdb_close_cursor (f); @@ -5525,7 +5534,7 @@ indexed_read_next (cob_file *f, const int read_opts) memcpy (p->last_readkey[0], p->key.data, (size_t)p->key.size); } else { memcpy (p->last_readkey[p->key_index], p->temp_key, - bdb_keylen(f,p->key_index)); + bdb_keylen(f,p->key_index)); memcpy (p->last_readkey[p->key_index + f->nkeys], p->key.data, p->primekeylen); if (f->keys[p->key_index].tf_duplicates) { p->last_dupno[p->key_index] = dupno; @@ -5569,16 +5578,15 @@ indexed_write (cob_file *f, const int opt) #elif defined(WITH_ANY_ISAM) - struct indexfile *fh; + struct indexfile *fh = f->file; COB_UNUSED (opt); - fh = f->file; if (f->flag_nonexistent) { return COB_STATUS_48_OUTPUT_DENIED; } if (f->access_mode == COB_ACCESS_SEQUENTIAL - && indexed_cmpkey(fh, f->record->data, 0, 0) <= 0) { + && indexed_cmpkey (fh, f->record->data, 0, 0) <= 0) { return COB_STATUS_21_KEY_INVALID; } @@ -5598,14 +5606,15 @@ indexed_write (cob_file *f, const int opt) } return fisretsts (COB_STATUS_49_I_O_DENIED); } - indexed_savekey(fh, f->record->data, 0); + indexed_savekey (fh, f->record->data, 0); #ifdef COB_WITH_STATUS_02 - if((isstat1 == '0') && (isstat2 == '2')) { + if (isstat1 == '0' + && isstat2 == '2') { return COB_STATUS_02_SUCCESS_DUPLICATE; } #endif - return 0; + return COB_STATUS_00_SUCCESS; #elif defined(WITH_DB) @@ -5721,7 +5730,8 @@ indexed_rewrite (cob_file *f, const int opt) struct indexfile *fh; size_t k; - int ret, retdup; + int ret; + int retdup = 0; COB_UNUSED (opt); @@ -5732,21 +5742,21 @@ indexed_rewrite (cob_file *f, const int opt) } if (f->access_mode == COB_ACCESS_SEQUENTIAL - && indexed_cmpkey(fh, f->record->data, 0, 0) != 0) { + && indexed_cmpkey (fh, f->record->data, 0, 0) != 0) { return COB_STATUS_21_KEY_INVALID; } if (f->curkey >= 0) { /* Index is active */ /* Save record data */ memcpy (fh->recwrk, f->record->data, f->record_max); -/* RXWRXW - readdir */ + /* RXWRXW - readdir */ fh->readdir = ISNEXT; savefileposition (f); memcpy (fh->recwrk, f->record->data, f->record_max); if (f->curkey != 0) { /* Activate primary index */ - isstart (fh->isfd, &fh->key[0], 0, (void *)fh->recwrk, - ISEQUAL); + isstart (fh->isfd, &fh->key[0], fh->key[0].k_len, + (void *)fh->recwrk, ISEQUAL); } /* Verify record exists */ if (isread (fh->isfd, (void *)fh->recwrk, ISEQUAL)) { @@ -5754,12 +5764,13 @@ indexed_rewrite (cob_file *f, const int opt) return COB_STATUS_21_KEY_INVALID; } for (k = 1; k < f->nkeys && ret == COB_STATUS_00_SUCCESS; ++k) { - if (fh->key[k].k_flags & ISDUPS) { + struct keydesc *key = &fh->key[k]; + if (key->k_flags & ISDUPS) { continue; } memcpy (fh->recwrk, f->record->data, f->record_max); - isstart (fh->isfd, &fh->key[k], fh->key[k].k_leng, - (void *)fh->recwrk, ISEQUAL); + isstart (fh->isfd, key, key->k_leng, + (void *)fh->recwrk, ISEQUAL); if (!isread (fh->isfd, (void *)fh->recwrk, ISEQUAL) && ISRECNUM != fh->recnum) { ret = COB_STATUS_22_KEY_EXISTS; @@ -5768,8 +5779,8 @@ indexed_rewrite (cob_file *f, const int opt) } if (ret == COB_STATUS_00_SUCCESS) { memcpy (fh->recwrk, f->record->data, f->record_max); - isstart (fh->isfd, &fh->key[0], 0, (void *)fh->recwrk, - ISEQUAL); + isstart (fh->isfd, &fh->key[0], fh->key[0].k_len, + (void *)fh->recwrk, ISEQUAL); if (isread (fh->isfd, (void *)fh->recwrk, ISEQUAL | ISLOCK)) { ret = fisretsts (COB_STATUS_49_I_O_DENIED); } else { @@ -5782,16 +5793,16 @@ indexed_rewrite (cob_file *f, const int opt) ret = fisretsts (COB_STATUS_49_I_O_DENIED); } } - } - #ifdef COB_WITH_STATUS_02 - if (!ret && (isstat1 == '0') && (isstat2 == '2')) { - retdup = COB_STATUS_02_SUCCESS_DUPLICATE; - } + if (!ret && (isstat1 == '0') && (isstat2 == '2')) { + retdup = COB_STATUS_02_SUCCESS_DUPLICATE; + } #endif + } + restorefileposition (f); - } else { + } else { /* Index is not active */ memcpy (fh->recwrk, f->record->data, f->record_max); if (isread (fh->isfd, (void *)fh->recwrk, ISEQUAL | ISLOCK)) { @@ -5805,34 +5816,30 @@ indexed_rewrite (cob_file *f, const int opt) if (isrewrite (fh->isfd, (void *)f->record->data)) { ret = fisretsts (COB_STATUS_49_I_O_DENIED); } + } #ifdef COB_WITH_STATUS_02 - if (!ret && (isstat1 == '0') && (isstat2 == '2')) { - retdup = COB_STATUS_02_SUCCESS_DUPLICATE; - } -#endif + if (!ret && (isstat1 == '0') && (isstat2 == '2')) { + retdup = COB_STATUS_02_SUCCESS_DUPLICATE; } +#endif if (!ret) { if ((f->lock_mode & COB_LOCK_AUTOMATIC) && !(f->lock_mode & COB_LOCK_MULTIPLE)) { isrelease (fh->isfd); } -#ifdef COB_WITH_STATUS_02 - if ((isstat1 == '0') && (isstat2 == '2')) { - retdup = COB_STATUS_02_SUCCESS_DUPLICATE; - } -#endif } } + if (retdup) { /* FIXME: use (is_suppressed_key_value) or similar to verify - that the duplicate this is not a SUPPRESSed KEY */ - return retdup; + that the duplicate is not a SUPPRESSed KEY */ + return COB_STATUS_02_SUCCESS_DUPLICATE; } return ret; #elif defined(WITH_DB) - int ret; + int ret; if (f->flag_nonexistent) { return COB_STATUS_49_I_O_DENIED; @@ -5855,8 +5862,9 @@ indexed_rewrite (cob_file *f, const int opt) if (ret != COB_STATUS_00_SUCCESS) { bdb_close_cursor (f); - if (ret == COB_STATUS_23_KEY_NOT_EXISTS) + if (ret == COB_STATUS_23_KEY_NOT_EXISTS) { return COB_STATUS_21_KEY_INVALID; + } return ret; } @@ -6307,17 +6315,19 @@ cob_close (cob_file *f, cob_field *fnstatus, const int opt, const int remfil) } } - if (f->open_mode == COB_OPEN_CLOSED) { + if (f->open_mode == COB_OPEN_CLOSED + || f->open_mode == COB_OPEN_LOCKED) { save_status (f, fnstatus, COB_STATUS_42_NOT_OPEN); return; } if (f->flag_nonexistent) { - ret = COB_STATUS_00_SUCCESS; - } else { - ret = fileio_funcs[(int)f->organization]->close (f, opt); + save_status (f, fnstatus, COB_STATUS_00_SUCCESS); + f->open_mode = COB_OPEN_CLOSED; + return; } + ret = fileio_funcs[(int)f->organization]->close (f, opt); if (ret == COB_STATUS_00_SUCCESS) { switch (opt) { case COB_CLOSE_LOCK: @@ -8475,13 +8485,6 @@ cob_file_sort_giving_internal (cob_file *sort_file, const size_t giving_cnt, } } - /* cleanup temporary arrays */ - cob_free (opt); - cob_free (fbase); - if (callfh) { - cob_free (callfh); - } - /* if any error happened with the GIVING files update SORT-RETURN */ if (hp->sort_return) { for (i = 0; i < giving_cnt; ++i) { @@ -8491,6 +8494,13 @@ cob_file_sort_giving_internal (cob_file *sort_file, const size_t giving_cnt, } } } + + /* cleanup temporary arrays */ + cob_free (opt); + cob_free (fbase); + if (callfh) { + cob_free (callfh); + } } /* SORT: WRITE all records from 'sort_file' to all passed USING files */ @@ -8850,7 +8860,8 @@ update_file_to_fcd (cob_file *f, FCD3 *fcd, unsigned char *fnstatus) else if (f->file_status) memcpy (fcd->fileStatus, f->file_status, 2); /* FIXME: use switch here */ - if (f->open_mode == COB_OPEN_CLOSED) + if (f->open_mode == COB_OPEN_CLOSED + || f->open_mode == COB_OPEN_LOCKED) fcd->openMode = OPEN_NOT_OPEN; else if( f->open_mode == COB_OPEN_INPUT) fcd->openMode = OPEN_INPUT; @@ -10162,7 +10173,7 @@ update_key_from_fcd (cob_file *f, FCD3 *fcd, cob_field *kf) && keylen < kf->size) { kf->size = keylen; } - } else + } else if (fcd->fileOrg == ORG_RELATIVE) { cob_field *rel_key = f->keys[0].field; /* set value in the key field (several functions don't pass this outside of "f") */ diff --git a/libcob/move.c b/libcob/move.c index c8216ba68..8a4085892 100644 --- a/libcob/move.c +++ b/libcob/move.c @@ -518,7 +518,7 @@ cob_move_display_to_packed (cob_field *f1, cob_field *f2) memset (f2->data, 0, f2->size); { register unsigned char *q = f2->data + i / 2; - const unsigned int i_end = f2->size; + const unsigned int i_end = (unsigned int)f2->size; /* a packed field always has small size */ /* FIXME: get rid of that, adjust i_end to handle both truncation of the source to the right and zero-fill because of scale differences (zero-fill wa s already done) */ const unsigned char *p_end = data1 + digits1; @@ -540,7 +540,7 @@ cob_move_display_to_packed (cob_field *f1, cob_field *f2) /* check for necessary loop (until we not need the p_end check) */ if (i_end - i < (unsigned int)(p_end - p + 1) / 2) { while (i < i_end) { - *q = (unsigned char) (*p << 4) /* -> dropping the higher bits = no use in COB_D2I */ + *q = ((*p << 4) & 0xFF) /* -> dropping the higher bits = no use in COB_D2I */ + COB_D2I (*(p + 1)); q++; i++; @@ -548,7 +548,7 @@ cob_move_display_to_packed (cob_field *f1, cob_field *f2) } } else { while (p < p_end) { - *q = (unsigned char) (*p << 4) /* -> dropping the higher bits = no use in COB_D2I */ + *q = ((*p << 4) & 0xFF) /* -> dropping the higher bits = no use in COB_D2I */ + COB_D2I (*(p + 1)); q++; p += 2; diff --git a/libcob/numeric.c b/libcob/numeric.c index 9a8ec889f..a5e2c9ad9 100644 --- a/libcob/numeric.c +++ b/libcob/numeric.c @@ -542,7 +542,7 @@ cob_mul_by_pow_10 (mpz_t mexp, unsigned int n) mpz_mul (mexp, mexp, cob_mexp); } -/* scale - multiplicate mpz_t by power of 10 */ +/* scale - divide mpz_t by power of 10 */ static COB_INLINE COB_A_INLINE void cob_div_by_pow_10 (mpz_t mexp, unsigned int n) { @@ -1143,7 +1143,7 @@ cob_set_packed_zero (cob_field *f) static void cob_decimal_set_packed (cob_decimal *d, cob_field *f) { - register unsigned char *p = f->data; + register unsigned char *p = f->data; const int nibtest = !!COB_FIELD_NO_SIGN_NIBBLE (f); const unsigned char *endp = p + f->size - 1 + nibtest; cob_uli_t byteval; @@ -1170,11 +1170,11 @@ cob_decimal_set_packed (cob_decimal *d, cob_field *f) } else { byteval = 0; /* Skip leading ZEROs */ - while (p < endp - && *p == 0x00) { - digits -= 2; - p++; - } + while (p < endp + && *p == 0x00) { + digits -= 2; + p++; + } } if (digits < MAX_LLI_DIGITS_PLUS_1) { /* note: similar logic in move.c (packed_get_long_long, packed_get_int) @@ -1187,7 +1187,7 @@ cob_decimal_set_packed (cob_decimal *d, cob_field *f) if (!nibtest) { val = val * 10 - + (*p >> 4); + + (*p >> 4); } #ifdef COB_LI_IS_LL mpz_set_ui (d->value, (cob_uli_t)val); @@ -1210,7 +1210,7 @@ cob_decimal_set_packed (cob_decimal *d, cob_field *f) mpz_mul_ui (d->value, d->value, 10000UL); } mpz_add_ui (d->value, d->value, - ( pack_to_bin[*p] * 100) + ( (int)pack_to_bin[*p] * 100) + pack_to_bin[*(p + 1)]); /* because of the zero-skipping we are always nonzero here */ nonzero = 1; @@ -1342,7 +1342,7 @@ cob_decimal_get_packed (cob_decimal *d, cob_field *f, const int opt) i++; } while (i < size) { - *p++ = (unsigned char) (*q << 4) /* -> dropping the higher bits = no use in COB_D2I */ + *p++ = ((*q << 4) & 0xFF) /* -> dropping the higher bits = no use in COB_D2I */ + COB_D2I (*(q + 1)); q += 2; i += 2; } @@ -1398,9 +1398,9 @@ cob_set_packed_u64 (cob_field *f, const cob_u64_t val, const int sign) *p = packed_bytes[n % 100]; } -#if 0 /* clean first half-byte; - would only be necessary if not zeroe'd out above */ - { + /* clean first half-byte to handle truncation + as we may have stored 200 in S99's padding byte */ + if (p <= f->data) { const short scale = COB_FIELD_SCALE (f); short digits; if (scale >= 0) { @@ -1419,7 +1419,6 @@ cob_set_packed_u64 (cob_field *f, const cob_u64_t val, const int sign) *(f->data) &= 0x0FU; } } -#endif } /* set the specified BCD field 'f' to the given integer 'val'; @@ -1464,7 +1463,8 @@ cob_decimal_set_display (cob_decimal *d, cob_field *f) return; } - /* Skip leading zeros (also invalid space/low-value) */ + /* Skip leading zeros (also invalid space/low-value + and valid positive/negative zero overpunch) */ while (size > 1 && (COB_D2I (*data) == 0)) { size--; data++; @@ -1523,7 +1523,7 @@ cob_decimal_set_display (cob_decimal *d, cob_field *f) these fields _must_ be _internal_ so there's no need to handle invalid data via COB_D2I + COB_I2D and we can copy as-is; this code has shown to be faster than mpz ui multiplication */ - char *buff = cob_fast_malloc (size + 1U); + char *buff = cob_fast_malloc ((size_t)size + 1U); memcpy (buff, data, size); /* still we may need to unpunch the sign, which in this internal case will always be at the last digit */ @@ -1545,6 +1545,7 @@ cob_decimal_set_display (cob_decimal *d, cob_field *f) COB_PUT_SIGN_ADJUSTED (f, sign); } +/* store value from decimal into field of type numeric DISPLAY */ static int cob_decimal_get_display (cob_decimal *d, cob_field *f, const int opt) { @@ -1565,11 +1566,13 @@ cob_decimal_get_display (cob_decimal *d, cob_field *f, const int opt) /* Build string, note: we can't check the decimal size with mpz_sizeinbase, as its result is "either exact or one too big" */ - /* huge data, only for internal operations like intrinsic functions */ + /* huge data, only for internal operations like intrinsic functions, + for example when directly called within intrinsic.c by + cob_alloc_field, cob_decimal_get_field -> cob_decimal_get_display */ if (fsize > COB_MAX_BINARY) { char *p = mpz_get_str (NULL, 10, d->value); const size_t size = strlen (p); - const size_t diff = fsize - size; + const long long diff = fsize - size; if (diff < 0) { /* Overflow */ if ((opt & COB_STORE_NO_SIZE_ERROR) == 0) { @@ -2377,7 +2380,6 @@ cob_addsub_optimized (cob_field *f1, cob_field *f2, return 0; } - void cob_add (cob_field *f1, cob_field *f2, const int opt) { @@ -2498,8 +2500,8 @@ cob_shift_left_nibble (unsigned char *ptr_buff, unsigned char *ptr_start_data_by unsigned char carry_nibble; unsigned char move_nibble = 0xFF; - /* calculate the length of data to be shifted */ - const int len1 = 48 - (ptr_start_data_byte - ptr_buff); + /* calculate the length of data to be shifted, never much */ + const int len1 = 48 - (int)(ptr_start_data_byte - ptr_buff); /* add one to ensure the carry nibble is moved */ register int shift_cntr = len1 + 1; @@ -2561,8 +2563,8 @@ cob_shift_right_nibble (unsigned char *ptr_buff, unsigned char *ptr_start_data_b cob_u64_t carry_nibble; cob_u64_t move_nibble = 0xFF; - /* calculate the length of data to be shifted */ - const int len1 = 48 - (ptr_start_data_byte - ptr_buff); + /* calculate the length of data to be shifted, never much */ + const int len1 = 48 - (int)(ptr_start_data_byte - ptr_buff); register int shift_cntr = len1; @@ -2639,7 +2641,7 @@ cob_move_bcd (cob_field *f1, cob_field *f2) if (COB_FIELD_NO_SIGN_NIBBLE (f1)) { fld1_sign = 0x00; } else { - fld1_sign = *(fld1 + fld1_size - 1) & 0X0F; + fld1_sign = *(fld1 + fld1_size - 1) & 0x0F; } /************************************************************/ @@ -2731,26 +2733,21 @@ cob_move_bcd (cob_field *f1, cob_field *f2) } if (f2_has_no_sign_nibble) { - /************************************************************/ - /* The following will clear the "pad" nibble if present */ - /************************************************************/ + /* clear pad nibble, if present */ if (COB_FIELD_DIGITS (f2) & 1 /* -> digits % 2 == 1 */) { *fld2 &= 0x0F; } } else { + /* set sign nibble */ unsigned char *pos = fld2 + fld2_size - 1; - if (COB_FIELD_HAVE_SIGN (f2)) { - if (!fld1_sign) { - *pos &= 0xF0; - *pos |= 0x0C; - } else { - *pos &= 0xF0; - *pos |= fld1_sign; - } - } else { - *pos &= 0xF0; + if (!COB_FIELD_HAVE_SIGN (f2)) { *pos |= 0x0F; + } else if (fld1_sign == 0x0D) { + *pos = (*pos & 0xF0) | 0x0D; + } else { + *pos = (*pos & 0xF0) | 0x0C; } + /* clear pad nibble, if present */ if (!(COB_FIELD_DIGITS (f2) & 1) /* -> digits % 2 == 0 */) { *fld2 &= 0x0F; } @@ -2933,7 +2930,7 @@ static int check_overflow_and_set_sign (cob_field *f, const int opt, int final_positive, unsigned char *buff, unsigned char *pos) { - const int buff_size = 48 - (pos - buff); + const int buff_size = 48 - (int)(pos - buff); const int fsize = (int)f->size; int cmp_size = buff_size - fsize; unsigned char *last_buff_pos = buff + 48 - 1; @@ -3051,9 +3048,9 @@ cob_add_bcd (cob_field *fdst, const unsigned char *src2_data = COB_FIELD_DATA (fsrc2); unsigned char fld1_sign = COB_FIELD_NO_SIGN_NIBBLE (fsrc1) ? 0x00 - : *(src1_data + fld1_size - 1) & 0X0F; + : *(src1_data + fld1_size - 1) & 0x0F; const unsigned char fld2_sign = COB_FIELD_NO_SIGN_NIBBLE (fsrc2) ? 0x00 - : *(src2_data + fld2_size - 1) & 0X0F; + : *(src2_data + fld2_size - 1) & 0x0F; const signed short src1_scale = COB_FIELD_SCALE (fsrc1); const signed short src2_scale = COB_FIELD_SCALE (fsrc2); @@ -3181,9 +3178,9 @@ cob_add_bcd (cob_field *fdst, /* find the length of the longer buffer data */ if (fld1 - fld1_buff > fld2 - fld2_buff) { - loop_limit = 48 - (fld2 - fld2_buff) + 1; + loop_limit = 48 - (int)(fld2 - fld2_buff) + 1; } else { - loop_limit = 48 - (fld1 - fld1_buff) + 1; + loop_limit = 48 - (int)(fld1 - fld1_buff) + 1; } /* note: both fl1 and fld2 point at the _last_ position of the @@ -3511,7 +3508,8 @@ cob_display_add_int (cob_field *f, int n, const int opt) } if (unlikely (scale < 0)) { - /* PIC 9(n)P(m) */ + /* PIC 9(n)P(m) -> adjust "val" + by applying the same scale (cut integer positions) */ if (-scale < 10) { /* Fix optimizer bug */ while (scale) { @@ -3519,9 +3517,9 @@ cob_display_add_int (cob_field *f, int n, const int opt) n /= 10; } } else { + scale = 0; n = 0; } - scale = 0; if (n == 0) { return 0; } @@ -3603,25 +3601,30 @@ cob_add_int (cob_field *f, const int n, const int opt) int scale = COB_FIELD_SCALE (f); int val = n; if (unlikely (scale < 0)) { - /* PIC 9(n)P(m) */ - if (-scale < 10) { - while (scale++) { - val /= 10; - } - } else { - val = 0; + /* PIC 9(n)P(m) -> adjust "val" + by applying the same scale (cut integer positions) */ + if (scale <= -10) { + /* an int cannot have > 10 digit positions, so + no need to do anything if scale is too small */ + return 0; + } + while (scale++) { + val /= 10; } - scale = 0; if (!val) { return 0; } + /* not used anymore, but logically: scale = 0 here */ } cob_decimal_set_field (&cob_d1, f); mpz_set_si (cob_d2.value, (cob_sli_t)val); - cob_d2.scale = 0; - if (scale > 0) { - cob_mul_by_pow_10 (cob_d2.value, scale); + if (cob_d1.scale > 0) { + cob_mul_by_pow_10 (cob_d2.value, cob_d1.scale); +#if 0 /* second scale is unused, these are just the "logic" values */ cob_d2.scale = cob_d1.scale; + } else { + cob_d2.scale = 0; +#endif } mpz_add (cob_d1.value, cob_d1.value, cob_d2.value); return cob_decimal_get_field (&cob_d1, f, opt); @@ -3795,19 +3798,15 @@ packed_is_negative (cob_field *f) { if (cob_packed_get_sign (f) == -1) { /* negative sign, validate for nonzero data */ - unsigned char *data = COB_FIELD_DATA (f); - register unsigned char *end = data + f->size - 1; + unsigned char nullbuff[(COB_MAX_DIGITS / 2) + 1] = { 0 }; + /* nonzero "really negative" if any data is nonzero */ + if (memcmp (f->data, nullbuff, f->size - 1)) { + return 1; + } /* nonzero if byte with sign nibble has other data */ - if ((*end != 0x0D)) { + if ((*(f->data + f->size - 1) != 0x0D)) { return 1; /* extra data -> really negative */ } - /* nonzero "really negative" if any other data is nonzero, - checking backwards from before sign until end == start */ - while (data != end) { - if (*--end != 0) { - return 1; - } - } /* all zero -> not negative, even with the sign telling so */ return 0; } @@ -4026,22 +4025,256 @@ cob_bcd_cmp (cob_field *f1, cob_field *f2) } #endif +#ifndef NO_DISPLAY_COMPARE +static COB_INLINE COB_A_INLINE int +compare_data (unsigned char *ptr1, unsigned char *ptr2, int len) +{ + unsigned char *ptr_end = ptr1 + len; + + do { + const unsigned char p1 = COB_D2I (*ptr1); + const unsigned char p2 = COB_D2I (*ptr2); + if (p1 != p2) { + if (p1 > p2) { + return 1; + } + return -1; + } + ptr1++; + ptr2++; + } while (ptr1 != ptr_end); + + return 0; +} + +static int +check_all_zero (unsigned char *ptr, int len) +{ + unsigned char *ptr_end = ptr + len; + + do { + if (COB_D2I (*ptr++) != 0) { + return 0; + } + } while (ptr != ptr_end); + + return 1; +} + +int +cob_numeric_display_cmp (cob_field *f1, cob_field *f2) +{ + int compare_result, len; + int f1_strt_offset, f1_end_offset; + int f2_strt_offset, f2_end_offset; + + /************************************************************/ + /* first we need to get the scale, data size and sign of */ + /* each of the two cob fields. Note that if the signs are */ + /* different, then we only need to find if either of the */ + /* fields is non-zero. */ + /************************************************************/ + + const short scale1 = COB_FIELD_SCALE (f1); + const short scale2 = COB_FIELD_SCALE (f2); + /* numeric DISPLAY fields from a program are limited to COB_MAX_DIGITS, + internal created numeric DISPLAY fields from intrinsic functions + in intrinsic.c (cob_alloc_field, cob_decimal_move_temp) could + _theoretically_ use up to SHRT_MAX */ + const short size1 = (short)COB_FIELD_SIZE (f1); + const short size2 = (short)COB_FIELD_SIZE (f2); + unsigned char *ptr_f1 = COB_FIELD_DATA (f1); + unsigned char *ptr_f2 = COB_FIELD_DATA (f2); + + const int orig_sign1 = COB_GET_SIGN_ADJUST (f1); + const int orig_sign2 = COB_GET_SIGN_ADJUST (f2); + + int ret; + + const int sign1 = orig_sign1 >= 0 ? 1 : + check_all_zero (ptr_f1, size1) ? 1 : - 1; + const int sign2 = orig_sign2 >= 0 ? 1 : + check_all_zero (ptr_f2, size2) ? 1 : -1; + + if (sign1 != sign2) { + ret = sign1; + goto over; + } + /************************************************************/ + /* first we need to find the start and end of each field */ + /* relative to the decimal point so that we can compare */ + /* them correctly based on the position relative to the */ + /* decimal point. */ + /* */ + /* the comparison of two fields containing display */ + /* numeric data will result in one of three conditions */ + /* */ + /* one field will be a subset of the other. */ + /* one field would intersect with the other. */ + /* the fields would not intersect at all. */ + /* */ + /* so these are the 3 conditions we need to check for. */ + /* this will result in 3 compares being needed. */ + /************************************************************/ + + f1_strt_offset = size1 - scale1; + f1_end_offset = 0 - scale1; + + f2_strt_offset = size2 - scale2; + f2_end_offset = 0 - scale2; + + /************************************************************/ + /* the first compare will be to check the leading / pad */ + /* positions in either of the fields to check if they are */ + /* all zeros. if not then we don't need to compare any */ + /* farther, we are done. */ + /************************************************************/ + + + if (f1_strt_offset > f2_strt_offset) { + if (f2_strt_offset > f1_end_offset) { + if (!check_all_zero (ptr_f1, (f1_strt_offset - f2_strt_offset))) { + ret = sign1; + goto over; + } + ptr_f1 += (f1_strt_offset - f2_strt_offset); + f1_strt_offset -= (f1_strt_offset - f2_strt_offset); + } else { + if (!check_all_zero (ptr_f1, (f1_strt_offset - f1_end_offset))) { + ret = sign1; + goto over; + } + ptr_f1 += (f1_strt_offset - f1_end_offset); + f1_strt_offset -= (f1_strt_offset - f1_end_offset); + } + } else if (f2_strt_offset > f1_strt_offset) { + if (f1_strt_offset > f2_end_offset) { + if (!check_all_zero (ptr_f2, (f2_strt_offset - f1_strt_offset))) { + ret = -sign1; + goto over; + } + ptr_f2 += (f2_strt_offset - f1_strt_offset); + f2_strt_offset -= (f2_strt_offset - f1_strt_offset); + } else { + if (!check_all_zero (ptr_f2, (f2_strt_offset - f2_end_offset))) { + ret = -sign1; + goto over; + } + ptr_f2 += (f2_strt_offset - f2_end_offset); + f2_strt_offset -= (f2_strt_offset - f2_end_offset); + } + } + + /************************************************************/ + /* the second would be to check the overlapping positions */ + /* in both fields against each other. if they do not */ + /* match then we can set the return code to indicate */ + /* which is greater / lesser and we are done. */ + /************************************************************/ + + if (f1_strt_offset == f2_strt_offset) { + len = (f1_end_offset > f2_end_offset) ? (f1_strt_offset - f1_end_offset) + : (f2_strt_offset - f2_end_offset); + if (len > 0) { + compare_result = compare_data (ptr_f1, ptr_f2, len); + if (compare_result) { + ret = sign1 * compare_result; + goto over; + } + ptr_f1 += len; + f1_strt_offset -= len; + ptr_f2 += len; + f2_strt_offset -= len; + } + } + + /************************************************************/ + /* if we have not exited yet that means that one of the */ + /* fields have trailing positions to the right of the */ + /* overlapping positions, so we have to check those for */ + /* all zeros. then we are done. */ + /************************************************************/ + + if (f1_end_offset < f2_end_offset) { + if (!check_all_zero (ptr_f1, (f1_strt_offset - f1_end_offset))) { + ret = sign1; + goto over; + } + } else if (f2_end_offset < f1_end_offset) { + if (!check_all_zero (ptr_f2, (f2_strt_offset - f2_end_offset))) { + ret = -sign1; + goto over; + } + } + ret = 0; + +over: + COB_PUT_SIGN_ADJUSTED (f1, orig_sign1); + COB_PUT_SIGN_ADJUSTED (f2, orig_sign2); + return ret; +} +# else + +int +cob_numeric_display_cmp (cob_field *f1, cob_field *f2) +{ + /* Fallback: internal decimal compare (most expensive) */ + cob_decimal_set_field (&cob_d1, f1); + cob_decimal_set_field (&cob_d2, f2); + return cob_decimal_cmp (&cob_d1, &cob_d2); +} +#endif + +/* compare USAGE DISPLAY numeric variable with no SIGN SEPARATE + and no invalid ebcdic overpunch to zero */ +int +cob_numeric_display_cmp_zero (cob_field *f) +{ + unsigned char *ptr = f->data; + unsigned char *ptr_end = ptr + f->size; + + do { + const unsigned char p = COB_D2I (*ptr); + if (p != 0) { + const char p_sign = *(ptr_end - 1) & 0xF0; + int sign = p_sign == 0x70 || p_sign == 0xD0 || p_sign == 0xB0 + ? -1 : 1; + return sign; + } + ptr++; + } while (ptr < ptr_end); + + return 0; +} + +/* compare BCD field to zero */ +int +cob_bcd_cmp_zero (cob_field *f) +{ + unsigned char nullbuff[(COB_MAX_DIGITS / 2) + 1] = { 0 }; + + if (COB_FIELD_NO_SIGN_NIBBLE(f)) { + if (memcmp (f->data, nullbuff, f->size)) { + return 1; + } + } else { + if (memcmp (f->data, nullbuff, f->size - 1)) { + return cob_packed_get_sign (f) == -1 ? -1 : 1; + } + /* nonzero if byte with sign nibble has content in data nibble */ + if ((*(f->data + f->size - 1) & 0xF0) != 0) { + return cob_packed_get_sign (f) == -1 ? -1 : 1; + } + } + return 0; +} + int cob_numeric_cmp (cob_field *f1, cob_field *f2) { const int f1_type = COB_FIELD_TYPE (f1); const int f2_type = COB_FIELD_TYPE (f2); - /* float needs special comparison */ - if (f1_type == COB_TYPE_NUMERIC_FLOAT - || f1_type == COB_TYPE_NUMERIC_DOUBLE - || f1_type == COB_TYPE_NUMERIC_L_DOUBLE - || f2_type == COB_TYPE_NUMERIC_FLOAT - || f2_type == COB_TYPE_NUMERIC_DOUBLE - || f2_type == COB_TYPE_NUMERIC_L_DOUBLE) { - return cob_cmp_float (f1, f2); - } - #ifndef NO_BCD_COMPARE /* do bcd compare if possible */ if (f1_type == COB_TYPE_NUMERIC_PACKED @@ -4050,9 +4283,28 @@ cob_numeric_cmp (cob_field *f1, cob_field *f2) if (COB_FIELD_SCALE (f1) >= 0 && COB_FIELD_SCALE (f2) >= 0) { return cob_bcd_cmp (f1, f2); } + /* CHECKME: possible create temporary bcd2 if only one is packed + and the other isn't float - then compare as BCD */ } #endif +#ifndef NO_DISPLAY_COMPARE + /* do numeric display compare if possible */ + if (f1_type == COB_TYPE_NUMERIC_DISPLAY + && f2_type == COB_TYPE_NUMERIC_DISPLAY) { + /* CHECKME: if not float then create a temporary display2 */ + return cob_numeric_display_cmp (f1, f2); + } +#endif + + /* float needs special comparison */ + if ( (f1_type >= COB_TYPE_NUMERIC_FLOAT + && f1_type <= COB_TYPE_NUMERIC_L_DOUBLE) + || (f2_type >= COB_TYPE_NUMERIC_FLOAT + && f2_type <= COB_TYPE_NUMERIC_L_DOUBLE)) { + return cob_cmp_float (f1, f2); + } + /* otherwise - preferably compare as integers */ if (COB_FIELD_SCALE (f1) == COB_FIELD_SCALE (f2) && COB_FIELD_DIGITS (f1) < 19 @@ -4305,12 +4557,8 @@ cob_cmp_numdisp (const unsigned char *data, const size_t size, return (val < n) ? -1 : (val > n); } - /* safe-guard, should never happen */ - if (!size) { - return 0; - } p_end = p + size - 1; - while (p != p_end) { + while (p < p_end) { val = val * 10 + COB_D2I (*p++); } val *= 10; diff --git a/libcob/screenio.c b/libcob/screenio.c index 3197019a2..8f743bbd8 100644 --- a/libcob/screenio.c +++ b/libcob/screenio.c @@ -173,13 +173,13 @@ static int cob_screen_init (void); /* Local functions */ -/* - * Cf. GNU cpp info manual, section 7, Pragmas - * +/* + * Cf. GNU cpp info manual, section 7, Pragmas + * * Define a macro to use the _Pragma operator, restricted to modern gcc. * This section is experimental. If it proves useful, it should be moved * to coblocal.h. - * + * * The ICC guard is there because ICC, clang and many others * "helpfully" define __GNUC__, but often leave out some extensions. */ @@ -188,8 +188,8 @@ static int cob_screen_init (void); # define GCC_PRAGMA(w) \ _Pragma ("GCC diagnostic push") \ _Pragma (#w) -# define GCC_POP() _Pragma ("GCC diagnostic pop") -#else +# define GCC_POP() _Pragma ("GCC diagnostic pop") +#else # define GCC_PRAGMA(w) # define GCC_POP() #endif @@ -379,7 +379,7 @@ cob_get_color_pair (const short fg_color, const short bg_color) if (fg_color == 0 && bg_color == 0) { return 1; } - + { /* some implementations (especially PDCursesMod 64-bit CHTYPE) provide more color pairs than we currently support, limit appropriate */ @@ -920,7 +920,7 @@ cob_screen_attr (cob_field *fgc, cob_field *bgc, cob_flags_t attr, if (control) { adjust_attr_from_control_field (&attr, control, &fg_color, &bg_color); } - + /* curses attributes from (possibly adjusted) COBOL attributes; note that several "may be ignored if not supported by the terminal" and that OVERLINE / LEFTLINE / RIGHTLINE is a curses extension @@ -1098,7 +1098,7 @@ cob_screen_init (void) provide more color pairs than we currently support, limit appropriate */ const short max_clr_pairs = COLOR_PAIRS < SHRT_MAX ? (short)COLOR_PAIRS : SHRT_MAX - 1; short color_pair_number; - + for (color_pair_number = 2; color_pair_number < max_clr_pairs; ++color_pair_number) { init_pair (color_pair_number, 0, 0); if (color_pair_number == SHRT_MAX) { @@ -1441,7 +1441,7 @@ cob_addnstr_graph (const char *data, const int size) { int count; raise_ec_on_truncation (size); - + for (count = 0; count < size; count++) { const char c = *data++; switch (c) { @@ -1761,7 +1761,7 @@ get_screen_item_line_and_col (cob_screen *s, int * const line, if (s->line && !s->column) { found_col = 1; } - + if (!found_col && !s->column && is_elementary && !is_first_screen_item (s)) { /* @@ -2205,7 +2205,7 @@ static int is_number_with_pic_symbol (cob_field * const f, const char symbol) { int i; - + if (COB_FIELD_TYPE (f) != COB_TYPE_NUMERIC_EDITED) { return 0; } @@ -2230,7 +2230,7 @@ get_pic_symbol_offset (cob_field * const f, const char symbol) { int offset = 0; int i = 0; - + do { offset += f->attr->pic[i].times_repeated; } while (f->attr->pic[i++].symbol != symbol); @@ -2256,11 +2256,11 @@ shift_left (cob_screen * const s, const int cline, const int ccolumn, unsigned char move_char; COB_UNUSED (right_pos); - + for (offset = 0; offset < ccolumn - scolumn; offset++) { move_char = s->field->data[offset + 1]; s->field->data[offset] = move_char; - + cob_move_cursor (cline, offset + scolumn); if (move_char != ' ') { if (s->attr & COB_SCREEN_NO_ECHO) { @@ -2325,7 +2325,7 @@ move_to_initial_field_pos (cob_field * const f, const int sline, int offset; *data_ptr = f->data; - + if (COB_INSERT_MODE && cob_field_is_numeric_or_numeric_edited (f)) { if (has_decimal_point (f)) { if (to_right_side) { @@ -2710,16 +2710,16 @@ cob_screen_get_all (const int initial_curs, const int accept_timeout) } else { break; } - + finalize_field_input (s); - + /* Move cursor to sign */ ccolumn = scolumn + get_pic_symbol_offset (s->field, sign); cob_move_cursor (cline, ccolumn); p = s->field->data + ccolumn - scolumn; /* Enter sign */ break; - + #ifdef HAVE_MOUSEMASK case KEY_MOUSE: { @@ -2863,7 +2863,7 @@ cob_screen_get_all (const int initial_curs, const int accept_timeout) } else { cob_addch ((const chtype)keyp); } - + if (ccolumn == right_pos) { /* Auto-skip at end of field. */ if (s->attr & COB_SCREEN_AUTO) { @@ -3105,27 +3105,26 @@ extract_line_and_col_vals (cob_field *line, cob_field *column, *sline = 0; *scolumn = 0; return; + } + if (line->size < 4) { + /* this is used when only a LINE clause is specified, + not an AT clause */ + cobol_line = cob_get_int (line); + cobol_col = 1; } else { - if (line->size < 4) { - /* this is used when only a LINE clause is specified, - not an AT clause */ - cobol_line = cob_get_int (line); - cobol_col = 1; - } else { - /* common case: line actually contains both the - line and field numbers */ - int ret = get_line_and_col_from_field - (line, &cobol_line, &cobol_col); - /* LCOV_EXCL_START */ - if (unlikely (ret == 1)) { -#if 0 /* Throw an exception? EC-SCREEN-IMP-LINE-VAR-LENGTH? */ - cob_set_exception (COB_EC_SCREEN_IMP); + /* common case: line actually contains both the + line and field numbers */ + int ret = get_line_and_col_from_field + (line, &cobol_line, &cobol_col); + /* LCOV_EXCL_START */ + if (unlikely (ret == 1)) { +#if 0 /* Throw an exception? EC-SCREEN-IMP-LINE-VAR-LENGTH? */ + cob_set_exception (COB_EC_SCREEN_IMP); #else - cob_fatal_error (COB_FERROR_CODEGEN); + cob_fatal_error (COB_FERROR_CODEGEN); #endif - } - /* LCOV_EXCL_STOP */ } + /* LCOV_EXCL_STOP */ } } else { get_line_column (line, column, &cobol_line, &cobol_col); @@ -3946,7 +3945,7 @@ field_accept (cob_field *f, cob_flags_t fattr, const int sline, const int scolum /* Put cursor back to original position. */ cob_move_cursor (cline, ccolumn); continue; - + #ifdef HAVE_MOUSEMASK case KEY_MOUSE: { @@ -4174,7 +4173,7 @@ cob_display_field (cob_field *f, const cob_flags_t fattr, const char *parms, ... cob_field *size_is = NULL; cob_field *control = NULL; cob_field *color = NULL; - + /* LINE/COL 0 is always allowed here as it is impossible to specify it in the standard format (DISPLAY ... UPON CRT) and all implementations of @@ -4186,48 +4185,50 @@ cob_display_field (cob_field *f, const cob_flags_t fattr, const char *parms, ... int sline; int scolumn; - va_list args; - const char *p = parms; + if (parms && *parms) { + va_list args; + const char *p = parms; - va_start (args, parms); - for (;;) { - char type = *p++; - if (type == 0) { - break; - } - switch (type) { - case 'p': /* AT POS, currently combined, likely to be changed later */ - case 'l': /* AT LINE */ - line = va_arg (args, cob_field *); - break; - case 'c': /* AT COLUMN */ - column = va_arg (args, cob_field *); - break; - case 'f': /* FOREGROUND-COLOR IS */ - fgc = va_arg (args, cob_field *); - break; - case 'b': /* BACKGROUND-COLOR IS */ - bgc = va_arg (args, cob_field *); - break; - case 's': /* SCROLL UP | DOWN */ - fscroll = va_arg (args, cob_field *); - break; - case 'S': /* SIZE IS */ - size_is = va_arg (args, cob_field *); - break; - case 'C': /* CONTROL -> variable named attributes */ - control = va_arg (args, cob_field *); - break; - case 'L': /* CONTROL -> variable numeric added attributes */ - color = va_arg (args, cob_field *); - break; - default: - /* unknown attributes are explicit ignored */ - break; + va_start (args, parms); + for (;;) { + char type = *p++; + if (type == 0) { + break; + } + switch (type) { + case 'p': /* AT POS, currently combined, likely to be changed later */ + case 'l': /* AT LINE */ + line = va_arg (args, cob_field *); + break; + case 'c': /* AT COLUMN */ + column = va_arg (args, cob_field *); + break; + case 'f': /* FOREGROUND-COLOR IS */ + fgc = va_arg (args, cob_field *); + break; + case 'b': /* BACKGROUND-COLOR IS */ + bgc = va_arg (args, cob_field *); + break; + case 's': /* SCROLL UP | DOWN */ + fscroll = va_arg (args, cob_field *); + break; + case 'S': /* SIZE IS */ + size_is = va_arg (args, cob_field *); + break; + case 'C': /* CONTROL -> variable named attributes */ + control = va_arg (args, cob_field *); + break; + case 'L': /* CONTROL -> variable numeric added attributes */ + color = va_arg (args, cob_field *); + break; + default: + /* unknown attributes are explicit ignored */ + break; + } + parms++; } - parms++; + va_end (args); } - va_end (args); init_cob_screen_if_needed (); @@ -4252,63 +4253,65 @@ cob_accept_field (cob_field *f, const cob_flags_t fattr, const char *parms, ...) cob_field *control = NULL; cob_field *color = NULL; cob_field *cursor = NULL; - + const int zero_line_col_allowed = 1; /* see comment in cob_display_field */ int sline; int scolumn; - va_list args; - const char *p = parms; + if (parms && *parms) { + va_list args; + const char *p = parms; - va_start (args, parms); - for (;;) { - char type = *p++; - if (type == 0) { - break; - } - switch (type) { - case 'p': /* AT POS, currently combined, likely to be changed later */ - case 'l': /* AT LINE */ - line = va_arg (args, cob_field *); - break; - case 'c': /* AT COLUMN */ - column = va_arg (args, cob_field *); - break; - case 'f': /* FOREGROUND-COLOR IS */ - fgc = va_arg (args, cob_field *); - break; - case 'b': /* BACKGROUND-COLOR IS */ - bgc = va_arg (args, cob_field *); - break; - case 's': /* SCROLL UP | DOWN */ - fscroll = va_arg (args, cob_field *); - break; - case 't': /* TIME-OUT [AFTER] */ - ftimeout = va_arg (args, cob_field *); - break; - case 'P': /* PROMPT CHARACTER OS */ - prompt = va_arg (args, cob_field *); - break; - case 'S': /* SIZE IS */ - size_is = va_arg (args, cob_field *); - break; - case 'C': /* CONTROL -> variable named attributes */ - control = va_arg (args, cob_field *); - break; - case 'L': /* CONTROL -> variable numeric added attributes */ - color = va_arg (args, cob_field *); - break; - case 'R': /* CURSOR -> offset within field */ - cursor = va_arg (args, cob_field *); - break; - default: - /* unknown attributes are explicit ignored */ - break; + va_start (args, parms); + for (;;) { + char type = *p++; + if (type == 0) { + break; + } + switch (type) { + case 'p': /* AT POS, currently combined, likely to be changed later */ + case 'l': /* AT LINE */ + line = va_arg (args, cob_field *); + break; + case 'c': /* AT COLUMN */ + column = va_arg (args, cob_field *); + break; + case 'f': /* FOREGROUND-COLOR IS */ + fgc = va_arg (args, cob_field *); + break; + case 'b': /* BACKGROUND-COLOR IS */ + bgc = va_arg (args, cob_field *); + break; + case 's': /* SCROLL UP | DOWN */ + fscroll = va_arg (args, cob_field *); + break; + case 't': /* TIME-OUT [AFTER] */ + ftimeout = va_arg (args, cob_field *); + break; + case 'P': /* PROMPT CHARACTER OS */ + prompt = va_arg (args, cob_field *); + break; + case 'S': /* SIZE IS */ + size_is = va_arg (args, cob_field *); + break; + case 'C': /* CONTROL -> variable named attributes */ + control = va_arg (args, cob_field *); + break; + case 'L': /* CONTROL -> variable numeric added attributes */ + color = va_arg (args, cob_field *); + break; + case 'R': /* CURSOR -> offset within field */ + cursor = va_arg (args, cob_field *); + break; + default: + /* unknown attributes are explicit ignored */ + break; + } + parms++; } - parms++; + va_end (args); } - va_end (args); extract_line_and_col_vals (line, column, ACCEPT_STATEMENT, zero_line_col_allowed, &sline, &scolumn); @@ -4555,7 +4558,7 @@ cob_exit_screen_from_signal (int ss_only) PDCurses only with PDCursesMod 4.3.5) */ #if (!defined (NCURSES_VERSION_MAJOR) || NCURSES_VERSION_MAJOR < 6) \ && (!defined (PDC_BUILD) || PDC_BUILD < 4305) - if (ss_only) return; + if (ss_only) return; #endif if (cobglobptr->cob_screen_initialized) { @@ -4824,10 +4827,12 @@ cob_sys_get_char (unsigned char *fld) return -1; } } + return 0; #else + /* this function is only valid for extended screenio! */ COB_UNUSED (fld); + return -2; #endif - return 0; } /* set CurSoR position on screen, diff --git a/libcob/strings.c b/libcob/strings.c index 674df8cfc..ef61e56c2 100644 --- a/libcob/strings.c +++ b/libcob/strings.c @@ -115,13 +115,20 @@ cob_str_memcpy (cob_field *dst, unsigned char *src, const int size) static void alloc_figurative (const cob_field *f1, const cob_field *f2) { + const size_t size2 = f2->size; - unsigned char *s; - size_t size1; - size_t size2; - size_t n; +#if 1 /* size1 is always 1 here, so several optimizations possible */ + if (*f1->data == ' ' && size2 <= COB_SPACES_ALPHABETIC_BYTE_LENGTH) { + alpha_fld.size = size2; + alpha_fld.data = (unsigned char *) COB_SPACES_ALPHABETIC; + return; + } + if (*f1->data == '0' && size2 <= COB_ZEROES_ALPHABETIC_BYTE_LENGTH) { + alpha_fld.size = size2; + alpha_fld.data = (unsigned char *) COB_ZEROES_ALPHABETIC; + return; + } - size2 = f2->size; if (size2 > figurative_size) { if (figurative_ptr) { cob_free (figurative_ptr); @@ -129,15 +136,31 @@ alloc_figurative (const cob_field *f1, const cob_field *f2) figurative_ptr = cob_malloc (size2); figurative_size = size2; } - size1 = 0; - s = figurative_ptr; - for (n = 0; n < size2; ++n, ++s) { - *s = f1->data[size1]; - size1++; - if (size1 >= f1->size) { - size1 = 0; + + memset (figurative_ptr, *f1->data, size2); +#else + if (size2 > figurative_size) { + if (figurative_ptr) { + cob_free (figurative_ptr); } + figurative_ptr = cob_malloc (size2); + figurative_size = size2; } + + { + unsigned char *s = figurative_ptr; + size_t n = size2; + size_t size1 = 0; + while (n != 0) { + if (size1 >= f1->size) { + size1 = 0; + } + *s++ = f1->data[size1++]; + --n; + } + } +#endif + alpha_fld.size = size2; alpha_fld.data = figurative_ptr; } @@ -498,7 +521,7 @@ cob_inspect_init (cob_field *var, const cob_u32_t replacing) cob_inspect_start (setting inspect_start/end) cob_inspect_before (optional, adjusting inspect_end) cob_inspect_after (optional, adjusting inspect_start) - one-time cob_inspect_converting (actual converstion) */ + one-time cob_inspect_converting/cob_inspect_translating (actual converstion) */ void cob_inspect_init_converting (cob_field *var) @@ -549,7 +572,7 @@ cob_inspect_characters (cob_field *f1) } if (inspect_replacing) { - /* INSPECT REPLACING CHARACTERS BY f1 */ + /* INSPECT REPLACING CHARACTERS BY f1 (= size 1) */ const unsigned char repl_by = *f1->data; unsigned char *repdata; setup_repdata (); @@ -623,7 +646,7 @@ cob_inspect_converting (const cob_field *f1, const cob_field *f2) if (inspect_len == 0) { /* our task is to convert either a zero-length field or AFTER ... has not found a place to start the conversion */ - return; + goto end; } if (unlikely (!f1)) { @@ -638,7 +661,7 @@ cob_inspect_converting (const cob_field *f1, const cob_field *f2) f2 = &alpha_fld; } else { cob_set_exception (COB_EC_RANGE_INSPECT_SIZE); - return; + goto end; } } @@ -649,14 +672,32 @@ cob_inspect_converting (const cob_field *f1, const cob_field *f2) unsigned char * const cur_data_end = cur_data + inspect_len; #if 1 /* table-approach, _much faster_, _should_ be portable */ - char conv_tab[256] = { 0 }; /* using 256 to remove the need to use offset */ - char conv_set[256] = { 0 }; + /* pre-filled conversion table */ + unsigned char conv_tab[256] = { + 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, + 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, + 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, + 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, + 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, + 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, + 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, + 112, 113, 114, 115, 116, 117, 118, 119, 120, 121, 122, 123, 124, 125, 126, 127, + 128, 129, 130, 131, 132, 133, 134, 135, 136, 137, 138, 139, 140, 141, 142, 143, + 144, 145, 146, 147, 148, 149, 150, 151, 152, 153, 154, 155, 156, 157, 158, 159, + 160, 161, 162, 163, 164, 165, 166, 167, 168, 169, 170, 171, 172, 173, 174, 175, + 176, 177, 178, 179, 180, 181, 182, 183, 184, 185, 186, 187, 188, 189, 190, 191, + 192, 193, 194, 195, 196, 197, 198, 199, 200, 201, 202, 203, 204, 205, 206, 207, + 208, 209, 210, 211, 212, 213, 214, 215, 216, 217, 218, 219, 220, 221, 222, 223, + 224, 225, 226, 227, 228, 229, 230, 231, 232, 233, 234, 235, 236, 237, 238, 239, + 240, 241, 242, 243, 244, 245, 246, 247, 248, 249, 250, 251, 252, 253, 254, 255 + }; - /* pre-fill conversion table, skipping duplicates */ + /* update conversion table with from/to, skipping duplicates */ { const unsigned char *conv_to = f2->data; const unsigned char *conv_from = f1->data; - const unsigned char * const conv_from_end = f1->data + f1->size; + const unsigned char * const conv_from_end = conv_from + f1->size; + char conv_set[256] = { 0 }; while (conv_from < conv_from_end) { if (conv_set[*conv_from] == 0) { conv_set[*conv_from] = 1; @@ -665,11 +706,9 @@ cob_inspect_converting (const cob_field *f1, const cob_field *f2) conv_from++, conv_to++; } } - /* iterate over target converting with table */ + /* iterate over target converting with full table */ while (cur_data < cur_data_end) { - if (conv_set[*cur_data]) { - *cur_data = conv_tab[*cur_data]; - } + *cur_data = conv_tab[*cur_data]; cur_data++; } #else @@ -696,8 +735,39 @@ cob_inspect_converting (const cob_field *f1, const cob_field *f2) #endif } +end: /* note: copied here for 3.2+ as cob_inspect_finish is not generated for TRANSFORM/INSPECT CONVERTING any more */ + if (inspect_var) { + /* FIXME: needs test cases for all "goto end" cases above, + ideally with a SIGN SEPARATE variable */ + cob_real_put_sign (inspect_var, inspect_sign); + } +} + +/* note: currently not used by cobc (disabled unfinished prototype) */ +void +cob_inspect_translating (const unsigned char *conv_table) +{ + const size_t inspect_len = inspect_end - inspect_start; + + if (inspect_len == 0) { + /* our task is to convert either a zero-length field or + AFTER ... has not found a place to start the conversion + --> nothing to do here */ + } else { + /* directly convert _all_ positions of the inspect target using the + pre-generated conversion table */ + unsigned char * cur_data = inspect_data + (inspect_start - inspect_data); + unsigned char * const cur_data_end = cur_data + inspect_len; + + /* iterate over target converting with full table */ + while (cur_data < cur_data_end) { + *cur_data = conv_table[*cur_data]; + cur_data++; + } + } + if (inspect_var) { cob_real_put_sign (inspect_var, inspect_sign); } @@ -734,6 +804,13 @@ cob_inspect_finish (void) } /* STRING */ +/* a STRING is split into multiple parts: + one-time cob_string_init (setting up memory and static variables) + 1..n : + cob_string_delimited (setting delimiter struct entries) + 1..n: + cob_string_append (to handle a single source) + one-time cob_string_finish (setting the string pointer) */ void cob_string_init (cob_field *dst, cob_field *ptr) @@ -760,10 +837,11 @@ cob_string_init (cob_field *dst, cob_field *ptr) void cob_string_delimited (cob_field *dlm) { - string_dlm = NULL; if (dlm) { string_dlm_copy = *dlm; string_dlm = &string_dlm_copy; + } else { + string_dlm = NULL; } } diff --git a/libcob/version.h b/libcob/version.h index c10bd016e..bcaa7a593 100644 --- a/libcob/version.h +++ b/libcob/version.h @@ -1,5 +1,5 @@ /* - Copyright (C) 2020-2022 Free Software Foundation, Inc. + Copyright (C) 2020-2023 Free Software Foundation, Inc. Written by Simon Sobisch This file is part of GnuCOBOL. @@ -21,7 +21,7 @@ #ifndef COB_VERSION_H #define __LIBCOB_VERSION 3 -#define __LIBCOB_VERSION_MINOR 2 +#define __LIBCOB_VERSION_MINOR 3 #define __LIBCOB_VERSION_PATCHLEVEL 0 /* Note: possibly differs from patchelvel shown with cobc --version! */ #define __LIBCOB_RELEASE (__LIBCOB_VERSION * 10000 + __LIBCOB_VERSION_MINOR * 100 + __LIBCOB_VERSION_PATCHLEVEL) diff --git a/po/de.po b/po/de.po index 3192a2891..30f234f33 100644 --- a/po/de.po +++ b/po/de.po @@ -1,7 +1,7 @@ # German translations for GnuCOBOL package -# Copyright (C) 2002-2020 Free Software Foundation, Inc. +# Copyright (C) 2020 Free Software Foundation, Inc. # This file is distributed under the same license as the gnucobol package. -# Simon Sobisch , 2013. +# Simon Sobisch , 2013. # Mario Blättermann , 2017. # Roland Illig , 2019-2020. # Christian Kirbach , 2020. @@ -10,7 +10,7 @@ msgid "" msgstr "" "Project-Id-Version: gnucobol-3.1\n" "Report-Msgid-Bugs-To: gnucobol-messages@gnu.org\n" -"POT-Creation-Date: 2022-10-23 03:06+0200\n" +"POT-Creation-Date: 2023-07-28 19:20+0200\n" "PO-Revision-Date: 2020-11-21 21:50+0100\n" "Last-Translator: Christian Kirbach \n" "Language-Team: German \n" @@ -22,171 +22,177 @@ msgstr "" "X-Poedit-Basepath: ..\n" "X-Generator: Poedit 2.4.1\n" -#: cobc/cobc.c:98 +#: cobc/cobc.c:116 cobc/codegen.c:2655 cobc/scanner.l:1375 #, c-format msgid "invalid parameter: %s" msgstr "Ungültiger Parameter: %s" -#: cobc/cobc.c:153 cobc/cobc.c:2233 cobc/cobc.c:2236 cobc/parser.y:802 -#: cobc/reserved.c:4022 libcob/common.c:226 libcob/common.c:1308 -#: libcob/common.c:2384 libcob/common.c:2388 libcob/common.c:2426 -#: libcob/common.c:2464 libcob/common.c:2654 libcob/common.c:7351 -#: libcob/common.c:8370 libcob/common.c:9391 libcob/common.c:9470 -#: libcob/common.c:9912 +#: cobc/cobc.c:171 cobc/cobc.c:2392 cobc/cobc.c:2395 cobc/parser.y:895 +#: cobc/reserved.c:4039 libcob/common.c:235 libcob/common.c:1369 +#: libcob/common.c:2698 libcob/common.c:2702 libcob/common.c:2740 +#: libcob/common.c:2778 libcob/common.c:2939 libcob/common.c:8159 +#: libcob/common.c:9191 libcob/common.c:10209 libcob/common.c:10284 +#: libcob/common.c:10731 msgid "unknown" msgstr "Unbekannt" -#: cobc/cobc.c:855 +#: cobc/cobc.c:905 msgid "internal compiler error" msgstr "Interner Compiler-Fehler" -#: cobc/cobc.c:921 cobc/cobc.c:1008 cobc/cobc.c:1070 cobc/cobc.c:1146 -#: cobc/cobc.c:1186 cobc/cobc.c:1262 +#: cobc/cobc.c:971 cobc/cobc.c:1058 cobc/cobc.c:1120 cobc/cobc.c:1196 +#: cobc/cobc.c:1236 cobc/cobc.c:1312 #, c-format msgid "cannot allocate %d bytes of memory" msgstr "Nicht möglich, %d Bytes Arbeitsspeicher bereitzustellen" -#: cobc/cobc.c:934 cobc/cobc.c:950 cobc/cobc.c:970 cobc/cobc.c:1029 -#: cobc/cobc.c:1048 cobc/cobc.c:1166 cobc/cobc.c:1281 cobc/cobc.c:1323 -#: cobc/field.c:2216 libcob/common.c:8191 +#: cobc/cobc.c:984 cobc/cobc.c:1000 cobc/cobc.c:1020 cobc/cobc.c:1079 +#: cobc/cobc.c:1098 cobc/cobc.c:1216 cobc/cobc.c:1331 cobc/cobc.c:1415 +#: cobc/field.c:2346 libcob/common.c:9012 #, c-format msgid "call to %s with NULL pointer" msgstr "Aufruf von %s mit NULL-Zeiger" -#: cobc/cobc.c:991 +#: cobc/cobc.c:1041 #, c-format msgid "cannot reallocate %d bytes of memory" msgstr "Nicht möglich, %d Bytes Arbeitsspeicher neu bereitzustellen" -#: cobc/cobc.c:1087 cobc/cobc.c:1203 +#: cobc/cobc.c:1137 cobc/cobc.c:1253 msgid "attempt to reallocate non-allocated memory" msgstr "Versuch, nicht bereitgestellten Arbeitsspeicher neu bereitzustellen" -#: cobc/cobc.c:1120 cobc/cobc.c:1236 +#: cobc/cobc.c:1170 cobc/cobc.c:1286 #, c-format msgid "call to %s with invalid pointer, as it is missing in list" msgstr "Aufruf von %s mit ungültigem Zeiger, da er in der Liste fehlt" -#: cobc/cobc.c:1448 +#: cobc/cobc.c:1540 #, c-format msgid "assuming literal for unquoted '%s'" msgstr "Für '%s' ohne Anführungszeichen wird ein Literal angenommen" -#: cobc/cobc.c:1495 +#: cobc/cobc.c:1587 msgid " - length exceeds maximum" msgstr " - Länge überschreitet Maximum" -#: cobc/cobc.c:1499 +#: cobc/cobc.c:1591 msgid " - name cannot be empty" msgstr " - Name darf nicht leer sein" -#: cobc/cobc.c:1502 -msgid " - name cannot begin with space or underscore" +#: cobc/cobc.c:1594 +#, fuzzy +#| msgid " - name cannot begin with space or underscore" +msgid " - name cannot begin with space or hyphen" msgstr " - Name darf nicht mit einem Leerzeichen oder Unterstrich beginnen" -#: cobc/cobc.c:1505 +#: cobc/cobc.c:1597 msgid " - name cannot begin with 'cob_' or 'COB_'" msgstr " - Name darf nicht mit »cob_« oder »COB_« beginnen" -#: cobc/cobc.c:1508 +#: cobc/cobc.c:1600 msgid " - name duplicates a 'C' keyword" msgstr " - Name entspricht einem »C«-Schlüsselwort" -#: cobc/cobc.c:1511 +#: cobc/cobc.c:1603 msgid " - name cannot contain a directory separator" msgstr " - Name darf kein Pfad-Trennzeichen enthalten" -#: cobc/cobc.c:1520 +#: cobc/cobc.c:1612 #, c-format msgid "invalid file base name '%s'%s" msgstr "Ungültiger Basisname »%s«%s" -#: cobc/cobc.c:1524 +#: cobc/cobc.c:1616 #, c-format msgid "invalid ENTRY '%s'%s" msgstr "Ungültiger ENTRY »%s«%s" -#: cobc/cobc.c:1527 +#: cobc/cobc.c:1619 #, c-format msgid "invalid PROGRAM-ID '%s'%s" msgstr "Ungültige PROGRAM-ID »%s«%s" -#: cobc/cobc.c:1659 +#: cobc/cobc.c:1751 #, c-format msgid "file '%s' does not exist" msgstr "Die Datei »%s« existiert nicht" -#: cobc/cobc.c:1685 +#: cobc/cobc.c:1777 #, c-format msgid "duplicate exception '%s'" msgstr "Doppelte Ausnahme »%s«" -#: cobc/cobc.c:1733 +#: cobc/cobc.c:1825 #, c-format msgid "invalid exception-name: %s" msgstr "Ungültiger Ausnahme-Name: %s" -#: cobc/cobc.c:1870 cobc/cobc.c:8780 +#: cobc/cobc.c:1998 cobc/cobc.c:9211 msgid "please check environment variables as noted above" msgstr "Bitte prüfen Sie die Umgebungsvariablen, wie oben angegeben" -#: cobc/cobc.c:1882 cobc/error.c:348 cobc/error.c:382 cobc/error.c:408 -#: cobc/error.c:411 cobc/error.c:477 cobc/error.c:631 cobc/error.c:675 -#: cobc/error.c:779 cobc/error.c:782 +#: cobc/cobc.c:2010 cobc/error.c:140 msgid "error: " msgstr "Fehler: " -#: cobc/cobc.c:1905 +#: cobc/cobc.c:2033 #, c-format msgid "duplicate DEFINE '%s' - ignored" msgstr "doppeltes DEFINE »%s« – ignoriert" -#: cobc/cobc.c:1958 +#: cobc/cobc.c:2086 #, c-format msgid "environment variable '%s' is '%s'; should not contain '%c'" msgstr "Umgebungsvariable »%s« ist »%s«; sollte kein »%c« enthalten" -#: cobc/cobc.c:1988 +#: cobc/cobc.c:2116 msgid "parameter buffer size exceeded" msgstr "Parameter-Buffer überschritten" -#: cobc/cobc.c:2028 +#: cobc/cobc.c:2156 #, c-format msgid "warning: could not move temporary file to %s" msgstr "Warnung: Temporäre Datei konnte nicht nach %s verschoben werden" -#: cobc/cobc.c:2239 +#: cobc/cobc.c:2329 +#, fuzzy, c-format +#| msgid "environment variable '%s' is '%s'; should not contain '%c'" +msgid "environment variable '%s' has invalid content" +msgstr "Umgebungsvariable »%s« ist »%s«; sollte kein »%c« enthalten" + +#: cobc/cobc.c:2398 #, c-format msgid "aborting compile of %s at line %d (%s: %s)" msgstr "Compilieren von %s wird in Zeile %d abgebrochen (%s:%s)" -#: cobc/cobc.c:2243 +#: cobc/cobc.c:2402 #, fuzzy, c-format #| msgid "aborting compile of %s at line %d (%s: %s)" msgid "aborting codegen for %s, last statement at line %d (%s: %s)" msgstr "Compilieren von %s wird in Zeile %d abgebrochen (%s:%s)" -#: cobc/cobc.c:2246 +#: cobc/cobc.c:2405 #, c-format msgid "aborting codegen for %s (%s: %s)" msgstr "Codegenerierung für %s wird abgebrochen (%s:%s)" -#: cobc/cobc.c:2251 +#: cobc/cobc.c:2410 msgid "aborting" msgstr "Abbruch" -#: cobc/cobc.c:2329 libcob/common.c:2823 libcob/common.c:8149 bin/cobcrun.c:375 +#: cobc/cobc.c:2488 libcob/common.c:3107 libcob/common.c:8970 bin/cobcrun.c:373 #, c-format msgid "Please report this!" msgstr "Bitte melden Sie das!" -#: cobc/cobc.c:2346 bin/cobcrun.c:100 +#: cobc/cobc.c:2505 bin/cobcrun.c:100 #, fuzzy, c-format #| msgid "License GPLv3+: GNU GPL version 3 or later " msgid "License GPLv3+: GNU GPL version 3 or later <%s>" msgstr "Lizenz GPLv3+: GNU GPL Version 3 oder neuer " -#: cobc/cobc.c:2348 libcob/common.c:8741 bin/cobcrun.c:102 +#: cobc/cobc.c:2507 libcob/common.c:9558 bin/cobcrun.c:102 msgid "" "This is free software; see the source for copying conditions. There is NO\n" "warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." @@ -194,398 +200,404 @@ msgstr "" "Dies ist freie Software; die Kopierbedingungen stehen in den Quellen. Es gibt\n" "KEINE Garantie; auch nicht für MARKTGÄNGIGKEIT oder FÜR SPEZIELLE ZWECKE." -#: cobc/cobc.c:2350 libcob/common.c:8743 bin/cobcrun.c:104 +#: cobc/cobc.c:2509 libcob/common.c:9560 bin/cobcrun.c:104 #, fuzzy, c-format #| msgid "Written by %s\n" msgid "Written by %s" msgstr "Geschrieben von %s\n" #. TRANSLATORS: This msgid is intended as the "Packaged" msgid, %s expands to date and time -#: cobc/cobc.c:2352 cobc/cobc.c:2365 libcob/common.c:8747 bin/cobcrun.c:106 +#: cobc/cobc.c:2511 cobc/cobc.c:2524 libcob/common.c:9564 bin/cobcrun.c:106 #, c-format msgid "Built %s" msgstr "Erstellt %s" #. TRANSLATORS: This msgid is intended as the "Built" msgid, %s expands to date and time -#: cobc/cobc.c:2354 cobc/cobc.c:2367 libcob/common.c:8750 bin/cobcrun.c:108 +#: cobc/cobc.c:2513 cobc/cobc.c:2526 libcob/common.c:9567 bin/cobcrun.c:108 #, c-format msgid "Packaged %s" msgstr "Gepackt %s" -#: cobc/cobc.c:2356 cobc/cobc.c:2369 cobc/cobc.c:2478 libcob/common.c:8787 +#: cobc/cobc.c:2515 cobc/cobc.c:2528 cobc/cobc.c:2637 libcob/common.c:9604 msgid "C version" msgstr "C-Version" -#: cobc/cobc.c:2382 +#: cobc/cobc.c:2541 libcob/common.c:1075 msgid "executing:" msgstr "Wird ausgeführt:" -#: cobc/cobc.c:2384 +#: cobc/cobc.c:2543 msgid "to be executed:" msgstr "zum Ausführen:" -#: cobc/cobc.c:2422 cobc/cobc.c:2423 libcob/common.c:6834 libcob/common.c:6835 -#: libcob/common.c:6866 libcob/common.c:6867 +#: cobc/cobc.c:2581 cobc/cobc.c:2582 libcob/common.c:7632 libcob/common.c:7633 +#: libcob/common.c:7664 libcob/common.c:7665 msgid "env" msgstr "Umg." -#: cobc/cobc.c:2474 libcob/common.c:8783 +#: cobc/cobc.c:2633 libcob/common.c:9600 msgid "build information" msgstr "Build-Informationen" -#: cobc/cobc.c:2475 libcob/common.c:8784 +#: cobc/cobc.c:2634 libcob/common.c:9601 msgid "build environment" msgstr "Build-Umgebung" -#: cobc/cobc.c:2484 libcob/common.c:8794 +#: cobc/cobc.c:2643 libcob/common.c:9611 msgid "GnuCOBOL information" msgstr "GnuCOBOL-Information" -#: cobc/cobc.c:2492 cobc/cobc.c:2575 cobc/cobc.c:2591 libcob/common.c:8410 -#: libcob/common.c:8777 libcob/common.c:8778 libcob/common.c:8812 -#: libcob/common.c:8878 libcob/common.c:8900 libcob/common.c:8934 +#: cobc/cobc.c:2651 cobc/cobc.c:2739 cobc/cobc.c:2755 libcob/common.c:9233 +#: libcob/common.c:9594 libcob/common.c:9595 libcob/common.c:9629 +#: libcob/common.c:9695 libcob/common.c:9717 libcob/common.c:9751 msgid "disabled" msgstr "Deaktiviert" -#: cobc/cobc.c:2523 cobc/cobc.c:2541 libcob/common.c:7397 libcob/common.c:8400 -#: libcob/common.c:8407 libcob/common.c:8816 libcob/common.c:8834 +#: cobc/cobc.c:2687 cobc/cobc.c:2705 libcob/common.c:8179 libcob/common.c:9221 +#: libcob/common.c:9230 libcob/common.c:9633 libcob/common.c:9651 msgid "yes" msgstr "ja" -#: cobc/cobc.c:2525 cobc/cobc.c:2543 libcob/common.c:7399 libcob/common.c:8402 -#: libcob/common.c:8818 libcob/common.c:8836 +#: cobc/cobc.c:2689 cobc/cobc.c:2707 libcob/common.c:8181 libcob/common.c:9223 +#: libcob/common.c:9635 libcob/common.c:9653 msgid "no" msgstr "nein" -#: cobc/cobc.c:2529 libcob/common.c:8822 +#: cobc/cobc.c:2693 libcob/common.c:9639 msgid "8 bytes" msgstr "8 Bytes" -#: cobc/cobc.c:2531 libcob/common.c:8824 +#: cobc/cobc.c:2695 libcob/common.c:9641 msgid "4 bytes" msgstr "4 Bytes" -#: cobc/cobc.c:2535 cobc/cobc.c:2537 libcob/common.c:8828 libcob/common.c:8830 +#: cobc/cobc.c:2699 cobc/cobc.c:2701 libcob/common.c:9645 libcob/common.c:9647 msgid "endianness" msgstr "Bytereihenfolge" -#: cobc/cobc.c:2535 libcob/common.c:8828 +#: cobc/cobc.c:2699 libcob/common.c:9645 msgid "big-endian" msgstr "Big-Endian" -#: cobc/cobc.c:2537 libcob/common.c:8830 +#: cobc/cobc.c:2701 libcob/common.c:9647 msgid "little-endian" msgstr "Little-Endian" -#: cobc/cobc.c:2541 cobc/cobc.c:2543 libcob/common.c:8834 libcob/common.c:8836 +#: cobc/cobc.c:2705 cobc/cobc.c:2707 libcob/common.c:9651 libcob/common.c:9653 msgid "native EBCDIC" msgstr "Natives EBCDIC" -#: cobc/cobc.c:2546 libcob/common.c:8937 +#: cobc/cobc.c:2710 libcob/common.c:9754 msgid "extended screen I/O" msgstr "Erweiterte Bildschirm-Ein-/Ausgabe" # https://sourceforge.net/p/open-cobol/bugs/654/ -#: cobc/cobc.c:2549 libcob/common.c:8840 +#: cobc/cobc.c:2713 libcob/common.c:9657 msgid "variable file format" msgstr "Dateiformat für Variablen" -#: cobc/cobc.c:2555 cobc/cobc.c:2557 libcob/common.c:8846 libcob/common.c:8848 +#: cobc/cobc.c:2719 cobc/cobc.c:2721 libcob/common.c:9663 libcob/common.c:9665 msgid "sequential file handler" msgstr "Verarbeitung sequenzieller Dateien" -#: cobc/cobc.c:2557 libcob/common.c:8848 +#: cobc/cobc.c:2721 libcob/common.c:9665 msgid "built-in" msgstr "eingebaut" -#: cobc/cobc.c:2561 cobc/cobc.c:2563 cobc/cobc.c:2565 cobc/cobc.c:2567 -#: cobc/cobc.c:2570 cobc/cobc.c:2572 cobc/cobc.c:2575 libcob/common.c:8852 -#: libcob/common.c:8866 libcob/common.c:8868 libcob/common.c:8870 -#: libcob/common.c:8873 libcob/common.c:8875 libcob/common.c:8878 +#: cobc/cobc.c:2725 cobc/cobc.c:2727 cobc/cobc.c:2729 cobc/cobc.c:2731 +#: cobc/cobc.c:2734 cobc/cobc.c:2736 cobc/cobc.c:2739 libcob/common.c:9669 +#: libcob/common.c:9683 libcob/common.c:9685 libcob/common.c:9687 +#: libcob/common.c:9690 libcob/common.c:9692 libcob/common.c:9695 #, fuzzy #| msgid "ISAM file handler" msgid "indexed file handler" msgstr "ISAM-Dateiverarbeitung" -#: cobc/cobc.c:2580 cobc/cobc.c:2582 cobc/cobc.c:2585 libcob/common.c:8884 +#: cobc/cobc.c:2744 cobc/cobc.c:2746 cobc/cobc.c:2749 libcob/common.c:9701 msgid "mathematical library" msgstr "Mathematische Bibliothek" -#: cobc/cobc.c:2589 cobc/cobc.c:2591 libcob/common.c:8895 libcob/common.c:8900 +#: cobc/cobc.c:2753 cobc/cobc.c:2755 libcob/common.c:9712 libcob/common.c:9717 msgid "XML library" msgstr "XML-Bibliothek" -#: cobc/cobc.c:2594 libcob/common.c:8917 libcob/common.c:8932 -#: libcob/common.c:8934 +#: cobc/cobc.c:2758 libcob/common.c:9734 libcob/common.c:9749 +#: libcob/common.c:9751 msgid "JSON library" msgstr "JSON-Bibliothek" -#: cobc/cobc.c:2597 libcob/common.c:8810 libcob/common.c:8941 +#: cobc/cobc.c:2761 libcob/common.c:9627 libcob/common.c:9758 msgid "enabled" msgstr "Aktiviert" -#: cobc/cobc.c:2604 +#: cobc/cobc.c:2768 msgid "only one of options 'E', 'S', 'C', 'c' may be specified" msgstr "Nur eine der Optionen »E«, »S«, »C« oder »c« kann angegeben werden" -#: cobc/cobc.c:2610 +#: cobc/cobc.c:2774 msgid "only one of options 'm', 'x', 'b' may be specified" msgstr "Nur eine der Optionen »m«, »x« oder »b« kann angegeben werden" -#: cobc/cobc.c:2652 +#: cobc/cobc.c:2816 #, fuzzy, c-format #| msgid "-fdump= requires one of 'ALL', 'FD', 'WS', 'LS', 'RD', 'FD', 'SC' not '%s'" msgid "option requires one of 'ALL', 'FD', 'WS', 'LS', 'RD', 'FD', 'SC', 'LO' - not '%s'" msgstr "-fdump= benötigt eine von »ALL«, »FD«, »WS«, »LS«, »RD«, »FD«, »SC«, nicht jedoch »%s«" -#: cobc/cobc.c:2682 +#: cobc/cobc.c:2846 #, c-format msgid "'%s' is not an intrinsic function" msgstr "»%s« ist keine intrinsische Funktion" -#: cobc/cobc.c:2726 cobc/cobc.c:8094 cobc/cobc.c:8213 cobc/codegen.c:3783 -#: cobc/codegen.c:3884 cobc/codegen.c:5571 cobc/codegen.c:5700 -#: cobc/codegen.c:13034 cobc/tree.c:1391 cobc/tree.c:4497 cobc/tree.c:5067 -#: cobc/tree.c:5316 cobc/typeck.c:4344 cobc/typeck.c:9044 cobc/typeck.c:9079 -#: cobc/typeck.c:9977 cobc/typeck.c:12619 cobc/typeck.c:12690 -#: cobc/typeck.c:12758 cobc/typeck.c:13043 cobc/typeck.c:13086 -#: libcob/fileio.c:9703 libcob/fileio.c:9714 +#: cobc/cobc.c:2889 cobc/cobc.c:8507 cobc/cobc.c:8626 cobc/codegen.c:3761 +#: cobc/codegen.c:3864 cobc/codegen.c:5671 cobc/codegen.c:5816 +#: cobc/codegen.c:13429 cobc/parser.y:391 cobc/tree.c:1397 cobc/tree.c:4565 +#: cobc/tree.c:5135 cobc/tree.c:5392 cobc/typeck.c:4497 cobc/typeck.c:9504 +#: cobc/typeck.c:9541 cobc/typeck.c:10418 cobc/typeck.c:13395 +#: cobc/typeck.c:13469 cobc/typeck.c:13537 cobc/typeck.c:13825 +#: cobc/typeck.c:13887 libcob/fileio.c:10094 libcob/fileio.c:10105 #, c-format msgid "call to '%s' with invalid parameter '%s'" msgstr "Aufruf von »%s« mit ungültigem Parameter »%s«" -#: cobc/cobc.c:3136 +#: cobc/cobc.c:3300 msgid "loading standard configuration file 'default.conf'" msgstr "Standard-Konfigurationsdatei »default.conf« wird geladen" -#: cobc/cobc.c:3217 +#: cobc/cobc.c:3387 msgid "the used C compiler is known to not be able to generate assembler code" msgstr "" -#: cobc/cobc.c:3299 +#: cobc/cobc.c:3469 msgid "invalid output file name" msgstr "Ungültiger Ausgabename" -#: cobc/cobc.c:3361 +#: cobc/cobc.c:3531 #, c-format msgid "warning: '%s' is not a directory, defaulting to current directory" msgstr "Warnung: »%s« ist kein Verzeichnis, aktuelles Verzeichnis wird verwendet" -#: cobc/cobc.c:3388 +#: cobc/cobc.c:3558 #, c-format msgid "warning: %d lines per listing page specified, using %d" msgstr "Warnung: %d Zeilen pro Listingseite angegeben, %d wird verwendet" -#: cobc/cobc.c:3438 +#: cobc/cobc.c:3615 #, c-format msgid "warning: assuming '%s' is a DEFINE - did you intend to use -debug?" msgstr "Warnung: »%s« wird als DEFINE angenommen, sollte -debug verwendet werden?" -#: cobc/cobc.c:3699 cobc/cobc.c:3724 cobc/cobc.c:3752 +#: cobc/cobc.c:3661 cobc/cobc.c:3702 cobc/cobc.c:4281 +#, fuzzy, c-format +#| msgid "ignoring invalid directive: '%s'" +msgid "ignoring nonexistent directory \"%s\"" +msgstr "Ungültige Anweisung wird ignoriert: »%s«" + +#: cobc/cobc.c:3943 cobc/cobc.c:3968 cobc/cobc.c:3996 #, c-format msgid "unknown warning option '%s'" msgstr "Unbekannte Warnungsoption »%s«" -#: cobc/cobc.c:3813 +#: cobc/cobc.c:4063 #, c-format msgid "%s option requires a listing file" msgstr "%s: Option erfordert eine Listendatei" -#: cobc/cobc.c:3820 +#: cobc/cobc.c:4070 msgid "output to stdout only valid for preprocess" msgstr "Nur bei der Vorverarbeitung ist es möglich, die Ausgabe auf die Standardausgabe zu schreiben" -#: cobc/cobc.c:3829 +#: cobc/cobc.c:4085 +msgid "-MT must be given to specify target file" +msgstr "" + +#: cobc/cobc.c:4091 msgid "all runtime checks are enabled" msgstr "Alle Laufzeitüberprüfungen sind aktiviert" -#: cobc/cobc.c:4030 +#: cobc/cobc.c:4316 msgid "only one stdin input allowed" msgstr "Es ist maximal 1 Standardeingabe erlaubt" -#: cobc/cobc.c:4040 +#: cobc/cobc.c:4326 #, c-format msgid "invalid file name parameter (length > %d)" msgstr "Ungültiger Dateinamensparameter (Länge > %d)" -#: cobc/cobc.c:4270 +#: cobc/cobc.c:4559 msgid "return status:" msgstr "Rückgabestatus:" -#: cobc/cobc.c:4306 libcob/common.c:5711 +#: cobc/cobc.c:4595 libcob/common.c:6391 #, c-format msgid "external process \"%s\" ended with signal %s (%d)" msgstr "Externer Prozess »%s« wurde mit Signal %s (%d) beendet" -#: cobc/cobc.c:4364 +#: cobc/cobc.c:4654 msgid "nothing for -j to run" msgstr "Für -j gibt es nichts zu tun" -#: cobc/cobc.c:4406 cobc/cobc.c:4420 +#: cobc/cobc.c:4697 cobc/cobc.c:4711 #, fuzzy, c-format #| msgid "... removed from environment" msgid "%s is resolved by environment as: %s" msgstr "… aus der Umgebung entfernt" -#: cobc/cobc.c:4882 +#: cobc/cobc.c:5175 msgid "preprocessing:" msgstr "Aufbereitung:" -#: cobc/cobc.c:4952 +#: cobc/cobc.c:5244 msgid "'cobxref' execution unsuccessful" msgstr "Ausführung von »cobxref« nicht erfolgreich" -#: cobc/cobc.c:4955 +#: cobc/cobc.c:5247 #, c-format msgid "check that 'cobxref' is in %s" msgstr "Überprüfen Sie, ob »cobxref« in %s enthalten ist" -#: cobc/cobc.c:4957 +#: cobc/cobc.c:5249 msgid "no listing produced" msgstr "Es wurde kein Listing erzeugt" -#: cobc/cobc.c:5882 cobc/cobc.c:5921 +#: cobc/cobc.c:6234 cobc/cobc.c:6273 msgid "No fields defined." msgstr "Keine Felder definiert." -#: cobc/cobc.c:5941 +#: cobc/cobc.c:6293 msgid "No labels defined." msgstr "Keine Sprungmarken definiert." -#: cobc/cobc.c:5963 +#: cobc/cobc.c:6324 cobc/cobc.c:9292 +msgid "command line:" +msgstr "Befehlszeile:" + +#: cobc/cobc.c:6342 msgid "Error/Warning summary:" msgstr "Zusammenfassung der Fehler und Warnungen:" # https://sourceforge.net/p/open-cobol/bugs/655/ -#: cobc/cobc.c:6006 +#: cobc/cobc.c:6385 msgid "0 warnings in compilation group" msgstr "0 Warnungen in Übersetzungsgruppe" # https://sourceforge.net/p/open-cobol/bugs/655/ -#: cobc/cobc.c:6010 +#: cobc/cobc.c:6389 msgid "1 warning in compilation group" msgstr "1 Warnung in Übersetzungsgruppe" # https://sourceforge.net/p/open-cobol/bugs/655/ -#: cobc/cobc.c:6014 +#: cobc/cobc.c:6393 #, c-format msgid "%d warnings in compilation group" msgstr "%d Warnungen in Übersetzungsgruppe" -#: cobc/cobc.c:6020 +#: cobc/cobc.c:6399 msgid "0 errors in compilation group" msgstr "" -#: cobc/cobc.c:6024 +#: cobc/cobc.c:6403 msgid "1 error in compilation group" msgstr "" -#: cobc/cobc.c:6028 +#: cobc/cobc.c:6407 #, c-format msgid "%d errors in compilation group" msgstr "" -#: cobc/cobc.c:6034 +#: cobc/cobc.c:6413 #, c-format msgid "Too many errors in compilation group: %d maximum errors" msgstr "" -#: cobc/cobc.c:6632 +#: cobc/cobc.c:7028 #, c-format msgid "%s:%d: too many continuation lines" msgstr "" -#: cobc/cobc.c:7552 +#: cobc/cobc.c:7956 msgid "parsing:" msgstr "Analyse:" -#: cobc/cobc.c:7612 +#: cobc/cobc.c:8017 msgid "translating:" msgstr "Übersetzung:" -#: cobc/cobc.c:8786 +#: cobc/cobc.c:9217 msgid "no input files" msgstr "Keine Eingabedateien" -#: cobc/cobc.c:8816 +#: cobc/cobc.c:9248 #, c-format msgid "%s option invalid in this combination" msgstr "Die Option %s ist in dieser Kombination ungültig" -#: cobc/cobc.c:8857 -msgid "command line:" -msgstr "Befehlszeile:" - -#: cobc/codegen.c:1041 cobc/codegen.c:4463 cobc/codegen.c:11648 -#: cobc/codegen.c:12186 +#: cobc/codegen.c:1040 cobc/codegen.c:4506 cobc/codegen.c:11910 +#: cobc/codegen.c:12467 msgid "unexpected CONSTANT item" msgstr "Unerwartetes CONSTANT-Element" -#: cobc/codegen.c:2981 cobc/codegen.c:3261 cobc/codegen.c:8523 cobc/tree.c:1413 +#: cobc/codegen.c:2921 cobc/codegen.c:3207 cobc/codegen.c:8866 cobc/tree.c:1419 #, fuzzy, c-format msgid "unexpected cast type: %d" msgstr "Unerwartete Typumwandlung %d" -#: cobc/codegen.c:3713 cobc/codegen.c:4413 +#: cobc/codegen.c:3690 cobc/codegen.c:4455 #, c-format msgid "internal statement stack depth exceeded: %d" msgstr "" -#: cobc/codegen.c:3785 +#: cobc/codegen.c:3763 #, c-format msgid "%s is not a field" msgstr "" -#: cobc/codegen.c:4186 cobc/codegen.c:4257 +#: cobc/codegen.c:4177 cobc/codegen.c:4279 #, c-format msgid "unexpected function: %s" msgstr "Unerwartete Funktion: %s" -#: cobc/codegen.c:5204 +#: cobc/codegen.c:5256 #, c-format msgid "unexpected tree category: %d" msgstr "Unerwartete Baum-Kategorie: %d" -#: cobc/codegen.c:5971 +#: cobc/codegen.c:6108 #, c-format msgid "unexpected size: %d" msgstr "Unerwartete Größe: %d" -#: cobc/codegen.c:7595 +#: cobc/codegen.c:7894 #, c-format msgid "No ENTRY FOR GO TO '%s'" msgstr "" -#: cobc/codegen.c:7816 cobc/codegen.c:8163 +#: cobc/codegen.c:8283 cobc/codegen.c:8609 #, c-format msgid "unexpected handler type: %d" msgstr "Unerwartete Handler-Typ: %d" -#: cobc/codegen.c:8254 -msgid "unexpected error_node parameter" -msgstr "Unerwarteter error_node-Parameter" - -#: cobc/codegen.c:8544 +#: cobc/codegen.c:8887 #, c-format msgid "unexpected tree type: %d" msgstr "Unerwarteter Baum-Typ: %d" -#: cobc/codegen.c:9520 +#: cobc/codegen.c:9776 msgid "Nested OCCURS in report" msgstr "" -#: cobc/codeoptim.c:2777 +#: cobc/codeoptim.c:2856 #, c-format msgid "unexpected optimization value: %d" msgstr "Unerwarteter Wert für die Optimierung: %d" -#: cobc/config.c:164 libcob/common.c:7824 libcob/common.c:7838 -#: libcob/common.c:8315 +#: cobc/config.c:164 libcob/common.c:8639 libcob/common.c:8653 +#: libcob/common.c:9136 #, c-format msgid "invalid value '%s' for configuration tag '%s'" msgstr "Unerwarteter Wert »%s« für Konfigurationseintrag »%s«" -#: cobc/config.c:167 libcob/common.c:7117 libcob/common.c:7234 +#: cobc/config.c:167 libcob/common.c:7915 libcob/common.c:7939 #, c-format msgid "should be one of the following values: %s" msgstr "" @@ -594,7 +606,7 @@ msgstr "" msgid "must be numeric" msgstr "muss numerisch sein" -#: cobc/config.c:171 libcob/common.c:7215 +#: cobc/config.c:171 libcob/common.c:8045 #, c-format msgid "maximum value: %lu" msgstr "Maximalwert: %lu" @@ -609,46 +621,46 @@ msgstr "Minimalwert: %d" msgid "unsupported value '%s' for configuration tag '%s'" msgstr "Nicht unterstützter Wert »%s« für Konfigurationseintrag »%s«" -#: cobc/config.c:318 cobc/pplex.l:1185 libcob/common.c:7739 +#: cobc/config.c:319 cobc/pplex.l:1264 libcob/common.c:8554 msgid "recursive inclusion" msgstr "" -#: cobc/config.c:393 libcob/common.c:7791 +#: cobc/config.c:394 libcob/common.c:8606 #, fuzzy msgid "configuration file was included here" msgstr "Ungültige Konfiguration '%s'" -#: cobc/config.c:422 +#: cobc/config.c:423 #, c-format msgid "The previous loaded configuration '%s' will be discarded." msgstr "" -#: cobc/config.c:458 +#: cobc/config.c:459 msgid "missing definitions:" msgstr "Fehlende Definitionen:" -#: cobc/config.c:460 +#: cobc/config.c:461 #, c-format msgid "\tno definition of '%s'" msgstr "\tFehlende Definition von »%s«" -#: cobc/config.c:523 +#: cobc/config.c:524 #, c-format msgid "invalid configuration tag '%s'" msgstr "Ungültiger Konfigurationseintrag »%s«" -#: cobc/config.c:536 libcob/common.c:7545 libcob/common.c:7629 -#: libcob/common.c:7657 +#: cobc/config.c:537 libcob/common.c:8360 libcob/common.c:8444 +#: libcob/common.c:8472 #, c-format msgid "unknown configuration tag '%s'" msgstr "Unbekannter Konfigurationseintrag »%s«" -#: cobc/config.c:560 +#: cobc/config.c:561 #, c-format msgid "invalid configuration tag '%s' in word-list" msgstr "" -#: cobc/config.c:622 +#: cobc/config.c:623 #, c-format msgid "Could not access word list for '%s'" msgstr "" @@ -690,11 +702,11 @@ msgstr "Ungültiges numerisches Literal: »%s«" #: cobc/config.def:73 msgid "" "default initialization for fields without VALUE, may be one of\n" -" * character in quotes\n" -" * decimal 0..255 representing a character\n" -" * \"init\" to initialize to PICTURE/USAGE\n" -" * \"none\" to do no explicit initialization\n" -" * default: \"init\"" +" * character in quotes\n" +" * decimal 0..255 representing a character\n" +" * \"init\" to initialize to PICTURE/USAGE\n" +" * \"none\" to do no explicit initialization\n" +" * default: \"init\"" msgstr "" #: cobc/config.def:83 @@ -721,1112 +733,1118 @@ msgstr "" msgid "whether DECIMAL-POINT IS COMMA has effect in XML/JSON GENERATE, may be one of: none, xml, json, all" msgstr "" -#: cobc/config.def:103 -msgid "resolve file names at run time using environment variables" +#: cobc/config.def:101 +msgid "checking for subscript (only done with EC-BOUND-SUBSCRIPT active), may be one of: full, max, record" msgstr "" #: cobc/config.def:106 -msgid "alternate formatting of numeric fields" +msgid "resolve file names at run time using environment variables" msgstr "" #: cobc/config.def:109 -msgid "numeric truncation according to ANSI" +msgid "alternate formatting of numeric fields" msgstr "" #: cobc/config.def:112 +msgid "numeric truncation according to ANSI" +msgstr "" + +#: cobc/config.def:115 #, fuzzy #| msgid "'%s' cannot have OCCURS DEPENDING" -msgid "allow complex OCCURS DEPENDING ON" +msgid "allow non-standard OCCURS DEPENDING ON syntax" msgstr "»%s« kann nicht mit OCCURS DEPENDING definiert werden" -#: cobc/config.def:115 +#: cobc/config.def:118 msgid "adjust items following OCCURS DEPENDING (implies complex-odo)" msgstr "" -#: cobc/config.def:118 +#: cobc/config.def:121 +#, fuzzy +#| msgid "invalid VALUE clause" +msgid "applies JUSTIFY with VALUE clause" +msgstr "Ungültige VALUE-Klausel" + +#: cobc/config.def:124 msgid "allow REDEFINES to other than last equal level number" msgstr "" -#: cobc/config.def:121 +#: cobc/config.def:127 msgid "allow certain syntax variations (e.g. REDEFINES position)" msgstr "" -#: cobc/config.def:124 +#: cobc/config.def:130 msgid "allow zero length reference-modification (only changed with EC-BOUND-REF-MOD active)" msgstr "" -#: cobc/config.def:127 +#: cobc/config.def:133 msgid "allow non-matching level numbers" msgstr "" -#: cobc/config.def:130 +#: cobc/config.def:136 msgid "require ASSIGN USING items to be in WORKING-STORAGE" msgstr "" -#: cobc/config.def:133 +#: cobc/config.def:139 msgid "LOCAL-STORAGE SECTION implies RECURSIVE attribute" msgstr "" -#: cobc/config.def:136 +#: cobc/config.def:142 msgid "LINKAGE SECTION items remain allocated between invocations" msgstr "" -#: cobc/config.def:139 +#: cobc/config.def:145 msgid "MOVE operates as on IBM (left to right, byte by byte)" msgstr "" -#: cobc/config.def:142 +#: cobc/config.def:148 msgid "exit point of any currently executing perform is recognized if reached" msgstr "" -#: cobc/config.def:145 +#: cobc/config.def:151 msgid "limit precision in intermediate results to precision of final result (less accurate)" msgstr "" -#: cobc/config.def:148 +#: cobc/config.def:154 msgid "evaluate constant expressions at compile time" msgstr "" -#: cobc/config.def:151 +#: cobc/config.def:157 msgid "allow hexadecimal value 'F' for NUMERIC test of signed PACKED DECIMAL field" msgstr "" -#: cobc/config.def:154 +#: cobc/config.def:160 msgid "program names don't lead to a reserved identifier" msgstr "" -#: cobc/config.def:157 +#: cobc/config.def:163 msgid "set WITH UPDATE clause as default for ACCEPT dest-item, instead of WITH NO UPDATE" msgstr "" -#: cobc/config.def:160 +#: cobc/config.def:166 msgid "set WITH AUTO clause as default for ACCEPT dest-item, instead of WITH TAB" msgstr "" -#: cobc/config.def:163 +#: cobc/config.def:169 msgid "assume CONSOLE IS CRT if not set otherwise" msgstr "" -#: cobc/config.def:166 +#: cobc/config.def:172 msgid "NO-ECHO hides input with asterisks like SECURE" msgstr "" -#: cobc/config.def:169 +#: cobc/config.def:175 msgid "assume a field DISPLAY starts at LINE 0 COL 0 (i.e. at the cursor), not LINE 1 COL 1" msgstr "" -#: cobc/config.def:172 +#: cobc/config.def:178 msgid "special behaviour of DISPLAY SPACE/ALL X'01'/ALL X'02'/ALL X'07'" msgstr "" -#: cobc/config.def:175 +#: cobc/config.def:181 msgid "COMP-1 is a 16-bit signed integer" msgstr "COMP-1 ist eine 16-Bit-Glanzzahl mit Vorzeichen" -#: cobc/config.def:178 +#: cobc/config.def:184 msgid "POINTER is a 64-bit unsigned integer" msgstr "POINTER ist eine 64-Bit-Glanzzahl ohne Vorzeichen" -#: cobc/config.def:181 +#: cobc/config.def:187 msgid "imply zero in move of non-numeric literal to numeric items" msgstr "" -#: cobc/config.def:184 +#: cobc/config.def:190 msgid "implicitly define a variable if an ASSIGN DYNAMIC does not match any data item" msgstr "" -#: cobc/config.def:187 +#: cobc/config.def:193 msgid "specifying device by mnemonic" msgstr "" -#: cobc/config.def:193 +#: cobc/config.def:199 msgid "" "check contents of Area A (when reference format supports Area A enforcement),\n" -" enabled checks include:\n" -" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" -" and toplevel numbers (01 and 77) must start in Area A;\n" -" * statements must not start in Area A; and\n" -" * separator periods must not be within Area A." +" enabled checks include:\n" +" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" +" and toplevel numbers (01 and 77) must start in Area A;\n" +" * statements must not start in Area A; and\n" +" * separator periods must not be within Area A" msgstr "" -#: cobc/config.def:203 +#: cobc/config.def:209 msgid "comment paragraphs in IDENTIFICATION DIVISION (AUTHOR, DATE-WRITTEN, ...)" msgstr "" -#: cobc/config.def:207 -msgid "CONTROL DIVISION" +#: cobc/config.def:217 +msgid "" +"apply partial replacing with literal source operand even when it replaces with spaces only;\n" +" * \"skip\" prevents such replacements" msgstr "" -#: cobc/config.def:211 cobc/ppparse.y:101 cobc/ppparse.y:104 -#, fuzzy -#| msgid "numeric boolean literal" -msgid "partial replacing with literal" -msgstr "Numerisches boolesches Literal" - -#: cobc/config.def:214 +#: cobc/config.def:221 msgid "MEMORY-SIZE clause" msgstr "" -#: cobc/config.def:217 +#: cobc/config.def:224 msgid "MULTIPLE-FILE-TAPE clause" msgstr "" -#: cobc/config.def:220 +#: cobc/config.def:227 msgid "LABEL-RECORDS clause" msgstr "" -#: cobc/config.def:223 +#: cobc/config.def:230 #, fuzzy #| msgid "invalid VALUE clause" msgid "VALUE-OF clause" msgstr "Ungültige VALUE-Klausel" -#: cobc/config.def:226 +#: cobc/config.def:233 msgid "DATA-RECORDS clause" msgstr "" -#: cobc/config.def:229 +#: cobc/config.def:236 msgid "OCCURS clause on top-level" msgstr "" -#: cobc/config.def:232 cobc/parser.y:7285 +#: cobc/config.def:239 cobc/parser.y:7566 msgid "SAME AS clause" msgstr "" -#: cobc/config.def:235 cobc/parser.y:7621 +#: cobc/config.def:242 cobc/parser.y:7904 msgid "TYPE TO clause" msgstr "" -#: cobc/config.def:238 cobc/parser.y:7644 +#: cobc/config.def:245 cobc/parser.y:7927 msgid "USAGE type-name" msgstr "" -#: cobc/config.def:241 cobc/parser.y:8190 +#: cobc/config.def:248 cobc/parser.y:8563 msgid "SYNCHRONIZED clause" msgstr "" -#: cobc/config.def:244 cobc/parser.y:8193 +#: cobc/config.def:251 cobc/parser.y:8566 msgid "LEFT/RIGHT phrases in SYNCHRONIZED clause" msgstr "" -#: cobc/config.def:247 +#: cobc/config.def:254 msgid "SPECIAL-NAMES clause" msgstr "" -#: cobc/config.def:250 -msgid "GOTO statement without name" +#: cobc/config.def:257 +msgid "GO TO statement without name" msgstr "" -#: cobc/config.def:253 +#: cobc/config.def:260 #, fuzzy #| msgid "invalid SET statement" msgid "STOP-literal statement" msgstr "Ungültige SET-Anweisung" -#: cobc/config.def:256 +#: cobc/config.def:263 msgid "STOP-identifier statement" msgstr "" -#: cobc/config.def:259 +#: cobc/config.def:266 #, fuzzy #| msgid "invalid SET statement" msgid "STOP ERROR statement" msgstr "Ungültige SET-Anweisung" -#: cobc/config.def:262 +#: cobc/config.def:269 msgid "DEBUGGING MODE and debugging indicator" msgstr "" -#: cobc/config.def:268 +#: cobc/config.def:275 msgid "PADDING CHARACTER clause" msgstr "" -#: cobc/config.def:271 +#: cobc/config.def:278 msgid "NEXT SENTENCE phrase" msgstr "" -#: cobc/config.def:274 +#: cobc/config.def:281 msgid "listing-directive statements EJECT, SKIP1, SKIP2, SKIP3" msgstr "" -#: cobc/config.def:277 +#: cobc/config.def:284 msgid "listing-directive statement TITLE" msgstr "" -#: cobc/config.def:280 +#: cobc/config.def:287 #, fuzzy #| msgid "invalid SET statement" msgid "ENTRY statement" msgstr "Ungültige SET-Anweisung" -#: cobc/config.def:283 +#: cobc/config.def:290 msgid "move noninteger to alphanumeric" msgstr "" -#: cobc/config.def:286 +#: cobc/config.def:293 msgid "move figurative constants to numeric" msgstr "" -#: cobc/config.def:289 +#: cobc/config.def:296 msgid "move figurative constant SPACE to numeric" msgstr "" -#: cobc/config.def:292 +#: cobc/config.def:299 msgid "move figurative constant QUOTE to numeric" msgstr "" -#: cobc/config.def:295 +#: cobc/config.def:302 #, fuzzy #| msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgid "OCCURS DEPENDING ON without to" msgstr "OCCURS DEPENDING ON »%s« außerhalb des gültigen Bereichs: %d" -#: cobc/config.def:298 cobc/parser.y:11102 +#: cobc/config.def:305 cobc/parser.y:11443 msgid "section segments" msgstr "" -#: cobc/config.def:301 +#: cobc/config.def:308 #, fuzzy #| msgid "invalid SET statement" msgid "ALTER statement" msgstr "Ungültige SET-Anweisung" -#: cobc/config.def:304 +#: cobc/config.def:311 msgid "OVERFLOW clause for CALL" msgstr "" -#: cobc/config.def:307 +#: cobc/config.def:314 #, fuzzy #| msgid "numeric boolean literal" msgid "boolean literals (B'1010')" msgstr "Numerisches boolesches Literal" -#: cobc/config.def:310 +#: cobc/config.def:317 #, fuzzy msgid "hexadecimal-boolean literals (BX'A')" msgstr "Numerisches Literal ist negativ" -#: cobc/config.def:313 +#: cobc/config.def:320 #, fuzzy msgid "national literals (N'UTF-16 string')" msgstr "Ungültiger Typ für '%s'" -#: cobc/config.def:316 +#: cobc/config.def:323 #, fuzzy msgid "hexadecimal-national literals (NX'265E')" msgstr "Ungültiger Typ für '%s'" -#: cobc/config.def:319 +#: cobc/config.def:326 msgid "non-standard national literals (NC'UTF-16 string')" msgstr "" -#: cobc/config.def:322 +#: cobc/config.def:329 msgid "HP COBOL octal literals (%377)" msgstr "" -#: cobc/config.def:325 +#: cobc/config.def:332 msgid "ACUCOBOL-GT literals (#B #O #H #X)" msgstr "" -#: cobc/config.def:328 cobc/pplex.l:2199 +#: cobc/config.def:335 +msgid "EBCDIC symbolic characters in literals (\" \"135,151,151\"bar\"195, 194\"Z\" for \" foobarBAZ\")" +msgstr "" + +#: cobc/config.def:338 cobc/pplex.l:2428 msgid "continuation of COBOL words" msgstr "" -#: cobc/config.def:331 +#: cobc/config.def:341 #, fuzzy #| msgid "NOT EXCEPTION before EXCEPTION" msgid "NOT ON EXCEPTION before ON EXCEPTION" msgstr "NOT EXCEPTION vor EXCEPTION" -#: cobc/config.def:334 +#: cobc/config.def:344 msgid "extensions to ACCEPT and DISPLAY" msgstr "" -#: cobc/config.def:337 cobc/field.c:3357 +#: cobc/config.def:347 cobc/field.c:3645 msgid "RENAMES of 01-, 66- and 77-level items" msgstr "" -#: cobc/config.def:341 +#: cobc/config.def:351 msgid "allow larger REDEFINES items" msgstr "" -#: cobc/config.def:344 +#: cobc/config.def:354 #, fuzzy #| msgid "'%s' is not defined in SPECIAL-NAMES" msgid "constants defined in SPECIAL-NAMES" msgstr "»%s« ist nicht unter SPECIAL-NAMES definiert" -#: cobc/config.def:347 +#: cobc/config.def:357 msgid "constant with level 78 item (note: has left to right precedence in expressions)" msgstr "" -#: cobc/config.def:350 +#: cobc/config.def:360 msgid "constant with level 01 CONSTANT AS/FROM item" msgstr "" -#: cobc/config.def:353 +#: cobc/config.def:363 msgid "PERFORM VARYING without BY phrase (implies BY 1)" msgstr "" -#: cobc/config.def:356 +#: cobc/config.def:366 msgid "references to sections not in DECLARATIVES from within DECLARATIVES" msgstr "" -#: cobc/config.def:359 cobc/parser.y:12225 cobc/parser.y:12521 +#: cobc/config.def:369 cobc/parser.y:12614 cobc/parser.y:12913 msgid "CALL/CANCEL with program-prototype-name" msgstr "" -#: cobc/config.def:362 +#: cobc/config.def:372 msgid "specifying call-convention by mnemonic" msgstr "" -#: cobc/config.def:365 +#: cobc/config.def:375 msgid "specifying call-convention by WITH ... LINKAGE" msgstr "" -#: cobc/config.def:368 +#: cobc/config.def:378 +msgid "support for PROCEDURE DIVISION USING OPTIONAL" +msgstr "" + +#: cobc/config.def:381 msgid "numeric literals in VALUE clause of numeric-edited items" msgstr "" -#: cobc/config.def:371 +#: cobc/config.def:384 msgid "incorrect order of CONFIGURATION SECTION paragraphs" msgstr "" -#: cobc/config.def:374 +#: cobc/config.def:387 msgid "allow >> DEFINE CONSTANT var AS literal" msgstr "" -#: cobc/config.def:377 +#: cobc/config.def:390 #, fuzzy #| msgid "REDEFINES must follow the original definition" msgid "REDEFINES clause not following entry-name in definition" msgstr "REDEFINES muss der ursprünglichen Definition folgen" -#: cobc/config.def:380 +#: cobc/config.def:393 msgid "record sizes does not match RECORD clause" msgstr "" -#: cobc/config.def:383 cobc/parser.y:5736 cobc/parser.y:5750 cobc/parser.y:5763 -#: cobc/parser.y:5774 +#: cobc/config.def:396 cobc/parser.y:5991 cobc/parser.y:6005 cobc/parser.y:6018 +#: cobc/parser.y:6029 msgid "RECORD DELIMITER clause" msgstr "" -#: cobc/config.def:386 +#: cobc/config.def:399 msgid "BINARY-SEQUENTIAL and LINE-SEQUENTIAL phrases in RECORD DELIMITER" msgstr "" -#: cobc/config.def:389 cobc/tree.c:4805 +#: cobc/config.def:402 cobc/tree.c:4873 msgid "RECORD DELIMITER clause on file with fixed-length records" msgstr "" -#: cobc/config.def:392 +#: cobc/config.def:405 msgid "missing statement (e.g. empty IF / PERFORM)" msgstr "" -#: cobc/config.def:395 +#: cobc/config.def:408 msgid "missing period in PROCEDURE DIVISION (when reference format supports Area A enforcement)" msgstr "" -#: cobc/config.def:398 +#: cobc/config.def:411 msgid "zero-length literals, e.g. '' and \"\"" msgstr "" -#: cobc/config.def:401 +#: cobc/config.def:414 msgid "XML GENERATE's phrases other than COUNT IN" msgstr "" -#: cobc/config.def:404 cobc/typeck.c:8565 +#: cobc/config.def:417 cobc/typeck.c:9017 msgid "AFTER phrase in CONTINUE statement" msgstr "" -#: cobc/config.def:407 -msgid "ENTRY FOR GOTO and GOTO ENTRY statements" +#: cobc/config.def:420 +msgid "ENTRY FOR GO TO and GO TO ENTRY statements" msgstr "" -#: cobc/config.def:410 +#: cobc/config.def:423 cobc/typeck.c:4642 msgid "ASSIGN [TO] variable in SELECT" msgstr "" -#: cobc/config.def:413 +#: cobc/config.def:426 msgid "ASSIGN USING/VARYING variable in SELECT" msgstr "" -#: cobc/config.def:416 +#: cobc/config.def:429 msgid "ASSIGN EXTERNAL/DYNAMIC in SELECT" msgstr "" -#: cobc/config.def:419 +#: cobc/config.def:432 msgid "ASSIGN DISK FROM variable in SELECT" msgstr "" -#: cobc/config.def:422 +#: cobc/config.def:435 msgid "VSAM status in FILE STATUS" msgstr "" -#: cobc/config.def:425 +#: cobc/config.def:438 msgid "CALL to own PROGRAM-ID implies RECURSIVE attribute" msgstr "" -#: cobc/config.def:428 +#: cobc/config.def:441 msgid "DEPENDING clause in RECORD CONTAINS" msgstr "" -#: cobc/config.def:431 cobc/tree.c:3584 +#: cobc/config.def:444 cobc/tree.c:3623 msgid "PICTURE string with 'L' character" msgstr "" -#: cobc/error.c:83 +#: cobc/error.c:141 libcob/common.c:1379 libcob/common.c:8715 +#: libcob/common.c:8766 +#, c-format +msgid "warning: " +msgstr "Warnung: " + +#: cobc/error.c:142 libcob/common.c:8784 +msgid "note: " +msgstr "" + +#: cobc/error.c:162 #, c-format msgid "in section '%s':" msgstr "Im Abschnitt »%s«:" -#: cobc/error.c:94 +#: cobc/error.c:173 #, fuzzy, c-format #| msgid "in paragraph" msgid "in paragraph '%s':" msgstr "Im Absatz" -#: cobc/error.c:129 cobc/error.c:133 cobc/error.c:136 +#: cobc/error.c:227 cobc/error.c:231 cobc/error.c:234 msgid "too many errors" msgstr "zu viele Fehler" -#: cobc/error.c:145 +#: cobc/error.c:243 #, c-format msgid "in file included from " msgstr "in Datei eingebunden von" -#: cobc/error.c:163 libcob/common.c:8325 +#: cobc/error.c:261 libcob/common.c:9146 msgid "configuration error:" msgstr "Konfigurationsfehler:" -#: cobc/error.c:176 libcob/common.c:861 +#: cobc/error.c:274 libcob/common.c:920 #, c-format msgid "system error %d" msgstr "Systemfehler %d" -#: cobc/error.c:346 cobc/error.c:413 cobc/error.c:475 cobc/error.c:631 -#: cobc/error.c:675 cobc/error.c:785 libcob/common.c:1318 libcob/common.c:7900 -#: libcob/common.c:7951 -#, c-format -msgid "warning: " -msgstr "Warnung: " - -#: cobc/error.c:518 cobc/error.c:534 cobc/error.c:868 cobc/error.c:889 +#: cobc/error.c:616 cobc/error.c:632 cobc/error.c:971 cobc/error.c:992 #, c-format msgid "%s used" msgstr "%s belegt" -#: cobc/error.c:521 cobc/error.c:871 +#: cobc/error.c:619 cobc/error.c:974 #, c-format msgid "%s is archaic in %s" msgstr "%s ist veraltet in %s" -#: cobc/error.c:525 cobc/error.c:875 +#: cobc/error.c:623 cobc/error.c:978 #, c-format msgid "%s is obsolete in %s" msgstr "%s ist obsolet in %s" -#: cobc/error.c:531 cobc/error.c:881 cobc/parser.y:5738 +#: cobc/error.c:629 cobc/error.c:984 cobc/parser.y:5993 #, c-format msgid "%s ignored" msgstr "%s ignoriert" -#: cobc/error.c:537 cobc/error.c:891 +#: cobc/error.c:635 cobc/error.c:994 #, c-format msgid "%s does not conform to %s" msgstr "%s entspricht nicht %s" -#: cobc/error.c:553 +#: cobc/error.c:651 msgid "configuration warning:" msgstr "Konfigurationswarnung:" -#: cobc/error.c:728 cobc/error.c:731 cobc/error.c:755 cobc/error.c:758 -#: libcob/common.c:7969 -msgid "note: " -msgstr "" - -#: cobc/error.c:933 cobc/error.c:962 +#: cobc/error.c:1040 cobc/error.c:1069 #, c-format msgid "redefinition of '%s'" msgstr "Neudefinition von »%s«" -#: cobc/error.c:939 cobc/error.c:973 +#: cobc/error.c:1046 cobc/error.c:1080 #, c-format msgid "'%s' previously defined here" msgstr "»%s« wurde zuvor hier definiert" -#: cobc/error.c:1017 cobc/error.c:1023 +#: cobc/error.c:1124 cobc/error.c:1130 #, c-format msgid "'%s' is not defined" msgstr "»%s« ist nicht definiert" -#: cobc/error.c:1019 +#: cobc/error.c:1126 #, c-format msgid "'%s' cannot be used here" msgstr "»%s« kann hier nicht verwendet werden" -#: cobc/error.c:1021 cobc/parser.y:7658 +#: cobc/error.c:1128 cobc/parser.y:7941 #, c-format msgid "'%s' is not defined, but is a reserved word in another dialect" msgstr "»%s« ist nicht definiert, aber in einem anderen Dialekt ein reserviertes Wort" -#: cobc/error.c:1060 +#: cobc/error.c:1167 #, c-format msgid "'%s' is ambiguous; needs qualification" msgstr "»%s« ist mehrdeutig; erfordert Eingrenzung" -#: cobc/error.c:1090 +#: cobc/error.c:1197 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "'%s' is a special register" msgstr "»%s« ist keine Ganzzahl" -#: cobc/error.c:1093 +#: cobc/error.c:1200 #, fuzzy, c-format #| msgid "'%s' is not defined" msgid "'%s' internally defined" msgstr "»%s« ist nicht definiert" -#: cobc/error.c:1097 cobc/parser.y:18176 cobc/parser.y:18181 cobc/typeck.c:5000 -#: cobc/typeck.c:5047 cobc/typeck.c:5048 +#: cobc/error.c:1204 cobc/parser.y:18772 cobc/parser.y:18777 cobc/typeck.c:5166 +#: cobc/typeck.c:5213 cobc/typeck.c:5214 #, c-format msgid "'%s' defined here" msgstr "»%s« ist hier definiert" -#: cobc/error.c:1108 +#: cobc/error.c:1215 #, c-format msgid "fatal error: %s" msgstr "Schwerwiegender Fehler: %s" -#: cobc/error.c:1117 +#: cobc/error.c:1224 #, c-format msgid "group item '%s' cannot have %s clause" msgstr "Gruppeneintrag »%s« kann keine %s-Klausel haben" -#: cobc/error.c:1132 +#: cobc/error.c:1239 #, fuzzy, c-format msgid "constant item '%s' requires a %s clause" msgstr "Konstante '%s' benötigte eine %s Klausel" -#: cobc/error.c:1136 +#: cobc/error.c:1243 #, fuzzy, c-format msgid "level %02d item '%s' requires a %s clause" msgstr "Konstante '%s' benötigte eine %s Klausel" -#: cobc/error.c:1151 +#: cobc/error.c:1258 #, c-format msgid "constant item '%s' can only have a %s clause" msgstr "Konstante »%s« kann nur eine %s-Klausel haben" -#: cobc/error.c:1155 +#: cobc/error.c:1262 #, c-format msgid "level %02d item '%s' can only have a %s clause" msgstr "" -#: cobc/field.c:136 +#: cobc/field.c:139 msgid "constant expression has Divide by ZERO" msgstr "" -#: cobc/field.c:192 cobc/field.c:329 cobc/field.c:337 +#: cobc/field.c:195 cobc/field.c:332 cobc/field.c:340 msgid "missing right parenthesis" msgstr "Rechte Klammer fehlt" -#: cobc/field.c:221 +#: cobc/field.c:224 #, c-format msgid "expression stack overflow at %d entries for operation '%c'" msgstr "" -#: cobc/field.c:262 +#: cobc/field.c:265 #, c-format msgid "expression stack overflow at %d entries" msgstr "" -#: cobc/field.c:279 +#: cobc/field.c:282 msgid "missing left parenthesis" msgstr "Linke Klammer fehlt" -#: cobc/field.c:320 +#: cobc/field.c:323 #, c-format msgid "invalid operator '%s' in expression" msgstr "Ungültiger Operator »%s« im Ausdruck" -#: cobc/field.c:339 +#: cobc/field.c:342 #, c-format msgid "'%c' operator misplaced" msgstr "" -#: cobc/field.c:400 +#: cobc/field.c:403 #, c-format msgid "invalid level number '%s'" msgstr "Ungültige Stufennummer »%s«" -#: cobc/field.c:460 cobc/field.c:498 +#: cobc/field.c:463 cobc/field.c:502 msgid "level number must begin with 01 or 77" msgstr "Stufennummer muss mit 01 oder 77 beginnen" -#: cobc/field.c:558 cobc/field.c:562 +#: cobc/field.c:562 cobc/field.c:566 #, c-format msgid "no previous data item of level %02d" msgstr "Kein bisheriges Datenelement der Stufe %02d" -#: cobc/field.c:620 +#: cobc/field.c:631 #, c-format msgid "'%s' cannot be qualified here" msgstr "" -#: cobc/field.c:626 +#: cobc/field.c:637 #, c-format msgid "'%s' cannot be subscripted here" msgstr "" -#: cobc/field.c:642 cobc/field.c:653 +#: cobc/field.c:653 cobc/field.c:664 #, c-format msgid "'%s' is not defined in '%s'" msgstr "»%s« ist nicht in »%s« definiert" -#: cobc/field.c:660 +#: cobc/field.c:671 msgid "level number of REDEFINES entries must be identical" msgstr "Stufennummern für REDEFINES-Einträge müssen übereinstimmen" -#: cobc/field.c:665 +#: cobc/field.c:676 #, c-format msgid "'%s' is not the original definition" msgstr "»%s« ist nicht die ursprüngliche Definition" -#: cobc/field.c:826 cobc/parser.y:659 +#: cobc/field.c:720 cobc/parser.y:1051 +#, c-format +msgid "duplicate %s" +msgstr "»%s« duplizieren" + +#: cobc/field.c:878 cobc/parser.y:733 #, c-format msgid "duplicate %s clause" msgstr "Doppelte %s-Klausel" -#: cobc/field.c:906 +#: cobc/field.c:988 #, fuzzy, c-format #| msgid "PICTURE clause not compatible with USAGE %s" msgid "%s clause not compatible with PIC %s" msgstr "PICTURE-Klausel nicht kompatibel mit USAGE-Angabe %s" -#: cobc/field.c:917 cobc/field.c:953 +#: cobc/field.c:999 cobc/field.c:1036 #, fuzzy, c-format #| msgid "PICTURE clause not compatible with USAGE %s" msgid "%s clause not compatible with USAGE %s" msgstr "PICTURE-Klausel nicht kompatibel mit USAGE-Angabe %s" -#: cobc/field.c:1053 cobc/field.c:1069 cobc/field.c:1131 cobc/field.c:1142 +#: cobc/field.c:1140 cobc/field.c:1159 cobc/field.c:1227 cobc/field.c:1238 #, c-format msgid "PICTURE clause required for '%s'" msgstr "PICTURE-Klausel notwendig für »%s«" -#: cobc/field.c:1138 +#: cobc/field.c:1234 #, c-format msgid "a non-numeric literal is expected for '%s'" msgstr "Ein nicht-numerisches Literal wird für »%s« erwartet" -#: cobc/field.c:1150 +#: cobc/field.c:1247 #, fuzzy, c-format msgid "defining implicit picture size %d for '%s'" msgstr "Definiere implizite Picture-Größer %d für '%s'" -#: cobc/field.c:1171 +#: cobc/field.c:1271 #, c-format msgid "'%s' ANY LENGTH only allowed in LINKAGE" msgstr "»%s« ANY LENGTH nur in LINKAGE zulässig" -#: cobc/field.c:1175 +#: cobc/field.c:1275 #, c-format msgid "'%s' ANY LENGTH must be 01 level" msgstr "»%s« ANY LENGTH muss auf Level 01 sein" -#: cobc/field.c:1179 +#: cobc/field.c:1279 #, c-format msgid "'%s' ANY LENGTH cannot be BASED/EXTERNAL" msgstr "»%s« ANY LENGTH kann nicht als BASED/EXTERNAL deklariert sein" -#: cobc/field.c:1184 cobc/field.c:1210 +#: cobc/field.c:1283 cobc/field.c:1313 #, c-format msgid "'%s' ANY LENGTH has invalid definition" msgstr "»%s« ANY LENGTH hat eine ungültige Definition" -#: cobc/field.c:1192 +#: cobc/field.c:1295 #, c-format msgid "'%s' ANY NUMERIC must be PIC 9" msgstr "" -#: cobc/field.c:1198 +#: cobc/field.c:1301 #, fuzzy, c-format #| msgid "'%s' ANY LENGTH must be 01 level" -msgid "'%s' ANY LENGTH must be PIC X, PIC N or PIC 1" +msgid "'%s' ANY LENGTH must be PIC X, PIC U, PIC N or PIC 1" msgstr "»%s« ANY LENGTH muss auf Level 01 sein" -#: cobc/field.c:1208 +#: cobc/field.c:1311 #, c-format msgid "'%s' ANY NUMERIC has invalid definition" msgstr "" -#: cobc/field.c:1224 +#: cobc/field.c:1327 #, c-format msgid "'%s' EXTERNAL must be specified at 01/77 level" msgstr "»%s« EXTERNAL muss auf der Stufennummer 01/77 angegeben werden" -#: cobc/field.c:1228 +#: cobc/field.c:1331 #, c-format msgid "'%s' EXTERNAL can only be specified in WORKING-STORAGE section" msgstr "»%s« EXTERNAL kann nur im Abschnitt WORKING-STORAGE angegeben werden" -#: cobc/field.c:1232 +#: cobc/field.c:1335 #, c-format msgid "'%s' EXTERNAL and BASED are mutually exclusive" msgstr "»%s« EXTERNAL und BASED schließen sich gegenseitig aus" -#: cobc/field.c:1235 +#: cobc/field.c:1338 #, c-format msgid "'%s' EXTERNAL not allowed with REDEFINES" msgstr "»%s« EXTERNAL ist mit REDEFINES nicht zulässig" -#: cobc/field.c:1247 +#: cobc/field.c:1350 #, c-format msgid "'%s' BASED not allowed here" msgstr "»%s« BASED hier nicht zulässig" -#: cobc/field.c:1250 +#: cobc/field.c:1353 #, c-format msgid "'%s' BASED not allowed with REDEFINES" msgstr "»%s« BASED nicht zulässig mit REDEFINES" -#: cobc/field.c:1253 +#: cobc/field.c:1356 #, c-format msgid "'%s' BASED only allowed at the 01 and 77 levels" msgstr "»%s« BASED nur auf den Stufennumern 01 und 77 zulässig" -#: cobc/field.c:1279 +#: cobc/field.c:1383 #, fuzzy, c-format #| msgid "'%s' cannot have OCCURS DEPENDING" msgid "'%s' cannot have an OCCURS clause due to '%s'" msgstr "»%s« kann nicht mit OCCURS DEPENDING definiert werden" -#: cobc/field.c:1298 +#: cobc/field.c:1402 #, fuzzy, c-format #| msgid "the original definition '%s' should not have OCCURS clause" msgid "the original definition '%s' should not have an OCCURS clause" msgstr "Die ursprüngliche Definition »%s« sollte keine OCCURS-Klausel aufweisen" -#: cobc/field.c:1305 +#: cobc/field.c:1408 +#, fuzzy, c-format +#| msgid "the original definition '%s' should not have OCCURS clause" +msgid "the original definition '%s' should not have an ANY LENGTH clause" +msgstr "Die ursprüngliche Definition »%s« sollte keine OCCURS-Klausel aufweisen" + +#: cobc/field.c:1415 msgid "REDEFINES must follow the original definition" msgstr "REDEFINES muss der ursprünglichen Definition folgen" -#: cobc/field.c:1313 +#: cobc/field.c:1423 #, c-format msgid "'%s' cannot be variable length" msgstr "»%s« kann keine variable Länge aufweisen" -#: cobc/field.c:1316 +#: cobc/field.c:1426 #, fuzzy, c-format msgid "the original definition '%s' cannot be variable length" msgstr "Die ursprüngliche Definition '%s' kann keine variable Länge aufweisen" -#: cobc/field.c:1335 +#: cobc/field.c:1445 cobc/field.c:1708 #, fuzzy, c-format #| msgid "'%s' cannot have JUSTIFIED RIGHT" msgid "'%s' cannot have JUSTIFIED RIGHT clause" msgstr "»%s« kann nicht das Attribut JUSTIFIED RIGHT haben" -#: cobc/field.c:1342 +#: cobc/field.c:1453 #, fuzzy, c-format msgid "'%s' cannot have BLANK WHEN ZERO clause" msgstr "'%s' kann nicht das Attribut BLANK WHEN ZERO haben" -#: cobc/field.c:1348 +#: cobc/field.c:1460 #, c-format msgid "SCREEN group item '%s' has invalid clause" msgstr "" -#: cobc/field.c:1436 +#: cobc/field.c:1548 #, fuzzy, c-format #| msgid "PICTURE clause not compatible with USAGE %s" msgid "%s USAGE %s incompatible with %s USAGE %s" msgstr "PICTURE-Klausel nicht kompatibel mit USAGE-Angabe %s" -#: cobc/field.c:1516 +#: cobc/field.c:1629 #, c-format msgid "'%s' cannot have PICTURE clause" msgstr "»%s« kann keine PICTURE-Klausel haben" -#: cobc/field.c:1533 -#, fuzzy, c-format -msgid "%s item '%s' should be USAGE DISPLAY" -msgstr "'%s' ist nicht in der LINKAGE SECTION enthalten" - -#: cobc/field.c:1556 +#: cobc/field.c:1662 #, c-format msgid "'%s' COMP-6 with sign - changing to COMP-3" msgstr "»%s« COMP-6 mit Vorzeichen - Umwandlung in COMP-3" -#: cobc/field.c:1582 +#: cobc/field.c:1688 msgid "elementary items with SIGN clause must have S in PICTURE" msgstr "" -#: cobc/field.c:1585 +#: cobc/field.c:1691 msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/field.c:1602 -#, c-format -msgid "'%s' cannot have JUSTIFIED RIGHT" -msgstr "»%s« kann nicht das Attribut JUSTIFIED RIGHT haben" - -#: cobc/field.c:1614 +#: cobc/field.c:1720 #, fuzzy, c-format msgid "'%s' cannot have S in PICTURE string and BLANK WHEN ZERO" msgstr "'%s' kann nicht das Attribut BLANK WHEN ZERO haben" -#: cobc/field.c:1619 +#: cobc/field.c:1725 #, c-format msgid "'%s' cannot have BLANK WHEN ZERO without being USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/field.c:1631 +#: cobc/field.c:1737 #, fuzzy, c-format msgid "'%s' cannot have * in PICTURE string and BLANK WHEN ZERO" msgstr "'%s' kann nicht das Attribut BLANK WHEN ZERO haben" -#: cobc/field.c:1638 +#: cobc/field.c:1744 #, fuzzy, c-format msgid "'%s' is not numeric, so cannot have BLANK WHEN ZERO" msgstr "'%s' kann nicht das Attribut BLANK WHEN ZERO haben" -#: cobc/field.c:1691 +#: cobc/field.c:1798 #, c-format msgid "elements in VALUE clause for '%s' (%d) exceed max amount (%d)" msgstr "" -#: cobc/field.c:1708 cobc/field.c:1712 +#: cobc/field.c:1822 +msgid "unexpected VALUES ARE for elementary item" +msgstr "" + +#: cobc/field.c:1836 cobc/field.c:1840 #, fuzzy, c-format #| msgid "%s clause is required for file '%s'" msgid "initial VALUE clause ignored for %s item '%s'" msgstr "%s-Klausel wird für Datei »%s« benötigt" -#: cobc/field.c:1725 +#: cobc/field.c:1853 msgid "FULL has no effect on numeric items; you may want REQUIRED or PIC Z" msgstr "" -#: cobc/field.c:1755 +#: cobc/field.c:1884 msgid "VALUE may not contain a figurative constant" msgstr "" -#: cobc/field.c:1763 -#, fuzzy -#| msgid "cannot specify both %s and %s" -msgid "cannot specify both FULL and JUSTIFIED" +#: cobc/field.c:1893 cobc/field.c:1935 cobc/parser.y:750 cobc/parser.y:1823 +#: cobc/parser.y:1826 +#, c-format +msgid "cannot specify both %s and %s" msgstr "%s und %s können nicht gleichzeitig angegeben werden" -#: cobc/field.c:1775 +#: cobc/field.c:1905 #, c-format msgid "'%s' has FROM, TO or USING without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1792 +#: cobc/field.c:1922 #, c-format msgid "'%s' has numeric VALUE without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1805 -#, fuzzy -#| msgid "cannot specify both %s and %s" -msgid "cannot specify both PIC and VALUE" -msgstr "%s und %s können nicht gleichzeitig angegeben werden" - -#: cobc/field.c:1813 +#: cobc/field.c:1943 msgid "cannot have PIC without FROM, TO or USING" msgstr "" -#: cobc/field.c:1822 +#: cobc/field.c:1952 #, fuzzy #| msgid "'%s' cannot have JUSTIFIED RIGHT" msgid "cannot have numeric VALUE without PIC" msgstr "»%s« kann nicht das Attribut JUSTIFIED RIGHT haben" -#: cobc/field.c:1831 +#: cobc/field.c:1961 msgid "cannot have FROM, TO or USING without PIC" msgstr "" -#: cobc/field.c:1841 +#: cobc/field.c:1971 #, fuzzy #| msgid "INITIALIZED TO item is not alphanumeric" msgid "VALUE item may not be numeric" msgstr "Element INITIALIZED TO ist nicht alphanumerisch" -#: cobc/field.c:1856 +#: cobc/field.c:1986 #, c-format msgid "'%s' needs a PIC, COL, LINE, VALUE, BELL or BLANK clause" msgstr "" -#: cobc/field.c:1868 +#: cobc/field.c:1998 #, c-format msgid "'%s' cannot have PIC without FROM, TO, USING or numeric VALUE" msgstr "" -#: cobc/field.c:1876 +#: cobc/field.c:2006 #, c-format msgid "'%s' needs a PIC, FROM, TO, USING, VALUE, BELL, BLANK or ERASE clause" msgstr "" -#: cobc/field.c:1912 +#: cobc/field.c:2042 msgid "cannot use AUTO, FULL, PROMPT, REQUIRED or SECURE on elementary item without TO or USING" msgstr "" -#: cobc/field.c:1919 +#: cobc/field.c:2049 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED, OCCURS or SIGN on item without FROM, TO or USING" msgstr "" -#: cobc/field.c:1938 +#: cobc/field.c:2068 msgid "cannot use AUTO, FULL, REQUIRED or SECURE on elementary item without FROM, TO or USING" msgstr "" -#: cobc/field.c:1943 +#: cobc/field.c:2073 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED or SIGN without FROM, TO or USING" msgstr "" -#: cobc/field.c:1960 +#: cobc/field.c:2090 #, fuzzy msgid "cannot have BLANK WHEN ZERO without PIC" msgstr "'%s' kann nicht das Attribut BLANK WHEN ZERO haben" -#: cobc/field.c:1963 +#: cobc/field.c:2093 #, fuzzy #| msgid "'%s' cannot have JUSTIFIED RIGHT" msgid "cannot have JUSTIFIED without PIC" msgstr "»%s« kann nicht das Attribut JUSTIFIED RIGHT haben" -#: cobc/field.c:1983 +#: cobc/field.c:2113 msgid "cannot have AUTO without FROM, TO or USING" msgstr "" -#: cobc/field.c:1988 +#: cobc/field.c:2118 msgid "cannot use FULL or REQUIRED on item without TO or USING" msgstr "" -#: cobc/field.c:1995 +#: cobc/field.c:2125 msgid "SECURE can be used with TO only" msgstr "" -#: cobc/field.c:1997 +#: cobc/field.c:2127 #, fuzzy #| msgid "READ must be executed first" msgid "SECURE must be used with TO" msgstr "Zuerst muss ein READ erfolgen" -#: cobc/field.c:2016 +#: cobc/field.c:2146 #, fuzzy, c-format #| msgid "'%s' is not defined" msgid "'%s' does nothing" msgstr "»%s« ist nicht definiert" -#: cobc/field.c:2235 +#: cobc/field.c:2361 #, fuzzy, c-format #| msgid "'%s' 77 level not allowed here" msgid "'%s' 77 level is not allowed here" msgstr "»%s« Level 77 hier nicht erlaubt" -#: cobc/field.c:2627 +#: cobc/field.c:2399 msgid "OCCURS and multi COLUMNs is not allowed" msgstr "" -#: cobc/field.c:2655 +#: cobc/field.c:2419 #, fuzzy, c-format #| msgid "duplicate DEFINE '%s' - ignored" msgid "duplicate LINE %d ignored" msgstr "doppeltes DEFINE »%s« – ignoriert" -#: cobc/field.c:2672 +#: cobc/field.c:2870 #, c-format msgid "ignoring SYNCHRONIZED for group item '%s'" msgstr "" -#: cobc/field.c:2686 cobc/field.c:2954 +#: cobc/field.c:2884 cobc/field.c:3219 msgid "larger REDEFINES" msgstr "" -#: cobc/field.c:2699 cobc/field.c:2957 cobc/field.c:2962 +#: cobc/field.c:2898 cobc/field.c:3222 cobc/field.c:3227 #, c-format msgid "size of '%s' larger than size of '%s'" msgstr "Größe von »%s« überschreitet die Größe von »%s«" -#: cobc/field.c:2812 cobc/field.c:2879 +#: cobc/field.c:3045 cobc/field.c:3129 cobc/parser.y:832 #, c-format msgid "'%s' cannot be larger than %d bytes" msgstr "»%s« kann nicht größer als %d Bytes sein" -#: cobc/field.c:2850 cobc/field.c:2858 +#: cobc/field.c:3086 cobc/field.c:3094 #, c-format msgid "'%s' binary field cannot be larger than %d digits" msgstr "»%s« Als Binary deklariertes Element kann nicht größer als %d Ziffern sein" -#: cobc/field.c:2940 cobc/field.c:3522 -#, c-format -msgid "unexpected USAGE: %d" -msgstr "Unerwartete USAGE-Angabe: %d" - -#: cobc/field.c:3067 cobc/parser.y:710 cobc/parser.y:712 cobc/parser.y:6274 -#: cobc/parser.y:6284 cobc/parser.y:7344 cobc/parser.y:7347 cobc/parser.y:7349 -#: cobc/parser.y:7351 cobc/parser.y:7386 cobc/parser.y:8237 cobc/parser.y:8239 -#: cobc/parser.y:8241 cobc/parser.y:8243 cobc/parser.y:8558 cobc/parser.y:8567 -#: cobc/parser.y:10564 cobc/parser.y:12075 cobc/parser.y:13492 -#: cobc/parser.y:14902 cobc/typeck.c:5034 +#: cobc/field.c:3353 cobc/parser.y:791 cobc/parser.y:793 cobc/parser.y:6529 +#: cobc/parser.y:6539 cobc/parser.y:7625 cobc/parser.y:7628 cobc/parser.y:7630 +#: cobc/parser.y:7632 cobc/parser.y:7667 cobc/parser.y:8610 cobc/parser.y:8612 +#: cobc/parser.y:8614 cobc/parser.y:8616 cobc/parser.y:8958 cobc/parser.y:8967 +#: cobc/parser.y:10897 cobc/parser.y:12460 cobc/parser.y:13920 +#: cobc/parser.y:15390 cobc/typeck.c:5200 #, c-format msgid "%s and %s are mutually exclusive" msgstr "%s und %s schließen sich gegenseitig aus" -#: cobc/field.c:3068 cobc/parser.y:7529 cobc/parser.y:7566 +#: cobc/field.c:3354 cobc/parser.y:7810 cobc/parser.y:7847 msgid "variable-length PICTURE" msgstr "" -#: cobc/field.c:3187 +#: cobc/field.c:3475 msgid "literal type does not match numeric data type" msgstr "Typ des Literals stimmt nicht mit dem numerischen Datentypen überein" -#: cobc/field.c:3261 +#: cobc/field.c:3549 #, c-format msgid "THRU item '%s' may not come before '%s'" msgstr "" -#: cobc/field.c:3284 +#: cobc/field.c:3572 #, c-format msgid "RENAMES cannot start/end at the OCCURS item '%s'" msgstr "" -#: cobc/field.c:3292 +#: cobc/field.c:3580 #, c-format msgid "cannot use RENAMES on part of the table '%s'" msgstr "" -#: cobc/field.c:3330 +#: cobc/field.c:3618 #, c-format msgid "RENAMES may not contain '%s' as it is a pointer or object reference" msgstr "" -#: cobc/field.c:3335 +#: cobc/field.c:3623 #, c-format msgid "RENAMES may not contain '%s' as it is an OCCURS DEPENDING table" msgstr "" -#: cobc/field.c:3359 +#: cobc/field.c:3647 msgid "RENAMES may not reference a level 88" msgstr "" -#: cobc/field.c:3383 +#: cobc/field.c:3671 #, c-format msgid "'%s' must immediately follow the record '%s'" msgstr "" -#: cobc/field.c:3391 +#: cobc/field.c:3679 #, fuzzy, c-format msgid "THRU item must be different to '%s'" msgstr "END PROGRAM '%s' ist unterschiedlich zur PROGRAM-ID '%s'" -#: cobc/field.c:3397 +#: cobc/field.c:3685 #, c-format msgid "'%s' and '%s' must be in the same record" msgstr "»%s« und »%s« müssen im gleichen Datensatz sein" -#: cobc/field.c:3408 +#: cobc/field.c:3696 #, fuzzy, c-format msgid "THRU item '%s' may not be subordinate to '%s'" msgstr "END PROGRAM '%s' ist unterschiedlich zur PROGRAM-ID '%s'" @@ -1874,44 +1892,38 @@ msgid "" " intrinsics to be used without FUNCTION keyword" msgstr "" -#: cobc/flag.def:78 -msgid "" -" -fec=\tenable code generation for ,\n" -" sets -fsource-location" -msgstr "" - -#: cobc/flag.def:81 cobc/help.c:96 -msgid " -fno-ec=\tdisable code generation for " -msgstr "" - -#: cobc/flag.def:84 +#: cobc/flag.def:85 msgid "" " -fdump= dump data fields on abort, may be\n" " a combination of: ALL, WS, LS, RD, FD, SC, LO" msgstr "" -#: cobc/flag.def:87 +#: cobc/flag.def:88 msgid "" " -fno-dump= exclude data fields from dumping on abort, may\n" -" be a combination of: ALL, WS, LS, RD, FD, SC, LO" +" be a combination of: ALL, WS, LS, RD, FD, SC, LO\n" +" default if no scope specified: ALL" msgstr "" -#: cobc/flag.def:92 +#: cobc/flag.def:94 msgid "" " -fcallfh= specifies to be used for I/O\n" " as external provided EXTFH interface module" msgstr "" -#: cobc/flag.def:96 +#: cobc/flag.def:98 +msgid "" +" -febcdic-table=/\tEBCDIC/ASCII translation table\n" +" * e.g. default, ebcdic500_latin1..." +msgstr "" + +#: cobc/flag.def:102 msgid "" -" -febcdic-table=[DEFAULT|RESTRICTED-GC|IBM|GCOS]\tdefine EBCDIC translation table:\n" -" * default: translation to extended ASCII as per MF\n" -" * restricted-gc: translation from restricted ASCII only\n" -" * ibm: translation to restricted ASCII as per IBM\n" -" * gcos: translation to extended ASCII as per GCOS7" +" -fdefault-colseq=[ASCII|EBCDIC|NATIVE]\tdefine default collating sequence\n" +" * default: NATIVE" msgstr "" -#: cobc/flag.def:107 +#: cobc/flag.def:110 #, fuzzy #| msgid "" #| " -i, -info display compiler information (build/environment)\n" @@ -1923,35 +1935,39 @@ msgstr "" " -i, -info Compilerinformation (Bauen/Umgebung) anzeigen\n" " und Programm beenden" -#: cobc/flag.def:111 +#: cobc/flag.def:114 msgid " -fcomputed-goto generate computed goto C statements" msgstr " -fcomputed-goto Berechnete goto C statements erzeugen" -#: cobc/flag.def:114 +#: cobc/flag.def:117 msgid " -fextra-brace generate extra braces in C source" msgstr "" -#: cobc/flag.def:117 +#: cobc/flag.def:120 msgid " -fcorrect-numeric attempt correction of invalid numeric display items" msgstr "" -#: cobc/flag.def:120 +#: cobc/flag.def:123 msgid " -fstack-on-heap PERFORM stack allocated on heap" msgstr "" -#: cobc/flag.def:123 +#: cobc/flag.def:126 msgid "" " -fstack-extended store origin of entrypoints and PERFORM\n" -" * turned on by -debug/-dump" +" * turned on by --debug/-fdump" msgstr "" -#: cobc/flag.def:128 +#: cobc/flag.def:130 +msgid " -fno-fast-compare disables inline comparisions" +msgstr "" + +#: cobc/flag.def:135 msgid "" " -fno-remove-unreachable\tdisable remove of unreachable code\n" " * turned off by -g" msgstr "" -#: cobc/flag.def:132 +#: cobc/flag.def:139 #, fuzzy #| msgid "" #| " -Xref generate cross reference through 'cobxref'\n" @@ -1963,7 +1979,7 @@ msgstr "" " -Xref Querverweis mittels »cobxref« generieren\n" " (»cobxref« von V. Coen muss sich im Pfad befinden)" -#: cobc/flag.def:136 +#: cobc/flag.def:143 #, fuzzy #| msgid "" #| " -Xref generate cross reference through 'cobxref'\n" @@ -1975,140 +1991,179 @@ msgstr "" " -Xref Querverweis mittels »cobxref« generieren\n" " (»cobxref« von V. Coen muss sich im Pfad befinden)" -#: cobc/flag.def:140 +#: cobc/flag.def:147 msgid " -fsyntax-only syntax error checking only; don't emit any output" msgstr "" -#: cobc/flag.def:143 +#: cobc/flag.def:150 msgid "" " -fdebugging-line enable debugging lines\n" " * 'D' in indicator column or floating >>D" msgstr "" -#: cobc/flag.def:147 +#: cobc/flag.def:154 msgid "" " -fsource-location generate source location code\n" -" * turned on by -debug/-ftraceall/-fec/-dump" +" * turned on by --debug/-ftraceall/-fec/-fdump" msgstr "" -#: cobc/flag.def:151 +#: cobc/flag.def:158 msgid " -fimplicit-init automatic initialization of the COBOL runtime system" msgstr "" -#: cobc/flag.def:154 +#: cobc/flag.def:161 msgid "" " -fno-recursive-check disable check of recursive program call;\n" " effectively compiling as RECURSIVE program" msgstr "" -#: cobc/flag.def:158 +#: cobc/flag.def:165 msgid "" " -fstack-check PERFORM stack checking\n" -" * turned on by -debug/-g" +" * turned on by --debug/-g" +msgstr "" + +#: cobc/flag.def:169 +msgid "" +" -fmemory-check= checks for invalid writes to internal storage,\n" +" may be one of: all, pointer, using, none\n" +" * default: none, set to all by --debug" msgstr "" -#: cobc/flag.def:162 +#: cobc/flag.def:174 msgid " -fsection-exit-check check that code execution does not leave the scope of SECTIONs" msgstr "" -#: cobc/flag.def:165 +#: cobc/flag.def:177 msgid " -fimplicit-goback-check\tcheck that code execution does not end implicit at end of PROCEDURE DIVISION" msgstr "" -#: cobc/flag.def:168 +#: cobc/flag.def:180 msgid "" " -fwrite-after use AFTER 1 for WRITE of LINE SEQUENTIAL\n" " * default: BEFORE 1" msgstr "" -#: cobc/flag.def:172 +#: cobc/flag.def:184 msgid "" -" -fmfcomment '*' or '/' in column 1 treated as comment\n" -" * FIXED format only" +" -fmfcomment '*' in column 1 treated as comment with listing suppression\n" +" * FIXED/COBOL85/VARIABLE format only" msgstr "" -#: cobc/flag.def:176 +#: cobc/flag.def:188 msgid "" " -facucomment '$' in indicator area treated as '*',\n" " '|' treated as floating comment" msgstr "" -#: cobc/flag.def:181 +#: cobc/flag.def:193 msgid "" " -fno-trunc allow numeric field overflow\n" " * non-ANSI behaviour" msgstr "" -#: cobc/flag.def:185 +#: cobc/flag.def:197 msgid "" " -fsingle-quote use a single quote (apostrophe) for QUOTE\n" " * default: double quote" msgstr "" -#: cobc/flag.def:195 +#: cobc/flag.def:207 msgid "" " -foptional-file treat all files as OPTIONAL\n" " * unless NOT OPTIONAL specified" msgstr "" -#: cobc/flag.def:199 +#: cobc/flag.def:211 msgid " -fstatic-call output static function calls for the CALL statement" msgstr " -fstatic-call Statische Funktionsaufrufe für das CALL Statement ausgeben" -#: cobc/flag.def:202 +#: cobc/flag.def:214 msgid "" " -fno-gen-c-decl-static-call\tdisable generation of C function declarations\n" " for subroutines with static CALL" msgstr "" -#: cobc/flag.def:206 +#: cobc/flag.def:218 msgid "" " -fgen-c-line-directives\tgenerate source location directives in C code;\n" -" * turned on by -g" +" * turned on by -g/--coverage" msgstr "" -#: cobc/flag.def:210 +#: cobc/flag.def:222 msgid "" " -fgen-c-labels generate extra labels in C sources;\n" " * turned on by -g" msgstr "" -#: cobc/flag.def:214 +#: cobc/flag.def:226 +#, fuzzy +#| msgid "" +#| " -i, -info display compiler information (build/environment)\n" +#| " and exit" msgid "" -" -fno-theaders suppress all headers and output of compilation\n" -" options from listing while keeping page breaks" +" -fno-theaders suppress all headers from listing while keeping\n" +" page breaks" msgstr "" +" -i, -info Compilerinformation (Bauen/Umgebung) anzeigen\n" +" und Programm beenden" -#: cobc/flag.def:218 +#: cobc/flag.def:230 #, fuzzy #| msgid " -F, -free use free source format" msgid " -fno-tsource suppress source from listing" msgstr " -F, -free verwendet freies Quellformat" -#: cobc/flag.def:221 +#: cobc/flag.def:233 msgid " -fno-tmessages suppress warning and error summary from listing" msgstr "" -#: cobc/flag.def:224 +#: cobc/flag.def:236 msgid " -ftsymbols specify symbols in listing" msgstr " --ftsymbols Symbole für Listing angeben" -#: cobc/flag.def:227 +#: cobc/flag.def:239 +#, fuzzy +#| msgid " -Xref specify cross reference in listing" +msgid " -ftcmd specify command line in listing" +msgstr " -Xref Querverweise in Listing angeben" + +#: cobc/flag.def:242 +#, fuzzy +#| msgid " -F, -free use free source format" +msgid " -fno-ttimestamp suppress timestamp in listing headers" +msgstr " -F, -free verwendet freies Quellformat" + +#: cobc/flag.def:245 +msgid "" +" -fttitle= set listing title with '_' replaced by spaces;\n" +" defaults to package name and version" +msgstr "" + +#: cobc/flag.def:249 msgid "" " -fno-diagnostics-show-option\tsuppress output of option that directly\n" " controls the diagnostic" msgstr "" -#: cobc/help.c:32 +#: cobc/flag.def:253 +msgid " -fno-diagnostics-show-caret\tdo not display source context on warning/error diagnostic" +msgstr "" + +#: cobc/flag.def:256 +msgid " -fno-diagnostics-show-line-numbers\tsuppress display of line numbers in diagnostics" +msgstr "" + +#: cobc/help.c:33 msgid "GnuCOBOL compiler for most COBOL dialects with lots of extensions" msgstr "GnuCOBOL-Compiler für die meisten COBOL-Dialekte mit zahlreichen Erweiterungen" -#: cobc/help.c:34 +#: cobc/help.c:35 #, c-format msgid "Usage: %s [options]... file..." msgstr "Aufruf: %s [Optionen] Datei …" -#: cobc/help.c:47 bin/cobcrun.c:143 +#: cobc/help.c:48 bin/cobcrun.c:143 #, c-format msgid "" "Report bugs to: %s\n" @@ -2117,37 +2172,40 @@ msgstr "" "Melden Sie Fehler an: %s\n" "oder (noch besser) verwenden Sie das Ticketsystem auf der Homepage." -#: cobc/help.c:51 -msgid "GnuCOBOL home page: <https://www.gnu.org/software/gnucobol/>" -msgstr "Homepage von GnuCOBOL: <https://www.gnu.org/software/gnucobol/>" +#: cobc/help.c:52 bin/cobcrun.c:146 +#, c-format +msgid "GnuCOBOL home page: <%s>" +msgstr "" -#: cobc/help.c:52 -msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" +#: cobc/help.c:54 bin/cobcrun.c:148 +#, fuzzy, c-format +#| msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" +msgid "General help using GNU software: <%s>" msgstr "Allgemeine Hilfe zur Verwendung von GNU-Software: <https://www.gnu.org/gethelp/>" -#: cobc/help.c:58 bin/cobcrun.c:125 +#: cobc/help.c:61 bin/cobcrun.c:125 msgid "Options:" msgstr "Optionen:" -#: cobc/help.c:59 +#: cobc/help.c:62 #, fuzzy #| msgid " -h, -help display this help and exit" msgid " -h, --help display this help and exit" msgstr " -h, -help zeigt diese Hilfe an und beendet das Programm" -#: cobc/help.c:60 +#: cobc/help.c:63 #, fuzzy #| msgid " -V, -version display compiler version and exit" msgid " -V, --version display compiler version information and exit" msgstr " -V, -version zeigt die Version des Compilers an" -#: cobc/help.c:61 +#: cobc/help.c:64 #, fuzzy #| msgid " -V, -version display compiler version and exit" msgid " -dumpversion display compiler version and exit" msgstr " -V, -version zeigt die Version des Compilers an" -#: cobc/help.c:62 +#: cobc/help.c:65 #, fuzzy #| msgid "" #| " -i, -info display compiler information (build/environment)\n" @@ -2159,7 +2217,7 @@ msgstr "" " -i, -info Compilerinformation (Bauen/Umgebung) anzeigen\n" " und Programm beenden" -#: cobc/help.c:64 +#: cobc/help.c:67 msgid "" " -v, --verbose verbose mode, display additional information;\n" " multiple -v options increase the verbosity,\n" @@ -2170,7 +2228,7 @@ msgid "" " (3) pass verbose option to linker" msgstr "" -#: cobc/help.c:71 +#: cobc/help.c:74 #, fuzzy #| msgid " -q, -brief reduced displays, commands invoked not shown" msgid " -q, --brief reduced displays, commands invoked not shown" @@ -2178,19 +2236,19 @@ msgstr "" " -v zeigt aufgerufene Befehle nicht an,\n" " für eingeschränkte Bildschirme" -#: cobc/help.c:72 +#: cobc/help.c:75 msgid " -### like -v but commands not executed" msgstr " -### wie -v, aber die Befehle werden nicht ausgeführt" -#: cobc/help.c:73 +#: cobc/help.c:76 msgid " -x build an executable program" msgstr " -x erstellt ein ausführbares Programm" -#: cobc/help.c:74 +#: cobc/help.c:77 msgid " -m build a dynamically loadable module (default)" msgstr " -m erstellt ein dynamisch ladbares Modul (Standard)" -#: cobc/help.c:75 +#: cobc/help.c:78 #, fuzzy #| msgid " -j [<args>], -job[=<args>]\trun program after build, passing <args>" msgid " -j [<args>], --job[=<args>]\trun program after build, passing <args>" @@ -2198,7 +2256,7 @@ msgstr "" " -j [<args>], -job[=<args>]\tNach dem Bauen das Programm ausführen\n" "\tund dabei <args> als Argumente übergeben" -#: cobc/help.c:76 +#: cobc/help.c:79 #, fuzzy #| msgid "" #| " -std=<dialect> warnings/features for a specific dialect\n" @@ -2228,13 +2286,13 @@ msgstr "" " siehe die Konfigurationsdateien im Verzeichnis\n" " »config«" -#: cobc/help.c:84 +#: cobc/help.c:87 #, fuzzy #| msgid " -F, -free use free source format" msgid " -F, --free use free source format (alias for -fformat=free)" msgstr " -F, -free verwendet freies Quellformat" -#: cobc/help.c:85 +#: cobc/help.c:88 #, fuzzy #| msgid " -fixed use fixed source format (default)" msgid "" @@ -2242,19 +2300,19 @@ msgid "" " -fformat=fixed)" msgstr " -fixed Benutze fixed source format (Standard)" -#: cobc/help.c:87 +#: cobc/help.c:90 msgid " -O, -O2, -O3, -Os enable optimization" msgstr " -O, -O2, -O3, -Os aktiviert die Optimierung" -#: cobc/help.c:88 +#: cobc/help.c:91 msgid " -O0 disable optimization" msgstr " -O0 Optimierungen ausschalten" -#: cobc/help.c:89 +#: cobc/help.c:92 msgid " -g enable C compiler debug and stack check" msgstr " -g C Compiler Fehlerdiagnoseinformationen und Stapelprüfungen einschalten" -#: cobc/help.c:90 +#: cobc/help.c:93 #, fuzzy #| msgid " -d, -debug enable all run-time error checking" msgid "" @@ -2262,18 +2320,22 @@ msgid "" " equal to -fstack-check -fec=EC-ALL" msgstr " -debug aktiviert alle Laufzeitprüfungen" -#: cobc/help.c:93 +#: cobc/help.c:97 msgid "" " -fec=<exception-name>\tenable code generation for <exception-name>,\n" " see --list-exceptions for the possible values,\n" " sets -fsource-location" msgstr "" -#: cobc/help.c:97 +#: cobc/help.c:100 +msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" +msgstr "" + +#: cobc/help.c:101 msgid " -o <file> place the output into <file>" msgstr " -o <Datei> schreibt die Ausgabe in <Datei>" -#: cobc/help.c:98 +#: cobc/help.c:102 msgid "" " -b combine all input files into a single\n" " dynamically loadable module" @@ -2281,43 +2343,39 @@ msgstr "" " -b kombiniere alle Eingabedateien in ein\n" " einziges dynamisch ladbares Modul" -#: cobc/help.c:100 +#: cobc/help.c:104 msgid " -E preprocess only; do not compile or link" msgstr " -E Nur Präprozessor, nicht übersetzen oder binden" -#: cobc/help.c:101 +#: cobc/help.c:105 msgid " -C translation only; convert COBOL to C" msgstr " -C übersetzt nur von COBOL nach C" -#: cobc/help.c:102 +#: cobc/help.c:106 msgid " -S compile only; output assembly file" msgstr " -S kompiliert nur, assembliert oder linkt aber nicht" -#: cobc/help.c:103 +#: cobc/help.c:107 msgid " -c compile and assemble, but do not link" msgstr " -c kompiliert und assembliert nur, linkt aber nicht" -#: cobc/help.c:104 +#: cobc/help.c:108 msgid " -T <file> generate and place a wide program listing into <file>" msgstr " -T <file> breites Programmlisting generieren und in <file> ablegen" -#: cobc/help.c:105 +#: cobc/help.c:109 msgid " -t <file> generate and place a program listing into <file>" msgstr " -t <file> Programmlisting generieren und in <file> ablegen" -#: cobc/help.c:106 +#: cobc/help.c:110 msgid " --tlines=<lines> specify lines per page in listing, default = 55" msgstr " --tlines=<lines> Anzahl der Zeilen pro Listingseite angeben, Vorgabe ist 55" -#: cobc/help.c:108 -msgid " --tsymbols specify symbols in listing, use -ftsymbols instead" -msgstr " --tsymbols Symbole für Listing angeben. Verwenden Sie stattdessen -ftsymbols" - -#: cobc/help.c:110 +#: cobc/help.c:111 msgid " -P[=<dir or file>] generate preprocessed program listing (.lst)" msgstr " -P[=<dir or file>] vorverarbeitetes Programmlisting (.lst) generieren" -#: cobc/help.c:112 +#: cobc/help.c:113 #, fuzzy #| msgid "" #| " -Xref generate cross reference through 'cobxref'\n" @@ -2329,42 +2387,46 @@ msgstr "" " -Xref Querverweis mittels »cobxref« generieren\n" " (»cobxref« von V. Coen muss sich im Pfad befinden)" -#: cobc/help.c:115 +#: cobc/help.c:116 #, fuzzy #| msgid " -Xref specify cross reference in listing" msgid " -X, --Xref specify cross reference in listing" msgstr " -Xref Querverweise in Listing angeben" -#: cobc/help.c:117 +#: cobc/help.c:118 #, fuzzy msgid " -I <directory> add <directory> to copy/include search path" msgstr " -I <Verzeichnis> Das <Verzeichnis> zum Suchpfad für Copy (COBOL) und Includes (C) hinzufügen" -#: cobc/help.c:118 +#: cobc/help.c:119 msgid " -L <directory> add <directory> to library search path" msgstr " -L <Verzeichnis> fügt das <Verzeichnis> zum Suchpfad für Bibliotheken hinzu" -#: cobc/help.c:119 +#: cobc/help.c:120 msgid " -l <lib> link the library <lib>" msgstr " -l <lib> linkt die Bibliothek <lib>" -#: cobc/help.c:120 -msgid " -A <options> add <options> to the C compile phase" -msgstr " -A <Optionen> fügt die <Optionen> zum Aufruf des C-Compilers hinzu" - #: cobc/help.c:121 -msgid " -Q <options> add <options> to the C link phase" -msgstr " -Q <Optionen> fügt die <Optionen> zum Aufruf des C-Linkers hinzu" +msgid " -K <entry> generate CALL to <entry> as static" +msgstr " -K <Einstiegspunkt> CALL zum <Einstiegspunkt> als statischen Aufruf generieren" #: cobc/help.c:122 msgid " -D <define> define <define> for COBOL compilation" msgstr " -D <define> <define> für das Compilieren von COBOL angeben" #: cobc/help.c:123 -msgid " -K <entry> generate CALL to <entry> as static" -msgstr " -K <Einstiegspunkt> CALL zum <Einstiegspunkt> als statischen Aufruf generieren" +msgid " -A <options> add <options> to the C compile phase" +msgstr " -A <Optionen> fügt die <Optionen> zum Aufruf des C-Compilers hinzu" #: cobc/help.c:124 +msgid " -Q <options> add <options> to the C link phase" +msgstr " -Q <Optionen> fügt die <Optionen> zum Aufruf des C-Linkers hinzu" + +#: cobc/help.c:125 +msgid " --coverage instrument generated binaries for coverage" +msgstr "" + +#: cobc/help.c:126 #, fuzzy #| msgid " -conf=<file> user-defined dialect configuration; see -std" msgid " --conf=<file> user-defined dialect configuration; see -std" @@ -2372,37 +2434,37 @@ msgstr "" " -conf=<Datei> Benutzerdefinierte Konfiguration eines COBOL-Dialektes;\n" " siehe -std" -#: cobc/help.c:125 +#: cobc/help.c:127 #, fuzzy #| msgid " -list-reserved display reserved words" msgid " --list-reserved display reserved words" msgstr " -list-reserved zeigt reservierte Wörter an" -#: cobc/help.c:126 +#: cobc/help.c:128 #, fuzzy #| msgid " -list-intrinsics display intrinsic functions" msgid " --list-intrinsics display intrinsic functions" msgstr " -list-intrinsics zeigt intrinsische Funktionen an" -#: cobc/help.c:127 +#: cobc/help.c:129 #, fuzzy #| msgid " -list-mnemonics display mnemonic names" msgid " --list-mnemonics display mnemonic names" msgstr " -list-mnemonics zeigt mnemonische Namen an" -#: cobc/help.c:128 +#: cobc/help.c:130 #, fuzzy #| msgid " -list-mnemonics display mnemonic names" msgid " --list-exceptions display exception names" msgstr " -list-mnemonics zeigt mnemonische Namen an" -#: cobc/help.c:129 +#: cobc/help.c:131 #, fuzzy #| msgid " -list-system display system routines" msgid " --list-system display system routines" msgstr " -list-system zeigt Systemroutinen an" -#: cobc/help.c:130 +#: cobc/help.c:132 #, fuzzy #| msgid "" #| " -save-temps[=<dir>] save intermediate files\n" @@ -2414,3783 +2476,3857 @@ msgstr "" " -save-temps[=<Verz>] speichert temporäre Dateien\n" " Standard : aktuelles Verzeichnis" -#: cobc/help.c:132 +#: cobc/help.c:134 +msgid " -MT <target> set/add target file used in dependency list" +msgstr "" + +#: cobc/help.c:135 +#, fuzzy +#| msgid " -o <file> place the output into <file>" +msgid " -MF <file> place dependency list into <file>" +msgstr " -o <Datei> schreibt die Ausgabe in <Datei>" + +#: cobc/help.c:136 #, fuzzy msgid " -ext <extension> add file extension for resolving COPY" msgstr " -ext <Dateiendung> Weitere Standard-Dateiendung hinzufügen" -#: cobc/help.c:139 +#: cobc/help.c:143 msgid "Warning options:" msgstr "Warneinstellungen:" -#: cobc/help.c:140 +#: cobc/help.c:144 msgid " -Wall enable most warnings (all except as noted below)" msgstr " -Wall schaltet alle Warnungen mit Ausnahmen wie folgt ein" -#: cobc/help.c:141 +#: cobc/help.c:145 msgid " -Wextra like -Wall but enable some extra warning flags" msgstr " -Wextra wie -Wall, aber einige Extra-Warnungen einschalten" -#: cobc/help.c:142 +#: cobc/help.c:146 msgid " -w disable all warnings" msgstr " -w Alle Warnungen ausschalten" -#: cobc/help.c:143 +#: cobc/help.c:147 #, fuzzy #| msgid " -Wno-<warning> disable warning enabled by -W or -Wall" msgid " -Wno-<warning> disable warning enabled by default, -Wall or -Wextra" msgstr " -Wno-<warning> Warnung ausschalten, die mit -W oder -Wall eingeschaltet wurde" #. TRANSLATORS: This msgid is appended to msgid for -Wno-pending and others -#: cobc/help.c:149 +#: cobc/help.c:153 msgid " * ALWAYS active" msgstr " * IMMER aktiv" #. TRANSLATORS: This msgid is appended to msgid for -Wpossible-truncate and others -#: cobc/help.c:153 +#: cobc/help.c:157 #, fuzzy #| msgid " -W enable all warnings" msgid " * NOT set with -Wall" msgstr " -W schaltet alle Warnungen ein" -#: cobc/help.c:161 +#: cobc/help.c:165 +msgid " -fdiagnostics-plain-output\tmake diagnostic output as plain as possible" +msgstr "" + +#: cobc/help.c:166 msgid " -Werror treat all warnings as errors" msgstr " -Werror fasst alle Warnungen als Fehler auf" -#: cobc/help.c:162 +#: cobc/help.c:167 #, fuzzy #| msgid " -Werror treat all warnings as errors" msgid " -Wno-error don't treat warnings as errors" msgstr " -Werror fasst alle Warnungen als Fehler auf" -#: cobc/help.c:163 +#: cobc/help.c:168 msgid " -Werror=<warning> treat specified <warning> as error" msgstr " -Werror=<warning> die angegebene <warning> als Fehler behandeln" -#: cobc/help.c:164 +#: cobc/help.c:169 #, fuzzy #| msgid " -Werror=<warning> treat specified <warning> as error" msgid " -Wno-error=<warning> don't treat specified <warning> as error" msgstr " -Werror=<warning> die angegebene <warning> als Fehler behandeln" -#: cobc/help.c:180 +#: cobc/help.c:185 msgid "Compiler options:" msgstr "Compiler-Einstellungen:" -#: cobc/help.c:198 +#: cobc/help.c:203 msgid "" " -fibmcomp sets -fbinary-size=2-4-8 -fsynchronized-clause=ok\n" " -fno-ibmcomp sets -fbinary-size=1--8 -fsynchronized-clause=ignore" msgstr "" -#: cobc/help.c:201 +#: cobc/help.c:206 msgid "" " -falternate-ebcdic use restricted ASCII to EBCDIC translate\n" " -fno-alternate-ebcdic use extended ASCII to EBCDIC translate" msgstr "" -#: cobc/help.c:230 +#: cobc/help.c:235 msgid "Compiler dialect configuration options:" msgstr "" -#: cobc/help.c:232 cobc/help.c:238 +#: cobc/help.c:237 cobc/help.c:243 msgid "<value>" msgstr "<Wert>" -#: cobc/help.c:242 +#: cobc/help.c:247 msgid "<support>" msgstr "<support>" -#: cobc/help.c:251 +#: cobc/help.c:256 msgid "where <support> is one of the following:" msgstr "wobei <support> eins von diesen ist:" #. TRANSLATORS: This msgid is used when a variable name #. or label is referenced in a compiler message. -#: cobc/help.c:254 cobc/help.c:257 cobc/help.c:260 cobc/help.c:263 -#: cobc/help.c:266 cobc/help.c:269 cobc/help.c:272 cobc/help.c:275 -#: cobc/typeck.c:2361 +#: cobc/help.c:259 cobc/help.c:262 cobc/help.c:265 cobc/help.c:268 +#: cobc/help.c:271 cobc/help.c:274 cobc/help.c:277 cobc/help.c:280 +#: cobc/typeck.c:2378 #, c-format msgid "'%s'" msgstr "»%s«" -#: cobc/help.c:277 +#: cobc/help.c:282 msgid "word to be taken out of the reserved words list" msgstr "Wort, das aus der Liste der reservierten Wörter entfernt wird" -#: cobc/help.c:277 cobc/help.c:278 cobc/help.c:280 +#: cobc/help.c:282 cobc/help.c:283 cobc/help.c:285 msgid "<word>" msgstr "<word>" -#: cobc/help.c:278 +#: cobc/help.c:283 msgid "word to be added to reserved words list" msgstr "das Wort, das zur Liste der reservierten Wörter hinzugefügt wird" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "word to be added to reserved words list as alias" msgstr "das Wort, das als Alias zur Liste der reservierten Wörter hinzugefügt wird" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "<word>:<alias>" msgstr "<Wort>:<Alias>" -#: cobc/help.c:280 +#: cobc/help.c:285 msgid "special register to disable" msgstr "" -#: cobc/help.c:281 +#: cobc/help.c:286 msgid "special register to enable" msgstr "" -#: cobc/help.c:282 +#: cobc/help.c:287 msgid "<word> or <word>:<definition>, where definition uses backslash escaped spaces" msgstr "" -#: cobc/parser.y:315 cobc/parser.y:323 +#: cobc/parser.y:307 #, c-format msgid "'%s' should start in Area A" msgstr "" -#: cobc/parser.y:331 cobc/parser.y:333 +#: cobc/parser.y:315 +#, c-format +msgid "%s should start in Area A" +msgstr "" + +#: cobc/parser.y:322 +#, c-format +msgid "%s should not start in Area A" +msgstr "" + +#: cobc/parser.y:330 cobc/parser.y:332 msgid "start of statement in Area A" msgstr "" -#: cobc/parser.y:344 cobc/parser.y:379 +#: cobc/parser.y:428 #, c-format msgid "unreachable statement '%s'" msgstr "" -#: cobc/parser.y:470 +#: cobc/parser.y:542 #, c-format msgid "ENTRY '%s' duplicated" msgstr "ENTRY »%s« doppelt vergeben" -#: cobc/parser.y:520 +#: cobc/parser.y:594 #, fuzzy, c-format #| msgid "ENTRY '%s' duplicated" msgid "ENTRY FOR GO TO '%s' duplicated" msgstr "ENTRY »%s« doppelt vergeben" -#: cobc/parser.y:536 +#: cobc/parser.y:610 #, c-format msgid "maximum nested program depth exceeded (%d)" msgstr "" -#: cobc/parser.y:562 cobc/parser.y:589 +#: cobc/parser.y:636 cobc/parser.y:663 #, c-format msgid "%s statement not terminated by %s" msgstr "" -#: cobc/parser.y:592 +#: cobc/parser.y:666 #, c-format msgid "%s statement not terminated" msgstr "" -#: cobc/parser.y:634 -msgid "USE statement invalid for SORT file" +#: cobc/parser.y:708 +msgid "USE statement invalid for SD file" msgstr "" -#: cobc/parser.y:676 cobc/parser.y:1670 cobc/parser.y:1673 -#, c-format -msgid "cannot specify both %s and %s" -msgstr "%s und %s können nicht gleichzeitig angegeben werden" - -#: cobc/parser.y:677 +#: cobc/parser.y:751 #, fuzzy, c-format #| msgid "%s ignored" msgid "%s is ignored" msgstr "%s ignoriert" -#: cobc/parser.y:686 +#: cobc/parser.y:760 #, c-format -msgid "Cannot specify %s without number of lines on page" +msgid "cannot specify %s without number of lines on page" msgstr "" -#: cobc/parser.y:696 +#: cobc/parser.y:770 #, c-format msgid "maximum OCCURS depth exceeded (%d)" msgstr "" -#: cobc/parser.y:704 cobc/typeck.c:3037 +#: cobc/parser.y:785 cobc/typeck.c:3127 #, c-format msgid "'%s' is not in LINKAGE SECTION" msgstr "»%s« ist nicht im LINKAGE-Abschnitt enthalten" -#: cobc/parser.y:725 +#: cobc/parser.y:806 msgid "TO phrase without DEPENDING phrase" msgstr "" -#: cobc/parser.y:727 +#: cobc/parser.y:808 msgid "maximum number of occurrences assumed to be exact number" msgstr "" -#: cobc/parser.y:732 cobc/parser.y:8032 +#: cobc/parser.y:813 cobc/parser.y:8398 msgid "OCCURS TO must be greater than OCCURS FROM" msgstr "" -#: cobc/parser.y:741 +#: cobc/parser.y:823 #, fuzzy #| msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgid "OCCURS DEPENDING ON without TO phrase" msgstr "OCCURS DEPENDING ON »%s« außerhalb des gültigen Bereichs: %d" -#: cobc/parser.y:806 +#: cobc/parser.y:899 #, c-format msgid "%s header missing" msgstr "" -#: cobc/parser.y:807 +#: cobc/parser.y:900 #, c-format msgid "%s header assumed" msgstr "" -#: cobc/parser.y:939 -#, c-format -msgid "duplicate %s" -msgstr "»%s« duplizieren" - -#: cobc/parser.y:941 +#: cobc/parser.y:1053 #, c-format msgid "%s incorrectly after %s" msgstr "" -#: cobc/parser.y:1078 +#: cobc/parser.y:1208 #, c-format msgid "redefinition of program name '%s'" msgstr "Neudefinition von Programmname »%s«" -#: cobc/parser.y:1083 +#: cobc/parser.y:1213 #, c-format msgid "redefinition of program ID '%s'" msgstr "Neudefinition der Programm-ID »%s«" -#: cobc/parser.y:1117 +#: cobc/parser.y:1247 #, c-format msgid "FUNCTION '%s' has no PROCEDURE DIVISION" msgstr "" -#: cobc/parser.y:1228 +#: cobc/parser.y:1372 msgid "functions may not be defined within a program/function" msgstr "" -#: cobc/parser.y:1278 +#: cobc/parser.y:1426 #, fuzzy, c-format msgid "END FUNCTION '%s' is different from FUNCTION-ID '%s'" msgstr "END FUNCTION '%s' ist unterschiedlich zur FUNCTION-ID '%s'" -#: cobc/parser.y:1292 +#: cobc/parser.y:1440 #, fuzzy, c-format msgid "END PROGRAM '%s' is different from PROGRAM-ID '%s'" msgstr "END PROGRAM '%s' ist unterschiedlich zur PROGRAM-ID '%s'" -#: cobc/parser.y:1341 +#: cobc/parser.y:1489 #, fuzzy #| msgid "'%s' CURSOR must be 4 or 6 characters long" msgid "currency symbol must be one character long" msgstr "»%s« CURSOR muss 4 oder 6 Zeichen lang sein" -#: cobc/parser.y:1398 +#: cobc/parser.y:1546 #, fuzzy, c-format #| msgid "invalid operator '%s' in expression" msgid "invalid character '%c' in currency symbol" msgstr "Ungültiger Operator »%s« im Ausdruck" -#: cobc/parser.y:1414 +#: cobc/parser.y:1562 msgid "prototype has same name as current function and will be ignored" msgstr "" -#: cobc/parser.y:1441 +#: cobc/parser.y:1589 #, c-format msgid "duplicate REPOSITORY entries for '%s' do not match" msgstr "" -#: cobc/parser.y:1445 +#: cobc/parser.y:1593 #, c-format msgid "duplicate REPOSITORY entry for '%s'" msgstr "" -#: cobc/parser.y:1510 +#: cobc/parser.y:1658 #, c-format msgid "ORGANIZATION %s is incompatible with RECORD DELIMITER" msgstr "" -#: cobc/parser.y:1548 cobc/parser.y:1939 cobc/typeck.c:829 +#: cobc/parser.y:1694 cobc/parser.y:2142 cobc/typeck.c:835 #, fuzzy, c-format msgid "condition-name not allowed here: '%s'" msgstr "Element mit Stufe 88 hier nicht zulässig" -#: cobc/parser.y:1554 cobc/parser.y:2127 +#: cobc/parser.y:1700 cobc/parser.y:2345 msgid "SCREEN item cannot be used here" msgstr "SCREEN kann hier nicht verwendet werden" -#: cobc/parser.y:1557 +#: cobc/parser.y:1703 msgid "REPORT item cannot be used here" msgstr "REPORT kann hier nicht verwendet werden" -#: cobc/parser.y:1563 +#: cobc/parser.y:1709 msgid "TYPEDEF item cannot be used here" msgstr "TYPEDEF kann hier nicht verwendet werden" -#: cobc/parser.y:1572 +#: cobc/parser.y:1718 #, fuzzy #| msgid "integer value expected" msgid "elementary item expected" msgstr "Ganzzahlwert erwartet" -#: cobc/parser.y:1579 +#: cobc/parser.y:1725 msgid "item may not reference itself" msgstr "" -#: cobc/parser.y:1586 +#: cobc/parser.y:1733 #, fuzzy msgid "item may not be subordinate to any item with USAGE clause" msgstr "END PROGRAM '%s' ist unterschiedlich zur PROGRAM-ID '%s'" -#: cobc/parser.y:1588 +#: cobc/parser.y:1735 #, fuzzy msgid "item may not be subordinate to any item with SIGN clause" msgstr "END PROGRAM '%s' ist unterschiedlich zur PROGRAM-ID '%s'" -#: cobc/parser.y:1631 +#: cobc/parser.y:1780 #, c-format msgid "illegal combination of %s with other clauses" msgstr "" -#: cobc/parser.y:1641 +#: cobc/parser.y:1794 #, fuzzy, c-format msgid "entry following %s may not be subordinate to it" msgstr "END PROGRAM '%s' ist unterschiedlich zur PROGRAM-ID '%s'" -#: cobc/parser.y:1859 +#: cobc/parser.y:2042 +msgid "INITIAL specified on non-input field" +msgstr "" + +#: cobc/parser.y:2054 +msgid "relative LINE/COLUMN clause required with OCCURS" +msgstr "" + +#: cobc/parser.y:2072 msgid "FOR phrase cannot immediately follow ALL/LEADING/TRAILING" msgstr "" -#: cobc/parser.y:1861 +#: cobc/parser.y:2074 msgid "missing CHARACTERS/ALL/LEADING/TRAILING phrase after FOR phrase" msgstr "" -#: cobc/parser.y:1868 +#: cobc/parser.y:2081 msgid "missing value between ALL/LEADING/TRAILING words" msgstr "" -#: cobc/parser.y:1873 +#: cobc/parser.y:2086 msgid "missing FOR phrase before CHARACTERS/ALL/LEADING/TRAILING phrase" msgstr "" -#: cobc/parser.y:1880 +#: cobc/parser.y:2093 msgid "missing ALL/LEADING/TRAILING before value" msgstr "" -#: cobc/parser.y:1935 +#: cobc/parser.y:2138 msgid "use of condition-name in place of data-name" msgstr "" -#: cobc/parser.y:1966 +#: cobc/parser.y:2169 msgid "cannot specify NO ADVANCING in screen DISPLAY" msgstr "" -#: cobc/parser.y:2029 cobc/parser.y:2046 +#: cobc/parser.y:2232 cobc/parser.y:2249 msgid "non-standard DISPLAY" msgstr "" -#: cobc/parser.y:2033 +#: cobc/parser.y:2236 msgid "screens may only be displayed on CRT" msgstr "" -#: cobc/parser.y:2038 cobc/parser.y:2081 +#: cobc/parser.y:2241 cobc/parser.y:2284 msgid "cannot mix screens and fields in the same DISPLAY statement" msgstr "" -#: cobc/parser.y:2042 +#: cobc/parser.y:2245 msgid "screen clauses may only be used for DISPLAY on CRT" msgstr "" -#: cobc/parser.y:2087 +#: cobc/parser.y:2290 msgid "ambiguous DISPLAY; put items to display on device in separate DISPLAY" msgstr "" -#: cobc/parser.y:2103 +#: cobc/parser.y:2301 #, c-format msgid "%s is not an alphanumeric literal" msgstr "»%s« ist kein alphanumerisches Literal" -#: cobc/parser.y:2105 +#: cobc/parser.y:2305 #, fuzzy, c-format msgid "'%s' is not USAGE DISPLAY" msgstr "'%s' ist nicht in der LINKAGE SECTION enthalten" -#: cobc/parser.y:2120 cobc/typeck.c:9790 +#: cobc/parser.y:2322 cobc/parser.y:19534 +#, c-format +msgid "'%s' is not a field" +msgstr "»%s« ist kein Feld" + +#: cobc/parser.y:2338 cobc/typeck.c:10231 #, c-format msgid "invalid target for %s" msgstr "Ungültiges Ziel für %s" -#: cobc/parser.y:2129 +#: cobc/parser.y:2347 #, fuzzy #| msgid "a constant may not be used here - '%s'" msgid "RENAMES item may not be used here" msgstr "Eine Konstante darf hier nicht verwendet werden – »%s«" -#: cobc/parser.y:2131 cobc/typeck.c:2737 cobc/typeck.c:2828 +#: cobc/parser.y:2349 cobc/typeck.c:2822 cobc/typeck.c:2913 msgid "ANY LENGTH item not allowed here" msgstr "Element ANY LENGTH hier nicht zulässig" -#: cobc/parser.y:2135 +#: cobc/parser.y:2353 #, c-format msgid "item '%s' has wrong class for VALIDATE" msgstr "" -#: cobc/parser.y:2144 +#: cobc/parser.y:2362 msgid "WHEN clause must follow EVERY clause" msgstr "" -#: cobc/parser.y:2229 cobc/parser.y:18631 +#: cobc/parser.y:2447 cobc/parser.y:19251 #, fuzzy #| msgid "integer value expected" msgid "non-zero value expected" msgstr "Ganzzahlwert erwartet" -#: cobc/parser.y:2235 cobc/tree.c:4735 +#: cobc/parser.y:2453 cobc/tree.c:4803 #, c-format msgid "RECORD size (IDX) exceeds maximum allowed (%d)" msgstr "" -#: cobc/parser.y:2239 cobc/tree.c:4739 +#: cobc/parser.y:2457 cobc/tree.c:4807 #, c-format msgid "RECORD size exceeds maximum allowed (%d)" msgstr "" -#: cobc/parser.y:2244 +#: cobc/parser.y:2462 msgid "RECORD clause invalid" msgstr "" -#: cobc/parser.y:3368 +#: cobc/parser.y:3595 msgid "multiple PROGRAM-ID's without matching END PROGRAM" msgstr "" -#: cobc/parser.y:3371 +#: cobc/parser.y:3598 msgid "executable requested but no program found" msgstr "" -#: cobc/parser.y:3488 +#: cobc/parser.y:3717 msgid "prototypes must be come before any program/function definitions" msgstr "" -#: cobc/parser.y:3691 +#: cobc/parser.y:3930 msgid "COMMON may only be used in a contained program" msgstr "" -#: cobc/parser.y:3778 +#: cobc/parser.y:4017 msgid "CALL prototypes" msgstr "" -#: cobc/parser.y:3953 cobc/parser.y:4235 cobc/parser.y:4281 cobc/parser.y:4394 -#: cobc/parser.y:4608 cobc/parser.y:4705 cobc/parser.y:4744 cobc/parser.y:4803 -#: cobc/parser.y:4824 cobc/parser.y:4867 cobc/parser.y:4946 cobc/parser.y:4965 -#: cobc/parser.y:4981 cobc/parser.y:4999 cobc/parser.y:5017 cobc/parser.y:5034 -#: cobc/parser.y:5052 cobc/parser.y:7404 cobc/parser.y:8628 +#: cobc/parser.y:4192 cobc/parser.y:4471 cobc/parser.y:4517 cobc/parser.y:4632 +#: cobc/parser.y:4846 cobc/parser.y:4943 cobc/parser.y:4982 cobc/parser.y:5041 +#: cobc/parser.y:5062 cobc/parser.y:5105 cobc/parser.y:5184 cobc/parser.y:5203 +#: cobc/parser.y:5219 cobc/parser.y:5237 cobc/parser.y:5255 cobc/parser.y:5272 +#: cobc/parser.y:5290 cobc/parser.y:7685 cobc/parser.y:9028 #, c-format msgid "%s not allowed in nested programs" msgstr "" -#: cobc/parser.y:4109 +#: cobc/parser.y:4345 msgid "segment-number must be in range of values 1 to 49" msgstr "" -#: cobc/parser.y:4121 +#: cobc/parser.y:4357 msgid "duplicate CLASSIFICATION clause" msgstr "Doppelte CLASSIFICATION-Klausel" -#: cobc/parser.y:4200 +#: cobc/parser.y:4436 msgid "PROGRAM phrase" msgstr "" -#: cobc/parser.y:4302 cobc/parser.y:4313 cobc/parser.y:4657 +#: cobc/parser.y:4538 cobc/parser.y:4549 cobc/parser.y:4895 #, c-format msgid "invalid %s clause" msgstr "Ungültige %s-Klausel" -#: cobc/parser.y:4616 cobc/parser.y:4754 +#: cobc/parser.y:4854 cobc/parser.y:4992 #, fuzzy #| msgid "literal type does not match numeric data type" msgid "type does not match alphabet" msgstr "Typ des Literals stimmt nicht mit dem numerischen Datentypen überein" -#: cobc/parser.y:4760 +#: cobc/parser.y:4998 #, fuzzy #| msgid "'%s' is not an alphabet-name" msgid "CLASS IS integer IN alphabet-name" msgstr "»%s« ist kein Bezeichner eines Alphabets" -#: cobc/parser.y:4780 cobc/parser.y:4784 +#: cobc/parser.y:5018 cobc/parser.y:5022 msgid "CLASS literal with THRU must have size 1" msgstr "" -#: cobc/parser.y:4879 +#: cobc/parser.y:5117 msgid "separate currency symbol and currency string" msgstr "" -#: cobc/parser.y:4912 +#: cobc/parser.y:5150 #, c-format msgid "invalid CURRENCY SIGN '%s'" msgstr "Ungültiges CURRENCY SIGN »%s«" -#: cobc/parser.y:5139 +#: cobc/parser.y:5377 msgid "cannot use RELATIVE KEY clause on INDEXED files" msgstr "" -#: cobc/parser.y:5143 +#: cobc/parser.y:5381 msgid "cannot use RECORD KEY clause on RELATIVE files" msgstr "" -#: cobc/parser.y:5215 +#: cobc/parser.y:5453 msgid "EXTERNAL/DYNAMIC cannot be used with literals" msgstr "" -#: cobc/parser.y:5235 +#: cobc/parser.y:5473 msgid "EXTERNAL/DYNAMIC cannot be used with USING/VARYING" msgstr "" -#: cobc/parser.y:5246 +#: cobc/parser.y:5484 msgid "EXTERNAL/DYNAMIC cannot be used with DISK FROM" msgstr "" -#: cobc/parser.y:5248 -msgid "ASSIGN DISK FROM" -msgstr "" - -#: cobc/parser.y:5370 +#: cobc/parser.y:5608 msgid "ASSIGN EXTERNAL/DYNAMIC" msgstr "" -#: cobc/parser.y:5486 cobc/parser.y:5666 +#: cobc/parser.y:5724 cobc/parser.y:5921 #, c-format msgid "%s only valid with ORGANIZATION %s" msgstr "" -#: cobc/parser.y:5583 +#: cobc/parser.y:5818 cobc/typeck.c:3818 #, c-format msgid "'%s' is not an alphabet-name" msgstr "»%s« ist kein Bezeichner eines Alphabets" -#: cobc/parser.y:5599 +#: cobc/parser.y:5854 msgid "VSAM status" msgstr "" -#: cobc/parser.y:5733 cobc/parser.y:5758 +#: cobc/parser.y:5988 cobc/parser.y:6013 #, c-format msgid "RECORD DELIMITER %s only allowed with SEQUENTIAL files" msgstr "" -#: cobc/parser.y:5745 +#: cobc/parser.y:6000 #, c-format msgid "RECORD DELIMITER %s only allowed with (LINE) SEQUENTIAL files" msgstr "" -#: cobc/parser.y:5751 +#: cobc/parser.y:6006 msgid "LINE-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5764 +#: cobc/parser.y:6019 msgid "BINARY-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5772 +#: cobc/parser.y:6027 msgid "RECORD DELIMITER clause only allowed with (LINE) SEQUENTIAL files" msgstr "" -#: cobc/parser.y:5776 +#: cobc/parser.y:6031 #, c-format msgid "RECORD DELIMITER %s not recognized; will be ignored" msgstr "" -#: cobc/parser.y:5814 +#: cobc/parser.y:6069 msgid "DUPLICATES for primary keys" msgstr "" -#: cobc/parser.y:6058 +#: cobc/parser.y:6313 msgid "DOS/VS APPLY phrase" msgstr "" -#: cobc/parser.y:6212 +#: cobc/parser.y:6467 msgid "RECORD description missing or invalid" msgstr "" -#: cobc/parser.y:6239 +#: cobc/parser.y:6494 #, fuzzy, c-format #| msgid "duplicate values in class '%s'" msgid "duplicate file description for %s" msgstr "Doppelte Werte in Klasse »%s«" -#: cobc/parser.y:6288 cobc/parser.y:6893 cobc/parser.y:7389 cobc/parser.y:13485 -#: cobc/parser.y:16686 +#: cobc/parser.y:6543 cobc/parser.y:7170 cobc/parser.y:7670 cobc/parser.y:13913 +#: cobc/parser.y:17210 #, c-format msgid "%s is invalid in a user FUNCTION" msgstr "" -#: cobc/parser.y:6326 cobc/parser.y:6336 +#: cobc/parser.y:6581 cobc/parser.y:6591 msgid "RECORD clause ignored for LINE SEQUENTIAL" msgstr "" -#: cobc/parser.y:6433 +#: cobc/parser.y:6688 msgid "LINAGE clause with wrong file type" msgstr "" -#: cobc/parser.y:6495 +#: cobc/parser.y:6750 msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgstr "" -#: cobc/parser.y:6532 +#: cobc/parser.y:6787 #, c-format msgid "ignoring CODE-SET '%s'" msgstr "Angabe CODE-SET »%s« wird ignoriert" -#: cobc/parser.y:6541 +#: cobc/parser.y:6796 msgid "CODE-SET clause invalid for file type" msgstr "" -#: cobc/parser.y:6562 +#: cobc/parser.y:6817 msgid "REPORT clause with wrong file type" msgstr "" -#: cobc/parser.y:6641 +#: cobc/parser.y:6899 msgid "CD record missing" msgstr "" -#: cobc/parser.y:7091 +#: cobc/parser.y:7372 msgid "CONSTANT item not at 01 level" msgstr "CONSTANT ist nicht auf Stufe 01" -#: cobc/parser.y:7236 +#: cobc/parser.y:7517 #, fuzzy #| msgid "REDEFINES must follow the original definition" msgid "REDEFINES clause not following entry-name" msgstr "REDEFINES muss der ursprünglichen Definition folgen" -#: cobc/parser.y:7309 cobc/parser.y:7339 cobc/parser.y:7381 cobc/parser.y:7470 -#: cobc/parser.y:8233 +#: cobc/parser.y:7590 cobc/parser.y:7620 cobc/parser.y:7662 cobc/parser.y:7751 +#: cobc/parser.y:8606 #, c-format msgid "%s only allowed at 01/77 level" msgstr "%s nur auf den Stufen 01 und 77 zulässig" -#: cobc/parser.y:7312 cobc/parser.y:7341 cobc/parser.y:7383 cobc/parser.y:8235 -#: cobc/parser.y:8587 cobc/parser.y:8609 +#: cobc/parser.y:7593 cobc/parser.y:7622 cobc/parser.y:7664 cobc/parser.y:8608 +#: cobc/parser.y:8987 cobc/parser.y:9009 #, c-format msgid "%s requires a data name" msgstr "%s benötigt Angabe eines Datennamens" -#: cobc/parser.y:7316 cobc/parser.y:7565 +#: cobc/parser.y:7597 cobc/parser.y:7846 #, c-format msgid "%s not allowed in %s" msgstr "%s ist nicht zulässig in %s" -#: cobc/parser.y:7337 cobc/parser.y:7391 cobc/parser.y:8231 cobc/parser.y:8583 -#: cobc/parser.y:8607 +#: cobc/parser.y:7618 cobc/parser.y:7672 cobc/parser.y:8604 cobc/parser.y:8983 +#: cobc/parser.y:9007 #, c-format msgid "%s not allowed here" msgstr "%s hier nicht zulässig" -#: cobc/parser.y:7528 +#: cobc/parser.y:7809 #, c-format msgid "%s requires DEPENDING clause" msgstr "" -#: cobc/parser.y:7544 +#: cobc/parser.y:7825 msgid "a locale-format PICTURE string must only consist of '9', '.', '+', 'Z' and the currency-sign" msgstr "" -#: cobc/parser.y:7554 +#: cobc/parser.y:7835 msgid "DEPENDING clause needs either an OCCURS clause or a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7560 +#: cobc/parser.y:7841 msgid "only USAGE DISPLAY may specify a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7610 cobc/typeck.c:4752 +#: cobc/parser.y:7893 cobc/typeck.c:4916 #, fuzzy, c-format #| msgid "'%s' is not a locale name" msgid "'%s' is not a locale-name" msgstr "»%s« ist kein Locale-Name" -#: cobc/parser.y:7656 +#: cobc/parser.y:7939 #, fuzzy, c-format #| msgid "'%s' is not a field" msgid "'%s' is not a valid USAGE" msgstr "»%s« ist kein Feld" -#: cobc/parser.y:7661 +#: cobc/parser.y:7944 #, fuzzy, c-format #| msgid "unknown failure: %d" msgid "unknown USAGE: %s" msgstr "Unbekannter Fehler: %d" -#: cobc/parser.y:7808 +#: cobc/parser.y:8139 #, c-format msgid "unknown HANDLE type: %s" msgstr "" -#: cobc/parser.y:8082 +#: cobc/parser.y:8347 +#, fuzzy, c-format +msgid "'%s' is not USAGE UTF-8" +msgstr "'%s' ist nicht in der LINKAGE SECTION enthalten" + +#: cobc/parser.y:8448 msgid "INDEXED should follow ASCENDING/DESCENDING" msgstr "" -#: cobc/parser.y:8317 +#: cobc/parser.y:8658 cobc/parser.y:8660 +#, fuzzy, c-format +#| msgid "unexpected size: %d" +msgid "unexpected %s" +msgstr "Unerwartete Größe: %d" + +#: cobc/parser.y:8709 msgid "amount of entries in FROM and TO must match" msgstr "" -#: cobc/parser.y:8326 +#: cobc/parser.y:8718 #, c-format msgid "entry in FROM (%d) must be <= entry in TO (%d)" msgstr "" -#: cobc/parser.y:8585 +#: cobc/parser.y:8985 #, fuzzy, c-format #| msgid "%s only allowed at 01/77 level" msgid "%s only allowed at 01 level" msgstr "%s nur auf den Stufen 01 und 77 zulässig" -#: cobc/parser.y:8589 cobc/parser.y:8611 +#: cobc/parser.y:8989 cobc/parser.y:9011 #, c-format msgid "%s and %s combination not allowed" msgstr "" -#: cobc/parser.y:8723 +#: cobc/parser.y:9127 msgid "GLOBAL is not allowed with RD" msgstr "" -#: cobc/parser.y:9247 +#: cobc/parser.y:9650 #, fuzzy, c-format #| msgid "'%s' is not a field" msgid "%s is not valid for VARYING" msgstr "»%s« ist kein Feld" -#: cobc/parser.y:9283 +#: cobc/parser.y:9686 msgid "LINE with OCCURS is not supported" msgstr "" -#: cobc/parser.y:9323 +#: cobc/parser.y:9726 msgid "PLUS is not recommended with LEFT, RIGHT or CENTER" msgstr "" -#: cobc/parser.y:9325 +#: cobc/parser.y:9728 msgid "PLUS is not allowed with LEFT, RIGHT or CENTER" msgstr "" -#: cobc/parser.y:9363 +#: cobc/parser.y:9766 msgid "PLUS is ignored on first field of line" msgstr "" -#: cobc/parser.y:9394 +#: cobc/parser.y:9797 msgid "invalid COLUMN integer; must be > 0" msgstr "" -#: cobc/parser.y:9396 +#: cobc/parser.y:9799 msgid "COLUMN numbers should increase" msgstr "" -#: cobc/parser.y:9492 cobc/parser.y:9547 -msgid "INITIAL specified on non-input field" -msgstr "" - -#: cobc/parser.y:9504 cobc/parser.y:9559 -msgid "relative LINE/COLUMN clause required with OCCURS" -msgstr "" - -#: cobc/parser.y:9661 cobc/parser.y:9665 +#: cobc/parser.y:9990 cobc/parser.y:9994 msgid "screen positions from data-item" msgstr "" -#: cobc/parser.y:9821 +#: cobc/parser.y:10153 #, fuzzy, c-format #| msgid "missing definitions:" msgid "missing %s" msgstr "Fehlende Definitionen:" -#: cobc/parser.y:10508 +#: cobc/parser.y:10840 msgid "OCCURS screen items" msgstr "" -#: cobc/parser.y:10520 +#: cobc/parser.y:10852 msgid "GLOBAL screen items" msgstr "" -#: cobc/parser.y:10571 +#: cobc/parser.y:10904 msgid "overriding convention specified in ENTRY-CONVENTION" msgstr "" -#: cobc/parser.y:10586 +#: cobc/parser.y:10917 msgid "executable program requested but PROCEDURE/ENTRY has USING clause" msgstr "" -#: cobc/parser.y:10654 cobc/parser.y:10671 cobc/parser.y:12278 +#: cobc/parser.y:10987 cobc/parser.y:11004 cobc/parser.y:12667 #, fuzzy, c-format msgid "number of arguments exceeds maximum %d" msgstr "Ungültige Anzahl an Argumenten beim Aufruf von '%s'" -#: cobc/parser.y:10663 +#: cobc/parser.y:10996 msgid "CHAINING invalid in user FUNCTION" msgstr "" -#: cobc/parser.y:10699 +#: cobc/parser.y:11032 msgid "ANY LENGTH items may only be BY REFERENCE formal parameters" msgstr "" -#: cobc/parser.y:10716 cobc/parser.y:12337 cobc/parser.y:12350 +#: cobc/parser.y:11049 cobc/parser.y:12728 cobc/parser.y:12741 #, c-format msgid "%s not allowed in CHAINED programs" msgstr "%s ist in CHAINED-Programmen nicht erlaubt" -#: cobc/parser.y:10718 +#: cobc/parser.y:11051 #, fuzzy msgid "parameters passed BY VALUE" msgstr "Aufruf von '%s' mit Parameter NULL" -#: cobc/parser.y:10733 cobc/parser.y:10742 cobc/parser.y:10750 -#: cobc/parser.y:10771 +#: cobc/parser.y:11066 cobc/parser.y:11075 cobc/parser.y:11083 +#: cobc/parser.y:11104 msgid "SIZE only allowed for BY VALUE items" msgstr "" -#: cobc/parser.y:10773 cobc/parser.y:10798 +#: cobc/parser.y:11106 cobc/parser.y:11131 msgid "invalid value for SIZE" msgstr "Ungültiger Wert für SIZE" -#: cobc/parser.y:10813 +#: cobc/parser.y:11146 msgid "MEMORY SIZE phrase in CALL statement" msgstr "" -#: cobc/parser.y:10825 +#: cobc/parser.y:11162 msgid "OPTIONAL only allowed for BY REFERENCE items" msgstr "" -#: cobc/parser.y:10837 +#: cobc/parser.y:11177 msgid "RETURNING clause is required for a FUNCTION" msgstr "" -#: cobc/parser.y:10843 +#: cobc/parser.y:11183 msgid "RETURNING clause cannot be OMITTED for main program" msgstr "" -#: cobc/parser.y:10846 +#: cobc/parser.y:11186 msgid "RETURNING clause cannot be OMITTED for a FUNCTION" msgstr "" -#: cobc/parser.y:10859 +#: cobc/parser.y:11199 msgid "RETURNING item is not defined in LINKAGE SECTION" msgstr "" -#: cobc/parser.y:10861 +#: cobc/parser.y:11201 msgid "RETURNING item must have level 01" msgstr "" -#: cobc/parser.y:10863 +#: cobc/parser.y:11203 msgid "RETURNING item should not have OCCURS" msgstr "" -#: cobc/parser.y:10867 +#: cobc/parser.y:11207 msgid "function RETURNING item may not be ANY LENGTH" msgstr "" -#: cobc/parser.y:11080 +#: cobc/parser.y:11421 #, c-format msgid "'%s' is not a statement" msgstr "»%s« ist keine Anweisung" -#: cobc/parser.y:11083 +#: cobc/parser.y:11424 #, c-format msgid "unknown statement '%s'; it may exist in another dialect" msgstr "Unbekannte Anweisung »%s«; könnte in anderem Dialekt vorhanden sein" -#: cobc/parser.y:11087 +#: cobc/parser.y:11428 #, c-format msgid "unknown statement '%s'" msgstr "Unbekannte Anweisung »%s«" -#: cobc/parser.y:11105 +#: cobc/parser.y:11446 msgid "SECTION segment-number must be less than or equal to 99" msgstr "" -#: cobc/parser.y:11108 +#: cobc/parser.y:11449 msgid "SECTION segment-number in DECLARATIVES must be less than 50" msgstr "" -#: cobc/parser.y:11116 +#: cobc/parser.y:11457 msgid "SECTION segment within DECLARATIVES" msgstr "" -#: cobc/parser.y:11313 cobc/parser.y:11448 +#: cobc/parser.y:11667 cobc/parser.y:11806 msgid "non-standard ACCEPT" msgstr "" -#: cobc/parser.y:11325 +#: cobc/parser.y:11679 msgid "PROMPT clause" msgstr "" -#: cobc/parser.y:11329 +#: cobc/parser.y:11683 msgid "SIZE IS clause" msgstr "" -#: cobc/parser.y:11549 cobc/parser.y:11842 +#: cobc/parser.y:11907 cobc/parser.y:12226 msgid "TIME-OUT or BEFORE TIME clauses" msgstr "" -#: cobc/parser.y:11575 cobc/parser.y:11591 cobc/parser.y:11606 +#: cobc/parser.y:11937 cobc/parser.y:11960 cobc/parser.y:11978 msgid "AT screen-location" msgstr "" -#: cobc/parser.y:11607 +#: cobc/parser.y:11979 msgid "LINE or COLUMN" msgstr "LINE oder COLUMN" -#: cobc/parser.y:11972 +#: cobc/parser.y:12358 msgid "ALLOCATE CHARACTERS requires RETURNING clause" msgstr "" -#: cobc/parser.y:11987 cobc/parser.y:13289 +#: cobc/parser.y:12373 #, fuzzy, c-format #| msgid "ignoring sign" msgid "ignoring %s phrase" msgstr "Vorzeichen wird ignoriert" -#: cobc/parser.y:11989 +#: cobc/parser.y:12375 msgid "addressing mode should be either 24 or 31 bit" msgstr "" -#: cobc/parser.y:12061 +#: cobc/parser.y:12446 msgid "CALL to own PROGRAM-ID" msgstr "" -#: cobc/parser.y:12062 +#: cobc/parser.y:12447 msgid "assuming RECURSIVE attribute" msgstr "" -#: cobc/parser.y:12082 +#: cobc/parser.y:12467 msgid "STATIC CALL convention ignored because of ON EXCEPTION" msgstr "" -#: cobc/parser.y:12091 +#: cobc/parser.y:12476 msgid "ON EXCEPTION ignored because of STATIC CALL" msgstr "" -#: cobc/parser.y:12205 cobc/typeck.c:13644 +#: cobc/parser.y:12594 cobc/typeck.c:14450 #, fuzzy msgid "invalid mnemonic name" msgstr "Ungültige Konfiguration '%s'" -#: cobc/parser.y:12229 +#: cobc/parser.y:12618 msgid "id/literal ignored, using prototype name" msgstr "" -#: cobc/parser.y:12235 +#: cobc/parser.y:12624 msgid "NESTED phrase is only valid with literal" msgstr "" -#: cobc/parser.y:12296 +#: cobc/parser.y:12685 #, fuzzy, c-format msgid "%s only allowed when arguments are passed %s" msgstr "Ungültige Anzahl an Argumenten beim Aufruf von '%s'" -#: cobc/parser.y:12385 +#: cobc/parser.y:12776 msgid "RETURNING item must have level 01 or 77" msgstr "" -#: cobc/parser.y:12389 +#: cobc/parser.y:12780 msgid "RETURNING item must be a LINKAGE SECTION item or have BASED clause" msgstr "" -#: cobc/parser.y:12423 cobc/parser.y:17409 cobc/parser.y:17464 +#: cobc/parser.y:12814 cobc/parser.y:17937 cobc/parser.y:18000 msgid "NOT EXCEPTION before EXCEPTION" msgstr "NOT EXCEPTION vor EXCEPTION" -#: cobc/parser.y:13162 +#: cobc/parser.y:13572 #, c-format msgid "HANDLE must be a %s HANDLE" msgstr "" -#: cobc/parser.y:13174 +#: cobc/parser.y:13584 msgid "HANDLE must be a generic HANDLE" msgstr "" -#: cobc/parser.y:13251 +#: cobc/parser.y:13661 #, c-format msgid "HANDLE clause invalid for %s" msgstr "" -#: cobc/parser.y:13483 cobc/parser.y:16876 +#: cobc/parser.y:13911 cobc/parser.y:17400 #, c-format msgid "%s is invalid in nested program" msgstr "" -#: cobc/parser.y:13521 cobc/parser.y:13564 cobc/parser.y:13575 -#: cobc/parser.y:13586 +#: cobc/parser.y:13940 cobc/parser.y:13983 cobc/parser.y:13994 +#: cobc/parser.y:14005 #, c-format msgid "maximum evaluate depth exceeded (%d)" msgstr "" -#: cobc/parser.y:13627 cobc/parser.y:13637 +#: cobc/parser.y:14048 cobc/parser.y:14089 cobc/parser.y:14633 +#: cobc/parser.y:14644 cobc/parser.y:14653 cobc/parser.y:17959 +#: cobc/parser.y:17981 cobc/parser.y:18022 cobc/parser.y:18038 +#: cobc/parser.y:18078 cobc/parser.y:18095 cobc/parser.y:18132 +#: cobc/parser.y:18149 cobc/parser.y:18199 cobc/parser.y:18216 +#: cobc/parser.y:18252 cobc/parser.y:18269 cobc/parser.y:18310 +#: cobc/parser.y:18327 +#, fuzzy, c-format +#| msgid "'%s' is not a statement" +msgid "%s without imperative statement" +msgstr "»%s« ist keine Anweisung" + +#: cobc/parser.y:14056 cobc/parser.y:14066 msgid "WHEN without imperative statement" msgstr "" -#: cobc/parser.y:13655 cobc/parser.y:13665 +#: cobc/parser.y:14097 cobc/parser.y:14107 msgid "WHEN OTHER without imperative statement" msgstr "" -#: cobc/parser.y:13745 +#: cobc/parser.y:14191 msgid "invalid THROUGH usage" msgstr "" -#: cobc/parser.y:13909 +#: cobc/parser.y:14372 msgid "EXIT PROGRAM is not allowed within a USE GLOBAL procedure" msgstr "" -#: cobc/parser.y:13913 +#: cobc/parser.y:14376 #, fuzzy msgid "EXIT PROGRAM not allowed within a FUNCTION" msgstr "'%s' EXTERNAL nicht zulässig mit REDEFINES" -#: cobc/parser.y:13927 +#: cobc/parser.y:14390 msgid "EXIT FUNCTION is not allowed within a USE GLOBAL procedure" msgstr "" -#: cobc/parser.y:13931 +#: cobc/parser.y:14394 msgid "EXIT FUNCTION only allowed within a FUNCTION" msgstr "" -#: cobc/parser.y:13945 cobc/parser.y:13968 +#: cobc/parser.y:14408 cobc/parser.y:14431 msgid "EXIT PERFORM is only valid with inline PERFORM" msgstr "" -#: cobc/parser.y:13990 +#: cobc/parser.y:14453 msgid "EXIT SECTION is only valid with an active SECTION" msgstr "" -#: cobc/parser.y:14011 +#: cobc/parser.y:14474 msgid "EXIT PARAGRAPH is only valid with an active PARAGRAPH" msgstr "" -#: cobc/parser.y:14034 +#: cobc/parser.y:14497 msgid "RETURNING/GIVING not allowed for non-returning runtime elements" msgstr "" -#: cobc/parser.y:14166 +#: cobc/parser.y:14640 msgid "IF without imperative statement" msgstr "" -#: cobc/parser.y:14497 cobc/parser.y:14506 +#: cobc/parser.y:14983 cobc/parser.y:14992 msgid "single-character literal or data item expected" msgstr "" -#: cobc/parser.y:14524 +#: cobc/parser.y:15010 msgid "TALLYING clause is incomplete" msgstr "" -#: cobc/parser.y:14640 +#: cobc/parser.y:15126 msgid "INSPECT missing ALL/FIRST/LEADING/TRAILING" msgstr "" -#: cobc/parser.y:14902 +#: cobc/parser.y:15390 msgid "LOCK clauses" msgstr "" -#: cobc/parser.y:15059 +#: cobc/parser.y:15547 msgid "inline PERFORM without imperative statement" msgstr "" -#: cobc/parser.y:15180 cobc/parser.y:15188 cobc/parser.y:15196 +#: cobc/parser.y:15670 cobc/parser.y:15678 cobc/parser.y:15686 #, c-format msgid "PERFORM VARYING '%s' (line %d of %s) is not a numeric field" msgstr "" -#: cobc/parser.y:15212 +#: cobc/parser.y:15702 msgid "PERFORM VARYING without BY phrase" msgstr "" -#: cobc/parser.y:15252 +#: cobc/parser.y:15742 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "'%s' is not an object-reference" msgstr "»%s« ist keine Ganzzahl" -#: cobc/parser.y:15292 cobc/typeck.c:12295 cobc/typeck.c:13552 +#: cobc/parser.y:15782 cobc/typeck.c:13066 cobc/typeck.c:14358 msgid "LOCK clause invalid with file LOCK AUTOMATIC" msgstr "" -#: cobc/parser.y:15297 +#: cobc/parser.y:15787 msgid "KEY clause invalid with this file type" msgstr "" -#: cobc/parser.y:15302 cobc/typeck.c:12291 cobc/typeck.c:13548 +#: cobc/parser.y:15792 cobc/typeck.c:13062 cobc/typeck.c:14354 msgid "INVALID KEY clause invalid with this file type" msgstr "" -#: cobc/parser.y:15986 -msgid "file sort requires KEY phrase" +#: cobc/parser.y:16494 +msgid "MERGE requires KEY phrase" +msgstr "" + +#: cobc/parser.y:16498 +msgid "file SORT requires KEY phrase" msgstr "" -#: cobc/parser.y:16010 +#: cobc/parser.y:16522 msgid "table SORT requires KEY phrase" msgstr "" -#: cobc/parser.y:16072 -msgid "file sort requires USING or INPUT PROCEDURE" +#: cobc/parser.y:16527 +#, fuzzy +#| msgid "'%s' is not an integer" +msgid "must be an SD filename" +msgstr "»%s« ist keine Ganzzahl" + +#: cobc/parser.y:16585 +msgid "MERGE requires USING files" +msgstr "" + +#: cobc/parser.y:16587 +msgid "file SORT requires USING or INPUT PROCEDURE" msgstr "" -#: cobc/parser.y:16079 +#: cobc/parser.y:16595 msgid "USING invalid with table SORT" msgstr "" -#: cobc/parser.y:16089 +#: cobc/parser.y:16605 msgid "INPUT PROCEDURE invalid with table SORT" msgstr "" -#: cobc/parser.y:16091 +#: cobc/parser.y:16607 msgid "INPUT PROCEDURE invalid with MERGE" msgstr "" -#: cobc/parser.y:16104 -msgid "file sort requires GIVING or OUTPUT PROCEDURE" +#: cobc/parser.y:16621 +msgid "MERGE requires GIVING or OUTPUT PROCEDURE" +msgstr "" + +#: cobc/parser.y:16623 +msgid "file SORT requires GIVING or OUTPUT PROCEDURE" msgstr "" -#: cobc/parser.y:16111 +#: cobc/parser.y:16631 msgid "GIVING invalid with table SORT" msgstr "" -#: cobc/parser.y:16121 +#: cobc/parser.y:16641 msgid "OUTPUT PROCEDURE invalid with table SORT" msgstr "" -#: cobc/parser.y:16148 +#: cobc/parser.y:16668 msgid "SIZE/LENGTH invalid here" msgstr "SIZE/LENGTH ist hier unzulässig" -#: cobc/parser.y:16197 +#: cobc/parser.y:16717 msgid "NOT EQUAL condition not allowed on START statement" msgstr "" -#: cobc/parser.y:16255 +#: cobc/parser.y:16776 #, c-format msgid "%s is replaced by %s" msgstr "" -#: cobc/parser.y:16304 +#: cobc/parser.y:16825 msgid "STOP literal" msgstr "" -#: cobc/parser.y:16308 +#: cobc/parser.y:16829 msgid "STOP identifier" msgstr "" -#: cobc/parser.y:16446 +#: cobc/parser.y:16969 msgid "SUPPRESS statement must be within DECLARATIVES" msgstr "" -#: cobc/parser.y:16520 -msgid "UNLOCK invalid for SORT files" +#: cobc/parser.y:17043 +msgid "UNLOCK invalid for SD files" msgstr "" -#: cobc/parser.y:16656 cobc/parser.y:16736 +#: cobc/parser.y:17180 cobc/parser.y:17260 msgid "USE statement must be within DECLARATIVES" msgstr "" -#: cobc/parser.y:16658 +#: cobc/parser.y:17182 msgid "SECTION header missing before USE statement" msgstr "" -#: cobc/parser.y:16738 +#: cobc/parser.y:17262 msgid "USE DEBUGGING not supported in contained program" msgstr "" -#: cobc/parser.y:16786 cobc/parser.y:16795 cobc/parser.y:16813 -#: cobc/parser.y:16849 cobc/typeck.c:4886 +#: cobc/parser.y:17310 cobc/parser.y:17319 cobc/parser.y:17337 +#: cobc/parser.y:17373 cobc/typeck.c:5050 #, fuzzy, c-format #| msgid "duplicate DEFINE '%s' - ignored" msgid "duplicate DEBUGGING target: '%s'" msgstr "doppeltes DEFINE »%s« – ignoriert" -#: cobc/parser.y:16811 +#: cobc/parser.y:17335 #, fuzzy #| msgid "a constant may not be used here - '%s'" msgid "constant item cannot be used here" msgstr "Eine Konstante darf hier nicht verwendet werden – »%s«" -#: cobc/parser.y:16837 +#: cobc/parser.y:17361 msgid "duplicate USE DEBUGGING ON ALL PROCEDURES" msgstr "" -#: cobc/parser.y:17089 +#: cobc/parser.y:17614 msgid "ENCODING clause must come before XML-DECLARATION" msgstr "" -#: cobc/parser.y:17091 +#: cobc/parser.y:17616 msgid "ENCODING clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17094 +#: cobc/parser.y:17619 msgid "XML GENERATE ENCODING clause" msgstr "" -#: cobc/parser.y:17101 +#: cobc/parser.y:17626 msgid "XML-DECLARATION clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17104 +#: cobc/parser.y:17629 msgid "XML GENERATE XML-DECLARATION clause" msgstr "" -#: cobc/parser.y:17110 +#: cobc/parser.y:17635 msgid "XML GENERATE WITH ATTRIBUTES clause" msgstr "" -#: cobc/parser.y:17123 +#: cobc/parser.y:17648 msgid "XML GENERATE NAMESPACE clause" msgstr "" -#: cobc/parser.y:17147 +#: cobc/parser.y:17672 msgid "XML GENERATE NAME OF clause" msgstr "" -#: cobc/parser.y:17211 +#: cobc/parser.y:17736 msgid "XML GENERATE TYPE OF clause" msgstr "" -#: cobc/parser.y:17252 +#: cobc/parser.y:17777 msgid "XML GENERATE SUPPRESS clause" msgstr "" -#: cobc/parser.y:17392 +#: cobc/parser.y:17920 #, fuzzy, c-format #| msgid "'%s' is not a locale name" msgid "'%s' is not a schema name" msgstr "»%s« ist kein Locale-Name" -#: cobc/parser.y:17510 +#: cobc/parser.y:18055 msgid "NOT SIZE ERROR before SIZE ERROR" msgstr "" -#: cobc/parser.y:17556 +#: cobc/parser.y:18109 msgid "NOT OVERFLOW before OVERFLOW" msgstr "" -#: cobc/parser.y:17655 +#: cobc/parser.y:18161 cobc/parser.y:18176 +#, fuzzy +#| msgid "NOT EXCEPTION before EXCEPTION" +msgid "NOT AT END before AT END" +msgstr "NOT EXCEPTION vor EXCEPTION" + +#: cobc/parser.y:18229 msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" msgstr "" -#: cobc/parser.y:17705 +#: cobc/parser.y:18287 msgid "NOT INVALID KEY before INVALID KEY" msgstr "" -#: cobc/parser.y:18048 +#: cobc/parser.y:18644 msgid "LINAGE-COUNTER must be qualified here" msgstr "" -#: cobc/parser.y:18051 +#: cobc/parser.y:18647 msgid "invalid LINAGE-COUNTER usage" msgstr "" -#: cobc/parser.y:18062 cobc/parser.y:18158 cobc/parser.y:18247 +#: cobc/parser.y:18658 cobc/parser.y:18754 cobc/parser.y:18843 #, c-format msgid "'%s' is not a file name" msgstr "»%s« ist kein Dateiname" -#: cobc/parser.y:18072 +#: cobc/parser.y:18668 msgid "LINE-COUNTER must be qualified here" msgstr "" -#: cobc/parser.y:18076 +#: cobc/parser.y:18672 msgid "invalid LINE-COUNTER usage" msgstr "" -#: cobc/parser.y:18087 cobc/parser.y:18112 +#: cobc/parser.y:18683 cobc/parser.y:18708 #, fuzzy, c-format msgid "'%s' is not a report name" msgstr "'%s' ist kein Report-Name" -#: cobc/parser.y:18097 +#: cobc/parser.y:18693 msgid "PAGE-COUNTER must be qualified here" msgstr "" -#: cobc/parser.y:18101 +#: cobc/parser.y:18697 msgid "invalid PAGE-COUNTER usage" msgstr "" -#: cobc/parser.y:18148 cobc/typeck.c:12256 cobc/typeck.c:12339 -#: cobc/typeck.c:13516 +#: cobc/parser.y:18744 cobc/typeck.c:13027 cobc/typeck.c:13110 +#: cobc/typeck.c:14322 #, fuzzy, c-format msgid "%s requires a record name as subject" msgstr "CALL von %s benötigt %d Parameter" -#: cobc/parser.y:18175 +#: cobc/parser.y:18771 #, c-format msgid "'%s' not indexed" msgstr "»%s« ist nicht indiziert" -#: cobc/parser.y:18180 +#: cobc/parser.y:18776 msgid "SEARCH ALL requires KEY phrase" msgstr "" -#: cobc/parser.y:18204 cobc/parser.y:18229 +#: cobc/parser.y:18800 cobc/parser.y:18825 #, c-format msgid "multiple reference to '%s' " msgstr "Mehrfachreferenz auf »%s« " -#: cobc/parser.y:18259 +#: cobc/parser.y:18855 #, c-format msgid "'%s' is not a CD name" msgstr "»%s« ist kein CD-Name" -#: cobc/parser.y:18273 +#: cobc/parser.y:18869 #, fuzzy, c-format msgid "'%s' is not a valid report name" msgstr "'%s' ist kein Report-Name" -#: cobc/parser.y:18526 +#: cobc/parser.y:19134 msgid "invalid mnemonic identifier" msgstr "" -#: cobc/parser.y:18606 +#: cobc/parser.y:19214 +#, fuzzy +#| msgid "a non-numeric literal is expected for '%s'" +msgid "an alphanumeric literal is expected here" +msgstr "Ein nicht-numerisches Literal wird für »%s« erwartet" + +#: cobc/parser.y:19226 #, fuzzy #| msgid "a non-numeric literal is expected for '%s'" msgid "a numeric literal is expected here" msgstr "Ein nicht-numerisches Literal wird für »%s« erwartet" -#: cobc/parser.y:18618 cobc/parser.y:19366 +#: cobc/parser.y:19238 cobc/parser.y:19979 #, fuzzy #| msgid "a non-numeric literal is expected for '%s'" msgid "a non-numeric literal is expected here" msgstr "Ein nicht-numerisches Literal wird für »%s« erwartet" -#: cobc/parser.y:18784 cobc/typeck.c:7302 cobc/typeck.c:7309 +#: cobc/parser.y:19404 cobc/typeck.c:993 cobc/typeck.c:4825 cobc/typeck.c:7679 +#: cobc/typeck.c:7686 #, c-format msgid "'%s' is not numeric" msgstr "»%s« ist nicht numerisch" -#: cobc/parser.y:18800 +#: cobc/parser.y:19420 #, c-format msgid "'%s' is not a field or file" msgstr "»%s« ist weder Feld noch Datei" -#: cobc/parser.y:18820 cobc/parser.y:18859 cobc/parser.y:18935 -#, c-format -msgid "'%s' is not a field" -msgstr "»%s« ist kein Feld" - -#: cobc/parser.y:18841 +#: cobc/parser.y:19446 #, fuzzy, c-format #| msgid "'%s' is not a file name" msgid "'%s' is not a type-name" msgstr "»%s« ist kein Dateiname" -#: cobc/parser.y:18927 cobc/typeck.c:2328 cobc/typeck.c:2407 +#: cobc/parser.y:19526 cobc/typeck.c:2345 cobc/typeck.c:2401 cobc/typeck.c:2550 #, c-format msgid "'%s' cannot be reference modified" msgstr "" -#: cobc/parser.y:19015 +#: cobc/parser.y:19627 #, fuzzy, c-format #| msgid "'%s' is not a field or file" msgid "'%s' is not a field or alphabet" msgstr "»%s« ist weder Feld noch Datei" -#: cobc/parser.y:19041 +#: cobc/parser.y:19653 #, fuzzy #| msgid "'%s' cannot be used here" msgid "a subscripted data-item cannot be used here" msgstr "»%s« kann hier nicht verwendet werden" -#: cobc/parser.y:19089 +#: cobc/parser.y:19701 #, fuzzy #| msgid "integer value expected" msgid "unsigned integer value expected" msgstr "Ganzzahlwert erwartet" -#: cobc/parser.y:19101 cobc/parser.y:19105 cobc/parser.y:19155 +#: cobc/parser.y:19713 cobc/parser.y:19717 cobc/parser.y:19767 msgid "integer value expected" msgstr "Ganzzahlwert erwartet" -#: cobc/parser.y:19110 +#: cobc/parser.y:19722 msgid "invalid symbolic integer" msgstr "Ungültige symbolische Ganzzahl" -#: cobc/parser.y:19126 cobc/parser.y:19130 +#: cobc/parser.y:19738 cobc/parser.y:19742 msgid "unsigned positive integer value expected" msgstr "" -#: cobc/parser.y:19159 -msgid "invalid CLASS value" -msgstr "Ungültiger Wert für CLASS" +#: cobc/parser.y:19772 +#, c-format +msgid "CLASS value %d outside of range for the used character set" +msgstr "" -#: cobc/parser.y:19246 +#: cobc/parser.y:19859 msgid "PHYSICAL argument for LENGTH functions" msgstr "" -#: cobc/parser.y:19418 cobc/parser.y:19435 +#: cobc/parser.y:20031 cobc/parser.y:20048 msgid "cannot specify offset and SYSTEM-OFFSET at the same time" msgstr "" -#: cobc/parser.y:19702 cobc/parser.y:19711 cobc/parser.y:19721 -#: cobc/parser.y:19731 cobc/parser.y:19751 cobc/parser.y:19771 -#: cobc/parser.y:19777 +#: cobc/parser.y:20228 +msgid "terminator" +msgstr "" + +#: cobc/parser.y:20317 cobc/parser.y:20327 cobc/parser.y:20338 +#: cobc/parser.y:20348 cobc/parser.y:20369 cobc/parser.y:20389 +#: cobc/parser.y:20396 msgid "optional period" msgstr "" -#: cobc/pplex.l:257 cobc/pplex.l:2219 cobc/pplex.l:2233 +#: cobc/pplex.l:261 cobc/pplex.l:2448 cobc/pplex.l:2462 msgid "debugging indicator" msgstr "" -#: cobc/pplex.l:334 +#: cobc/pplex.l:348 msgid "ignoring empty directive" msgstr "" -#: cobc/pplex.l:344 cobc/pplex.l:411 +#: cobc/pplex.l:358 cobc/pplex.l:431 #, c-format msgid "ignoring invalid directive: '%s'" msgstr "Ungültige Anweisung wird ignoriert: »%s«" -#: cobc/pplex.l:351 +#: cobc/pplex.l:365 msgid "ignoring invalid directive" msgstr "" -#: cobc/pplex.l:358 +#: cobc/pplex.l:372 msgid "VCS directive" msgstr "" -#: cobc/pplex.l:420 cobc/pplex.l:441 +#: cobc/pplex.l:440 cobc/pplex.l:461 #, fuzzy, c-format #| msgid "ignoring invalid directive: '%s'" msgid "ignoring unknown directive: '%s'" msgstr "Ungültige Anweisung wird ignoriert: »%s«" -#: cobc/pplex.l:1065 +#: cobc/pplex.l:1164 msgid "IF/ELIF/ELSE directive without matching END-IF" msgstr "" -#: cobc/pplex.l:1409 +#: cobc/pplex.l:1332 +msgid "free format detected" +msgstr "" + +#: cobc/pplex.l:1608 #, c-format msgid "copybook not found in library '%s', library-name ignored" msgstr "" -#: cobc/pplex.l:1469 +#: cobc/pplex.l:1667 #, fuzzy, c-format #| msgid "ignoring invalid directive: '%s'" msgid "ignoring %s directive because of %s" msgstr "Ungültige Anweisung wird ignoriert: »%s«" -#: cobc/pplex.l:1645 +#: cobc/pplex.l:1854 #, fuzzy, c-format msgid "directive nest depth exceeded: %d" msgstr "'%s' nicht implementiert" -#: cobc/pplex.l:1663 +#: cobc/pplex.l:1872 msgid "ELSE directive without matching IF/ELIF" msgstr "" -#: cobc/pplex.l:1679 +#: cobc/pplex.l:1888 msgid "END-IF directive without matching IF/ELIF/ELSE" msgstr "" -#: cobc/pplex.l:1695 +#: cobc/pplex.l:1904 msgid "ELIF directive without matching IF/ELIF" msgstr "" -#: cobc/pplex.l:1717 +#: cobc/pplex.l:1926 #, fuzzy, c-format msgid "invalid internal case: %u" msgstr "Ungültiger Typ für '%s'" -#: cobc/pplex.l:1914 +#: cobc/pplex.l:2139 msgid "buffer overrun - too many continuation lines" msgstr "" -#: cobc/pplex.l:2009 cobc/pplex.l:2019 +#: cobc/pplex.l:2236 cobc/pplex.l:2246 msgid "line not terminated by a newline" msgstr "Zeile wird nicht durch Zeilenvorschub beendet" -#: cobc/pplex.l:2013 cobc/pplex.l:2023 +#: cobc/pplex.l:2240 cobc/pplex.l:2250 #, c-format msgid "source text exceeds %d bytes, will be truncated" msgstr "Quelltextgröße überschreitet %d Bytes, wird gekürzt" -#: cobc/pplex.l:2042 +#: cobc/pplex.l:2269 msgid "version control conflict marker in file" msgstr "" -#: cobc/pplex.l:2194 +#: cobc/pplex.l:2423 #, fuzzy msgid "invalid continuation in comment entry" msgstr "Ungültige Konfiguration '%s'" -#: cobc/pplex.l:2241 +#: cobc/pplex.l:2470 #, c-format msgid "invalid indicator '\\' at column %d" msgstr "" -#: cobc/pplex.l:2253 +#: cobc/pplex.l:2482 #, fuzzy, c-format msgid "invalid indicator '%c' at column %d" msgstr "Ungültiger Typ für '%s'" -#: cobc/pplex.l:2312 cobc/pplex.l:2323 +#: cobc/pplex.l:2541 cobc/pplex.l:2552 #, fuzzy msgid "invalid line continuation" msgstr "Die Option -o ist in dieser Kombination ungültig" -#: cobc/pplex.l:2331 +#: cobc/pplex.l:2560 msgid "continuation character expected" msgstr "" -#: cobc/pplex.l:2399 +#: cobc/pplex.l:2628 #, c-format msgid "source text after program-text area (column %d)" msgstr "" -#: cobc/ppparse.y:107 +#: cobc/ppparse.y:102 cobc/ppparse.y:106 +#, fuzzy +#| msgid "numeric boolean literal" +msgid "partial replacing with literal" +msgstr "Numerisches boolesches Literal" + +#: cobc/ppparse.y:109 msgid "unexpected COBOL word in partial replacement phrase" msgstr "" -#: cobc/ppparse.y:256 +#: cobc/ppparse.y:176 +#, fuzzy +msgid "invalid partial replacing operand" +msgstr "Ungültiger Typ für '%s'" + +#: cobc/ppparse.y:291 msgid "directive comparison on different types" msgstr "" -#: cobc/ppparse.y:324 +#: cobc/ppparse.y:359 #, c-format msgid "duplicate DEFINE directive '%s'" msgstr "" -#: cobc/ppparse.y:331 cobc/ppparse.y:341 +#: cobc/ppparse.y:366 cobc/ppparse.y:376 #, fuzzy, c-format #| msgid "ignoring invalid directive: '%s'" msgid "invalid constant %s in DEFINE directive" msgstr "Ungültige Anweisung wird ignoriert: »%s«" -#: cobc/ppparse.y:439 +#: cobc/ppparse.y:474 #, c-format msgid "compiler flag '%s' unknown" msgstr "" -#: cobc/ppparse.y:486 +#: cobc/ppparse.y:521 #, fuzzy, c-format #| msgid "ignoring invalid directive: '%s'" msgid "invalid %s directive option '%s'" msgstr "Ungültige Anweisung wird ignoriert: »%s«" -#: cobc/ppparse.y:488 +#: cobc/ppparse.y:523 #, fuzzy, c-format #| msgid "ignoring invalid directive: '%s'" msgid "invalid %s directive option" msgstr "Ungültige Anweisung wird ignoriert: »%s«" -#: cobc/ppparse.y:839 cobc/ppparse.y:848 cobc/ppparse.y:1258 +#: cobc/ppparse.y:875 cobc/ppparse.y:884 cobc/ppparse.y:1294 #, c-format msgid "invalid %s directive" msgstr "" -#: cobc/ppparse.y:1330 +#: cobc/ppparse.y:1366 msgid "LEAP-SECOND ON directive" msgstr "" -#: cobc/ppparse.y:1439 cobc/ppparse.y:1471 +#: cobc/ppparse.y:1475 cobc/ppparse.y:1507 msgid "invalid constant" msgstr "Ungültige Konstante" -#: cobc/reserved.c:4012 +#: cobc/reserved.c:4029 msgid "device name" msgstr "Gerätename" -#: cobc/reserved.c:4015 +#: cobc/reserved.c:4032 msgid "switch name" msgstr "" -#: cobc/reserved.c:4018 +#: cobc/reserved.c:4035 msgid "feature name" msgstr "" -#: cobc/reserved.c:4129 +#: cobc/reserved.c:4146 #, fuzzy, c-format #| msgid "reserved word must have less than %d characters" msgid "reserved word (%s) must have less than %d characters" msgstr "Reservierte Wörter müssen weniger als %d Zeichen haben" -#: cobc/reserved.c:4149 +#: cobc/reserved.c:4166 #, c-format msgid "reserved word (%s) may not contain '%c'" msgstr "" -#: cobc/reserved.c:4166 +#: cobc/reserved.c:4183 msgid "ignored asterisk at end of alias target" msgstr "" -#: cobc/reserved.c:4229 +#: cobc/reserved.c:4248 #, c-format msgid "alias target '%s' is not a default reserved word" msgstr "" -#: cobc/reserved.c:4719 +#: cobc/reserved.c:4738 #, c-format msgid "invalid system-name '%s'" msgstr "Ungültiger Systemname »%s«" -#: cobc/reserved.c:4883 +#: cobc/reserved.c:4902 #, c-format msgid "'%s' is a reserved word, but isn't supported" msgstr "»%s« ist ein reserviertes Wort, wird aber nicht unterstützt" -#: cobc/reserved.c:4988 +#: cobc/reserved.c:5005 #, c-format msgid "intrinsic function %s is unknown" msgstr "" -#: cobc/reserved.c:5016 +#: cobc/reserved.c:5033 msgid "Intrinsic Function" msgstr "Intrinsische Funktion" -#: cobc/reserved.c:5016 cobc/reserved.c:5249 cobc/reserved.c:5386 +#: cobc/reserved.c:5033 cobc/reserved.c:5266 cobc/reserved.c:5403 msgid "Implemented" msgstr "Implementiert" -#: cobc/reserved.c:5016 cobc/typeck.c:1163 +#: cobc/reserved.c:5033 cobc/typeck.c:1178 msgid "Parameters" msgstr "Parameter" -#: cobc/reserved.c:5020 cobc/reserved.c:5253 cobc/reserved.c:5400 -#: cobc/reserved.c:5406 +#: cobc/reserved.c:5037 cobc/reserved.c:5270 cobc/reserved.c:5417 +#: cobc/reserved.c:5423 msgid "Yes" msgstr "Ja" -#: cobc/reserved.c:5023 cobc/reserved.c:5256 cobc/reserved.c:5410 +#: cobc/reserved.c:5040 cobc/reserved.c:5273 cobc/reserved.c:5427 msgid "No" msgstr "Nein" -#: cobc/reserved.c:5029 +#: cobc/reserved.c:5046 msgid "Unlimited" msgstr "Unbegrenzt" -#: cobc/reserved.c:5046 +#: cobc/reserved.c:5063 msgid "Exception Name" msgstr "" -#: cobc/reserved.c:5148 +#: cobc/reserved.c:5165 #, c-format msgid "special register '%s' is unknown, needs a definition" msgstr "" -#: cobc/reserved.c:5155 +#: cobc/reserved.c:5172 #, c-format msgid "special register '%s' has a bad definition: %s" msgstr "" -#: cobc/reserved.c:5159 +#: cobc/reserved.c:5176 #, c-format msgid "special register '%s' is unknown" msgstr "" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Internal registers" msgstr "" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Definition" msgstr "Definition" -#: cobc/reserved.c:5337 +#: cobc/reserved.c:5354 #, fuzzy, c-format #| msgid "unknown statement '%s'" msgid "unknown system-name '%s'" msgstr "Unbekannte Anweisung »%s«" -#: cobc/reserved.c:5363 +#: cobc/reserved.c:5380 msgid "System names" msgstr "" -#: cobc/reserved.c:5386 +#: cobc/reserved.c:5403 msgid "Reserved Words" msgstr "Reservierte Wörter" -#: cobc/reserved.c:5398 +#: cobc/reserved.c:5415 msgid "Yes (Context sensitive)" msgstr "Ja (kontextabhängig)" -#: cobc/reserved.c:5408 +#: cobc/reserved.c:5425 msgid "No (Context sensitive)" msgstr "Nein (kontextabhängig)" -#: cobc/scanner.l:272 +#: cobc/scanner.l:281 #, fuzzy, c-format #| msgid "'%s' is not defined, but is a reserved word in another dialect" msgid "'%s' is not a reserved word, so cannot be removed" msgstr "»%s« ist nicht definiert, aber in einem anderen Dialekt ein reserviertes Wort" -#: cobc/scanner.l:320 +#: cobc/scanner.l:329 msgid "separator period in Area A" msgstr "" -#: cobc/scanner.l:1067 +#: cobc/scanner.l:1096 #, c-format msgid "a constant may not be used here - '%s'" msgstr "Eine Konstante darf hier nicht verwendet werden – »%s«" -#: cobc/scanner.l:1137 +#: cobc/scanner.l:1170 msgid "ignoring redundant ." msgstr "" -#: cobc/scanner.l:1195 +#: cobc/scanner.l:1249 #, c-format msgid "invalid symbol '%s' - skipping word" msgstr "Ungültiges Symbol »%s« – Wort wird übersprungen" -#: cobc/scanner.l:1289 +#: cobc/scanner.l:1323 #, fuzzy msgid "invalid national literal" msgstr "Ungültiger Typ für '%s'" -#: cobc/scanner.l:1293 cobc/tree.c:2800 +#: cobc/scanner.l:1327 cobc/tree.c:2822 #, c-format msgid "invalid literal: '%s'" msgstr "Ungültiges Literal: »%s«" -#: cobc/scanner.l:1295 +#: cobc/scanner.l:1329 #, c-format msgid "invalid hexadecimal literal: '%s'" msgstr "Ungültiges hexadezimales Literal: »%s«" -#: cobc/scanner.l:1297 cobc/tree.c:1779 +#: cobc/scanner.l:1331 cobc/tree.c:1803 #, c-format msgid "invalid numeric literal: '%s'" msgstr "Ungültiges numerisches Literal: »%s«" -#: cobc/scanner.l:1299 +#: cobc/scanner.l:1333 #, c-format msgid "invalid floating-point literal: '%s'" msgstr "Ungültiges Gleitkomma-Literal: »%s«" -#: cobc/scanner.l:1301 +#: cobc/scanner.l:1335 cobc/scanner.l:1337 #, c-format msgid "invalid %s literal: '%s'" msgstr "Ungültiges %s-Literal: »%s«" -#: cobc/scanner.l:1350 +#: cobc/scanner.l:1365 +#, c-format +msgid "character code %s out of encoding range %s" +msgstr "" + +#: cobc/scanner.l:1422 +msgid "extraneous separator ',' at end of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1435 +msgid "extraneous character ',' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1440 +#, fuzzy, c-format +#| msgid "invalid operator '%s' in expression" +msgid "invalid character '%c' in sequence of symbolic EBCDIC characters" +msgstr "Ungültiger Operator »%s« im Ausdruck" + +#: cobc/scanner.l:1470 #, fuzzy, c-format #| msgid "literal length exceeds %d characters" msgid "literal length exceeds %u characters" msgstr "Länge des Literals überschreitet %d Zeichen" -#: cobc/scanner.l:1365 +#: cobc/scanner.l:1485 #, c-format msgid "missing terminating %c character" msgstr "" -#: cobc/scanner.l:1382 cobc/scanner.l:1444 cobc/scanner.l:1729 +#: cobc/scanner.l:1502 cobc/scanner.l:1569 cobc/scanner.l:1868 #, fuzzy #| msgid "numeric boolean literal" msgid "zero-length literal" msgstr "Numerisches boolesches Literal" -#: cobc/scanner.l:1385 +#: cobc/scanner.l:1505 msgid "national literal has zero length; a SPACE will be assumed" msgstr "" -#: cobc/scanner.l:1386 +#: cobc/scanner.l:1506 msgid "alphanumeric literal has zero length; a SPACE will be assumed" msgstr "" -#: cobc/scanner.l:1412 cobc/scanner.l:1413 cobc/scanner.l:1417 -#: cobc/scanner.l:1494 +#: cobc/scanner.l:1519 +msgid "UTF-8 literal" +msgstr "" + +#: cobc/scanner.l:1536 cobc/scanner.l:1537 cobc/scanner.l:1541 +#: cobc/scanner.l:1624 #, fuzzy msgid "national literal" msgstr "Ungültiger Typ für '%s'" -#: cobc/scanner.l:1416 +#: cobc/scanner.l:1540 #, fuzzy msgid "national-character literal" msgstr "Ungültiger Typ für '%s'" -#: cobc/scanner.l:1447 +#: cobc/scanner.l:1571 msgid "hexadecimal literal has zero length; X'00' will be assumed" msgstr "" -#: cobc/scanner.l:1472 +#: cobc/scanner.l:1575 cobc/scanner.l:1601 #, fuzzy msgid "hexadecimal-boolean literal" msgstr "Numerisches Literal ist negativ" -#: cobc/scanner.l:1480 cobc/scanner.l:1499 cobc/scanner.l:1608 -#: cobc/scanner.l:1659 cobc/scanner.l:1754 cobc/scanner.l:1824 -#, fuzzy, c-format -msgid "literal length %lu exceeds %u characters" -msgstr "PROGRAM Name überschreitet 31 Zeichen" - -#: cobc/scanner.l:1490 +#: cobc/scanner.l:1579 cobc/scanner.l:1619 #, fuzzy msgid "hexadecimal-national literal" msgstr "Ungültiger Typ für '%s'" -#: cobc/scanner.l:1521 cobc/scanner.l:1551 cobc/scanner.l:1674 -#: cobc/scanner.l:1771 cobc/scanner.l:1835 +#: cobc/scanner.l:1609 cobc/scanner.l:1629 cobc/scanner.l:1744 +#: cobc/scanner.l:1798 cobc/scanner.l:1893 cobc/scanner.l:1963 +#, fuzzy, c-format +msgid "literal length %lu exceeds %u characters" +msgstr "PROGRAM Name überschreitet 31 Zeichen" + +#: cobc/scanner.l:1651 cobc/scanner.l:1680 cobc/scanner.l:1813 +#: cobc/scanner.l:1910 cobc/scanner.l:1974 #, c-format msgid "literal contains invalid character '%c'" msgstr "Literal enthält ungültiges Zeichen »%c«" -#: cobc/scanner.l:1573 +#: cobc/scanner.l:1704 #, c-format msgid "literal does not have an even number of digits" msgstr "" -#: cobc/scanner.l:1599 +#: cobc/scanner.l:1735 cobc/scanner.l:1788 #, fuzzy, c-format #| msgid "literal contains invalid character '%c'" msgid "%s literals must contain at least one character" msgstr "Literal enthält ungültiges Zeichen »%c«" -#: cobc/scanner.l:1639 cobc/scanner.l:1739 cobc/scanner.l:1813 +#: cobc/scanner.l:1775 cobc/scanner.l:1878 cobc/scanner.l:1952 msgid "ACUCOBOL numeric literal" msgstr "" -#: cobc/scanner.l:1651 -#, fuzzy -#| msgid "literal contains invalid character '%c'" -msgid "H literals must contain at least one character" -msgstr "Literal enthält ungültiges Zeichen »%c«" - -#: cobc/scanner.l:1690 cobc/scanner.l:1783 cobc/scanner.l:1846 +#: cobc/scanner.l:1829 cobc/scanner.l:1922 cobc/scanner.l:1985 #, c-format msgid "literal exceeds limit %u" msgstr "Literal übersteigt die Größenbeschränkung %u" -#: cobc/scanner.l:1724 +#: cobc/scanner.l:1863 msgid "numeric boolean literal" msgstr "Numerisches boolesches Literal" -#: cobc/scanner.l:1731 -msgid "Boolean literal has zero length; B'0' will be assumed" +#: cobc/scanner.l:1870 +msgid "boolean literal has zero length; B'0' will be assumed" msgstr "" -#: cobc/scanner.l:1807 +#: cobc/scanner.l:1946 msgid "HP COBOL octal literal" msgstr "" -#: cobc/scanner.l:1921 +#: cobc/scanner.l:2059 #, fuzzy, c-format msgid "literal length %lu exceeds maximum of %u digits" msgstr "PROGRAM Name überschreitet 31 Zeichen" -#: cobc/scanner.l:1927 +#: cobc/scanner.l:2065 #, fuzzy, c-format msgid "literal length %lu exceeds %u digits" msgstr "PROGRAM Name überschreitet 31 Zeichen" -#: cobc/scanner.l:2039 cobc/tree.c:3845 +#: cobc/scanner.l:2177 cobc/tree.c:3888 #, fuzzy, c-format #| msgid "exponent has more than 4 digits" msgid "significand has more than %d digits" msgstr "Exponent hat mehr als 4 Stellen" -#: cobc/scanner.l:2044 +#: cobc/scanner.l:2182 #, c-format msgid "exponent has decimal point" msgstr "" -#: cobc/scanner.l:2050 cobc/tree.c:3853 +#: cobc/scanner.l:2188 cobc/tree.c:3896 #, c-format msgid "exponent has more than 4 digits" msgstr "Exponent hat mehr als 4 Stellen" -#: cobc/scanner.l:2080 +#: cobc/scanner.l:2218 #, c-format msgid "exponent not between -6143 and 6144" msgstr "" -#: cobc/scanner.l:2089 +#: cobc/scanner.l:2227 #, c-format msgid "significand of 0 must be positive" msgstr "" -#: cobc/scanner.l:2094 +#: cobc/scanner.l:2232 #, c-format msgid "exponent of 0 must be 0" msgstr "Exponent von 0 muss 0 sein" -#: cobc/scanner.l:2099 +#: cobc/scanner.l:2237 #, c-format msgid "exponent of 0 must be positive" msgstr "Exponent von 0 muss positiv sein" -#: cobc/scanner.l:2261 +#: cobc/scanner.l:2399 #, c-format msgid "invalid CONSTANT: %s" msgstr "Ungültiges CONSTANT: %s" -#: cobc/scanner.l:2271 +#: cobc/scanner.l:2409 #, c-format msgid "invalid alphanumeric CONSTANT: %s" msgstr "Ungültige alphanumerisches CONSTANT: %s" -#: cobc/scanner.l:2275 +#: cobc/scanner.l:2413 #, c-format msgid "empty alphanumeric CONSTANT: %s" msgstr "Leeres alphanumerisches CONSTANT: %s" -#: cobc/scanner.l:2292 cobc/scanner.l:2300 cobc/scanner.l:2305 +#: cobc/scanner.l:2430 cobc/scanner.l:2438 cobc/scanner.l:2443 #, c-format msgid "invalid numeric CONSTANT: %s" msgstr "Ungültiges numerisches CONSTANT: %s" -#: cobc/scanner.l:2384 cobc/scanner.l:2411 +#: cobc/scanner.l:2522 cobc/scanner.l:2549 #, fuzzy, c-format #| msgid "'%s' is not defined, but is a reserved word in another dialect" msgid "'%s' is not a default reserved word, so cannot be aliased" msgstr "»%s« ist nicht definiert, aber in einem anderen Dialekt ein reserviertes Wort" -#: cobc/scanner.l:2387 +#: cobc/scanner.l:2525 #, c-format msgid "'%s' is already reserved" msgstr "" -#: cobc/scanner.l:2389 +#: cobc/scanner.l:2527 msgid "you may want MAKESYN instead" msgstr "" -#: cobc/scanner.l:2414 +#: cobc/scanner.l:2552 #, fuzzy, c-format msgid "'%s' is not a reserved word" msgstr "'%s' ist kein Report-Name" -#: cobc/scanner.l:2415 +#: cobc/scanner.l:2553 #, fuzzy #| msgid "'%s' is a reserved word, but isn't supported" msgid "you may want ADDSYN or OVERRIDE instead" msgstr "»%s« ist ein reserviertes Wort, wird aber nicht unterstützt" -#: cobc/tree.c:391 +#: cobc/tree.c:392 #, c-format msgid "%s clause is required for file '%s'" msgstr "%s-Klausel wird für Datei »%s« benötigt" -#: cobc/tree.c:395 +#: cobc/tree.c:396 #, c-format msgid "%s clause is invalid for file '%s' (file type)" msgstr "%s-Klausel ist für Datei »%s« unzulässig (Dateityp)" -#: cobc/tree.c:399 +#: cobc/tree.c:400 #, c-format msgid "%s clause is invalid for file '%s'" msgstr "%s-Klausel ist für Datei »%s« unzulässig" -#: cobc/tree.c:426 +#: cobc/tree.c:427 #, c-format msgid "FOR item '%s' is a record" msgstr "" -#: cobc/tree.c:435 +#: cobc/tree.c:436 #, fuzzy, c-format msgid "FOR item '%s' is in different record to '%s'" msgstr "END PROGRAM '%s' ist unterschiedlich zur PROGRAM-ID '%s'" -#: cobc/tree.c:444 +#: cobc/tree.c:445 #, c-format msgid "FOR item '%s' is not in a record associated with '%s'" msgstr "" -#: cobc/tree.c:558 +#: cobc/tree.c:559 msgid "internal error node" msgstr "" -#: cobc/tree.c:560 +#: cobc/tree.c:561 msgid "unknown constant" msgstr "Unbekannte Konstante" -#: cobc/tree.c:571 +#: cobc/tree.c:572 #, fuzzy, c-format #| msgid "invalid literal: '%s'" msgid "literal \"%s\"" msgstr "Ungültiges Literal: »%s«" -#: cobc/tree.c:842 -#, c-format -msgid "FUNCTION %s has invalid/not supported arguments - tag %d" -msgstr "" - -#: cobc/tree.c:963 +#: cobc/tree.c:969 #, c-format msgid "invalid date/time function: '%d'" msgstr "Ungültiger Datum-/Zeit-Funktion: »%d«" -#: cobc/tree.c:995 +#: cobc/tree.c:1001 #, c-format msgid "FUNCTION '%s' has invalid date/time format" msgstr "" -#: cobc/tree.c:1002 +#: cobc/tree.c:1008 #, c-format msgid "FUNCTION '%s' has format in variable" msgstr "" -#: cobc/tree.c:1482 +#: cobc/tree.c:1488 #, c-format msgid "unknown tree tag: %d, category: %d" msgstr "" -#: cobc/tree.c:1577 +#: cobc/tree.c:1590 #, c-format msgid "unexpected numeric USAGE: %d" msgstr "Unerwartete numerische USAGE-Angabe: %d" -#: cobc/tree.c:1591 +#: cobc/tree.c:1604 #, c-format msgid "unexpected category: %d" msgstr "Unerwartete Kategorie: %d" -#: cobc/tree.c:1790 +#: cobc/tree.c:1814 #, fuzzy, c-format msgid "literal length %d exceeds maximum of %d digits" msgstr "PROGRAM Name überschreitet 31 Zeichen" -#: cobc/tree.c:1795 +#: cobc/tree.c:1819 #, fuzzy, c-format msgid "literal length %d exceeds %d digits" msgstr "PROGRAM Name überschreitet 31 Zeichen" -#: cobc/tree.c:1844 cobc/tree.c:1856 cobc/tree.c:1913 cobc/tree.c:1963 +#: cobc/tree.c:1868 cobc/tree.c:1880 cobc/tree.c:1937 cobc/tree.c:1987 #, c-format msgid "numeric literal '%s' exceeds limit '%s'" msgstr "Numerisches Literal »%s« übersteigt die Größenbeschränkung »%s«" -#: cobc/tree.c:2655 +#: cobc/tree.c:2676 msgid "invalid LOCALE literal" msgstr "Ungültiges LOCALE-Literal" -#: cobc/tree.c:2782 +#: cobc/tree.c:2803 msgid "only literals with the same category can be concatenated" msgstr "" -#: cobc/tree.c:2789 -msgid "only alphanumeric, national or boolean literals may be concatenated" +#: cobc/tree.c:2811 +msgid "only alphanumeric, utf-8, national or boolean literals may be concatenated" msgstr "" -#: cobc/tree.c:2801 +#: cobc/tree.c:2823 #, fuzzy, c-format msgid "literal length %d exceeds %d characters" msgstr "PROGRAM Name überschreitet 31 Zeichen" -#: cobc/tree.c:3078 +#: cobc/tree.c:3103 msgid "B, 0 or /" msgstr "B, 0 oder /" -#: cobc/tree.c:3092 +#: cobc/tree.c:3117 msgid "the sign of the floating-point exponent" msgstr "" -#: cobc/tree.c:3094 +#: cobc/tree.c:3119 msgid "a leading +/- sign" msgstr "ein führendes »+« oder »-«" -#: cobc/tree.c:3096 +#: cobc/tree.c:3121 msgid "a trailing +/- sign" msgstr "ein angehängtes »+« oder »-«" -#: cobc/tree.c:3098 +#: cobc/tree.c:3123 msgid "CR or DB" msgstr "" -#: cobc/tree.c:3100 +#: cobc/tree.c:3125 msgid "a leading currency symbol" msgstr "Ein führendes Währungssymbol" -#: cobc/tree.c:3102 +#: cobc/tree.c:3127 msgid "a trailing currency symbol" msgstr "Ein angehängtes Währungssymbol" -#: cobc/tree.c:3104 +#: cobc/tree.c:3129 msgid "a Z or * which is before the decimal point" msgstr "" -#: cobc/tree.c:3106 +#: cobc/tree.c:3131 msgid "a Z or * which is after the decimal point" msgstr "" -#: cobc/tree.c:3108 +#: cobc/tree.c:3133 msgid "a floating +/- string which is before the decimal point" msgstr "" -#: cobc/tree.c:3110 +#: cobc/tree.c:3135 msgid "a floating +/- string which is after the decimal point" msgstr "" -#: cobc/tree.c:3112 +#: cobc/tree.c:3137 msgid "a floating currency symbol string which is before the decimal point" msgstr "" -#: cobc/tree.c:3114 +#: cobc/tree.c:3139 msgid "a floating currency symbol string which is after the decimal point" msgstr "" -#: cobc/tree.c:3118 +#: cobc/tree.c:3143 msgid "A or X" msgstr "A oder X" -#: cobc/tree.c:3126 +#: cobc/tree.c:3151 msgid "a P which is before the decimal point" msgstr "" -#: cobc/tree.c:3128 +#: cobc/tree.c:3153 msgid "a P which is after the decimal point" msgstr "" -#: cobc/tree.c:3149 cobc/tree.c:3599 +#: cobc/tree.c:3176 cobc/tree.c:3638 #, c-format msgid "%s may only occur once in a PICTURE string" msgstr "" -#: cobc/tree.c:3151 cobc/tree.c:3541 +#: cobc/tree.c:3178 cobc/tree.c:3570 #, c-format msgid "%s cannot follow %s" msgstr "%s kann nicht auf %s folgen" -#: cobc/tree.c:3154 +#: cobc/tree.c:3181 msgid "invalid PICTURE string detected" msgstr "Ungültige PICTURE-Zeichenkette festgestellt" -#: cobc/tree.c:3271 +#: cobc/tree.c:3299 msgid "number or constant in parentheses is not an unsigned integer" msgstr "" -#: cobc/tree.c:3280 +#: cobc/tree.c:3308 #, c-format msgid "only up to %d significant digits are permitted within parentheses" msgstr "" -#: cobc/tree.c:3288 +#: cobc/tree.c:3316 msgid "number or constant in parentheses must be greater than zero" msgstr "" -#: cobc/tree.c:3299 +#: cobc/tree.c:3327 msgid "parentheses must be preceded by a picture symbol" msgstr "" -#: cobc/tree.c:3329 +#: cobc/tree.c:3353 msgid "unbalanced parentheses" msgstr "" -#: cobc/tree.c:3337 +#: cobc/tree.c:3361 msgid "parentheses must contain an unsigned integer" msgstr "" -#: cobc/tree.c:3375 +#: cobc/tree.c:3409 #, c-format msgid "'%s' is not a constant-name" msgstr "»%s« ist kein Konstantenname" -#: cobc/tree.c:3382 -#, c-format -msgid "'%s' is not a numeric literal" -msgstr "»%s« ist kein numerisches Literal" - -#: cobc/tree.c:3386 -#, c-format -msgid "'%s' is not an integer" +#: cobc/tree.c:3422 +#, fuzzy, c-format +#| msgid "'%s' is not an integer" +msgid "'%s' is not an unsigned positive integer" msgstr "»%s« ist keine Ganzzahl" -#: cobc/tree.c:3390 -#, c-format -msgid "'%s' is not unsigned" -msgstr "»%s« ist nicht vorzeichenlos" - -#: cobc/tree.c:3450 +#: cobc/tree.c:3479 msgid "missing PICTURE string" msgstr "" -#: cobc/tree.c:3479 +#: cobc/tree.c:3508 msgid "C must be followed by R" msgstr "" -#: cobc/tree.c:3482 +#: cobc/tree.c:3511 msgid "D must be followed by B" msgstr "" -#: cobc/tree.c:3497 cobc/tree.c:3596 cobc/tree.c:3622 cobc/tree.c:3733 +#: cobc/tree.c:3526 cobc/tree.c:3635 cobc/tree.c:3661 cobc/tree.c:3773 msgid "uncommon parentheses" msgstr "" -#: cobc/tree.c:3541 +#: cobc/tree.c:3570 msgid "exponent" msgstr "Exponent" -#: cobc/tree.c:3586 +#: cobc/tree.c:3625 msgid "L must be at start of PICTURE string" msgstr "" -#: cobc/tree.c:3604 +#: cobc/tree.c:3643 msgid "S must be at start of PICTURE string" msgstr "" -#: cobc/tree.c:3660 +#: cobc/tree.c:3699 msgid "P must be at start or end of PICTURE string" msgstr "" -#: cobc/tree.c:3690 +#: cobc/tree.c:3730 msgid "cannot have both Z and * in PICTURE string" msgstr "" -#: cobc/tree.c:3768 +#: cobc/tree.c:3808 #, c-format msgid "invalid PICTURE character '%c'" msgstr "" -#: cobc/tree.c:3798 +#: cobc/tree.c:3841 #, c-format msgid "PICTURE string may not contain more than %d characters; contains %d characters" msgstr "" -#: cobc/tree.c:3803 -msgid "PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" +#: cobc/tree.c:3846 +msgid "PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" msgstr "" -#: cobc/tree.c:3830 +#: cobc/tree.c:3873 #, c-format msgid "numeric field cannot be larger than %d digits" msgstr "Numerisches Feld kann nicht mehr als %d Stellen haben" -#: cobc/tree.c:4267 +#: cobc/tree.c:4333 #, fuzzy, c-format #| msgid "PICTURE clause required for '%s'" msgid "needs PICTURE clause for SUM %s" msgstr "PICTURE-Klausel notwendig für »%s«" -#: cobc/tree.c:4274 +#: cobc/tree.c:4340 #, fuzzy, c-format #| msgid "PICTURE clause required for '%s'" msgid "non-numeric PICTURE clause for SUM %s" msgstr "PICTURE-Klausel notwendig für »%s«" -#: cobc/tree.c:4346 cobc/tree.c:4359 +#: cobc/tree.c:4412 cobc/tree.c:4425 #, c-format msgid "no DETAIL line defined in report %s" msgstr "" -#: cobc/tree.c:4361 +#: cobc/tree.c:4427 msgid "PAGE LIMIT FIRST DETAIL should be >= HEADING" msgstr "" -#: cobc/tree.c:4364 +#: cobc/tree.c:4430 msgid "PAGE LIMIT FOOTING should be >= HEADING" msgstr "" -#: cobc/tree.c:4366 +#: cobc/tree.c:4432 msgid "PAGE LIMIT LAST DETAIL should be >= FIRST DETAIL" msgstr "" -#: cobc/tree.c:4368 +#: cobc/tree.c:4434 msgid "PAGE LIMIT FOOTING should be >= LAST DETAIL" msgstr "" -#: cobc/tree.c:4370 +#: cobc/tree.c:4436 msgid "PAGE LIMIT LINES should be >= FOOTING" msgstr "" -#: cobc/tree.c:4563 libcob/fileio.c:8999 +#: cobc/tree.c:4631 libcob/fileio.c:9358 #, c-format msgid "maximum keys (%d/%d) exceeded for file '%s'" msgstr "" -#: cobc/tree.c:4627 cobc/tree.c:4650 +#: cobc/tree.c:4695 cobc/tree.c:4718 #, c-format msgid "invalid KEY item '%s', not in file '%s'" msgstr "Ungültiger KEY-Eintrag »%s«, nicht in Datei »%s«" -#: cobc/tree.c:4661 +#: cobc/tree.c:4729 #, c-format msgid "minimal record length %d can not hold the key item '%s'; needs to be at least %d" msgstr "" -#: cobc/tree.c:4696 +#: cobc/tree.c:4764 #, c-format msgid "missing file description for %s" msgstr "Fehlende Dateibeschreibung für %s" -#: cobc/tree.c:4745 +#: cobc/tree.c:4813 #, c-format msgid "size of record '%s' (%d) smaller than minimum of file '%s' (%d)" msgstr "" -#: cobc/tree.c:4748 cobc/tree.c:4765 +#: cobc/tree.c:4816 cobc/tree.c:4833 msgid "file size adjusted" msgstr "Dateigröße angepasst" -#: cobc/tree.c:4760 +#: cobc/tree.c:4828 #, c-format msgid "size of record '%s' (%d) larger than maximum of file '%s' (%d)" msgstr "" -#: cobc/tree.c:4793 +#: cobc/tree.c:4861 msgid "RECORD VARYING specified without limits, but implied limits are equal" msgstr "" -#: cobc/tree.c:4795 +#: cobc/tree.c:4863 #, fuzzy, c-format #| msgid "%s ignored" msgid "%s clause ignored" msgstr "%s ignoriert" -#: cobc/tree.c:4890 cobc/typeck.c:7695 cobc/typeck.c:14389 cobc/typeck.c:14441 -#: cobc/typeck.c:14477 libcob/fileio.c:4598 libcob/screenio.c:3720 -#: libcob/screenio.c:3750 +#: cobc/tree.c:4958 cobc/typeck.c:8128 cobc/typeck.c:15186 cobc/typeck.c:15238 +#: cobc/typeck.c:15275 libcob/fileio.c:4724 libcob/screenio.c:4613 +#: libcob/screenio.c:4639 #, fuzzy, c-format #| msgid "runtime library is not configured for this operation" msgid "runtime is not configured to support %s" msgstr "Die Laufzeitumgebung ist für diese Operation nicht konfiguriert" -#: cobc/tree.c:5395 +#: cobc/tree.c:5474 #, fuzzy, c-format #| msgid "size of '%s' larger than size of '%s'" msgid "literal '%.38s' is longer than '%s'" msgstr "Größe von »%s« überschreitet die Größe von »%s«" -#: cobc/tree.c:5399 +#: cobc/tree.c:5478 #, c-format msgid "literal '%.38s' is longer than reference-modification of '%s'" msgstr "" -#: cobc/tree.c:5424 +#: cobc/tree.c:5508 #, c-format msgid "literal '%s' is alphanumeric but '%s' is numeric" msgstr "" -#: cobc/tree.c:5466 +#: cobc/tree.c:5550 #, c-format msgid "literal '%s' has more decimals than '%s'" msgstr "" -#: cobc/tree.c:5508 +#: cobc/tree.c:5598 #, c-format msgid "literal '%s' has more digits than '%s'" msgstr "" -#: cobc/tree.c:5548 cobc/tree.c:5572 +#: cobc/tree.c:5646 cobc/tree.c:5676 #, fuzzy, c-format msgid "unsigned '%s' may not be %s %s" msgstr "END PROGRAM '%s' ist unterschiedlich zur PROGRAM-ID '%s'" -#: cobc/tree.c:5558 cobc/tree.c:5581 +#: cobc/tree.c:5658 cobc/tree.c:5689 #, c-format msgid "unsigned '%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5614 cobc/tree.c:5639 +#: cobc/tree.c:5726 cobc/tree.c:5756 #, fuzzy, c-format #| msgid "'%s' cannot be used here" msgid "'%s' may not be %s %s" msgstr "»%s« kann hier nicht verwendet werden" -#: cobc/tree.c:5625 cobc/tree.c:5650 +#: cobc/tree.c:5738 cobc/tree.c:5768 #, c-format msgid "'%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5795 +#: cobc/tree.c:5917 msgid "divide by constant ZERO" msgstr "" -#: cobc/tree.c:5879 cobc/tree.c:5886 +#: cobc/tree.c:6001 cobc/tree.c:6008 #, c-format msgid "%s should be COMP-X/COMP-5 for logical operator" msgstr "" -#: cobc/tree.c:5927 cobc/tree.c:5932 cobc/tree.c:6151 cobc/typeck.c:5675 -#: cobc/typeck.c:5684 cobc/typeck.c:5691 cobc/typeck.c:6772 cobc/typeck.c:6913 -msgid "invalid expression" -msgstr "Ungültiger Ausdruck" - -#: cobc/tree.c:6148 +#: cobc/tree.c:6283 #, c-format msgid "invalid expression: %s %s %s" msgstr "Ungültiger Ausdruck: %s %s %s" -#: cobc/tree.c:6195 +#: cobc/tree.c:6286 +msgid "invalid expression: boolean expected with logical operator" +msgstr "" + +#: cobc/tree.c:6330 #, c-format msgid "unexpected operator: %d" msgstr "Unerwarteter Operator: %d" -#: cobc/tree.c:6206 +#: cobc/tree.c:6341 #, c-format msgid "expression '%.38s' %s '%.38s' is always TRUE" msgstr "" -#: cobc/tree.c:6212 +#: cobc/tree.c:6347 msgid "expression is always TRUE" msgstr "" -#: cobc/tree.c:6225 +#: cobc/tree.c:6360 #, c-format msgid "expression '%.38s' %s '%.38s' is always FALSE" msgstr "" -#: cobc/tree.c:6231 +#: cobc/tree.c:6366 msgid "expression is always FALSE" msgstr "Ausdruck ist immer FALSE" -#: cobc/tree.c:6443 +#: cobc/tree.c:6588 msgid "invalid file name reference" msgstr "Ungültiger Dateinamensreferenz" -#: cobc/tree.c:6451 +#: cobc/tree.c:6596 #, c-format msgid "BY CONTENT assumed for alphanumeric item '%s'" msgstr "" -#: cobc/tree.c:6456 +#: cobc/tree.c:6601 #, c-format msgid "BY CONTENT assumed for national item '%s'" msgstr "" -#: cobc/tree.c:6595 +#: cobc/tree.c:6740 msgid "PERFORM FOREVER since UNTIL is always FALSE" msgstr "" -#: cobc/tree.c:6599 +#: cobc/tree.c:6744 msgid "PERFORM ONCE since UNTIL is always TRUE" msgstr "" -#: cobc/tree.c:6602 +#: cobc/tree.c:6747 msgid "PERFORM NEVER since UNTIL is always TRUE" msgstr "" -#: cobc/tree.c:6726 +#: cobc/tree.c:6871 #, fuzzy, c-format msgid "no definition/prototype seen for FUNCTION '%s'" msgstr "Fehlende Definition von '%s'" -#: cobc/tree.c:6728 +#: cobc/tree.c:6873 #, fuzzy, c-format msgid "no definition/prototype seen for PROGRAM '%s'" msgstr "Fehlende Definition von '%s'" -#: cobc/tree.c:6737 +#: cobc/tree.c:6882 #, fuzzy, c-format msgid "no definition/prototype seen for FUNCTION with external name '%s'" msgstr "Fehlende Definition von '%s'" -#: cobc/tree.c:6739 +#: cobc/tree.c:6884 #, fuzzy, c-format msgid "no definition/prototype seen for PROGRAM with external name '%s'" msgstr "Fehlende Definition von '%s'" -#: cobc/tree.c:6831 +#: cobc/tree.c:6976 cobc/tree.c:7158 cobc/tree.c:7233 cobc/tree.c:7239 +#: cobc/tree.c:7247 cobc/tree.c:7255 cobc/tree.c:7277 cobc/tree.c:7287 +#: cobc/tree.c:7292 #, fuzzy, c-format #| msgid "FUNCTION '%s' is not implemented" -msgid "FUNCTION %s has invalid argument" +msgid "FUNCTION '%s' has invalid argument" msgstr "FUNCTION »%s« ist nicht implementiert" -#: cobc/tree.c:6833 +#: cobc/tree.c:6978 #, c-format -msgid "either all arguments or none should be if type %s" +msgid "either all arguments or none should be of type %s" msgstr "" -#: cobc/tree.c:6863 cobc/tree.c:6869 cobc/tree.c:6911 cobc/tree.c:6916 +#: cobc/tree.c:7010 cobc/tree.c:7016 cobc/tree.c:7057 cobc/tree.c:7063 #, c-format msgid "FUNCTION '%s' has invalid reference modification" msgstr "" -#: cobc/tree.c:6880 cobc/tree.c:7194 +#: cobc/tree.c:7027 cobc/tree.c:7344 #, c-format msgid "FUNCTION '%s' unknown" msgstr "FUNCTION »%s« ist unbekannt" -#: cobc/tree.c:6884 +#: cobc/tree.c:7031 #, c-format msgid "FUNCTION '%s' is not implemented" msgstr "FUNCTION »%s« ist nicht implementiert" -#: cobc/tree.c:6891 cobc/tree.c:6898 cobc/tree.c:7179 +#: cobc/tree.c:7037 cobc/tree.c:7044 cobc/tree.c:7329 #, c-format msgid "FUNCTION '%s' has wrong number of arguments" msgstr "" -#: cobc/tree.c:6905 +#: cobc/tree.c:7051 #, c-format msgid "FUNCTION '%s' cannot have reference modification" msgstr "" -#: cobc/tree.c:7008 cobc/tree.c:7083 cobc/tree.c:7089 cobc/tree.c:7097 -#: cobc/tree.c:7105 cobc/tree.c:7127 cobc/tree.c:7137 cobc/tree.c:7142 -#, fuzzy, c-format -#| msgid "FUNCTION '%s' is not implemented" -msgid "FUNCTION '%s' has invalid argument" -msgstr "FUNCTION »%s« ist nicht implementiert" - -#: cobc/tree.c:7185 +#: cobc/tree.c:7335 #, fuzzy, c-format #| msgid "FUNCTION '%s' is not implemented" msgid "FUNCTION '%s' has invalid first argument" msgstr "FUNCTION »%s« ist nicht implementiert" -#: cobc/typeck.c:584 +#: cobc/typeck.c:590 #, c-format msgid "%s should be COMP-5/COMP-X for logical operator" msgstr "" -#: cobc/typeck.c:850 +#: cobc/typeck.c:856 #, fuzzy, c-format #| msgid "%s not allowed here" msgid "%s item not allowed here: '%s'" msgstr "%s hier nicht zulässig" -#: cobc/typeck.c:892 +#: cobc/typeck.c:898 #, c-format msgid "'%s' is not a group name" msgstr "»%s« ist kein Gruppenname" -#: cobc/typeck.c:911 +#: cobc/typeck.c:921 #, c-format msgid "'%s' is not a numeric name" msgstr "»%s« ist kein numerischer Name" -#: cobc/typeck.c:934 +#: cobc/typeck.c:944 #, fuzzy, c-format msgid "'%s' is not a numeric or numeric-edited name" msgstr "'%s' ist kein Report-Name" -#: cobc/typeck.c:974 -#, fuzzy, c-format -#| msgid "'%s' is not a numeric value" -msgid "'%s' is Alpha, instead of a numeric value" -msgstr "»%s« ist kein numerischer Wert" - -#: cobc/typeck.c:977 -#, fuzzy, c-format -#| msgid "'%s' is not a numeric value" -msgid "'%s' is Alpha Edited, instead of a numeric value" -msgstr "»%s« ist kein numerischer Wert" - -#: cobc/typeck.c:990 -#, c-format -msgid "'%s' is not a numeric value" -msgstr "»%s« ist kein numerischer Wert" - -#: cobc/typeck.c:1040 +#: cobc/typeck.c:1043 #, c-format -msgid "'%s' is not an integer value" -msgstr "»%s« ist kein Ganzzahl-Wert" +msgid "'%s' is not an integer" +msgstr "»%s« ist keine Ganzzahl" -#: cobc/typeck.c:1044 +#: cobc/typeck.c:1047 msgid "positive numeric integer is required here" msgstr "" -#: cobc/typeck.c:1163 +#: cobc/typeck.c:1178 msgid "System routine" msgstr "Systemroutine" -#: cobc/typeck.c:2054 libcob/call.c:1180 +#: cobc/typeck.c:2037 libcob/call.c:1172 #, c-format msgid "'%s' literal includes leading spaces which are omitted" msgstr "" -#: cobc/typeck.c:2058 +#: cobc/typeck.c:2041 #, c-format msgid "'%s' literal includes trailing spaces which are omitted" msgstr "" -#: cobc/typeck.c:2125 +#: cobc/typeck.c:2108 msgid "ON/OFF usage requires a SWITCH name" msgstr "" -#: cobc/typeck.c:2143 +#: cobc/typeck.c:2126 #, c-format msgid "word length exceeds maximum of %d characters: '%s'" msgstr "Wortlänge überschreitet das Maximum von %d Zeichen: »%s«" -#: cobc/typeck.c:2146 +#: cobc/typeck.c:2129 #, c-format msgid "word length exceeds %d characters: '%s'" msgstr "Wortlänge überschreitet %d Zeichen: »%s«" -#: cobc/typeck.c:2223 +#: cobc/typeck.c:2206 #, fuzzy, c-format #| msgid "ASSIGN interpreted as %s" msgid "ASSIGN %s interpreted as '%s'" msgstr "ASSIGN wird als %s interpretiert" -#: cobc/typeck.c:2315 cobc/typeck.c:2487 +#: cobc/typeck.c:2332 cobc/typeck.c:2631 #, c-format msgid "subscript missing for '%s' - defaulting to 1" msgstr "" -#: cobc/typeck.c:2338 cobc/typeck.c:2403 cobc/typeck.c:2659 +#: cobc/typeck.c:2355 cobc/typeck.c:2546 cobc/typeck.c:2746 #, c-format msgid "'%s' cannot be subscripted" msgstr "" -#: cobc/typeck.c:2342 cobc/typeck.c:2663 +#: cobc/typeck.c:2359 cobc/typeck.c:2750 #, fuzzy, c-format msgid "'%s' requires one subscript" msgstr "CALL von %s benötigt %d Parameter" -#: cobc/typeck.c:2345 cobc/typeck.c:2666 +#: cobc/typeck.c:2362 cobc/typeck.c:2753 #, c-format msgid "'%s' requires %d subscripts" msgstr "" -#: cobc/typeck.c:2363 +#: cobc/typeck.c:2380 #, c-format msgid "'%s' (accessed by '%s')" msgstr "" -#: cobc/typeck.c:2471 +#: cobc/typeck.c:2399 cobc/typeck.c:4987 #, c-format -msgid "'%s' has no OCCURS clause" +msgid "%s may not be reference modified" msgstr "" -#: cobc/typeck.c:2537 libcob/common.c:3941 libcob/common.c:3952 -#, fuzzy, c-format -msgid "subscript of '%s' out of bounds: %d" -msgstr "Index von '%s' außerhalb des gültigen Bereichs: %d" +#: cobc/typeck.c:2437 cobc/typeck.c:2442 cobc/typeck.c:2466 +#: libcob/common.c:4477 libcob/common.c:4521 +#, c-format +msgid "length of '%s' out of bounds: %d" +msgstr "Länge von »%s« außerhalb des gültigen Bereichs: %d" -#: cobc/typeck.c:2587 cobc/typeck.c:2598 libcob/common.c:3976 -#: libcob/common.c:4027 +#: cobc/typeck.c:2453 cobc/typeck.c:2462 libcob/common.c:4462 +#: libcob/common.c:4513 #, fuzzy, c-format msgid "offset of '%s' out of bounds: %d" msgstr "Startposition von '%s' außerhalb des gültigen Bereichs: %d" -#: cobc/typeck.c:2592 cobc/typeck.c:2603 cobc/typeck.c:2612 -#: libcob/common.c:3991 libcob/common.c:4035 +#: cobc/typeck.c:2458 +msgid "suspicious reference-modification: always using max. position" +msgstr "" + +#: cobc/typeck.c:2475 +msgid "suspicious reference-modification: always using max. length" +msgstr "" + +#: cobc/typeck.c:2615 #, c-format -msgid "length of '%s' out of bounds: %d" -msgstr "Länge von »%s« außerhalb des gültigen Bereichs: %d" +msgid "'%s' has no OCCURS clause" +msgstr "" + +#: cobc/typeck.c:2694 libcob/common.c:4427 libcob/common.c:4438 +#, fuzzy, c-format +msgid "subscript of '%s' out of bounds: %d" +msgstr "Index von '%s' außerhalb des gültigen Bereichs: %d" -#: cobc/typeck.c:2727 cobc/typeck.c:2806 +#: cobc/typeck.c:2812 cobc/typeck.c:2891 #, fuzzy msgid "reference modification not allowed here" msgstr "Element mit Stufe 88 hier nicht zulässig" -#: cobc/typeck.c:2741 cobc/typeck.c:2832 +#: cobc/typeck.c:2826 cobc/typeck.c:2917 msgid "88 level item not allowed here" msgstr "Element mit Stufe 88 hier nicht zulässig" -#: cobc/typeck.c:2745 cobc/typeck.c:2836 cobc/typeck.c:2844 cobc/typeck.c:2906 +#: cobc/typeck.c:2830 cobc/typeck.c:2921 cobc/typeck.c:2929 cobc/typeck.c:2991 #, fuzzy msgid "variable length item not allowed here" msgstr "Element mit variabler Länge hier nicht zulässig" -#: cobc/typeck.c:2774 +#: cobc/typeck.c:2859 #, c-format msgid "'%s' has not been DEFINEd" msgstr "" -#: cobc/typeck.c:2810 +#: cobc/typeck.c:2895 msgid "only field names allowed here" msgstr "" -#: cobc/typeck.c:2821 +#: cobc/typeck.c:2906 #, c-format msgid "VALUE of '%s': %s target '%s' is invalid" msgstr "" -#: cobc/typeck.c:2823 cobc/typeck.c:2889 +#: cobc/typeck.c:2908 cobc/typeck.c:2974 msgid "target must be in FILE SECTION or LINKAGE SECTION or have the EXTERNAL clause" msgstr "" -#: cobc/typeck.c:2879 cobc/typeck.c:2888 +#: cobc/typeck.c:2964 cobc/typeck.c:2973 #, c-format msgid "VALUE of '%s': %s target is invalid" msgstr "" -#: cobc/typeck.c:2881 +#: cobc/typeck.c:2966 msgid "no previous data-item found" msgstr "" -#: cobc/typeck.c:3040 cobc/typeck.c:4799 +#: cobc/typeck.c:3130 cobc/typeck.c:4963 #, fuzzy, c-format msgid "'%s' cannot be BASED/EXTERNAL" msgstr "'%s' kann nicht als BASED/EXTERNAL deklariert werden" -#: cobc/typeck.c:3045 +#: cobc/typeck.c:3135 #, c-format msgid "'%s' is not in WORKING-STORAGE SECTION" msgstr "»%s« ist nicht im WORKING-STORAGE-Abschnitt enthalten" -#: cobc/typeck.c:3052 cobc/typeck.c:4796 +#: cobc/typeck.c:3142 cobc/typeck.c:4960 #, c-format msgid "'%s' not level 01 or 77" msgstr "»%s« nicht auf Stufennummer 01 oder 77" -#: cobc/typeck.c:3055 cobc/typeck.c:3090 cobc/typeck.c:4802 +#: cobc/typeck.c:3145 cobc/typeck.c:3180 cobc/typeck.c:4966 #, c-format msgid "'%s' REDEFINES field not allowed here" msgstr "»%s« Feld mit REDEFINES-Angabe hier nicht erlaubt" -#: cobc/typeck.c:3075 cobc/typeck.c:8423 +#: cobc/typeck.c:3165 cobc/typeck.c:8876 #, c-format msgid "duplicate USING BY REFERENCE item '%s'" msgstr "" -#: cobc/typeck.c:3103 +#: cobc/typeck.c:3193 #, c-format msgid "'%s' USING item duplicates RETURNING item" msgstr "" -#: cobc/typeck.c:3177 +#: cobc/typeck.c:3268 #, fuzzy, c-format #| msgid "redefinition of '%s'" msgid "prototype and definition of '%s' do not match" msgstr "Neudefinition von »%s«" -#: cobc/typeck.c:3256 +#: cobc/typeck.c:3389 cobc/typeck.c:3486 #, c-format msgid "parameters #%d ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3259 +#: cobc/typeck.c:3393 #, c-format msgid "returning items ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3295 +#: cobc/typeck.c:3429 #, fuzzy msgid "definition is a program but the prototype is a function" msgstr "Fehlende Definition von '%s'" -#: cobc/typeck.c:3299 +#: cobc/typeck.c:3433 msgid "definition is a function but the prototype is a program" msgstr "" -#: cobc/typeck.c:3306 -msgid "DECIMAL-POINT IS COMMA clauses differ" -msgstr "" - -#: cobc/typeck.c:3312 -msgid "CURRENCY clauses differ" -msgstr "" - -#: cobc/typeck.c:3348 +#: cobc/typeck.c:3496 #, fuzzy #| msgid "wrong number of WHEN parameters" msgid "number of parameters differ" msgstr "Ungültige Anzahl an WHEN-Parametern" -#: cobc/typeck.c:3358 +#: cobc/typeck.c:3506 msgid "definition has a RETURNING item but prototype does not" msgstr "" -#: cobc/typeck.c:3362 +#: cobc/typeck.c:3510 msgid "definition does not have a RETURNING item but prototype does" msgstr "" -#: cobc/typeck.c:3411 +#: cobc/typeck.c:3560 #, c-format msgid "unexpected tree tag: %d" msgstr "Unerwartete Kennzeichnungsmarke im Baum: %d" -#: cobc/typeck.c:3433 +#: cobc/typeck.c:3584 #, fuzzy, c-format msgid "expected argument #%d, %s, to be passed BY VALUE" msgstr "Aufruf von '%s' mit Parameter NULL" -#: cobc/typeck.c:3437 +#: cobc/typeck.c:3589 #, c-format msgid "expected argument #%d, %s, to be passed BY REFERENCE/CONTENT" msgstr "" -#: cobc/typeck.c:3455 cobc/typeck.c:3580 cobc/typeck.c:3583 +#: cobc/typeck.c:3608 cobc/typeck.c:3733 cobc/typeck.c:3736 #, c-format msgid "argument #%d is not optional" msgstr "" -#: cobc/typeck.c:3468 +#: cobc/typeck.c:3622 #, c-format msgid "argument #%d must be at least %d bytes long" msgstr "" -#: cobc/typeck.c:3483 +#: cobc/typeck.c:3637 #, c-format msgid "argument #%d is a different type of pointer than the parameter" msgstr "" -#: cobc/typeck.c:3490 +#: cobc/typeck.c:3644 #, c-format msgid "argument #%d is ANY LENGTH, but expecting a fixed size item" msgstr "" -#: cobc/typeck.c:3518 +#: cobc/typeck.c:3672 #, c-format msgid "argument #%d, %s, does not conform to the parameter definition" msgstr "" -#: cobc/typeck.c:3566 +#: cobc/typeck.c:3719 #, c-format msgid "expecting up to %d arguments, but found %d" msgstr "" -#: cobc/typeck.c:3598 +#: cobc/typeck.c:3752 msgid "the RETURNING item is of a fixed size, not ANY LENGTH" msgstr "" -#: cobc/typeck.c:3603 +#: cobc/typeck.c:3758 #, c-format msgid "RETURNING item %s is not a valid type" msgstr "" -#: cobc/typeck.c:3609 +#: cobc/typeck.c:3764 #, fuzzy #| msgid "unexpected CONSTANT item" msgid "unexpected RETURNING item" msgstr "Unerwartetes CONSTANT-Element" -#: cobc/typeck.c:3612 +#: cobc/typeck.c:3767 msgid "expecting a RETURNING item, but none provided" msgstr "" -#: cobc/typeck.c:3663 -#, c-format -msgid "'%s' is not an alphabet name" -msgstr "»%s« ist kein Bezeichner eines Alphabets" - -#: cobc/typeck.c:3939 +#: cobc/typeck.c:4091 #, fuzzy, c-format msgid "duplicate character values in alphabet '%s': %s" msgstr "Doppeltes Zeichen in Alphabet '%s'" -#: cobc/typeck.c:3944 +#: cobc/typeck.c:4096 #, c-format msgid "invalid character values in alphabet '%s', starting at position %d" msgstr "Ungültige Zeichenwerte in Alphabet »%s«, Beginn bei Position %d" -#: cobc/typeck.c:4045 +#: cobc/typeck.c:4198 #, fuzzy, c-format #| msgid "duplicate values in class '%s'" msgid "duplicate character values in class '%s'" msgstr "Doppelte Werte in Klasse »%s«" -#: cobc/typeck.c:4074 +#: cobc/typeck.c:4227 msgid "invalid ALPHABET name" msgstr "Ungültiger Bezeichner für ALPHABET" -#: cobc/typeck.c:4103 +#: cobc/typeck.c:4256 #, c-format msgid "'%s' is not a locale name" msgstr "»%s« ist kein Locale-Name" -#: cobc/typeck.c:4257 +#: cobc/typeck.c:4410 msgid "invalid RECORD DEPENDING item" msgstr "" -#: cobc/typeck.c:4262 +#: cobc/typeck.c:4415 msgid "RECORD DEPENDING must reference a data-item" msgstr "" -#: cobc/typeck.c:4285 +#: cobc/typeck.c:4438 #, c-format msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgstr "" -#: cobc/typeck.c:4298 +#: cobc/typeck.c:4451 #, fuzzy, c-format #| msgid "value in AT clause is not numeric" msgid "file %s: RELATIVE KEY %s is not numeric" msgstr "Wert in AT-Klausel ist nicht numerisch" -#: cobc/typeck.c:4307 +#: cobc/typeck.c:4460 #, c-format msgid "file %s: RELATIVE KEY %s must be integer" msgstr "" -#: cobc/typeck.c:4312 +#: cobc/typeck.c:4465 #, c-format msgid "file %s: RELATIVE KEY %s must be unsigned" msgstr "" -#: cobc/typeck.c:4319 +#: cobc/typeck.c:4472 #, c-format msgid "file %s: RELATIVE KEY %s cannot have OCCURS" msgstr "" -#: cobc/typeck.c:4325 +#: cobc/typeck.c:4478 #, c-format msgid "RELATIVE KEY %s cannot be in file record belonging to %s" msgstr "" -#: cobc/typeck.c:4334 +#: cobc/typeck.c:4487 #, c-format msgid "file %s: RELATIVE KEY %s declared outside WORKING-STORAGE" msgstr "" -#: cobc/typeck.c:4356 cobc/typeck.c:8396 +#: cobc/typeck.c:4509 cobc/typeck.c:8833 #, c-format msgid "'%s' is not a valid data name" msgstr "" -#: cobc/typeck.c:4363 +#: cobc/typeck.c:4516 #, c-format msgid "CRT STATUS item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "" -#: cobc/typeck.c:4369 +#: cobc/typeck.c:4522 #, fuzzy, c-format msgid "'%s' numeric CRT STATUS must have at least 4 digits" msgstr "'%s' CRT STATUS muss 4 Zeichen lang sein" -#: cobc/typeck.c:4375 +#: cobc/typeck.c:4528 #, fuzzy, c-format msgid "'%s' CRT STATUS must be 3 or 4 characters long" msgstr "'%s' CRT STATUS muss 4 Zeichen lang sein" -#: cobc/typeck.c:4397 +#: cobc/typeck.c:4550 #, fuzzy, c-format #| msgid "'%s' is not a field" msgid "FILE STATUS '%s' is not a field" msgstr "»%s« ist kein Feld" -#: cobc/typeck.c:4409 +#: cobc/typeck.c:4562 #, c-format msgid "FILE STATUS '%s' may not be a decimal or have a PIC with a P" msgstr "" -#: cobc/typeck.c:4414 +#: cobc/typeck.c:4567 #, c-format msgid "FILE STATUS '%s' is a numeric field, but I-O status codes are not numeric in general" msgstr "" -#: cobc/typeck.c:4418 +#: cobc/typeck.c:4571 #, fuzzy, c-format #| msgid "%s is not an alphanumeric literal" msgid "FILE STATUS '%s' must be an alphanumeric or numeric field" msgstr "»%s« ist kein alphanumerisches Literal" -#: cobc/typeck.c:4425 +#: cobc/typeck.c:4578 #, fuzzy, c-format msgid "FILE STATUS '%s' must be USAGE DISPLAY" msgstr "'%s' ist nicht in der LINKAGE SECTION enthalten" -#: cobc/typeck.c:4432 +#: cobc/typeck.c:4585 #, fuzzy, c-format msgid "FILE STATUS '%s' must be 2 characters long" msgstr "'%s' CRT STATUS muss 4 Zeichen lang sein" -#: cobc/typeck.c:4440 +#: cobc/typeck.c:4593 #, c-format msgid "FILE STATUS '%s' must be in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE" msgstr "" -#: cobc/typeck.c:4446 +#: cobc/typeck.c:4599 #, c-format msgid "FILE STATUS '%s' may not be located after an OCCURS DEPENDING field" msgstr "" -#: cobc/typeck.c:4460 +#: cobc/typeck.c:4613 #, fuzzy, c-format #| msgid "'%s' will be implicitly defined" msgid "variable '%s' will be implicitly defined" msgstr "»%s« wird implizit definiert" -#: cobc/typeck.c:4489 cobc/typeck.c:4550 +#: cobc/typeck.c:4703 msgid "ASSIGN variable" msgstr "" -#: cobc/typeck.c:4555 +#: cobc/typeck.c:4708 #, c-format msgid "ASSIGN data item '%s' is invalid" msgstr "" -#: cobc/typeck.c:4619 +#: cobc/typeck.c:4773 #, c-format msgid "'%s' CURSOR must be 4 or 6 characters long" msgstr "»%s« CURSOR muss 4 oder 6 Zeichen lang sein" -#: cobc/typeck.c:4680 +#: cobc/typeck.c:4844 #, fuzzy, c-format #| msgid "'%s' cannot have OCCURS DEPENDING" msgid "'%s' cannot have nested OCCURS DEPENDING" msgstr "»%s« kann nicht mit OCCURS DEPENDING definiert werden" -#: cobc/typeck.c:4694 +#: cobc/typeck.c:4858 #, fuzzy, c-format #| msgid "'%s' REDEFINES field not allowed here" msgid "'%s' OCCURS DEPENDING ON field item invalid here" msgstr "»%s« Feld mit REDEFINES-Angabe hier nicht erlaubt" -#: cobc/typeck.c:4704 +#: cobc/typeck.c:4868 #, fuzzy, c-format #| msgid "'%s' cannot have OCCURS DEPENDING" msgid "'%s' cannot have OCCURS DEPENDING because of '%s'" msgstr "»%s« kann nicht mit OCCURS DEPENDING definiert werden" -#: cobc/typeck.c:4716 +#: cobc/typeck.c:4880 #, c-format msgid "'%s' OCCURS DEPENDING ON item must have GLOBAL attribute" msgstr "" -#: cobc/typeck.c:4730 +#: cobc/typeck.c:4894 #, c-format msgid "PASSWORD '%s' for EXTERNAL file '%s' must have EXTERNAL attribute" msgstr "" -#: cobc/typeck.c:4768 +#: cobc/typeck.c:4932 #, c-format msgid "duplicate APPLY COMMIT target: '%s'" msgstr "" -#: cobc/typeck.c:4782 +#: cobc/typeck.c:4946 msgid "APPLY COMMIT statement invalid for SORT file" msgstr "" -#: cobc/typeck.c:4785 +#: cobc/typeck.c:4949 msgid "APPLY COMMIT statement invalid for REPORT file" msgstr "" -#: cobc/typeck.c:4792 +#: cobc/typeck.c:4956 #, c-format msgid "APPLY COMMIT item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "" -#: cobc/typeck.c:4806 +#: cobc/typeck.c:4970 #, fuzzy, c-format #| msgid "%s not allowed here" msgid "item not allowed here: '%s'" msgstr "%s hier nicht zulässig" -#: cobc/typeck.c:4819 +#: cobc/typeck.c:4983 #, fuzzy, c-format msgid "%s may not be subscripted" msgstr "CALL von %s benötigt %d Parameter" -#: cobc/typeck.c:4823 -#, c-format -msgid "%s may not be reference modified" -msgstr "" - -#: cobc/typeck.c:4883 +#: cobc/typeck.c:5047 #, c-format msgid "DEBUGGING target invalid: '%s'" msgstr "" -#: cobc/typeck.c:4889 +#: cobc/typeck.c:5053 #, c-format msgid "DEBUGGING target already specified with ALL PROCEDURES: '%s'" msgstr "" -#: cobc/typeck.c:4909 +#: cobc/typeck.c:5073 msgid "DEBUGGING target" msgstr "" -#: cobc/typeck.c:4916 +#: cobc/typeck.c:5080 #, c-format msgid "'%s' is not a valid DEBUGGING target" msgstr "" -#: cobc/typeck.c:4962 cobc/typeck.c:4970 +#: cobc/typeck.c:5126 cobc/typeck.c:5134 #, c-format msgid "'%s' is not in DECLARATIVES" msgstr "»%s« ist nicht in den DECLARATIVES" -#: cobc/typeck.c:4984 +#: cobc/typeck.c:5148 #, c-format msgid "invalid reference to '%s' (in DECLARATIVES)" msgstr "Ungültige Referenz auf »%s« (In DECLARATIVES)" -#: cobc/typeck.c:4996 +#: cobc/typeck.c:5162 #, c-format msgid "GO TO paragraph '%s' which is defined in another SECTION" msgstr "" -#: cobc/typeck.c:5006 +#: cobc/typeck.c:5172 #, fuzzy, c-format msgid "'%s' is not a procedure name" msgstr "'%s' ist kein Report-Name" -#: cobc/typeck.c:5041 +#: cobc/typeck.c:5207 #, fuzzy, c-format #| msgid "'%s' and '%s' must be in the same record" msgid "%s and %s are not in the same SECTION" msgstr "»%s« und »%s« müssen im gleichen Datensatz sein" -#: cobc/typeck.c:5046 +#: cobc/typeck.c:5212 #, fuzzy, c-format #| msgid "'%s' defined here" msgid "%s is defined before %s" msgstr "»%s« ist hier definiert" -#: cobc/typeck.c:5088 +#: cobc/typeck.c:5254 #, fuzzy, c-format #| msgid "'%s' ANY LENGTH must be 01 level" msgid "'%s' ANY LENGTH item must be a formal parameter" msgstr "»%s« ANY LENGTH muss auf Level 01 sein" -#: cobc/typeck.c:5136 +#: cobc/typeck.c:5302 #, c-format msgid "LINKAGE item '%s' is not a PROCEDURE USING parameter" msgstr "" -#: cobc/typeck.c:5192 +#: cobc/typeck.c:5358 #, c-format msgid "'%s' is not an alterable paragraph" msgstr "" -#: cobc/typeck.c:5802 cobc/typeck.c:5806 +#: cobc/typeck.c:5852 +#, fuzzy +#| msgid "invalid expression: %s %s %s" +msgid "invalid expression: unfinished expression" +msgstr "Ungültiger Ausdruck: %s %s %s" + +#: cobc/typeck.c:5858 cobc/typeck.c:5865 +msgid "invalid expression" +msgstr "Ungültiger Ausdruck" + +#: cobc/typeck.c:5990 cobc/typeck.c:5994 #, c-format msgid "suggest parentheses around %s within %s" msgstr "" -#: cobc/typeck.c:5815 +#: cobc/typeck.c:6003 #, fuzzy #| msgid "invalid expression" msgid "invalid conditional expression" msgstr "Ungültiger Ausdruck" -#: cobc/typeck.c:5932 +#: cobc/typeck.c:6120 #, c-format msgid "internal decimal structure size exceeded: %d" msgstr "" -#: cobc/typeck.c:5935 +#: cobc/typeck.c:6123 msgid "Try to minimize the number of parentheses or split into multiple computations." msgstr "" -#: cobc/typeck.c:5959 +#: cobc/typeck.c:6147 #, c-format msgid "more than %d nested expressions" msgstr "" -#: cobc/typeck.c:6000 +#: cobc/typeck.c:6188 msgid "precision of result may change with arithmetic-osvs" msgstr "" -#: cobc/typeck.c:6080 +#: cobc/typeck.c:6268 #, c-format msgid "unexpected operation: %c (%d)" msgstr "Unerwartete Operation: %c (%d)" -#: cobc/typeck.c:6085 +#: cobc/typeck.c:6273 #, c-format msgid "%s operator may be misplaced" msgstr "" -#: cobc/typeck.c:6160 +#: cobc/typeck.c:6349 msgid "unexpected constant expansion" msgstr "Unerwartete Konstantenerweiterung" -#: cobc/typeck.c:6882 cobc/typeck.c:11024 +#: cobc/typeck.c:7106 cobc/typeck.c:11656 cobc/typeck.c:11661 msgid "alphanumeric value is expected" msgstr "Alphanumerischer Wert wird erwartet" -#: cobc/typeck.c:6884 cobc/typeck.c:11019 +#: cobc/typeck.c:7109 cobc/typeck.c:11651 msgid "numeric value is expected" msgstr "Numerischer Wert wird erwartet" -#: cobc/typeck.c:6954 +#: cobc/typeck.c:7203 +#, fuzzy +#| msgid "invalid option detected" +msgid "invalid expression: condition expected" +msgstr "Ungültige Option festgestellt" + +#: cobc/typeck.c:7271 +#, fuzzy +#| msgid "invalid expression" +msgid "incomplete expression" +msgstr "Ungültiger Ausdruck" + +#: cobc/typeck.c:7312 #, c-format msgid "more than %d nested conditions" msgstr "" -#: cobc/typeck.c:7290 cobc/typeck.c:7371 +#: cobc/typeck.c:7667 cobc/typeck.c:7748 msgid "no CORRESPONDING items found" msgstr "" -#: cobc/typeck.c:7443 +#: cobc/typeck.c:7820 msgid "no items to ACCEPT found" msgstr "" -#: cobc/typeck.c:7493 +#: cobc/typeck.c:7870 #, fuzzy #| msgid "invalid type for DISPLAY operand" msgid "no items to DISPLAY found" msgstr "Ungültiger Typ für DISPLAY-Operand" -#: cobc/typeck.c:7605 +#: cobc/typeck.c:7981 msgid "cannot specify figurative constant ZERO in AT clause" msgstr "" -#: cobc/typeck.c:7609 +#: cobc/typeck.c:7985 msgid "value in AT clause is not numeric" msgstr "Wert in AT-Klausel ist nicht numerisch" -#: cobc/typeck.c:7615 +#: cobc/typeck.c:7991 msgid "value in AT clause must have 4 or 6 digits" msgstr "Wert in AT-Klausel muss 4- oder 6-stellig sein" -#: cobc/typeck.c:7737 +#: cobc/typeck.c:8168 msgid "invalid PROMPT literal" msgstr "Ungültiges PROMPT-Literal" -#: cobc/typeck.c:7742 +#: cobc/typeck.c:8173 msgid "invalid PROMPT identifier" msgstr "" -#: cobc/typeck.c:8032 +#: cobc/typeck.c:8465 #, c-format msgid "'%s' is not an input device" msgstr "»%s« ist kein Eingabegerät" -#: cobc/typeck.c:8059 cobc/typeck.c:9242 +#: cobc/typeck.c:8492 cobc/typeck.c:9708 #, c-format msgid "'%s' is not defined in SPECIAL-NAMES" msgstr "»%s« ist nicht unter SPECIAL-NAMES definiert" -#: cobc/typeck.c:8064 +#: cobc/typeck.c:8497 #, c-format msgid "invalid input device '%s'" msgstr "Ungültiges Eingabegerät »%s«" -#: cobc/typeck.c:8069 cobc/typeck.c:9246 +#: cobc/typeck.c:8502 cobc/typeck.c:9712 #, c-format msgid "unknown device '%s'; it may exist in another dialect" msgstr "" -#: cobc/typeck.c:8072 cobc/typeck.c:9249 +#: cobc/typeck.c:8505 cobc/typeck.c:9715 #, c-format msgid "unknown device '%s'; not defined in SPECIAL-NAMES" msgstr "Unbekanntes Gerät »%s«; ist nicht unter SPECIAL-NAMES definiert" -#: cobc/typeck.c:8088 +#: cobc/typeck.c:8524 msgid "target of RETURNING is not a data pointer" msgstr "Ziel von RETURNING ist kein Datenzeiger" -#: cobc/typeck.c:8115 cobc/typeck.c:12634 cobc/typeck.c:12700 -#: cobc/typeck.c:12768 +#: cobc/typeck.c:8551 cobc/typeck.c:13410 cobc/typeck.c:13479 +#: cobc/typeck.c:13547 #, c-format msgid "cannot change address of '%s', which is not BASED or a LINKAGE item" msgstr "" -#: cobc/typeck.c:8121 +#: cobc/typeck.c:8557 #, fuzzy #| msgid "target of ALLOCATE is not a BASED item" msgid "target of ALLOCATE must have BASED clause" msgstr "Ziel von ALLOCATE ist kein BASED-Element" -#: cobc/typeck.c:8155 cobc/typeck.c:8571 +#: cobc/typeck.c:8591 cobc/typeck.c:9023 msgid "amount must be specified as a numeric expression" msgstr "" -#: cobc/typeck.c:8161 +#: cobc/typeck.c:8597 msgid "INITIALIZED TO item is not alphanumeric" msgstr "Element INITIALIZED TO ist nicht alphanumerisch" -#: cobc/typeck.c:8232 +#: cobc/typeck.c:8667 msgid "only alphanumeric FUNCTION types are allowed here" msgstr "Hier sind nur alphanumerische FUNCTION-Typen zulässig" -#: cobc/typeck.c:8240 +#: cobc/typeck.c:8675 msgid "invalid RETURNING field" msgstr "" -#: cobc/typeck.c:8259 +#: cobc/typeck.c:8694 msgid "STDCALL not available on this platform" msgstr "STDCALL auf dieser Plattform nicht verfügbar" -#: cobc/typeck.c:8263 +#: cobc/typeck.c:8698 msgid "STDCALL used on 64-bit Windows platform" msgstr "STDCALL auf 64-bit Plattform verwendet" -#: cobc/typeck.c:8268 +#: cobc/typeck.c:8703 msgid "STATIC CALL convention requires a literal program name" msgstr "" -#: cobc/typeck.c:8273 cobc/typeck.c:11975 cobc/typeck.c:12900 -#: cobc/typeck.c:13271 +#: cobc/typeck.c:8708 cobc/typeck.c:12746 cobc/typeck.c:13681 +#: cobc/typeck.c:14077 msgid "HANDLE must be either a generic or a THREAD HANDLE" msgstr "" -#: cobc/typeck.c:8291 +#: cobc/typeck.c:8726 msgid "numeric literal is negative" msgstr "Numerisches Literal ist negativ" -#: cobc/typeck.c:8370 +#: cobc/typeck.c:8805 msgid "numeric literal exceeds size limits" msgstr "Numerisches Literal übersteigt die Größenbeschränkung" -#: cobc/typeck.c:8385 +#: cobc/typeck.c:8820 #, fuzzy, c-format #| msgid "literal contains invalid character '%c'" msgid "figurative constant %s invalid here" msgstr "Literal enthält ungültiges Zeichen »%c«" -#: cobc/typeck.c:8403 +#: cobc/typeck.c:8840 #, c-format msgid "'%s' is not a 01 or 77 level item" msgstr "»%s« ist kein Element auf der Stufe 01 oder 77" -#: cobc/typeck.c:8407 +#: cobc/typeck.c:8856 #, c-format msgid "'%s' ANY LENGTH item not passed BY REFERENCE" msgstr "" -#: cobc/typeck.c:8457 cobc/typeck.c:8462 +#: cobc/typeck.c:8909 cobc/typeck.c:8914 #, c-format msgid "wrong number of CALL parameters for '%s', %d given, %d expected" msgstr "" -#: cobc/typeck.c:8529 cobc/typeck.c:8603 cobc/typeck.c:8607 cobc/typeck.c:8637 -#: cobc/typeck.c:11932 cobc/typeck.c:12092 cobc/typeck.c:12281 -#: cobc/typeck.c:12285 cobc/typeck.c:13206 cobc/typeck.c:13539 -#: cobc/typeck.c:13542 +#: cobc/typeck.c:8981 cobc/typeck.c:9055 cobc/typeck.c:9059 cobc/typeck.c:9095 +#: cobc/typeck.c:12703 cobc/typeck.c:12863 cobc/typeck.c:13052 +#: cobc/typeck.c:13056 cobc/typeck.c:14012 cobc/typeck.c:14345 +#: cobc/typeck.c:14348 #, c-format msgid "%s not allowed on %s files" msgstr "%s nicht zulässig für %s Dateien" -#: cobc/typeck.c:8704 +#: cobc/typeck.c:9172 msgid "positions cannot be specified for main windows" msgstr "" -#: cobc/typeck.c:8714 cobc/typeck.c:8718 cobc/typeck.c:8740 +#: cobc/typeck.c:9183 cobc/typeck.c:9187 cobc/typeck.c:9211 msgid "HANDLE must be either a generic or a WINDOW HANDLE or X(10)" msgstr "" -#: cobc/typeck.c:8849 +#: cobc/typeck.c:9324 #, c-format msgid "'%s' is an invalid type for DISPLAY operand" msgstr "»%s« ist als Typ für DISPLAY-Operand unzulässig" -#: cobc/typeck.c:8854 +#: cobc/typeck.c:9329 msgid "invalid type for DISPLAY operand" msgstr "Ungültiger Typ für DISPLAY-Operand" -#: cobc/typeck.c:9202 cobc/typeck.c:9235 +#: cobc/typeck.c:9668 cobc/typeck.c:9701 #, c-format msgid "'%s' is not an output device" msgstr "»%s« ist kein Ausgabegerät" -#: cobc/typeck.c:9335 +#: cobc/typeck.c:9800 msgid "invalid use of 88 level in WHEN expression" msgstr "" -#: cobc/typeck.c:9396 +#: cobc/typeck.c:9861 msgid "wrong number of WHEN parameters" msgstr "Ungültige Anzahl an WHEN-Parametern" -#: cobc/typeck.c:9518 cobc/typeck.c:9530 +#: cobc/typeck.c:9983 cobc/typeck.c:9995 #, c-format msgid "target %d of FREE is not a BASED data item" msgstr "Ziel %d von FREE ist kein BASED-Datenelement" -#: cobc/typeck.c:9536 +#: cobc/typeck.c:10001 #, c-format msgid "target %d of FREE must be a data pointer" msgstr "Ziel %d von FREE muss ein Datenzeiger sein" -#: cobc/typeck.c:9550 +#: cobc/typeck.c:10015 msgid "GO TO without procedure-name" msgstr "" -#: cobc/typeck.c:9560 +#: cobc/typeck.c:10023 msgid "GO TO with multiple procedure-names" msgstr "" -#: cobc/typeck.c:9582 -msgid "GO TO ENTRY with multiple entry-names" -msgstr "" - -#: cobc/typeck.c:9646 +#: cobc/typeck.c:10088 msgid "invalid INITIALIZE statement" msgstr "Ungültige INITIALIZE-Anweisung" -#: cobc/typeck.c:9752 cobc/typeck.c:9755 +#: cobc/typeck.c:10193 cobc/typeck.c:10196 #, c-format msgid "%s operands differ in size" msgstr "" -#: cobc/typeck.c:9785 +#: cobc/typeck.c:10226 #, c-format msgid "unexpected clause %d" msgstr "Unerwartete Klausel %d" -#: cobc/typeck.c:9860 cobc/typeck.c:9871 cobc/typeck.c:9882 cobc/typeck.c:9893 +#: cobc/typeck.c:10301 cobc/typeck.c:10312 cobc/typeck.c:10323 +#: cobc/typeck.c:10334 #, c-format msgid "data name expected before %s" msgstr "Datenname vor %s erwartet" -#: cobc/typeck.c:9903 +#: cobc/typeck.c:10344 #, c-format msgid "ALL, LEADING or TRAILING expected before '%s'" msgstr "" -#: cobc/typeck.c:9913 +#: cobc/typeck.c:10354 msgid "operand has wrong size" msgstr "" -#: cobc/typeck.c:10007 +#: cobc/typeck.c:10448 #, c-format msgid "'%s' defined here as PIC %s" msgstr "" -#: cobc/typeck.c:10011 +#: cobc/typeck.c:10452 #, c-format msgid "'%s' defined here as a group of length %d" msgstr "" -#: cobc/typeck.c:10017 +#: cobc/typeck.c:10458 #, fuzzy, c-format #| msgid "internal register '%s' defined as BINARY-LONG" msgid "internal register '%s' defined as USAGE %s" msgstr "Internes Register »%s« ist als BINARY-LONG definiert" -#: cobc/typeck.c:10020 +#: cobc/typeck.c:10461 #, c-format msgid "'%s' defined here as USAGE %s" msgstr "" -#: cobc/typeck.c:10045 cobc/typeck.c:10063 +#: cobc/typeck.c:10486 cobc/typeck.c:10504 #, c-format msgid "value size is %d" msgstr "" -#: cobc/typeck.c:10059 +#: cobc/typeck.c:10500 #, c-format msgid "value is %s" msgstr "Wert ist »%s«" -#: cobc/typeck.c:10338 -msgid "invalid destination for MOVE" -msgstr "Ungültiges Ziel für MOVE" - -#: cobc/typeck.c:10380 +#: cobc/typeck.c:10824 msgid "MOVE of figurative constant SPACE to numeric item" msgstr "" -#: cobc/typeck.c:10395 +#: cobc/typeck.c:10839 msgid "MOVE of figurative constant QUOTE to numeric item" msgstr "" -#: cobc/typeck.c:10400 cobc/typeck.c:10411 +#: cobc/typeck.c:10844 cobc/typeck.c:10855 msgid "MOVE of figurative constant to numeric item" msgstr "" -#: cobc/typeck.c:10469 +#: cobc/typeck.c:10936 msgid "numeric literal in VALUE clause of numeric-edited item" msgstr "" -#: cobc/typeck.c:10494 +#: cobc/typeck.c:10966 msgid "numeric move to ALPHABETIC" msgstr "" -#: cobc/typeck.c:10506 +#: cobc/typeck.c:10978 msgid "data item not signed" msgstr "" -#: cobc/typeck.c:10509 +#: cobc/typeck.c:10981 msgid "ignoring sign" msgstr "Vorzeichen wird ignoriert" -#: cobc/typeck.c:10821 +#: cobc/typeck.c:11381 msgid "overlapping MOVE may occur and produce unpredictable results" msgstr "" -#: cobc/typeck.c:10828 +#: cobc/typeck.c:11388 msgid "overlapping MOVE may produce unpredictable results" msgstr "" -#: cobc/typeck.c:10961 +#: cobc/typeck.c:11593 msgid "invalid source for MOVE" msgstr "Ungültige Quelle für MOVE" -#: cobc/typeck.c:10982 +#: cobc/typeck.c:11614 msgid "source is non-numeric - substituting zero" msgstr "" -#: cobc/typeck.c:10988 cobc/typeck.c:10999 +#: cobc/typeck.c:11620 cobc/typeck.c:11631 msgid "invalid VALUE clause" msgstr "Ungültige VALUE-Klausel" -#: cobc/typeck.c:10991 cobc/typeck.c:12841 cobc/typeck.c:12846 -#: cobc/typeck.c:12873 cobc/typeck.c:12878 +#: cobc/typeck.c:11623 cobc/typeck.c:13622 cobc/typeck.c:13627 +#: cobc/typeck.c:13654 cobc/typeck.c:13659 msgid "invalid SET statement" msgstr "Ungültige SET-Anweisung" -#: cobc/typeck.c:10993 +#: cobc/typeck.c:11625 msgid "invalid MOVE statement" msgstr "Ungültige MOVE-Anweisung" -#: cobc/typeck.c:11000 +#: cobc/typeck.c:11632 msgid "literal exceeds data size" msgstr "Literal übersteigt die Datengröße" -#: cobc/typeck.c:11004 +#: cobc/typeck.c:11636 msgid "numeric literal exceeds data size" msgstr "Numerisches Literal übersteigt die Datengröße" -#: cobc/typeck.c:11013 +#: cobc/typeck.c:11645 msgid "MOVE of non-integer to alphanumeric" msgstr "" -#: cobc/typeck.c:11029 +#: cobc/typeck.c:11666 cobc/typeck.c:11671 +#, fuzzy +#| msgid "numeric value is expected" +msgid "national value is expected" +msgstr "Numerischer Wert wird erwartet" + +#: cobc/typeck.c:11676 msgid "value does not fit the picture string" msgstr "" -#: cobc/typeck.c:11035 +#: cobc/typeck.c:11682 msgid "value size exceeds data size" msgstr "" -#: cobc/typeck.c:11040 +#: cobc/typeck.c:11687 msgid "sending field larger than receiving field" msgstr "" -#: cobc/typeck.c:11045 +#: cobc/typeck.c:11692 msgid "some digits may be truncated" msgstr "" -#: cobc/typeck.c:11798 cobc/typeck.c:11848 +#: cobc/typeck.c:12566 cobc/typeck.c:12619 #, c-format msgid "invalid MOVE target: %s" msgstr "Ungültiges Ziel für MOVE: %s" -#: cobc/typeck.c:12105 +#: cobc/typeck.c:12876 msgid "READ PREVIOUS not allowed for this file type" msgstr "" -#: cobc/typeck.c:12113 +#: cobc/typeck.c:12884 msgid "KEY ignored with sequential READ" msgstr "" -#: cobc/typeck.c:12209 +#: cobc/typeck.c:12980 msgid "figurative constants not allowed in FROM clause" msgstr "" -#: cobc/typeck.c:12216 -msgid "literal in FROM clause must be alphanumeric, national or boolean" -msgstr "" +#: cobc/typeck.c:12987 +#, fuzzy +#| msgid "%s is not an alphanumeric literal" +msgid "literal in FROM clause must be alphanumeric, utf-8, national or boolean" +msgstr "»%s« ist kein alphanumerisches Literal" -#: cobc/typeck.c:12239 cobc/typeck.c:13499 +#: cobc/typeck.c:13010 cobc/typeck.c:14305 #, c-format msgid "%s FILE requires a FROM clause" msgstr "" -#: cobc/typeck.c:12261 cobc/typeck.c:12345 cobc/typeck.c:13521 +#: cobc/typeck.c:13032 cobc/typeck.c:13116 cobc/typeck.c:14327 #, c-format msgid "%s subject does not refer to a record name" msgstr "" -#: cobc/typeck.c:12351 +#: cobc/typeck.c:13122 msgid "RELEASE not allowed on this record item" msgstr "" -#: cobc/typeck.c:12433 cobc/typeck.c:12454 cobc/typeck.c:12461 +#: cobc/typeck.c:13183 cobc/typeck.c:13209 cobc/typeck.c:13237 msgid "invalid SEARCH ALL condition" msgstr "Ungültige Bedingung für SEARCH ALL" -#: cobc/typeck.c:12578 cobc/typeck.c:12585 +#: cobc/typeck.c:13231 +msgid "SEARCH ALL requires comparision of KEY field" +msgstr "" + +#: cobc/typeck.c:13354 cobc/typeck.c:13361 msgid "SET targets must be PROGRAM-POINTER" msgstr "Ziel des SET muss ein PROGRAM-POINTER sein" -#: cobc/typeck.c:12610 +#: cobc/typeck.c:13386 #, c-format msgid "SET target '%s' is not numeric, an INDEX or a POINTER" msgstr "" -#: cobc/typeck.c:12627 cobc/typeck.c:12696 cobc/typeck.c:12764 +#: cobc/typeck.c:13403 cobc/typeck.c:13475 cobc/typeck.c:13543 #, c-format msgid "cannot change address of '%s', which is not level 1 or 77" msgstr "" -#: cobc/typeck.c:12721 +#: cobc/typeck.c:13500 #, fuzzy, c-format #| msgid "SET targets must be PROGRAM-POINTER" msgid "SET target '%s' is not a POINTER for FCD" msgstr "Ziel des SET muss ein PROGRAM-POINTER sein" -#: cobc/typeck.c:12789 +#: cobc/typeck.c:13569 #, c-format msgid "SET target '%s' is not a POINTER for FCD-KEYDEF" msgstr "" -#: cobc/typeck.c:12882 +#: cobc/typeck.c:13663 msgid "field does not have a FALSE clause" msgstr "Feld hat keine FALSE-Klausel" -#: cobc/typeck.c:12913 +#: cobc/typeck.c:13694 msgid "THREAD-priority must be between 1 and 32767" msgstr "" -#: cobc/typeck.c:12933 +#: cobc/typeck.c:13714 msgid "SET ATTRIBUTE requires a screen item as subject" msgstr "" -#: cobc/typeck.c:12939 +#: cobc/typeck.c:13720 msgid "SET ATTRIBUTE subject does not refer to a screen item" msgstr "" -#: cobc/typeck.c:12990 -msgid "invalid SORT filename" -msgstr "Ungültiger SORT-Dateiname" - -#: cobc/typeck.c:13051 -msgid "invalid SORT USING parameter" -msgstr "Ungültiger Parameter SORT USING" - -#: cobc/typeck.c:13080 -msgid "invalid SORT GIVING parameter" -msgstr "Ungültiger Parameter SORT GIVING" +#: cobc/typeck.c:13835 cobc/typeck.c:13875 +#, fuzzy, c-format +#| msgid "invalid parameter: %s" +msgid "invalid %s parameter" +msgstr "Ungültiger Parameter: %s" -#: cobc/typeck.c:13134 cobc/typeck.c:13161 cobc/typeck.c:13181 +#: cobc/typeck.c:13940 cobc/typeck.c:13967 cobc/typeck.c:13987 #, fuzzy msgid "invalid key item" msgstr "Ungültiger Parameter %s" -#: cobc/typeck.c:13211 +#: cobc/typeck.c:14017 msgid "LENGTH/SIZE clause only allowed on INDEXED files" msgstr "" -#: cobc/typeck.c:13216 +#: cobc/typeck.c:14022 msgid "START not allowed with ACCESS MODE RANDOM" msgstr "" -#: cobc/typeck.c:13305 -#, fuzzy, c-format -#| msgid "'%s' is not an integer" -msgid "%s item '%s' must be numeric and an integer" -msgstr "»%s« ist keine Ganzzahl" - -#: cobc/typeck.c:13311 +#: cobc/typeck.c:14111 cobc/typeck.c:14117 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "%s item '%s' must be an integer" msgstr "»%s« ist keine Ganzzahl" -#: cobc/typeck.c:13315 +#: cobc/typeck.c:14121 #, c-format msgid "%s item '%s' may not have PICTURE with P in it" msgstr "" -#: cobc/typeck.c:13331 +#: cobc/typeck.c:14137 #, fuzzy, c-format #| msgid "'%s' is not a statement" msgid "'%s' is not an elementary item" msgstr "»%s« ist keine Anweisung" -#: cobc/typeck.c:13407 +#: cobc/typeck.c:14213 msgid "STRING items must be all NATIONAL or none" msgstr "" -#: cobc/typeck.c:13555 +#: cobc/typeck.c:14361 msgid "LOCK clause invalid here" msgstr "LOCk-Klausel ist hier unzulässig" -#: cobc/typeck.c:13800 +#: cobc/typeck.c:14606 msgid "data item is not part of a report" msgstr "" -#: cobc/typeck.c:13820 +#: cobc/typeck.c:14626 msgid "improper use of SUPPRESS PRINTING" msgstr "" -#: cobc/typeck.c:13835 +#: cobc/typeck.c:14642 #, fuzzy, c-format #| msgid "%s is not an alphanumeric literal" msgid "%s must be alphanumeric or national" msgstr "»%s« ist kein alphanumerisches Literal" -#: cobc/typeck.c:13846 +#: cobc/typeck.c:14652 #, c-format msgid "%s may not be a figurative constant" msgstr "" -#: cobc/typeck.c:13885 +#: cobc/typeck.c:14690 #, c-format msgid "%s must be a child of the input record" msgstr "" -#: cobc/typeck.c:13911 +#: cobc/typeck.c:14715 #, c-format msgid "%s may not be an ignored item in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:13922 +#: cobc/typeck.c:14725 #, fuzzy, c-format #| msgid "must be numeric" msgid "%s must be elementary" msgstr "muss numerisch sein" -#: cobc/typeck.c:13935 +#: cobc/typeck.c:14737 #, fuzzy, c-format msgid "STRING item '%s' must be USAGE DISPLAY or NATIONAL" msgstr "'%s' ist nicht in der LINKAGE SECTION enthalten" -#: cobc/typeck.c:13947 +#: cobc/typeck.c:14749 #, fuzzy, c-format msgid "%s must be USAGE DISPLAY or NATIONAL" msgstr "'%s' ist nicht in der LINKAGE SECTION enthalten" -#: cobc/typeck.c:13961 +#: cobc/typeck.c:14761 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "%s must be an integer" msgstr "»%s« ist keine Ganzzahl" -#: cobc/typeck.c:13977 cobc/typeck.c:13983 +#: cobc/typeck.c:14776 cobc/typeck.c:14782 msgid "JSON/XML GENERATE receiving item" msgstr "" -#: cobc/typeck.c:13980 +#: cobc/typeck.c:14779 msgid "JSON/XML GENERATE receiving item may not have JUSTIFIED clause" msgstr "" -#: cobc/typeck.c:14068 +#: cobc/typeck.c:14867 msgid "JSON/XML GENERATE input record may not be reference modified" msgstr "" -#: cobc/typeck.c:14074 +#: cobc/typeck.c:14873 msgid "JSON/XML GENERATE input record may not have RENAMES clause" msgstr "" -#: cobc/typeck.c:14079 +#: cobc/typeck.c:14878 #, c-format msgid "all the children of '%s' are ignored in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14086 +#: cobc/typeck.c:14885 msgid "JSON/XML GENERATE input record has subrecords with non-unique names" msgstr "" -#: cobc/typeck.c:14091 +#: cobc/typeck.c:14890 msgid "floating-point items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14095 +#: cobc/typeck.c:14894 msgid "OCCURS items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14142 +#: cobc/typeck.c:14941 msgid "NAMESPACE must be a valid URI" msgstr "" -#: cobc/typeck.c:14186 +#: cobc/typeck.c:14985 msgid "NAMESPACE-PREFIX must be a valid XML name" msgstr "" -#: cobc/typeck.c:14215 cobc/typeck.c:14223 +#: cobc/typeck.c:15014 cobc/typeck.c:15022 msgid "NAME OF item" msgstr "" -#: cobc/typeck.c:14220 +#: cobc/typeck.c:15019 msgid "NAME OF item must be the input record or a child of it" msgstr "" -#: cobc/typeck.c:14230 +#: cobc/typeck.c:15029 msgid "NAME OF ... OMITTED only valid for source identifier" msgstr "" -#: cobc/typeck.c:14238 +#: cobc/typeck.c:15037 #, c-format msgid "NAME OF literal must be a valid %s identifier" msgstr "" -#: cobc/typeck.c:14265 cobc/typeck.c:14266 cobc/typeck.c:14269 -#: cobc/typeck.c:14273 +#: cobc/typeck.c:15062 cobc/typeck.c:15063 cobc/typeck.c:15066 +#: cobc/typeck.c:15070 msgid "TYPE OF item" msgstr "" -#: cobc/typeck.c:14291 +#: cobc/typeck.c:15088 msgid "SUPPRESS WHEN SPACE item" msgstr "" -#: cobc/typeck.c:14294 +#: cobc/typeck.c:15091 msgid "SUPPRESS WHEN LOW-VALUE item" msgstr "" -#: cobc/typeck.c:14296 +#: cobc/typeck.c:15093 msgid "SUPPRESS WHEN HIGH-VALUE item" msgstr "" -#: cobc/typeck.c:14325 cobc/typeck.c:14333 cobc/typeck.c:14337 +#: cobc/typeck.c:15122 cobc/typeck.c:15130 cobc/typeck.c:15134 msgid "SUPPRESS item" msgstr "" -#: cobc/typeck.c:14329 +#: cobc/typeck.c:15126 msgid "SUPPRESS item with WHEN clause" msgstr "" -#: cobc/typeck.c:14407 +#: cobc/typeck.c:15204 msgid "WITH ATTRIBUTES specified, but no attributes can be generated" msgstr "" @@ -6252,178 +6388,194 @@ msgid " -Wparentheses warn if parentheses are omitted around AND within msgstr "" #: cobc/warning.def:70 -msgid " -Wstrict-typing warn strictly about type mismatch" +msgid " -Wstrict-typing warn strictly about type mismatch, even when same size" msgstr "" #: cobc/warning.def:73 #, fuzzy +#| msgid " -Werror treat all warnings as errors" +msgid " -Wtyping warn about type mismatch" +msgstr " -Werror fasst alle Warnungen als Fehler auf" + +#: cobc/warning.def:76 +#, fuzzy msgid " -Wimplicit-define warn whenever data items are implicitly defined" msgstr "'%s' wird implizit definiert" -#: cobc/warning.def:76 +#: cobc/warning.def:79 msgid " -Wno-corresponding do not warn about CORRESPONDING with no matching items" msgstr "" -#: cobc/warning.def:79 +#: cobc/warning.def:82 msgid " -Winitial-value warn if initial VALUE clause is ignored" msgstr "" -#: cobc/warning.def:82 +#: cobc/warning.def:85 msgid " -Wprototypes warn about missing FUNCTION prototypes/definitions" msgstr "" -#: cobc/warning.def:85 +#: cobc/warning.def:88 msgid " -Warithmetic-osvs warn if arithmetic expression precision has changed" msgstr "" -#: cobc/warning.def:88 +#: cobc/warning.def:91 msgid " -Wcall-params warn about non 01/77 items for CALL parameters" msgstr "" -#: cobc/warning.def:91 +#: cobc/warning.def:94 msgid " -Wconstant-expression warn about expressions that always resolve to true/false" msgstr "" -#: cobc/warning.def:94 +#: cobc/warning.def:97 msgid " -Wconstant-numlit-expression\twarn about numeric expressions that always resolve to true/false" msgstr "" -#: cobc/warning.def:97 +#: cobc/warning.def:100 msgid " -Wlarger-01-redefines warn about larger redefines allowed by COBOL standards" msgstr "" -#: cobc/warning.def:100 +#: cobc/warning.def:103 msgid " -Wcolumn-overflow warn about text after program-text area, FIXED format" msgstr "" -#: cobc/warning.def:103 +#: cobc/warning.def:106 msgid " -Wterminator warn about lack of scope terminator END-XXX" msgstr "" -#: cobc/warning.def:106 +#: cobc/warning.def:109 msgid " -Wlinkage warn about dangling LINKAGE items" msgstr "" -#: cobc/warning.def:109 +#: cobc/warning.def:112 msgid " -Wunreachable warn about likely unreachable statements" msgstr "" -#: cobc/warning.def:112 +#: cobc/warning.def:115 msgid " -Wno-dialect do not warn about dialect specific issues" msgstr "" -#: cobc/warning.def:115 +#: cobc/warning.def:118 #, fuzzy #| msgid " -Werror treat all warnings as errors" msgid " -Wno-goto-section do not warn about GO TO section-name" msgstr " -Werror fasst alle Warnungen als Fehler auf" -#: cobc/warning.def:118 +#: cobc/warning.def:121 msgid " -Wgoto-different-section\twarn about GO TO a praragraph defined in a different section" msgstr "" -#: cobc/warning.def:121 +#: cobc/warning.def:124 msgid " -Wsuspicious-perform-thru\twarn if PERFORM THRU references procedures not in ascending order or multiple sections" msgstr "" -#: cobc/warning.def:124 +#: cobc/warning.def:127 msgid " -Wdangling-text warn about source text after program-area" msgstr "" -#: cobc/warning.def:127 +#: cobc/warning.def:130 #, fuzzy msgid " -Wno-missing-newline do not warn about missing newlines" msgstr "'%s' wird implizit definiert" -#: cobc/warning.def:130 +#: cobc/warning.def:133 #, fuzzy #| msgid " -Werror treat all warnings as errors" msgid " -Wno-others do not warn about different issues" msgstr " -Werror fasst alle Warnungen als Fehler auf" -#: cobc/warning.def:133 +#: cobc/warning.def:136 msgid " -Wno-unsupported do not warn if runtime does not support a feature used" msgstr "" -#: libcob/call.c:94 +#: libcob/call.c:98 #, c-format msgid "LoadLibrary/GetProcAddress error %d" msgstr "LoadLibrary/GetProcAddress-Fehler %d" -#: libcob/call.c:841 +#: libcob/call.c:626 +#, c-format +msgid "preloading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:817 #, fuzzy, c-format #| msgid "PROGRAM name exceeds 31 characters" msgid "%s: PROGRAM name exceeds %d characters" msgstr "PROGRAM Name überschreitet 31 Zeichen" -#: libcob/call.c:842 +#: libcob/call.c:818 #, fuzzy, c-format #| msgid "PROGRAM name exceeds 31 characters" msgid "%s: FUNCTION name exceeds %d characters" msgstr "PROGRAM Name überschreitet 31 Zeichen" -#: libcob/call.c:1067 +#: libcob/call.c:945 libcob/call.c:978 +#, c-format +msgid "loading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:1049 msgid "indeterminable error in resolve of COBOL CALL" msgstr "" -#: libcob/call.c:1149 +#: libcob/call.c:1145 #, c-format msgid "user-defined FUNCTION '%s' not found" msgstr "Benutzerdefinierte FUNCTION »%s« nicht gefunden" -#: libcob/call.c:1239 libcob/call.c:1325 libcob/call.c:1445 libcob/call.c:1472 +#: libcob/call.c:1247 libcob/call.c:1328 libcob/call.c:1448 libcob/call.c:1475 #, c-format msgid "NULL parameter passed to '%s'" msgstr "Aufruf von »%s« mit Parameter NULL" -#: libcob/call.c:1329 +#: libcob/call.c:1332 #, fuzzy, c-format msgid "invalid number of arguments passed to '%s'" msgstr "Ungültige Anzahl an Argumenten beim Aufruf von '%s'" -#: libcob/call.c:1449 +#: libcob/call.c:1452 msgid "multiple call to 'cob_setjmp'" msgstr "" -#: libcob/call.c:1476 +#: libcob/call.c:1479 msgid "call to 'cob_longjmp' with no prior 'cob_setjmp'" msgstr "Aufruf von »cob_longjmp« ohne vorherigen Aufruf von »cob_setjmp«" -#: libcob/call.c:1703 libcob/call.c:1730 libcob/common.c:8144 +#: libcob/call.c:1608 +#, c-format +msgid "preloading of '%s' failed" +msgstr "" + +#: libcob/call.c:1706 libcob/call.c:1733 libcob/common.c:8965 msgid "cob_init() has not been called" msgstr "Fehlender Aufruf von cob_init()" -#: libcob/call.c:1709 +#: libcob/call.c:1712 #, c-format msgid "parameter %d is not within range of %d" msgstr "" -#: libcob/call.c:1715 +#: libcob/call.c:1718 #, fuzzy, c-format msgid "parameter %d is NULL" msgstr "Aufruf von '%s' mit Parameter NULL" -#: libcob/call.c:2042 +#: libcob/call.c:2045 msgid "NULL field" msgstr "" -#: libcob/call.c:2050 +#: libcob/call.c:2053 #, fuzzy #| msgid "file not open" msgid "field not allocated" msgstr "Datei wurde noch nicht geöffnet" -#: libcob/call.c:2116 +#: libcob/call.c:2119 #, c-format msgid "attempt to over-write constant field with '%s'" msgstr "" -#: libcob/call.c:2156 libcob/call.c:2212 -#, c-format -msgid "attempt to over-write constant parameter %d with " -msgstr "" - -#: libcob/call.c:2263 +#: libcob/call.c:2161 libcob/call.c:2219 libcob/call.c:2270 #, c-format msgid "attempt to over-write constant parameter %d with '%s'" msgstr "" @@ -6468,695 +6620,718 @@ msgstr "%s: Ungültige Option -- »%c«" msgid "%s: option requires an argument -- '%c'" msgstr "%s: Option erfordert ein Argument -- »%c«" -#: libcob/common.c:1242 +#: libcob/common.c:1074 +#, c-format +msgid "requested coredump creation failed with status %d" +msgstr "" + +#: libcob/common.c:1303 msgid "fatal arithmetic error" msgstr "Schwerwiegender arithmetischer Fehler" -#: libcob/common.c:1245 +#: libcob/common.c:1306 msgid "interrupt from keyboard" msgstr "" -#: libcob/common.c:1249 +#: libcob/common.c:1310 msgid "hangup" msgstr "" -#: libcob/common.c:1253 +#: libcob/common.c:1314 msgid "quit" msgstr "" -#: libcob/common.c:1257 +#: libcob/common.c:1318 #, fuzzy #| msgid "Definition" msgid "termination" msgstr "Definition" -#: libcob/common.c:1261 +#: libcob/common.c:1322 msgid "emt termination" msgstr "" -#: libcob/common.c:1265 +#: libcob/common.c:1326 msgid "broken pipe" msgstr "" -#: libcob/common.c:1269 +#: libcob/common.c:1330 #, fuzzy #| msgid "signal %s" msgid "I/O signal" msgstr "Signal %s" -#: libcob/common.c:1273 +#: libcob/common.c:1334 #, fuzzy #| msgid "attempt to reference unallocated memory" msgid "attempt to reference invalid memory address" msgstr "Versuch auf nicht bereitgestellten Arbeitsspeicher zuzugreifen" -#: libcob/common.c:1277 +#: libcob/common.c:1338 msgid "bus error" msgstr "Busfehler" -#: libcob/common.c:1281 +#: libcob/common.c:1342 msgid "illegal instruction" msgstr "" -#: libcob/common.c:1285 +#: libcob/common.c:1346 #, fuzzy #| msgid "aborting" msgid "abort" msgstr "Abbruch" -#: libcob/common.c:1289 +#: libcob/common.c:1350 msgid "process killed" msgstr "" -#: libcob/common.c:1293 +#: libcob/common.c:1354 #, fuzzy #| msgid "caught signal" msgid "alarm signal" msgstr "Signal abgefangen" -#: libcob/common.c:1297 +#: libcob/common.c:1358 #, fuzzy #| msgid "preprocessing:" msgid "stop process" msgstr "Aufbereitung:" -#: libcob/common.c:1301 libcob/common.c:1305 +#: libcob/common.c:1362 libcob/common.c:1366 msgid "child process stopped" msgstr "" #. TRANSLATORS: This msgid is used for an OS signal like SIGABRT. -#: libcob/common.c:1312 +#: libcob/common.c:1373 #, fuzzy #| msgid "signal %s" msgid "signal" msgstr "Signal %s" #. TRANSLATORS: This msgid is shown for a requested but not complete stack trace. -#: libcob/common.c:1314 +#: libcob/common.c:1375 msgid "(more COBOL runtime elements follow...)" msgstr "" -#: libcob/common.c:1316 libcob/common.c:8101 +#: libcob/common.c:1377 libcob/common.c:8922 #, c-format msgid "abnormal termination - file contents may be incorrect" msgstr "" -#: libcob/common.c:3145 libcob/common.c:8581 libcob/common.c:8595 +#: libcob/common.c:3441 libcob/common.c:9398 libcob/common.c:9412 msgid "version mismatch" msgstr "Versionsnummer stimmt nicht überein" -#: libcob/common.c:3146 libcob/common.c:3148 libcob/common.c:8582 -#: libcob/common.c:8584 +#: libcob/common.c:3442 libcob/common.c:3444 libcob/common.c:9399 +#: libcob/common.c:9401 #, c-format msgid "%s has version %s.%d" msgstr "%s hat die Version %s.%d" -#: libcob/common.c:3158 +#: libcob/common.c:3454 #, fuzzy, c-format #| msgid "CALL to %s requires %d parameters" msgid "CALL to %s requires %d arguments" msgstr "CALL von %s benötigt %d Parameter" -#: libcob/common.c:3779 +#: libcob/common.c:4141 #, c-format msgid "code execution leaving %s" msgstr "" -#: libcob/common.c:3789 +#: libcob/common.c:4151 #, fuzzy, c-format msgid "BASED/LINKAGE item %s has NULL address" msgstr "BASED/LINKAGE Element '%s' hat die Speicheradresse NULL" -#: libcob/common.c:3802 libcob/common.c:3806 +#: libcob/common.c:4168 +#, c-format +msgid "memory violation detected for '%s' after %s" +msgstr "" + +#: libcob/common.c:4171 +#, c-format +msgid "memory violation detected after %s" +msgstr "" + +#: libcob/common.c:4229 libcob/common.c:4244 libcob/common.c:4283 +#: libcob/common.c:4287 #, c-format msgid "LINKAGE item %s not passed by caller" msgstr "" -#: libcob/common.c:3892 +#: libcob/common.c:4253 +#, c-format +msgid "LINKAGE item %s (size %lu) too small in the caller (size %lu)" +msgstr "" + +#: libcob/common.c:4378 #, fuzzy, c-format #| msgid "'%s' not numeric: '%s'" msgid "'%s' (Type: %s) not numeric: '%s'" msgstr "»%s« ist nicht numerisch: »%s«" -#: libcob/common.c:3917 +#: libcob/common.c:4403 #, c-format msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgstr "OCCURS DEPENDING ON »%s« außerhalb des gültigen Bereichs: %d" -#: libcob/common.c:3920 libcob/common.c:3958 +#: libcob/common.c:4406 libcob/common.c:4444 #, c-format msgid "maximum subscript for '%s': %d" msgstr "" -#: libcob/common.c:3922 +#: libcob/common.c:4408 #, c-format msgid "minimum subscript for '%s': %d" msgstr "" -#: libcob/common.c:3955 +#: libcob/common.c:4441 #, c-format msgid "current maximum subscript for '%s': %d" msgstr "" -#: libcob/common.c:3979 +#: libcob/common.c:4465 #, fuzzy, c-format msgid "offset of '%s' out of bounds: %d, maximum: %d" msgstr "Startposition von '%s' außerhalb des gültigen Bereichs: %d" -#: libcob/common.c:3994 +#: libcob/common.c:4480 #, fuzzy, c-format #| msgid "length of '%s' out of bounds: %d" msgid "length of '%s' out of bounds: %d, maximum: %d" msgstr "Länge von »%s« außerhalb des gültigen Bereichs: %d" -#: libcob/common.c:4005 +#: libcob/common.c:4491 #, fuzzy, c-format #| msgid "length of '%s' out of bounds: %d" msgid "length of '%s' out of bounds: %d, starting at: %d, maximum: %d" msgstr "Länge von »%s« außerhalb des gültigen Bereichs: %d" -#: libcob/common.c:4093 libcob/common.c:4098 +#: libcob/common.c:4579 libcob/common.c:4584 #, c-format msgid "EXTERNAL item '%s' previously allocated with size %d, requested size is %d" msgstr "" -#: libcob/common.c:4593 +#: libcob/common.c:4961 libcob/common.c:5201 #, c-format msgid "COB_CURRENT_DATE '%s' is invalid" msgstr "" -#: libcob/common.c:5641 libcob/common.c:5644 +#: libcob/common.c:6321 libcob/common.c:6324 msgid "Program abandoned at user request" msgstr "" -#: libcob/common.c:5668 +#: libcob/common.c:6348 #, c-format msgid "parameter to SYSTEM call is larger than %d characters" msgstr "Parameter für SYSTEM-Aufruf ist länger als %d Zeichen" -#: libcob/common.c:6202 +#: libcob/common.c:6998 #, c-format msgid "error '%s' during CBL_GC_FORK" msgstr "" -#: libcob/common.c:6207 libcob/common.c:6304 +#: libcob/common.c:7003 libcob/common.c:7100 #, c-format msgid "'%s' is not supported on this platform" msgstr "»%s« ist auf dieser Plattform nicht verfügbar" -#: libcob/common.c:6233 +#: libcob/common.c:7029 #, c-format msgid "error '%s' for P%d during CBL_GC_WAITPID" msgstr "" -#: libcob/common.c:6424 -msgid "Call to CBL_GC_GETOPT with wrong longoption size." +#: libcob/common.c:7220 +msgid "call to CBL_GC_GETOPT with wrong longoption size" msgstr "" -#: libcob/common.c:6429 -msgid "Call to CBL_GC_GETOPT with missing longind." +#: libcob/common.c:7225 +msgid "call to CBL_GC_GETOPT with missing longind" msgstr "" -#: libcob/common.c:6856 libcob/common.c:6877 libcob/common.c:6890 -#: libcob/common.c:9107 libcob/common.c:9111 +#: libcob/common.c:7654 libcob/common.c:7675 libcob/common.c:7688 +#: libcob/common.c:9924 libcob/common.c:9928 #, c-format msgid "(default)" msgstr " (Standard)" -#: libcob/common.c:7143 libcob/common.c:7162 +#: libcob/common.c:7973 libcob/common.c:7992 msgid "should be unsigned" msgstr "" -#: libcob/common.c:7151 libcob/common.c:7200 +#: libcob/common.c:7981 libcob/common.c:8030 msgid "should be numeric" msgstr "muss numerisch sein" -#: libcob/common.c:7209 +#: libcob/common.c:8039 #, c-format msgid "minimum value: %lu" msgstr "" -#: libcob/common.c:7261 libcob/common.c:7825 libcob/common.c:7839 +#: libcob/common.c:8069 libcob/common.c:8640 libcob/common.c:8654 +#: bin/cobcrun.c:206 #, c-format msgid "should not contain '%c'" msgstr "" -#: libcob/common.c:7342 libcob/common.c:7390 libcob/common.c:7418 -#: libcob/common.c:7427 libcob/common.c:7435 libcob/common.c:7460 +#: libcob/common.c:8150 libcob/common.c:8169 libcob/common.c:8231 +#: libcob/common.c:8240 libcob/common.c:8248 libcob/common.c:8273 #, c-format msgid "not set" msgstr "" -#: libcob/common.c:7410 libcob/common.c:7413 libcob/common.c:7416 +#: libcob/common.c:8223 libcob/common.c:8226 libcob/common.c:8229 #, c-format msgid "set by %s" msgstr "Festlegt durch %s" -#: libcob/common.c:7552 +#: libcob/common.c:8367 #, c-format msgid "WARNING - '%s' without a value - ignored!" msgstr "" -#: libcob/common.c:7555 +#: libcob/common.c:8370 #, c-format msgid "'%s' without a value!" msgstr "»%s« ohne Wertangabe!" -#: libcob/common.c:7582 +#: libcob/common.c:8397 #, c-format msgid "WARNING - '%s %s' without a value - ignored!" msgstr "" -#: libcob/common.c:8085 +#: libcob/common.c:8906 msgid "error" msgstr "Fehler" -#: libcob/common.c:8127 +#: libcob/common.c:8948 msgid "attempt to CANCEL active program" msgstr "Versuch CANCEL auf ein aktives Programm durchzuführen" -#: libcob/common.c:8154 +#: libcob/common.c:8975 msgid "CALL of program with CHAINING clause" msgstr "" -#: libcob/common.c:8158 +#: libcob/common.c:8979 msgid "stack overflow, possible PERFORM depth exceeded" msgstr "" -#: libcob/common.c:8163 +#: libcob/common.c:8984 msgid "invalid entry/exit in GLOBAL USE procedure" msgstr "" -#: libcob/common.c:8167 +#: libcob/common.c:8988 msgid "unable to allocate memory" msgstr "Arbeitsspeicher kann nicht bereitgestellt werden" -#: libcob/common.c:8172 +#: libcob/common.c:8993 #, fuzzy msgid "invalid entry into module" msgstr "Kann Modul nicht finden" -#: libcob/common.c:8179 +#: libcob/common.c:9000 #, c-format msgid "recursive CALL from '%s' to '%s' which is NOT RECURSIVE" msgstr "" -#: libcob/common.c:8184 +#: libcob/common.c:9005 #, c-format msgid "invalid recursive COBOL CALL to '%s'" msgstr "" -#: libcob/common.c:8199 +#: libcob/common.c:9020 msgid "end of file" msgstr "Dateiende" -#: libcob/common.c:8202 +#: libcob/common.c:9023 msgid "key out of range" msgstr "" -#: libcob/common.c:8205 +#: libcob/common.c:9026 msgid "key order not ascending" msgstr "" -#: libcob/common.c:8208 +#: libcob/common.c:9029 msgid "record key already exists" msgstr "" -#: libcob/common.c:8211 +#: libcob/common.c:9032 #, fuzzy msgid "record key does not exist" msgstr "Datei existiert nicht" -#: libcob/common.c:8214 +#: libcob/common.c:9035 msgid "permanent file error" msgstr "Permanenter Dateifehler" -#: libcob/common.c:8217 +#: libcob/common.c:9038 #, fuzzy #| msgid "invalid configuration file name" msgid "inconsistent file name" msgstr "Ungültiger Name der Konfigurationsdatei" -#: libcob/common.c:8220 +#: libcob/common.c:9041 msgid "file does not exist" msgstr "Datei existiert nicht" -#: libcob/common.c:8223 +#: libcob/common.c:9044 msgid "permission denied" msgstr "Zugriff verweigert" -#: libcob/common.c:8226 +#: libcob/common.c:9047 msgid "mismatch of fixed file attributes" msgstr "" -#: libcob/common.c:8229 +#: libcob/common.c:9050 msgid "file already open" msgstr "Datei wurde bereits geöffnet" -#: libcob/common.c:8232 +#: libcob/common.c:9053 msgid "file not open" msgstr "Datei wurde noch nicht geöffnet" -#: libcob/common.c:8235 +#: libcob/common.c:9056 msgid "READ must be executed first" msgstr "Zuerst muss ein READ erfolgen" -#: libcob/common.c:8238 +#: libcob/common.c:9059 msgid "record overflow" msgstr "" -#: libcob/common.c:8241 +#: libcob/common.c:9062 #, fuzzy #| msgid "READ after uncessful READ/START" msgid "READ after unsuccessful READ/START" msgstr "READ nach fehlgeschlagenem READ/START" -#: libcob/common.c:8244 +#: libcob/common.c:9065 msgid "READ/START not allowed, file not open for input" msgstr "READ/START nicht erlaubt, Datei ist nicht für Eingabe offen" -#: libcob/common.c:8247 +#: libcob/common.c:9068 msgid "WRITE not allowed, file not open for output" msgstr "" -#: libcob/common.c:8250 +#: libcob/common.c:9071 msgid "DELETE/REWRITE not allowed, file not open for I-O" msgstr "DELETE/REWRITE nicht erlaubt, Datei ist nicht für Ein-/Ausgabe offen" -#: libcob/common.c:8253 +#: libcob/common.c:9074 msgid "record locked by another file connector" msgstr "Datensatz durch einen anderen Datei-Konnektor gesperrt" -#: libcob/common.c:8256 +#: libcob/common.c:9077 msgid "LINAGE values invalid" msgstr "Angabe für LINAGE ist ungültig" -#: libcob/common.c:8259 +#: libcob/common.c:9080 msgid "file sharing conflict" msgstr "Konflikt beim gemeinsamen Dateizugriff" -#: libcob/common.c:8262 +#: libcob/common.c:9083 msgid "invalid data in LINE SEQUENTIAL file" msgstr "" -#: libcob/common.c:8266 +#: libcob/common.c:9087 msgid "runtime library is not configured for this operation" msgstr "Die Laufzeitumgebung ist für diese Operation nicht konfiguriert" -#: libcob/common.c:8271 +#: libcob/common.c:9092 msgid "unknown file error" msgstr "Unbekannter Dateifehler" -#: libcob/common.c:8278 +#: libcob/common.c:9099 #, fuzzy, c-format #| msgid "%s (status = %02d) file: '%s'" msgid "%s (status = %02d) for file %s" msgstr "%s (Status = %02d) Datei: »%s«" -#: libcob/common.c:8281 +#: libcob/common.c:9102 #, fuzzy, c-format #| msgid "%s (status = %02d) file: '%s'" msgid "%s (status = %02d) for file %s on %s" msgstr "%s (Status = %02d) Datei: »%s«" -#: libcob/common.c:8288 +#: libcob/common.c:9109 msgid "attempt to use non-implemented function" msgstr "Versuch, eine nicht implementierte Funktion zu benutzen" -#: libcob/common.c:8291 +#: libcob/common.c:9112 #, fuzzy #| msgid "attempt to use non-implemented function" msgid "attempt to use non-implemented XML I/O" msgstr "Versuch, eine nicht implementierte Funktion zu benutzen" -#: libcob/common.c:8294 +#: libcob/common.c:9115 #, fuzzy #| msgid "attempt to use non-implemented function" msgid "attempt to use non-implemented JSON I/O" msgstr "Versuch, eine nicht implementierte Funktion zu benutzen" -#: libcob/common.c:8341 +#: libcob/common.c:9162 msgid "environment variables" msgstr "Umgebungsvariablen" -#: libcob/common.c:8466 libcob/common.c:8539 libcob/common.c:8554 -#: libcob/common.c:8859 libcob/common.c:8893 libcob/common.c:8910 -#: libcob/common.c:8925 +#: libcob/common.c:9283 libcob/common.c:9356 libcob/common.c:9371 +#: libcob/common.c:9676 libcob/common.c:9710 libcob/common.c:9727 +#: libcob/common.c:9742 #, fuzzy, c-format #| msgid "C version %s%s" msgid "%s, version %d.%d.%d" msgstr "C-Version %s%s" -#: libcob/common.c:8468 libcob/common.c:8541 libcob/common.c:8558 -#: libcob/common.c:8862 libcob/common.c:8913 libcob/common.c:8928 +#: libcob/common.c:9285 libcob/common.c:9358 libcob/common.c:9375 +#: libcob/common.c:9679 libcob/common.c:9730 libcob/common.c:9745 #, c-format msgid "%s, version %d.%d.%d (compiled with %d.%d)" msgstr "" -#: libcob/common.c:8471 +#: libcob/common.c:9288 #, fuzzy, c-format #| msgid "C version %s%s" msgid "%s, version %s" msgstr "C-Version %s%s" -#: libcob/common.c:8739 +#: libcob/common.c:9556 #, fuzzy, c-format #| msgid "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>" msgid "License LGPLv3+: GNU LGPL version 3 or later <%s>" msgstr "Lizenz GPLv3+: GNU GPL Version 3 oder neuer <https://gnu.org/licenses/gpl.html>" -#: libcob/common.c:8803 libcob/common.c:8805 +#: libcob/common.c:9620 libcob/common.c:9622 msgid "dynamic loading" msgstr "" -#: libcob/common.c:8938 +#: libcob/common.c:9755 #, fuzzy #| msgid "<support>" msgid "mouse support" msgstr "<support>" -#: libcob/common.c:8955 +#: libcob/common.c:9772 msgid "CALL configuration" msgstr "CALL-Konfiguration" -#: libcob/common.c:8956 +#: libcob/common.c:9773 msgid "File I/O configuration" msgstr "Konfiguration der Datei-Ein-/Ausgabe" -#: libcob/common.c:8957 +#: libcob/common.c:9774 msgid "Screen I/O configuration" msgstr "Konfiguration der Bildschirm-Ein-/Ausgabe" -#: libcob/common.c:8958 +#: libcob/common.c:9775 msgid "Miscellaneous" msgstr "Diverses" -#: libcob/common.c:8959 +#: libcob/common.c:9776 msgid "System configuration" msgstr "Systemkonfiguration" -#: libcob/common.c:8963 +#: libcob/common.c:9780 msgid "runtime configuration" msgstr "Konfiguration der Laufzeitumgebung" -#: libcob/common.c:8965 +#: libcob/common.c:9782 msgid "via" msgstr "via" -#: libcob/common.c:9040 libcob/common.c:9068 +#: libcob/common.c:9857 libcob/common.c:9885 msgid "... removed from environment" msgstr "… aus der Umgebung entfernt" -#: libcob/common.c:9094 libcob/common.c:9096 +#: libcob/common.c:9911 libcob/common.c:9913 #, c-format msgid "(set by %s)" msgstr "" -#: libcob/common.c:9104 +#: libcob/common.c:9921 #, c-format msgid "(reset)" msgstr "" -#: libcob/common.c:9334 +#: libcob/common.c:10151 msgid "compiler was not built with --enable-debug-log; COB_DEBUG_LOG ignored" msgstr "" -#: libcob/common.c:9524 libcob/common.c:9550 +#: libcob/common.c:10338 libcob/common.c:10364 #, c-format msgid "%s called with unknown option: %d" msgstr "" #. TRANSLATORS: This msgid is shown for a requested but empty stack trace. -#: libcob/common.c:9597 +#: libcob/common.c:10411 msgid "No COBOL runtime elements on stack." msgstr "" -#: libcob/common.c:9915 +#: libcob/common.c:10734 #, c-format msgid "Module dump due to %s" msgstr "" -#: libcob/common.c:9943 +#: libcob/common.c:10762 #, c-format msgid "Dump Program-Id %s from %s compiled %s" msgstr "" -#: libcob/common.c:9969 +#: libcob/common.c:10788 #, fuzzy, c-format #| msgid "Written by %s\n" msgid "dump written to %s" msgstr "Geschrieben von %s\n" -#: libcob/fileio.c:816 libcob/fileio.c:1628 libcob/fileio.c:1882 -#: libcob/fileio.c:3812 libcob/fileio.c:4396 libcob/fileio.c:9658 -#: libcob/fileio.c:9686 libcob/numeric.c:1583 +#: libcob/fileio.c:784 libcob/fileio.c:1664 libcob/fileio.c:1926 +#: libcob/fileio.c:3938 libcob/fileio.c:4522 libcob/fileio.c:10049 +#: libcob/fileio.c:10077 libcob/numeric.c:1915 #, fuzzy, c-format msgid "invalid internal call of %s" msgstr "Ungültiger Typ für '%s'" -#: libcob/fileio.c:3359 +#: libcob/fileio.c:3486 #, c-format msgid "BDB error: %s" msgstr "BDB-Fehler: %s" -#: libcob/fileio.c:3369 +#: libcob/fileio.c:3496 #, c-format msgid "BDB error: %s %s" msgstr "BDB-Fehler: %s %s" -#: libcob/fileio.c:3383 libcob/fileio.c:3403 +#: libcob/fileio.c:3510 libcob/fileio.c:3530 #, c-format msgid "cannot join BDB environment (%s), error: %d %s" msgstr "BDB-Umgebung kann nicht gestartet werden (%s), Fehler: %d %s" -#: libcob/fileio.c:3458 libcob/fileio.c:3483 libcob/fileio.c:3509 -#: libcob/fileio.c:3528 +#: libcob/fileio.c:3585 libcob/fileio.c:3610 libcob/fileio.c:3636 +#: libcob/fileio.c:3655 #, fuzzy, c-format #| msgid "BDB error: %s %s" msgid "BDB (%s), error: %d %s" msgstr "BDB-Fehler: %s %s" -#: libcob/fileio.c:6071 +#: libcob/fileio.c:6199 #, c-format msgid "ERROR FILE %s has ASSIGN field is NULL" msgstr "" -#: libcob/fileio.c:6862 +#: libcob/fileio.c:7050 #, c-format msgid "call to CBL_OPEN_FILE with wrong access mode: %d" msgstr "" -#: libcob/fileio.c:6946 +#: libcob/fileio.c:7135 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_lock: %d" msgstr "" -#: libcob/fileio.c:6949 +#: libcob/fileio.c:7138 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_dev: %d" msgstr "" -#: libcob/fileio.c:7174 libcob/fileio.c:7457 +#: libcob/fileio.c:7362 libcob/fileio.c:7645 #, c-format msgid "'%s' - File detail area is too short" msgstr "»%s« - Bereich für Dateiinformationen ist zu klein" -#: libcob/fileio.c:7686 +#: libcob/fileio.c:7871 msgid "SORT is unable to acquire temporary file" msgstr "SORT kann keine temporäre Datei erstellen" #. TRANSLATORS: This msgid is concatenated with a filename; -#. setup translation to allow this to be followed on the right side. -#: libcob/fileio.c:8432 +#. setup translation to allow this to be followed on the right side, +#. if necessary use a colon or hyphen +#: libcob/fileio.c:8777 #, fuzzy #| msgid "implicit CLOSE of %s ('%s')" msgid "implicit CLOSE of " msgstr "Implizites CLOSE von %s (»%s«)" -#: libcob/fileio.c:9617 libcob/fileio.c:9752 +#: libcob/fileio.c:10008 libcob/fileio.c:10193 #, c-format msgid "ERROR: EXTFH called with FCD version %d" msgstr "" -#: libcob/fileio.c:9886 +#: libcob/fileio.c:10310 #, c-format msgid "ERROR: EXTFH called with wrong file organization %d" msgstr "" -#: libcob/fileio.c:9893 +#: libcob/fileio.c:10317 #, c-format msgid "ERROR: EXTFH called with no %s pointer" msgstr "" -#: libcob/fileio.c:10029 +#: libcob/fileio.c:10461 #, c-format msgid "ERROR: EXTFH called with no %s pointer; Function %d" msgstr "" -#: libcob/fileio.c:10208 +#: libcob/fileio.c:10683 #, c-format msgid "ERROR: EXTFH called with unknown Function %d" msgstr "" -#: libcob/reportio.c:630 +#: libcob/reportio.c:629 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT %d" msgstr "" -#: libcob/reportio.c:637 libcob/reportio.c:652 +#: libcob/reportio.c:636 libcob/reportio.c:651 #, c-format msgid "INITIATE %s NEXT GROUP %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:645 +#: libcob/reportio.c:644 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:1327 +#: libcob/reportio.c:1336 #, c-format msgid "INITIATE %s was already done" msgstr "" -#: libcob/reportio.c:1343 +#: libcob/reportio.c:1352 #, c-format msgid "INITIATE %s PAGE LIMIT problem" msgstr "" -#: libcob/reportio.c:1420 +#: libcob/reportio.c:1429 #, c-format msgid "TERMINATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1565 +#: libcob/reportio.c:1574 #, c-format msgid "GENERATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1917 +#: libcob/reportio.c:1926 #, c-format msgid "could not find line to SUPPRESS in report %s" msgstr "" -#: libcob/screenio.c:568 +#: libcob/screenio.c:1055 msgid "failed to initialize curses" msgstr "Fehler bei der Initialisierung von curses" -#: libcob/screenio.c:4081 +#: libcob/screenio.c:5034 msgid "end of program, please press a key to exit" msgstr "" -#: libcob/termio.c:78 libcob/termio.c:117 +#: libcob/termio.c:76 libcob/termio.c:136 msgid "(Not representable)" msgstr "(nicht darstellbar)" -#: libcob/termio.c:354 +#: libcob/termio.c:406 #, fuzzy, c-format #| msgid "cannot specify both %s and %s" msgid "cannot open %s (=%s)" msgstr "%s und %s können nicht gleichzeitig angegeben werden" -#: libcob/termio.c:369 +#: libcob/termio.c:421 msgid "COB_DISPLAY_PUNCH_FILE is invalid, output to SYSPUNCH skipped" msgstr "" @@ -7237,48 +7412,124 @@ msgid "" " (COB_LIBRARY_PATH and/or COB_PRELOAD)" msgstr "" -#: bin/cobcrun.c:146 -#, c-format -msgid "GnuCOBOL home page: <%s>" -msgstr "" - -#: bin/cobcrun.c:148 -#, fuzzy, c-format -#| msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" -msgid "General help using GNU software: <%s>" -msgstr "Allgemeine Hilfe zur Verwendung von GNU-Software: <https://www.gnu.org/gethelp/>" - -#: bin/cobcrun.c:288 +#: bin/cobcrun.c:286 msgid "invalid configuration file name" msgstr "Ungültiger Name der Konfigurationsdatei" -#: bin/cobcrun.c:355 +#: bin/cobcrun.c:353 #, fuzzy, c-format #| msgid "invalid module argument" msgid "invalid module argument '%s'" msgstr "Ungültiges Modul-Argument" -#: bin/cobcrun.c:410 +#: bin/cobcrun.c:408 #, c-format msgid "%s: missing PROGRAM name" msgstr "" -#: bin/cobcrun.c:412 +#: bin/cobcrun.c:410 #, c-format msgid "Try '%s --help' for more information." msgstr "" +#~ msgid "unexpected error_node parameter" +#~ msgstr "Unerwarteter error_node-Parameter" + #, fuzzy, c-format #~ msgid "level %02d item '%s' cannot have a %s clause" #~ msgstr "'%s' kann keine PICTURE Klausel haben" +#, fuzzy, c-format +#~ msgid "%s item '%s' should be USAGE DISPLAY" +#~ msgstr "'%s' ist nicht in der LINKAGE SECTION enthalten" + #~ msgid "only level 88 items may have multiple values" #~ msgstr "Nur Elemente der Stufe 88 dürfen mehrere Werte haben" +#, fuzzy +#~| msgid "cannot specify both %s and %s" +#~ msgid "cannot specify both FULL and JUSTIFIED" +#~ msgstr "%s und %s können nicht gleichzeitig angegeben werden" + +#, fuzzy +#~| msgid "cannot specify both %s and %s" +#~ msgid "cannot specify both PIC and VALUE" +#~ msgstr "%s und %s können nicht gleichzeitig angegeben werden" + +#, c-format +#~ msgid "unexpected USAGE: %d" +#~ msgstr "Unerwartete USAGE-Angabe: %d" + +#~ msgid "GnuCOBOL home page: <https://www.gnu.org/software/gnucobol/>" +#~ msgstr "Homepage von GnuCOBOL: <https://www.gnu.org/software/gnucobol/>" + +#~ msgid " --tsymbols specify symbols in listing, use -ftsymbols instead" +#~ msgstr " --tsymbols Symbole für Listing angeben. Verwenden Sie stattdessen -ftsymbols" + #, c-format #~ msgid "cannot specify both %s and %s; %s is ignored" #~ msgstr "%s und %s können nicht gleichzeitig angegeben werden; %s wird ignoriert" +#~ msgid "invalid CLASS value" +#~ msgstr "Ungültiger Wert für CLASS" + +#, fuzzy +#~| msgid "literal contains invalid character '%c'" +#~ msgid "H literals must contain at least one character" +#~ msgstr "Literal enthält ungültiges Zeichen »%c«" + +#, c-format +#~ msgid "'%s' is not a numeric literal" +#~ msgstr "»%s« ist kein numerisches Literal" + +#, c-format +#~ msgid "'%s' is not unsigned" +#~ msgstr "»%s« ist nicht vorzeichenlos" + +#, fuzzy, c-format +#~| msgid "FUNCTION '%s' is not implemented" +#~ msgid "FUNCTION %s has invalid argument" +#~ msgstr "FUNCTION »%s« ist nicht implementiert" + +#, fuzzy, c-format +#~| msgid "'%s' is not a numeric value" +#~ msgid "'%s' is Alpha, instead of a numeric value" +#~ msgstr "»%s« ist kein numerischer Wert" + +#, fuzzy, c-format +#~| msgid "'%s' is not a numeric value" +#~ msgid "'%s' is Alpha Edited, instead of a numeric value" +#~ msgstr "»%s« ist kein numerischer Wert" + +#, c-format +#~ msgid "'%s' is not a numeric value" +#~ msgstr "»%s« ist kein numerischer Wert" + +#, c-format +#~ msgid "'%s' is not an integer value" +#~ msgstr "»%s« ist kein Ganzzahl-Wert" + +#, c-format +#~ msgid "'%s' is not an alphabet name" +#~ msgstr "»%s« ist kein Bezeichner eines Alphabets" + +#~ msgid "invalid destination for MOVE" +#~ msgstr "Ungültiges Ziel für MOVE" + +#~ msgid "invalid SORT filename" +#~ msgstr "Ungültiger SORT-Dateiname" + +#~ msgid "invalid SORT USING parameter" +#~ msgstr "Ungültiger Parameter SORT USING" + +#~ msgid "invalid SORT GIVING parameter" +#~ msgstr "Ungültiger Parameter SORT GIVING" + +#, fuzzy, c-format +#~| msgid "'%s' is not an integer" +#~ msgid "%s item '%s' must be numeric and an integer" +#~ msgstr "»%s« ist keine Ganzzahl" + #, fuzzy, c-format #~| msgid "aborting compile of %s at line %d (%s: %s)" #~ msgid " Last statement of %s was at line %d of %s" @@ -7332,9 +7583,6 @@ msgstr "" #~ msgid "default" #~ msgstr "(Standard)" -#~ msgid "invalid option detected" -#~ msgstr "Ungültige Option festgestellt" - #~ msgid "unknown option ignored:\t%s" #~ msgstr "Ungültige Option ignoriert:\t%s" diff --git a/po/es.po b/po/es.po index 30453098e..2582f20fe 100644 --- a/po/es.po +++ b/po/es.po @@ -1,5 +1,5 @@ # Spanish translations for GnuCOBOL package. -# Copyright (C) 2002-2020 Free Software Foundation, Inc. +# Copyright (C) 2017 Free Software Foundation, Inc. # This file is distributed under the same license as the GnuCOBOL package. # Francisco Javier Serrador <fserrador@gmail.com>, 2018. # Randy Coman <rcoman@curreyadkins.com>, 2011, 2014. @@ -7,7 +7,7 @@ msgid "" msgstr "" "Project-Id-Version: gnucobol 2.2-rc1\n" "Report-Msgid-Bugs-To: gnucobol-messages@gnu.org\n" -"POT-Creation-Date: 2022-10-23 03:06+0200\n" +"POT-Creation-Date: 2023-07-28 19:20+0200\n" "PO-Revision-Date: 2018-03-20 08:41+0200\n" "Last-Translator: Francisco Javier Serrador <fserrador@gmail.com>\n" "Language-Team: Spanish <es@tp.org.es>\n" @@ -19,180 +19,186 @@ msgstr "" "Plural-Forms: nplurals=2; plural=(n != 1);\n" "X-Generator: Virtaal 0.7.1\n" -#: cobc/cobc.c:98 +#: cobc/cobc.c:116 cobc/codegen.c:2655 cobc/scanner.l:1375 #, c-format msgid "invalid parameter: %s" msgstr "parámetro no válido: %s" -#: cobc/cobc.c:153 cobc/cobc.c:2233 cobc/cobc.c:2236 cobc/parser.y:802 -#: cobc/reserved.c:4022 libcob/common.c:226 libcob/common.c:1308 -#: libcob/common.c:2384 libcob/common.c:2388 libcob/common.c:2426 -#: libcob/common.c:2464 libcob/common.c:2654 libcob/common.c:7351 -#: libcob/common.c:8370 libcob/common.c:9391 libcob/common.c:9470 -#: libcob/common.c:9912 +#: cobc/cobc.c:171 cobc/cobc.c:2392 cobc/cobc.c:2395 cobc/parser.y:895 +#: cobc/reserved.c:4039 libcob/common.c:235 libcob/common.c:1369 +#: libcob/common.c:2698 libcob/common.c:2702 libcob/common.c:2740 +#: libcob/common.c:2778 libcob/common.c:2939 libcob/common.c:8159 +#: libcob/common.c:9191 libcob/common.c:10209 libcob/common.c:10284 +#: libcob/common.c:10731 msgid "unknown" msgstr "desconocido" -#: cobc/cobc.c:855 +#: cobc/cobc.c:905 #, fuzzy #| msgid "%s: %d: internal compiler error" msgid "internal compiler error" msgstr "%s:%d: error interno de compilador" -#: cobc/cobc.c:921 cobc/cobc.c:1008 cobc/cobc.c:1070 cobc/cobc.c:1146 -#: cobc/cobc.c:1186 cobc/cobc.c:1262 +#: cobc/cobc.c:971 cobc/cobc.c:1058 cobc/cobc.c:1120 cobc/cobc.c:1196 +#: cobc/cobc.c:1236 cobc/cobc.c:1312 #, c-format msgid "cannot allocate %d bytes of memory" msgstr "no puede asignar %d bytes de memoria" -#: cobc/cobc.c:934 cobc/cobc.c:950 cobc/cobc.c:970 cobc/cobc.c:1029 -#: cobc/cobc.c:1048 cobc/cobc.c:1166 cobc/cobc.c:1281 cobc/cobc.c:1323 -#: cobc/field.c:2216 libcob/common.c:8191 +#: cobc/cobc.c:984 cobc/cobc.c:1000 cobc/cobc.c:1020 cobc/cobc.c:1079 +#: cobc/cobc.c:1098 cobc/cobc.c:1216 cobc/cobc.c:1331 cobc/cobc.c:1415 +#: cobc/field.c:2346 libcob/common.c:9012 #, c-format msgid "call to %s with NULL pointer" msgstr "llama a %s con puntero NULL" -#: cobc/cobc.c:991 +#: cobc/cobc.c:1041 #, c-format msgid "cannot reallocate %d bytes of memory" msgstr "no puede reasignar %d bytes de memoria" -#: cobc/cobc.c:1087 cobc/cobc.c:1203 +#: cobc/cobc.c:1137 cobc/cobc.c:1253 msgid "attempt to reallocate non-allocated memory" msgstr "trata reasignar memoria no asignada" -#: cobc/cobc.c:1120 cobc/cobc.c:1236 +#: cobc/cobc.c:1170 cobc/cobc.c:1286 #, c-format msgid "call to %s with invalid pointer, as it is missing in list" msgstr "llamada a %s con puntero inválido, como es ausente en lista" -#: cobc/cobc.c:1448 +#: cobc/cobc.c:1540 #, c-format msgid "assuming literal for unquoted '%s'" msgstr "asumiendo literal para no entrecomillado «%s»" -#: cobc/cobc.c:1495 +#: cobc/cobc.c:1587 #, fuzzy #| msgid "literal length %d exceeds maximum of %d digits" msgid " - length exceeds maximum" msgstr "longitud literal %d excede máximo de %d dígitos" -#: cobc/cobc.c:1499 +#: cobc/cobc.c:1591 msgid " - name cannot be empty" msgstr "" -#: cobc/cobc.c:1502 -msgid " - name cannot begin with space or underscore" +#: cobc/cobc.c:1594 +#, fuzzy +#| msgid " - name cannot begin with space or underscore" +msgid " - name cannot begin with space or hyphen" msgstr " - nombre no puede comenzar con espacio o guión bajo" -#: cobc/cobc.c:1505 +#: cobc/cobc.c:1597 msgid " - name cannot begin with 'cob_' or 'COB_'" msgstr " - nombre no puede comenzar con 'cob_' o 'COB_'" -#: cobc/cobc.c:1508 +#: cobc/cobc.c:1600 msgid " - name duplicates a 'C' keyword" msgstr " - nombre duplica una palabra 'C' clave" -#: cobc/cobc.c:1511 +#: cobc/cobc.c:1603 msgid " - name cannot contain a directory separator" msgstr " - nombre no puede contener un separador de directorio" -#: cobc/cobc.c:1520 +#: cobc/cobc.c:1612 #, c-format msgid "invalid file base name '%s'%s" msgstr "nombre de base de fichero no válido '%s'%s" -#: cobc/cobc.c:1524 +#: cobc/cobc.c:1616 #, c-format msgid "invalid ENTRY '%s'%s" msgstr "invalida ENTRY '%s'%s" -#: cobc/cobc.c:1527 +#: cobc/cobc.c:1619 #, c-format msgid "invalid PROGRAM-ID '%s'%s" msgstr "invalida PROGRAM_ID '%s'%s" -#: cobc/cobc.c:1659 +#: cobc/cobc.c:1751 #, fuzzy, c-format #| msgid "file does not exist" msgid "file '%s' does not exist" msgstr "fichero no existente" -#: cobc/cobc.c:1685 +#: cobc/cobc.c:1777 #, fuzzy, c-format #| msgid "duplicate DEFINE directive '%s'" msgid "duplicate exception '%s'" msgstr "directiva DEFINE duplicada «%s»" -#: cobc/cobc.c:1733 +#: cobc/cobc.c:1825 #, fuzzy, c-format #| msgid "invalid parameter: %s" msgid "invalid exception-name: %s" msgstr "parámetro no válido: %s" -#: cobc/cobc.c:1870 cobc/cobc.c:8780 +#: cobc/cobc.c:1998 cobc/cobc.c:9211 #, fuzzy #| msgid "environment variables" msgid "please check environment variables as noted above" msgstr "variables de entorno" -#: cobc/cobc.c:1882 cobc/error.c:348 cobc/error.c:382 cobc/error.c:408 -#: cobc/error.c:411 cobc/error.c:477 cobc/error.c:631 cobc/error.c:675 -#: cobc/error.c:779 cobc/error.c:782 +#: cobc/cobc.c:2010 cobc/error.c:140 msgid "error: " msgstr "error: " -#: cobc/cobc.c:1905 +#: cobc/cobc.c:2033 #, c-format msgid "duplicate DEFINE '%s' - ignored" msgstr "duplica DEFINE «%s» - ignorado" -#: cobc/cobc.c:1958 +#: cobc/cobc.c:2086 #, c-format msgid "environment variable '%s' is '%s'; should not contain '%c'" msgstr "variable de entorno «%s» es «%s»; debería no contener «%c»" -#: cobc/cobc.c:1988 +#: cobc/cobc.c:2116 msgid "parameter buffer size exceeded" msgstr "tamaño de búfer paramétrico excedido" -#: cobc/cobc.c:2028 +#: cobc/cobc.c:2156 #, c-format msgid "warning: could not move temporary file to %s" msgstr "advertencia: no pudo mover fichero temporal a %s" -#: cobc/cobc.c:2239 +#: cobc/cobc.c:2329 +#, fuzzy, c-format +#| msgid "environment variable '%s' is '%s'; should not contain '%c'" +msgid "environment variable '%s' has invalid content" +msgstr "variable de entorno «%s» es «%s»; debería no contener «%c»" + +#: cobc/cobc.c:2398 #, c-format msgid "aborting compile of %s at line %d (%s: %s)" msgstr "abortando compilación de %s en línea %d (%s: %s)" -#: cobc/cobc.c:2243 +#: cobc/cobc.c:2402 #, fuzzy, c-format #| msgid "aborting compile of %s at line %d (%s: %s)" msgid "aborting codegen for %s, last statement at line %d (%s: %s)" msgstr "abortando compilación de %s en línea %d (%s: %s)" -#: cobc/cobc.c:2246 +#: cobc/cobc.c:2405 #, c-format msgid "aborting codegen for %s (%s: %s)" msgstr "se aborta generador de código codegen para %s (%s: %s)" -#: cobc/cobc.c:2251 +#: cobc/cobc.c:2410 msgid "aborting" msgstr "abortando" -#: cobc/cobc.c:2329 libcob/common.c:2823 libcob/common.c:8149 bin/cobcrun.c:375 +#: cobc/cobc.c:2488 libcob/common.c:3107 libcob/common.c:8970 bin/cobcrun.c:373 #, c-format msgid "Please report this!" msgstr "¡Por favor boletine esto!" -#: cobc/cobc.c:2346 bin/cobcrun.c:100 +#: cobc/cobc.c:2505 bin/cobcrun.c:100 #, fuzzy, c-format #| msgid "License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>" msgid "License GPLv3+: GNU GPL version 3 or later <%s>" msgstr "License GPLv3+: GNU GPL versión 3 o posterior <http://gnu.org/licenses/gpl.html>" -#: cobc/cobc.c:2348 libcob/common.c:8741 bin/cobcrun.c:102 +#: cobc/cobc.c:2507 libcob/common.c:9558 bin/cobcrun.c:102 msgid "" "This is free software; see the source for copying conditions. There is NO\n" "warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." @@ -200,400 +206,406 @@ msgstr "" "Esto es software libre; vea la fuente para condiciones de copia. NO hay ninguna\n" " garantía; ni siquiera para COMERCIALIZACIÓN o UTILIZACIÓN PARA UN PROPÓSITO PARTICULAR." -#: cobc/cobc.c:2350 libcob/common.c:8743 bin/cobcrun.c:104 +#: cobc/cobc.c:2509 libcob/common.c:9560 bin/cobcrun.c:104 #, fuzzy, c-format #| msgid "Written by %s\n" msgid "Written by %s" msgstr "Escrito por %s\n" #. TRANSLATORS: This msgid is intended as the "Packaged" msgid, %s expands to date and time -#: cobc/cobc.c:2352 cobc/cobc.c:2365 libcob/common.c:8747 bin/cobcrun.c:106 +#: cobc/cobc.c:2511 cobc/cobc.c:2524 libcob/common.c:9564 bin/cobcrun.c:106 #, c-format msgid "Built %s" msgstr "Compilado %s" #. TRANSLATORS: This msgid is intended as the "Built" msgid, %s expands to date and time -#: cobc/cobc.c:2354 cobc/cobc.c:2367 libcob/common.c:8750 bin/cobcrun.c:108 +#: cobc/cobc.c:2513 cobc/cobc.c:2526 libcob/common.c:9567 bin/cobcrun.c:108 #, c-format msgid "Packaged %s" msgstr "Empaquetado %s" -#: cobc/cobc.c:2356 cobc/cobc.c:2369 cobc/cobc.c:2478 libcob/common.c:8787 +#: cobc/cobc.c:2515 cobc/cobc.c:2528 cobc/cobc.c:2637 libcob/common.c:9604 #, fuzzy #| msgid "C version %s%s" msgid "C version" msgstr "Versión C %s%s" -#: cobc/cobc.c:2382 +#: cobc/cobc.c:2541 libcob/common.c:1075 msgid "executing:" msgstr "ejecutando:" -#: cobc/cobc.c:2384 +#: cobc/cobc.c:2543 msgid "to be executed:" msgstr "para ser ejecutada:" -#: cobc/cobc.c:2422 cobc/cobc.c:2423 libcob/common.c:6834 libcob/common.c:6835 -#: libcob/common.c:6866 libcob/common.c:6867 +#: cobc/cobc.c:2581 cobc/cobc.c:2582 libcob/common.c:7632 libcob/common.c:7633 +#: libcob/common.c:7664 libcob/common.c:7665 msgid "env" msgstr "env" -#: cobc/cobc.c:2474 libcob/common.c:8783 +#: cobc/cobc.c:2633 libcob/common.c:9600 msgid "build information" msgstr "información de compilación" -#: cobc/cobc.c:2475 libcob/common.c:8784 +#: cobc/cobc.c:2634 libcob/common.c:9601 msgid "build environment" msgstr "ambiente de compilación" -#: cobc/cobc.c:2484 libcob/common.c:8794 +#: cobc/cobc.c:2643 libcob/common.c:9611 msgid "GnuCOBOL information" msgstr "Información de GnuCOBOL" -#: cobc/cobc.c:2492 cobc/cobc.c:2575 cobc/cobc.c:2591 libcob/common.c:8410 -#: libcob/common.c:8777 libcob/common.c:8778 libcob/common.c:8812 -#: libcob/common.c:8878 libcob/common.c:8900 libcob/common.c:8934 +#: cobc/cobc.c:2651 cobc/cobc.c:2739 cobc/cobc.c:2755 libcob/common.c:9233 +#: libcob/common.c:9594 libcob/common.c:9595 libcob/common.c:9629 +#: libcob/common.c:9695 libcob/common.c:9717 libcob/common.c:9751 msgid "disabled" msgstr "desactivado" -#: cobc/cobc.c:2523 cobc/cobc.c:2541 libcob/common.c:7397 libcob/common.c:8400 -#: libcob/common.c:8407 libcob/common.c:8816 libcob/common.c:8834 +#: cobc/cobc.c:2687 cobc/cobc.c:2705 libcob/common.c:8179 libcob/common.c:9221 +#: libcob/common.c:9230 libcob/common.c:9633 libcob/common.c:9651 msgid "yes" msgstr "sí" -#: cobc/cobc.c:2525 cobc/cobc.c:2543 libcob/common.c:7399 libcob/common.c:8402 -#: libcob/common.c:8818 libcob/common.c:8836 +#: cobc/cobc.c:2689 cobc/cobc.c:2707 libcob/common.c:8181 libcob/common.c:9223 +#: libcob/common.c:9635 libcob/common.c:9653 msgid "no" msgstr "no" -#: cobc/cobc.c:2529 libcob/common.c:8822 +#: cobc/cobc.c:2693 libcob/common.c:9639 msgid "8 bytes" msgstr "8 bytes" -#: cobc/cobc.c:2531 libcob/common.c:8824 +#: cobc/cobc.c:2695 libcob/common.c:9641 msgid "4 bytes" msgstr "4 bytes" -#: cobc/cobc.c:2535 cobc/cobc.c:2537 libcob/common.c:8828 libcob/common.c:8830 +#: cobc/cobc.c:2699 cobc/cobc.c:2701 libcob/common.c:9645 libcob/common.c:9647 msgid "endianness" msgstr "" -#: cobc/cobc.c:2535 libcob/common.c:8828 +#: cobc/cobc.c:2699 libcob/common.c:9645 msgid "big-endian" msgstr "" -#: cobc/cobc.c:2537 libcob/common.c:8830 +#: cobc/cobc.c:2701 libcob/common.c:9647 msgid "little-endian" msgstr "" -#: cobc/cobc.c:2541 cobc/cobc.c:2543 libcob/common.c:8834 libcob/common.c:8836 +#: cobc/cobc.c:2705 cobc/cobc.c:2707 libcob/common.c:9651 libcob/common.c:9653 msgid "native EBCDIC" msgstr "" -#: cobc/cobc.c:2546 libcob/common.c:8937 +#: cobc/cobc.c:2710 libcob/common.c:9754 msgid "extended screen I/O" msgstr "extensión de E/S de pantalla" -#: cobc/cobc.c:2549 libcob/common.c:8840 +#: cobc/cobc.c:2713 libcob/common.c:9657 #, fuzzy #| msgid "variable format" msgid "variable file format" msgstr "formato variable" -#: cobc/cobc.c:2555 cobc/cobc.c:2557 libcob/common.c:8846 libcob/common.c:8848 +#: cobc/cobc.c:2719 cobc/cobc.c:2721 libcob/common.c:9663 libcob/common.c:9665 #, fuzzy #| msgid "sequential handler" msgid "sequential file handler" msgstr "manipulador secuencial" -#: cobc/cobc.c:2557 libcob/common.c:8848 +#: cobc/cobc.c:2721 libcob/common.c:9665 msgid "built-in" msgstr "compilado" -#: cobc/cobc.c:2561 cobc/cobc.c:2563 cobc/cobc.c:2565 cobc/cobc.c:2567 -#: cobc/cobc.c:2570 cobc/cobc.c:2572 cobc/cobc.c:2575 libcob/common.c:8852 -#: libcob/common.c:8866 libcob/common.c:8868 libcob/common.c:8870 -#: libcob/common.c:8873 libcob/common.c:8875 libcob/common.c:8878 +#: cobc/cobc.c:2725 cobc/cobc.c:2727 cobc/cobc.c:2729 cobc/cobc.c:2731 +#: cobc/cobc.c:2734 cobc/cobc.c:2736 cobc/cobc.c:2739 libcob/common.c:9669 +#: libcob/common.c:9683 libcob/common.c:9685 libcob/common.c:9687 +#: libcob/common.c:9690 libcob/common.c:9692 libcob/common.c:9695 #, fuzzy #| msgid "sequential handler" msgid "indexed file handler" msgstr "manipulador secuencial" -#: cobc/cobc.c:2580 cobc/cobc.c:2582 cobc/cobc.c:2585 libcob/common.c:8884 +#: cobc/cobc.c:2744 cobc/cobc.c:2746 cobc/cobc.c:2749 libcob/common.c:9701 msgid "mathematical library" msgstr "biblioteca matemática" -#: cobc/cobc.c:2589 cobc/cobc.c:2591 libcob/common.c:8895 libcob/common.c:8900 +#: cobc/cobc.c:2753 cobc/cobc.c:2755 libcob/common.c:9712 libcob/common.c:9717 msgid "XML library" msgstr "" -#: cobc/cobc.c:2594 libcob/common.c:8917 libcob/common.c:8932 -#: libcob/common.c:8934 +#: cobc/cobc.c:2758 libcob/common.c:9734 libcob/common.c:9749 +#: libcob/common.c:9751 msgid "JSON library" msgstr "" -#: cobc/cobc.c:2597 libcob/common.c:8810 libcob/common.c:8941 +#: cobc/cobc.c:2761 libcob/common.c:9627 libcob/common.c:9758 msgid "enabled" msgstr "activado" -#: cobc/cobc.c:2604 +#: cobc/cobc.c:2768 msgid "only one of options 'E', 'S', 'C', 'c' may be specified" msgstr "solo una de las opciones 'E', 'S', 'C', 'c' quizá está especificada" -#: cobc/cobc.c:2610 +#: cobc/cobc.c:2774 msgid "only one of options 'm', 'x', 'b' may be specified" msgstr "solo una de las opciones 'm', 'x', 'b' quizá está especificada" -#: cobc/cobc.c:2652 +#: cobc/cobc.c:2816 #, c-format msgid "option requires one of 'ALL', 'FD', 'WS', 'LS', 'RD', 'FD', 'SC', 'LO' - not '%s'" msgstr "" -#: cobc/cobc.c:2682 +#: cobc/cobc.c:2846 #, c-format msgid "'%s' is not an intrinsic function" msgstr "«%s» no es una función intrínseca" -#: cobc/cobc.c:2726 cobc/cobc.c:8094 cobc/cobc.c:8213 cobc/codegen.c:3783 -#: cobc/codegen.c:3884 cobc/codegen.c:5571 cobc/codegen.c:5700 -#: cobc/codegen.c:13034 cobc/tree.c:1391 cobc/tree.c:4497 cobc/tree.c:5067 -#: cobc/tree.c:5316 cobc/typeck.c:4344 cobc/typeck.c:9044 cobc/typeck.c:9079 -#: cobc/typeck.c:9977 cobc/typeck.c:12619 cobc/typeck.c:12690 -#: cobc/typeck.c:12758 cobc/typeck.c:13043 cobc/typeck.c:13086 -#: libcob/fileio.c:9703 libcob/fileio.c:9714 +#: cobc/cobc.c:2889 cobc/cobc.c:8507 cobc/cobc.c:8626 cobc/codegen.c:3761 +#: cobc/codegen.c:3864 cobc/codegen.c:5671 cobc/codegen.c:5816 +#: cobc/codegen.c:13429 cobc/parser.y:391 cobc/tree.c:1397 cobc/tree.c:4565 +#: cobc/tree.c:5135 cobc/tree.c:5392 cobc/typeck.c:4497 cobc/typeck.c:9504 +#: cobc/typeck.c:9541 cobc/typeck.c:10418 cobc/typeck.c:13395 +#: cobc/typeck.c:13469 cobc/typeck.c:13537 cobc/typeck.c:13825 +#: cobc/typeck.c:13887 libcob/fileio.c:10094 libcob/fileio.c:10105 #, c-format msgid "call to '%s' with invalid parameter '%s'" msgstr "llama a «%s» con parámetro no válido «%s»" -#: cobc/cobc.c:3136 +#: cobc/cobc.c:3300 msgid "loading standard configuration file 'default.conf'" msgstr "cargando fichero común de configuración «default.conf»" -#: cobc/cobc.c:3217 +#: cobc/cobc.c:3387 msgid "the used C compiler is known to not be able to generate assembler code" msgstr "" -#: cobc/cobc.c:3299 +#: cobc/cobc.c:3469 msgid "invalid output file name" msgstr "nombre del fichero de salida inválido" -#: cobc/cobc.c:3361 +#: cobc/cobc.c:3531 #, c-format msgid "warning: '%s' is not a directory, defaulting to current directory" msgstr "advertencia: «%s» no es un directorio, predeterminando al directorio actual" -#: cobc/cobc.c:3388 +#: cobc/cobc.c:3558 #, c-format msgid "warning: %d lines per listing page specified, using %d" msgstr "" -#: cobc/cobc.c:3438 +#: cobc/cobc.c:3615 #, c-format msgid "warning: assuming '%s' is a DEFINE - did you intend to use -debug?" msgstr "advertencia: asumiendo «%s» es un DEFINE - ¿intentaba emplear depurar con -debug?" -#: cobc/cobc.c:3699 cobc/cobc.c:3724 cobc/cobc.c:3752 +#: cobc/cobc.c:3661 cobc/cobc.c:3702 cobc/cobc.c:4281 +#, fuzzy, c-format +#| msgid "ignoring invalid directive: '%s'" +msgid "ignoring nonexistent directory \"%s\"" +msgstr "ignorando directiva inválida: «%s»" + +#: cobc/cobc.c:3943 cobc/cobc.c:3968 cobc/cobc.c:3996 #, c-format msgid "unknown warning option '%s'" msgstr "opción de aviso desconocido «%s»" -#: cobc/cobc.c:3813 +#: cobc/cobc.c:4063 #, c-format msgid "%s option requires a listing file" msgstr "opción %s requiere un fichero listado" -#: cobc/cobc.c:3820 +#: cobc/cobc.c:4070 msgid "output to stdout only valid for preprocess" msgstr "" -#: cobc/cobc.c:3829 +#: cobc/cobc.c:4085 +msgid "-MT must be given to specify target file" +msgstr "" + +#: cobc/cobc.c:4091 msgid "all runtime checks are enabled" msgstr "toda comprobación de tiempo de ejecución está activada" -#: cobc/cobc.c:4030 +#: cobc/cobc.c:4316 msgid "only one stdin input allowed" msgstr "solo una entrada stdin permitida" -#: cobc/cobc.c:4040 +#: cobc/cobc.c:4326 #, c-format msgid "invalid file name parameter (length > %d)" msgstr "parámetro de nombre del fichero no válido (longitud > %d)" -#: cobc/cobc.c:4270 +#: cobc/cobc.c:4559 msgid "return status:" msgstr "estado devuelto:" -#: cobc/cobc.c:4306 libcob/common.c:5711 +#: cobc/cobc.c:4595 libcob/common.c:6391 #, c-format msgid "external process \"%s\" ended with signal %s (%d)" msgstr "" -#: cobc/cobc.c:4364 +#: cobc/cobc.c:4654 msgid "nothing for -j to run" msgstr "no hay nada para -j para ejecutar" -#: cobc/cobc.c:4406 cobc/cobc.c:4420 +#: cobc/cobc.c:4697 cobc/cobc.c:4711 #, fuzzy, c-format #| msgid "... removed from environment" msgid "%s is resolved by environment as: %s" msgstr "… quitado desde entorno" -#: cobc/cobc.c:4882 +#: cobc/cobc.c:5175 msgid "preprocessing:" msgstr "preprocesando:" -#: cobc/cobc.c:4952 +#: cobc/cobc.c:5244 msgid "'cobxref' execution unsuccessful" msgstr "'cobxref' ejecutado incorrectamente" -#: cobc/cobc.c:4955 +#: cobc/cobc.c:5247 #, c-format msgid "check that 'cobxref' is in %s" msgstr "comprueba que 'cobxref' está dentro de %s" -#: cobc/cobc.c:4957 +#: cobc/cobc.c:5249 msgid "no listing produced" msgstr "ningún listado producido" -#: cobc/cobc.c:5882 cobc/cobc.c:5921 +#: cobc/cobc.c:6234 cobc/cobc.c:6273 msgid "No fields defined." msgstr "Ningún campo definido." -#: cobc/cobc.c:5941 +#: cobc/cobc.c:6293 msgid "No labels defined." msgstr "Sin etiquetas definidas." -#: cobc/cobc.c:5963 +#: cobc/cobc.c:6324 cobc/cobc.c:9292 +msgid "command line:" +msgstr "línea de órdenes:" + +#: cobc/cobc.c:6342 msgid "Error/Warning summary:" msgstr "Resumen de Error/Advertencias:" -#: cobc/cobc.c:6006 +#: cobc/cobc.c:6385 msgid "0 warnings in compilation group" msgstr "0 advertencias dentro del grupo de compilación" -#: cobc/cobc.c:6010 +#: cobc/cobc.c:6389 msgid "1 warning in compilation group" msgstr "1 advertencia dentro del grupo de compilación" -#: cobc/cobc.c:6014 +#: cobc/cobc.c:6393 #, c-format msgid "%d warnings in compilation group" msgstr "%d advertencias dentro del grupo de compilación" -#: cobc/cobc.c:6020 +#: cobc/cobc.c:6399 msgid "0 errors in compilation group" msgstr "0 errores en el grupo de compilación" -#: cobc/cobc.c:6024 +#: cobc/cobc.c:6403 msgid "1 error in compilation group" msgstr "1 error en grupo de compilación" -#: cobc/cobc.c:6028 +#: cobc/cobc.c:6407 #, c-format msgid "%d errors in compilation group" msgstr "%d errores dentro del grupo de compilación" -#: cobc/cobc.c:6034 +#: cobc/cobc.c:6413 #, c-format msgid "Too many errors in compilation group: %d maximum errors" msgstr "Demasiados errores dentro del grupo de compilación: %d errores máximos" -#: cobc/cobc.c:6632 +#: cobc/cobc.c:7028 #, fuzzy, c-format #| msgid "%s: %d: Too many continuation lines" msgid "%s:%d: too many continuation lines" msgstr "%s: %d: demasiadas líneas continuadas" -#: cobc/cobc.c:7552 +#: cobc/cobc.c:7956 msgid "parsing:" msgstr "analizando:" -#: cobc/cobc.c:7612 +#: cobc/cobc.c:8017 msgid "translating:" msgstr "traduciendo:" -#: cobc/cobc.c:8786 +#: cobc/cobc.c:9217 msgid "no input files" msgstr "sin fichero entrante" -#: cobc/cobc.c:8816 +#: cobc/cobc.c:9248 #, c-format msgid "%s option invalid in this combination" msgstr "opción %s no válida con esta combinación" -#: cobc/cobc.c:8857 -msgid "command line:" -msgstr "línea de órdenes:" - -#: cobc/codegen.c:1041 cobc/codegen.c:4463 cobc/codegen.c:11648 -#: cobc/codegen.c:12186 +#: cobc/codegen.c:1040 cobc/codegen.c:4506 cobc/codegen.c:11910 +#: cobc/codegen.c:12467 msgid "unexpected CONSTANT item" msgstr "ítem CONSTANT inesperado" -#: cobc/codegen.c:2981 cobc/codegen.c:3261 cobc/codegen.c:8523 cobc/tree.c:1413 +#: cobc/codegen.c:2921 cobc/codegen.c:3207 cobc/codegen.c:8866 cobc/tree.c:1419 #, c-format msgid "unexpected cast type: %d" msgstr "tipo de molde inesperado: %d" -#: cobc/codegen.c:3713 cobc/codegen.c:4413 +#: cobc/codegen.c:3690 cobc/codegen.c:4455 #, c-format msgid "internal statement stack depth exceeded: %d" msgstr "profundidad excedida en pila interna de declaración: %d" -#: cobc/codegen.c:3785 +#: cobc/codegen.c:3763 #, c-format msgid "%s is not a field" msgstr "%s no es un campo" -#: cobc/codegen.c:4186 cobc/codegen.c:4257 +#: cobc/codegen.c:4177 cobc/codegen.c:4279 #, c-format msgid "unexpected function: %s" msgstr "función inesperada: %s" -#: cobc/codegen.c:5204 +#: cobc/codegen.c:5256 #, c-format msgid "unexpected tree category: %d" msgstr "categoría de árbol inesperada: %d" -#: cobc/codegen.c:5971 +#: cobc/codegen.c:6108 #, c-format msgid "unexpected size: %d" msgstr "tamaño inesperado: %d" -#: cobc/codegen.c:7595 +#: cobc/codegen.c:7894 #, c-format msgid "No ENTRY FOR GO TO '%s'" msgstr "" -#: cobc/codegen.c:7816 cobc/codegen.c:8163 +#: cobc/codegen.c:8283 cobc/codegen.c:8609 #, c-format msgid "unexpected handler type: %d" msgstr "etiqueta de manipulador inesperada: %d" -#: cobc/codegen.c:8254 -msgid "unexpected error_node parameter" -msgstr "parámetro error_node inesperado" - -#: cobc/codegen.c:8544 +#: cobc/codegen.c:8887 #, c-format msgid "unexpected tree type: %d" msgstr "tipo de árbol inesperado: %d" -#: cobc/codegen.c:9520 +#: cobc/codegen.c:9776 msgid "Nested OCCURS in report" msgstr "" -#: cobc/codeoptim.c:2777 +#: cobc/codeoptim.c:2856 #, c-format msgid "unexpected optimization value: %d" msgstr "valor de optimización no esperada: %d" -#: cobc/config.c:164 libcob/common.c:7824 libcob/common.c:7838 -#: libcob/common.c:8315 +#: cobc/config.c:164 libcob/common.c:8639 libcob/common.c:8653 +#: libcob/common.c:9136 #, c-format msgid "invalid value '%s' for configuration tag '%s'" msgstr "valor «%s» no válido para la etiqueta de configuración «%s»" -#: cobc/config.c:167 libcob/common.c:7117 libcob/common.c:7234 +#: cobc/config.c:167 libcob/common.c:7915 libcob/common.c:7939 #, c-format msgid "should be one of the following values: %s" msgstr "debería ser uno de los valores siguientes: %s" @@ -602,7 +614,7 @@ msgstr "debería ser uno de los valores siguientes: %s" msgid "must be numeric" msgstr "debe ser numérico" -#: cobc/config.c:171 libcob/common.c:7215 +#: cobc/config.c:171 libcob/common.c:8045 #, c-format msgid "maximum value: %lu" msgstr "valor máximo: %lu" @@ -617,45 +629,45 @@ msgstr "valor mínimo: %d" msgid "unsupported value '%s' for configuration tag '%s'" msgstr "valor «%s» no compatible para etiquetado de configuración «%s»" -#: cobc/config.c:318 cobc/pplex.l:1185 libcob/common.c:7739 +#: cobc/config.c:319 cobc/pplex.l:1264 libcob/common.c:8554 msgid "recursive inclusion" msgstr "inclusión recursiva" -#: cobc/config.c:393 libcob/common.c:7791 +#: cobc/config.c:394 libcob/common.c:8606 msgid "configuration file was included here" msgstr "fichero de configuración incluido aquí" -#: cobc/config.c:422 +#: cobc/config.c:423 #, c-format msgid "The previous loaded configuration '%s' will be discarded." msgstr "La previa configuración cargada «%s» será descartada." -#: cobc/config.c:458 +#: cobc/config.c:459 msgid "missing definitions:" msgstr "definiciones ausentes:" -#: cobc/config.c:460 +#: cobc/config.c:461 #, c-format msgid "\tno definition of '%s'" msgstr "\tsin definición de «%s»" -#: cobc/config.c:523 +#: cobc/config.c:524 #, c-format msgid "invalid configuration tag '%s'" msgstr "etiquetado de configuración inválido «%s»" -#: cobc/config.c:536 libcob/common.c:7545 libcob/common.c:7629 -#: libcob/common.c:7657 +#: cobc/config.c:537 libcob/common.c:8360 libcob/common.c:8444 +#: libcob/common.c:8472 #, c-format msgid "unknown configuration tag '%s'" msgstr "etiqueta de configuración desconocida «%s»" -#: cobc/config.c:560 +#: cobc/config.c:561 #, c-format msgid "invalid configuration tag '%s' in word-list" msgstr "etiquetado de configuración inválido «%s» en listado de palabras" -#: cobc/config.c:622 +#: cobc/config.c:623 #, c-format msgid "Could not access word list for '%s'" msgstr "No se pudo acceder a listado de palabras para «%s»" @@ -697,11 +709,11 @@ msgstr "invalida literal numérico: «%s»" #: cobc/config.def:73 msgid "" "default initialization for fields without VALUE, may be one of\n" -" * character in quotes\n" -" * decimal 0..255 representing a character\n" -" * \"init\" to initialize to PICTURE/USAGE\n" -" * \"none\" to do no explicit initialization\n" -" * default: \"init\"" +" * character in quotes\n" +" * decimal 0..255 representing a character\n" +" * \"init\" to initialize to PICTURE/USAGE\n" +" * \"none\" to do no explicit initialization\n" +" * default: \"init\"" msgstr "" #: cobc/config.def:83 @@ -728,25 +740,27 @@ msgstr "" msgid "whether DECIMAL-POINT IS COMMA has effect in XML/JSON GENERATE, may be one of: none, xml, json, all" msgstr "" -#: cobc/config.def:103 -msgid "resolve file names at run time using environment variables" +#: cobc/config.def:101 +msgid "checking for subscript (only done with EC-BOUND-SUBSCRIPT active), may be one of: full, max, record" msgstr "" #: cobc/config.def:106 -msgid "alternate formatting of numeric fields" +msgid "resolve file names at run time using environment variables" msgstr "" #: cobc/config.def:109 -msgid "numeric truncation according to ANSI" +msgid "alternate formatting of numeric fields" msgstr "" #: cobc/config.def:112 -#, fuzzy -#| msgid "'%s' cannot have OCCURS DEPENDING" -msgid "allow complex OCCURS DEPENDING ON" -msgstr "«%s» no puede tener OCURRS DEPENDING" +msgid "numeric truncation according to ANSI" +msgstr "" #: cobc/config.def:115 +msgid "allow non-standard OCCURS DEPENDING ON syntax" +msgstr "" + +#: cobc/config.def:118 #, fuzzy #| msgid "" #| "adjust items following OCCURS DEPENDING\n" @@ -756,11 +770,17 @@ msgstr "" "ajusta elementos seguidos de OCCURS DEPENDING\n" "\t\t\t- requiere sintaxis relajada implícita/explicita" -#: cobc/config.def:118 +#: cobc/config.def:121 +#, fuzzy +#| msgid "invalid VALUE clause" +msgid "applies JUSTIFY with VALUE clause" +msgstr "invalida cláusula VALUE" + +#: cobc/config.def:124 msgid "allow REDEFINES to other than last equal level number" msgstr "" -#: cobc/config.def:121 +#: cobc/config.def:127 #, fuzzy #| msgid "" #| "relax syntax checking\n" @@ -770,1122 +790,1120 @@ msgstr "" "comprobación relajada de sintaxis\n" "\t\t\t- p. e. posición REDEFINES" -#: cobc/config.def:124 +#: cobc/config.def:130 msgid "allow zero length reference-modification (only changed with EC-BOUND-REF-MOD active)" msgstr "" -#: cobc/config.def:127 +#: cobc/config.def:133 msgid "allow non-matching level numbers" msgstr "" -#: cobc/config.def:130 +#: cobc/config.def:136 msgid "require ASSIGN USING items to be in WORKING-STORAGE" msgstr "" -#: cobc/config.def:133 +#: cobc/config.def:139 msgid "LOCAL-STORAGE SECTION implies RECURSIVE attribute" msgstr "" -#: cobc/config.def:136 +#: cobc/config.def:142 msgid "LINKAGE SECTION items remain allocated between invocations" msgstr "" -#: cobc/config.def:139 +#: cobc/config.def:145 msgid "MOVE operates as on IBM (left to right, byte by byte)" msgstr "" -#: cobc/config.def:142 +#: cobc/config.def:148 msgid "exit point of any currently executing perform is recognized if reached" msgstr "" -#: cobc/config.def:145 +#: cobc/config.def:151 msgid "limit precision in intermediate results to precision of final result (less accurate)" msgstr "" -#: cobc/config.def:148 +#: cobc/config.def:154 msgid "evaluate constant expressions at compile time" msgstr "" -#: cobc/config.def:151 +#: cobc/config.def:157 msgid "allow hexadecimal value 'F' for NUMERIC test of signed PACKED DECIMAL field" msgstr "" -#: cobc/config.def:154 +#: cobc/config.def:160 msgid "program names don't lead to a reserved identifier" msgstr "" -#: cobc/config.def:157 +#: cobc/config.def:163 msgid "set WITH UPDATE clause as default for ACCEPT dest-item, instead of WITH NO UPDATE" msgstr "" -#: cobc/config.def:160 +#: cobc/config.def:166 msgid "set WITH AUTO clause as default for ACCEPT dest-item, instead of WITH TAB" msgstr "" -#: cobc/config.def:163 +#: cobc/config.def:169 msgid "assume CONSOLE IS CRT if not set otherwise" msgstr "" -#: cobc/config.def:166 +#: cobc/config.def:172 msgid "NO-ECHO hides input with asterisks like SECURE" msgstr "" -#: cobc/config.def:169 +#: cobc/config.def:175 msgid "assume a field DISPLAY starts at LINE 0 COL 0 (i.e. at the cursor), not LINE 1 COL 1" msgstr "" -#: cobc/config.def:172 +#: cobc/config.def:178 msgid "special behaviour of DISPLAY SPACE/ALL X'01'/ALL X'02'/ALL X'07'" msgstr "" -#: cobc/config.def:175 +#: cobc/config.def:181 msgid "COMP-1 is a 16-bit signed integer" msgstr "" -#: cobc/config.def:178 +#: cobc/config.def:184 msgid "POINTER is a 64-bit unsigned integer" msgstr "" -#: cobc/config.def:181 +#: cobc/config.def:187 msgid "imply zero in move of non-numeric literal to numeric items" msgstr "" -#: cobc/config.def:184 +#: cobc/config.def:190 msgid "implicitly define a variable if an ASSIGN DYNAMIC does not match any data item" msgstr "" -#: cobc/config.def:187 +#: cobc/config.def:193 msgid "specifying device by mnemonic" msgstr "" -#: cobc/config.def:193 +#: cobc/config.def:199 msgid "" "check contents of Area A (when reference format supports Area A enforcement),\n" -" enabled checks include:\n" -" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" -" and toplevel numbers (01 and 77) must start in Area A;\n" -" * statements must not start in Area A; and\n" -" * separator periods must not be within Area A." +" enabled checks include:\n" +" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" +" and toplevel numbers (01 and 77) must start in Area A;\n" +" * statements must not start in Area A; and\n" +" * separator periods must not be within Area A" msgstr "" -#: cobc/config.def:203 +#: cobc/config.def:209 msgid "comment paragraphs in IDENTIFICATION DIVISION (AUTHOR, DATE-WRITTEN, ...)" msgstr "" -#: cobc/config.def:207 -msgid "CONTROL DIVISION" -msgstr "" - -#: cobc/config.def:211 cobc/ppparse.y:101 cobc/ppparse.y:104 -msgid "partial replacing with literal" +#: cobc/config.def:217 +msgid "" +"apply partial replacing with literal source operand even when it replaces with spaces only;\n" +" * \"skip\" prevents such replacements" msgstr "" -#: cobc/config.def:214 +#: cobc/config.def:221 #, fuzzy #| msgid "SIZE IS clause" msgid "MEMORY-SIZE clause" msgstr "TAMAÑO de cláusula" -#: cobc/config.def:217 +#: cobc/config.def:224 msgid "MULTIPLE-FILE-TAPE clause" msgstr "" -#: cobc/config.def:220 +#: cobc/config.def:227 #, fuzzy #| msgid "RECORD clause invalid" msgid "LABEL-RECORDS clause" msgstr "RECORD de cláusula no válido" -#: cobc/config.def:223 +#: cobc/config.def:230 #, fuzzy #| msgid "invalid VALUE clause" msgid "VALUE-OF clause" msgstr "invalida cláusula VALUE" -#: cobc/config.def:226 +#: cobc/config.def:233 #, fuzzy #| msgid "RECORD clause invalid" msgid "DATA-RECORDS clause" msgstr "RECORD de cláusula no válido" -#: cobc/config.def:229 +#: cobc/config.def:236 msgid "OCCURS clause on top-level" msgstr "" -#: cobc/config.def:232 cobc/parser.y:7285 +#: cobc/config.def:239 cobc/parser.y:7566 #, fuzzy #| msgid "SIZE IS clause" msgid "SAME AS clause" msgstr "TAMAÑO de cláusula" -#: cobc/config.def:235 cobc/parser.y:7621 +#: cobc/config.def:242 cobc/parser.y:7904 #, fuzzy #| msgid "PROMPT clause" msgid "TYPE TO clause" msgstr "Cláusula PROMPT" -#: cobc/config.def:238 cobc/parser.y:7644 +#: cobc/config.def:245 cobc/parser.y:7927 msgid "USAGE type-name" msgstr "" -#: cobc/config.def:241 cobc/parser.y:8190 +#: cobc/config.def:248 cobc/parser.y:8563 #, fuzzy #| msgid "SIZE IS clause" msgid "SYNCHRONIZED clause" msgstr "TAMAÑO de cláusula" -#: cobc/config.def:244 cobc/parser.y:8193 +#: cobc/config.def:251 cobc/parser.y:8566 msgid "LEFT/RIGHT phrases in SYNCHRONIZED clause" msgstr "" -#: cobc/config.def:247 +#: cobc/config.def:254 #, fuzzy #| msgid "SIZE IS clause" msgid "SPECIAL-NAMES clause" msgstr "TAMAÑO de cláusula" -#: cobc/config.def:250 +#: cobc/config.def:257 #, fuzzy -#| msgid "%s statement not terminated" -msgid "GOTO statement without name" -msgstr "declaración %s no terminada" +#| msgid "GO TO without procedure-name" +msgid "GO TO statement without name" +msgstr "GO TO con múltiples nombres-procedimiento" -#: cobc/config.def:253 +#: cobc/config.def:260 #, fuzzy #| msgid "STOP literal" msgid "STOP-literal statement" msgstr "DETENCIÓN literal" -#: cobc/config.def:256 +#: cobc/config.def:263 #, fuzzy #| msgid "STOP identifier" msgid "STOP-identifier statement" msgstr "DETENCIÓN de identificador" -#: cobc/config.def:259 +#: cobc/config.def:266 #, fuzzy #| msgid "*CONTROL statement" msgid "STOP ERROR statement" msgstr "*CONTROL sentencia" -#: cobc/config.def:262 +#: cobc/config.def:269 #, fuzzy #| msgid "debugging indicator" msgid "DEBUGGING MODE and debugging indicator" msgstr "depurando indicador" -#: cobc/config.def:268 +#: cobc/config.def:275 msgid "PADDING CHARACTER clause" msgstr "" -#: cobc/config.def:271 +#: cobc/config.def:278 msgid "NEXT SENTENCE phrase" msgstr "" -#: cobc/config.def:274 +#: cobc/config.def:281 msgid "listing-directive statements EJECT, SKIP1, SKIP2, SKIP3" msgstr "" -#: cobc/config.def:277 +#: cobc/config.def:284 msgid "listing-directive statement TITLE" msgstr "" -#: cobc/config.def:280 +#: cobc/config.def:287 #, fuzzy #| msgid "*CONTROL statement" msgid "ENTRY statement" msgstr "*CONTROL sentencia" -#: cobc/config.def:283 +#: cobc/config.def:290 #, fuzzy #| msgid "MOVE of non-integer to alphanumeric" msgid "move noninteger to alphanumeric" msgstr "MOVE de no entero a alfanumérico" -#: cobc/config.def:286 +#: cobc/config.def:293 #, fuzzy #| msgid "MOVE of figurative constant to numeric item" msgid "move figurative constants to numeric" msgstr "MOVE de constante figurativa a ítem numérico" -#: cobc/config.def:289 +#: cobc/config.def:296 #, fuzzy #| msgid "MOVE of figurative constant to numeric item" msgid "move figurative constant SPACE to numeric" msgstr "MOVE de constante figurativa a ítem numérico" -#: cobc/config.def:292 +#: cobc/config.def:299 #, fuzzy #| msgid "MOVE of figurative constant QUOTE to numeric item" msgid "move figurative constant QUOTE to numeric" msgstr "MOVE de constante QUOTE figurativa a ítem numérico" -#: cobc/config.def:295 +#: cobc/config.def:302 #, fuzzy #| msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgid "OCCURS DEPENDING ON without to" msgstr "OCCURS DEPENDING ON «%s» fuera de límites: %d" -#: cobc/config.def:298 cobc/parser.y:11102 +#: cobc/config.def:305 cobc/parser.y:11443 msgid "section segments" msgstr "" -#: cobc/config.def:301 +#: cobc/config.def:308 #, fuzzy #| msgid "*CONTROL statement" msgid "ALTER statement" msgstr "*CONTROL sentencia" -#: cobc/config.def:304 +#: cobc/config.def:311 msgid "OVERFLOW clause for CALL" msgstr "" -#: cobc/config.def:307 +#: cobc/config.def:314 #, fuzzy #| msgid "numeric boolean literal" msgid "boolean literals (B'1010')" msgstr "numérico booleano literal" -#: cobc/config.def:310 +#: cobc/config.def:317 #, fuzzy #| msgid "hexadecimal-boolean literal" msgid "hexadecimal-boolean literals (BX'A')" msgstr "booleana-hexadecimal literal" -#: cobc/config.def:313 +#: cobc/config.def:320 #, fuzzy #| msgid "national literal" msgid "national literals (N'UTF-16 string')" msgstr "literal nacinal" -#: cobc/config.def:316 +#: cobc/config.def:323 #, fuzzy #| msgid "hexadecimal-national literal" msgid "hexadecimal-national literals (NX'265E')" msgstr "nacional-hexadecimal literal" -#: cobc/config.def:319 +#: cobc/config.def:326 msgid "non-standard national literals (NC'UTF-16 string')" msgstr "" -#: cobc/config.def:322 +#: cobc/config.def:329 msgid "HP COBOL octal literals (%377)" msgstr "" -#: cobc/config.def:325 +#: cobc/config.def:332 msgid "ACUCOBOL-GT literals (#B #O #H #X)" msgstr "" -#: cobc/config.def:328 cobc/pplex.l:2199 +#: cobc/config.def:335 +msgid "EBCDIC symbolic characters in literals (\" \"135,151,151\"bar\"195, 194\"Z\" for \" foobarBAZ\")" +msgstr "" + +#: cobc/config.def:338 cobc/pplex.l:2428 msgid "continuation of COBOL words" msgstr "continuación de palabras COBOL" -#: cobc/config.def:331 +#: cobc/config.def:341 #, fuzzy #| msgid "NOT EXCEPTION before EXCEPTION" msgid "NOT ON EXCEPTION before ON EXCEPTION" msgstr "SIN EXCEPCIÓN tras EXCEPCIÓN" -#: cobc/config.def:334 +#: cobc/config.def:344 #, fuzzy #| msgid "non-standard DISPLAY" msgid "extensions to ACCEPT and DISPLAY" msgstr "no común DISPLAY" -#: cobc/config.def:337 cobc/field.c:3357 +#: cobc/config.def:347 cobc/field.c:3645 msgid "RENAMES of 01-, 66- and 77-level items" msgstr "RENOMBRA ítemes de 01-, 66- y 77-nivel" -#: cobc/config.def:341 +#: cobc/config.def:351 msgid "allow larger REDEFINES items" msgstr "" -#: cobc/config.def:344 +#: cobc/config.def:354 #, fuzzy #| msgid "'%s' is not defined in SPECIAL-NAMES" msgid "constants defined in SPECIAL-NAMES" msgstr "«%s» no esta definido en SPECIAL-NAMES" -#: cobc/config.def:347 +#: cobc/config.def:357 msgid "constant with level 78 item (note: has left to right precedence in expressions)" msgstr "" -#: cobc/config.def:350 +#: cobc/config.def:360 msgid "constant with level 01 CONSTANT AS/FROM item" msgstr "" -#: cobc/config.def:353 +#: cobc/config.def:363 msgid "PERFORM VARYING without BY phrase (implies BY 1)" msgstr "" -#: cobc/config.def:356 +#: cobc/config.def:366 msgid "references to sections not in DECLARATIVES from within DECLARATIVES" msgstr "" -#: cobc/config.def:359 cobc/parser.y:12225 cobc/parser.y:12521 +#: cobc/config.def:369 cobc/parser.y:12614 cobc/parser.y:12913 msgid "CALL/CANCEL with program-prototype-name" msgstr "CALL/CANCEL con program-prototype-name" -#: cobc/config.def:362 +#: cobc/config.def:372 msgid "specifying call-convention by mnemonic" msgstr "" -#: cobc/config.def:365 +#: cobc/config.def:375 msgid "specifying call-convention by WITH ... LINKAGE" msgstr "" -#: cobc/config.def:368 +#: cobc/config.def:378 +msgid "support for PROCEDURE DIVISION USING OPTIONAL" +msgstr "" + +#: cobc/config.def:381 #, fuzzy #| msgid "numeric literal in VALUE clause of numeric-edited item" msgid "numeric literals in VALUE clause of numeric-edited items" msgstr "literal numérico dentro de cláusula VALOR de ítem editado-numérico" -#: cobc/config.def:371 +#: cobc/config.def:384 msgid "incorrect order of CONFIGURATION SECTION paragraphs" msgstr "orden incorracta de parágrados CONFIGURACIÓN SECCIONAL" -#: cobc/config.def:374 +#: cobc/config.def:387 msgid "allow >> DEFINE CONSTANT var AS literal" msgstr "" -#: cobc/config.def:377 +#: cobc/config.def:390 #, fuzzy #| msgid "REDEFINES clause must follow entry-name" msgid "REDEFINES clause not following entry-name in definition" msgstr "Cláusula de REDEFINES debe seguir nombre de entrada" -#: cobc/config.def:380 +#: cobc/config.def:393 msgid "record sizes does not match RECORD clause" msgstr "" -#: cobc/config.def:383 cobc/parser.y:5736 cobc/parser.y:5750 cobc/parser.y:5763 -#: cobc/parser.y:5774 +#: cobc/config.def:396 cobc/parser.y:5991 cobc/parser.y:6005 cobc/parser.y:6018 +#: cobc/parser.y:6029 #, fuzzy #| msgid "PROMPT clause" msgid "RECORD DELIMITER clause" msgstr "Cláusula PROMPT" -#: cobc/config.def:386 +#: cobc/config.def:399 msgid "BINARY-SEQUENTIAL and LINE-SEQUENTIAL phrases in RECORD DELIMITER" msgstr "" -#: cobc/config.def:389 cobc/tree.c:4805 +#: cobc/config.def:402 cobc/tree.c:4873 msgid "RECORD DELIMITER clause on file with fixed-length records" msgstr "" -#: cobc/config.def:392 +#: cobc/config.def:405 msgid "missing statement (e.g. empty IF / PERFORM)" msgstr "" -#: cobc/config.def:395 +#: cobc/config.def:408 msgid "missing period in PROCEDURE DIVISION (when reference format supports Area A enforcement)" msgstr "" -#: cobc/config.def:398 +#: cobc/config.def:411 msgid "zero-length literals, e.g. '' and \"\"" msgstr "" -#: cobc/config.def:401 +#: cobc/config.def:414 msgid "XML GENERATE's phrases other than COUNT IN" msgstr "" -#: cobc/config.def:404 cobc/typeck.c:8565 +#: cobc/config.def:417 cobc/typeck.c:9017 msgid "AFTER phrase in CONTINUE statement" msgstr "" -#: cobc/config.def:407 -msgid "ENTRY FOR GOTO and GOTO ENTRY statements" +#: cobc/config.def:420 +msgid "ENTRY FOR GO TO and GO TO ENTRY statements" msgstr "" -#: cobc/config.def:410 +#: cobc/config.def:423 cobc/typeck.c:4642 msgid "ASSIGN [TO] variable in SELECT" msgstr "" -#: cobc/config.def:413 +#: cobc/config.def:426 msgid "ASSIGN USING/VARYING variable in SELECT" msgstr "" -#: cobc/config.def:416 +#: cobc/config.def:429 msgid "ASSIGN EXTERNAL/DYNAMIC in SELECT" msgstr "" -#: cobc/config.def:419 +#: cobc/config.def:432 msgid "ASSIGN DISK FROM variable in SELECT" msgstr "" -#: cobc/config.def:422 +#: cobc/config.def:435 msgid "VSAM status in FILE STATUS" msgstr "" -#: cobc/config.def:425 +#: cobc/config.def:438 msgid "CALL to own PROGRAM-ID implies RECURSIVE attribute" msgstr "" -#: cobc/config.def:428 +#: cobc/config.def:441 msgid "DEPENDING clause in RECORD CONTAINS" msgstr "" -#: cobc/config.def:431 cobc/tree.c:3584 +#: cobc/config.def:444 cobc/tree.c:3623 msgid "PICTURE string with 'L' character" msgstr "" -#: cobc/error.c:83 +#: cobc/error.c:141 libcob/common.c:1379 libcob/common.c:8715 +#: libcob/common.c:8766 +#, c-format +msgid "warning: " +msgstr "aviso: " + +#: cobc/error.c:142 libcob/common.c:8784 +msgid "note: " +msgstr "" + +#: cobc/error.c:162 #, fuzzy, c-format #| msgid "in section" msgid "in section '%s':" msgstr "dentro de sección" -#: cobc/error.c:94 +#: cobc/error.c:173 #, fuzzy, c-format #| msgid "in paragraph" msgid "in paragraph '%s':" msgstr "dentro de párrafo" -#: cobc/error.c:129 cobc/error.c:133 cobc/error.c:136 +#: cobc/error.c:227 cobc/error.c:231 cobc/error.c:234 msgid "too many errors" msgstr "demasiados errores" -#: cobc/error.c:145 +#: cobc/error.c:243 #, fuzzy, c-format #| msgid "configuration file was included here" msgid "in file included from " msgstr "fichero de configuración incluido aquí" -#: cobc/error.c:163 libcob/common.c:8325 +#: cobc/error.c:261 libcob/common.c:9146 msgid "configuration error:" msgstr "error de configuración:" -#: cobc/error.c:176 libcob/common.c:861 +#: cobc/error.c:274 libcob/common.c:920 #, c-format msgid "system error %d" msgstr "error de sistema %d" -#: cobc/error.c:346 cobc/error.c:413 cobc/error.c:475 cobc/error.c:631 -#: cobc/error.c:675 cobc/error.c:785 libcob/common.c:1318 libcob/common.c:7900 -#: libcob/common.c:7951 -#, c-format -msgid "warning: " -msgstr "aviso: " - -#: cobc/error.c:518 cobc/error.c:534 cobc/error.c:868 cobc/error.c:889 +#: cobc/error.c:616 cobc/error.c:632 cobc/error.c:971 cobc/error.c:992 #, c-format msgid "%s used" msgstr "%s empleado" -#: cobc/error.c:521 cobc/error.c:871 +#: cobc/error.c:619 cobc/error.c:974 #, c-format msgid "%s is archaic in %s" msgstr "%s es arcaico en %s" -#: cobc/error.c:525 cobc/error.c:875 +#: cobc/error.c:623 cobc/error.c:978 #, c-format msgid "%s is obsolete in %s" msgstr "%s es obsoleto en %s" -#: cobc/error.c:531 cobc/error.c:881 cobc/parser.y:5738 +#: cobc/error.c:629 cobc/error.c:984 cobc/parser.y:5993 #, c-format msgid "%s ignored" msgstr "%s ignorado" -#: cobc/error.c:537 cobc/error.c:891 +#: cobc/error.c:635 cobc/error.c:994 #, c-format msgid "%s does not conform to %s" msgstr "%s no es conforme a %s" -#: cobc/error.c:553 +#: cobc/error.c:651 msgid "configuration warning:" msgstr "advertencia de configuración:" -#: cobc/error.c:728 cobc/error.c:731 cobc/error.c:755 cobc/error.c:758 -#: libcob/common.c:7969 -msgid "note: " -msgstr "" - -#: cobc/error.c:933 cobc/error.c:962 +#: cobc/error.c:1040 cobc/error.c:1069 #, c-format msgid "redefinition of '%s'" msgstr "redefinición de «%s»" -#: cobc/error.c:939 cobc/error.c:973 +#: cobc/error.c:1046 cobc/error.c:1080 #, c-format msgid "'%s' previously defined here" msgstr "«%s» previamente definidos aquí" -#: cobc/error.c:1017 cobc/error.c:1023 +#: cobc/error.c:1124 cobc/error.c:1130 #, c-format msgid "'%s' is not defined" msgstr "%s no está definido" -#: cobc/error.c:1019 +#: cobc/error.c:1126 #, c-format msgid "'%s' cannot be used here" msgstr "«%s» no puede ser empleado aquí" -#: cobc/error.c:1021 cobc/parser.y:7658 +#: cobc/error.c:1128 cobc/parser.y:7941 #, c-format msgid "'%s' is not defined, but is a reserved word in another dialect" msgstr "'%s' no está definido, pero es una palabra reservada en otro dialecto" -#: cobc/error.c:1060 +#: cobc/error.c:1167 #, c-format msgid "'%s' is ambiguous; needs qualification" msgstr "«%s» es ambiguo; necesita cualificación" -#: cobc/error.c:1090 +#: cobc/error.c:1197 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "'%s' is a special register" msgstr "«%s» no es un entero" -#: cobc/error.c:1093 +#: cobc/error.c:1200 #, fuzzy, c-format #| msgid "'%s' is not defined" msgid "'%s' internally defined" msgstr "%s no está definido" -#: cobc/error.c:1097 cobc/parser.y:18176 cobc/parser.y:18181 cobc/typeck.c:5000 -#: cobc/typeck.c:5047 cobc/typeck.c:5048 +#: cobc/error.c:1204 cobc/parser.y:18772 cobc/parser.y:18777 cobc/typeck.c:5166 +#: cobc/typeck.c:5213 cobc/typeck.c:5214 #, c-format msgid "'%s' defined here" msgstr "«%s» definido aquí" -#: cobc/error.c:1108 +#: cobc/error.c:1215 #, c-format msgid "fatal error: %s" msgstr "error fatal: %s" -#: cobc/error.c:1117 +#: cobc/error.c:1224 #, c-format msgid "group item '%s' cannot have %s clause" msgstr "ítem de grupo «%s» no puede tener clausula %s" -#: cobc/error.c:1132 +#: cobc/error.c:1239 #, c-format msgid "constant item '%s' requires a %s clause" msgstr "ítem constante %s requiere una cláusula %s" -#: cobc/error.c:1136 +#: cobc/error.c:1243 #, c-format msgid "level %02d item '%s' requires a %s clause" msgstr "nivel %02d de ítem «%s» requiere una cláusula %s" -#: cobc/error.c:1151 +#: cobc/error.c:1258 #, c-format msgid "constant item '%s' can only have a %s clause" msgstr "ítem constante «%s» solo puede tener una cláusula %s" -#: cobc/error.c:1155 +#: cobc/error.c:1262 #, c-format msgid "level %02d item '%s' can only have a %s clause" msgstr "nivel %02d de ítem «%s» solo puede tener una cláusula %s" -#: cobc/field.c:136 +#: cobc/field.c:139 #, fuzzy #| msgid "Constant expression has Divide by ZERO" msgid "constant expression has Divide by ZERO" msgstr "Expresión contante tiene División entre CERO" -#: cobc/field.c:192 cobc/field.c:329 cobc/field.c:337 +#: cobc/field.c:195 cobc/field.c:332 cobc/field.c:340 msgid "missing right parenthesis" msgstr "paréntesis derecho ausente" -#: cobc/field.c:221 +#: cobc/field.c:224 #, c-format msgid "expression stack overflow at %d entries for operation '%c'" msgstr "" -#: cobc/field.c:262 +#: cobc/field.c:265 #, c-format msgid "expression stack overflow at %d entries" msgstr "" -#: cobc/field.c:279 +#: cobc/field.c:282 msgid "missing left parenthesis" msgstr "paréntesis izquierdo ausente" -#: cobc/field.c:320 +#: cobc/field.c:323 #, c-format msgid "invalid operator '%s' in expression" msgstr "operador inválido «%s» dentro de expresión" -#: cobc/field.c:339 +#: cobc/field.c:342 #, c-format msgid "'%c' operator misplaced" msgstr "operador «%c» mal ubicado" -#: cobc/field.c:400 +#: cobc/field.c:403 #, c-format msgid "invalid level number '%s'" msgstr "número de nivel inválido «%s»" -#: cobc/field.c:460 cobc/field.c:498 +#: cobc/field.c:463 cobc/field.c:502 msgid "level number must begin with 01 or 77" msgstr "nivel numérico debe comenzar con 01 o 77" -#: cobc/field.c:558 cobc/field.c:562 +#: cobc/field.c:562 cobc/field.c:566 #, c-format msgid "no previous data item of level %02d" msgstr "ningún ítem de datos previamente de nivel %02d" -#: cobc/field.c:620 +#: cobc/field.c:631 #, c-format msgid "'%s' cannot be qualified here" msgstr "«%s» no puede ser calificado aquí" -#: cobc/field.c:626 +#: cobc/field.c:637 #, c-format msgid "'%s' cannot be subscripted here" msgstr "«%s» no puede ser subíndice aquí" -#: cobc/field.c:642 cobc/field.c:653 +#: cobc/field.c:653 cobc/field.c:664 #, c-format msgid "'%s' is not defined in '%s'" msgstr "«%s» no esta definido en «%s»" -#: cobc/field.c:660 +#: cobc/field.c:671 msgid "level number of REDEFINES entries must be identical" msgstr "número de nivel de entradas REDEFINES deben ser idénticas" -#: cobc/field.c:665 +#: cobc/field.c:676 #, c-format msgid "'%s' is not the original definition" msgstr "'%s' no es la definición original" -#: cobc/field.c:826 cobc/parser.y:659 +#: cobc/field.c:720 cobc/parser.y:1051 +#, fuzzy, c-format +#| msgid "duplicate %s clause" +msgid "duplicate %s" +msgstr "cláusula duplicada %s" + +#: cobc/field.c:878 cobc/parser.y:733 #, c-format msgid "duplicate %s clause" msgstr "cláusula duplicada %s" -#: cobc/field.c:906 +#: cobc/field.c:988 #, fuzzy, c-format #| msgid "PICTURE clause not compatible with USAGE %s" msgid "%s clause not compatible with PIC %s" msgstr "PICTURE clausurada no compatible con UTILIZACIÓN %s" -#: cobc/field.c:917 cobc/field.c:953 +#: cobc/field.c:999 cobc/field.c:1036 #, fuzzy, c-format #| msgid "PICTURE clause not compatible with USAGE %s" msgid "%s clause not compatible with USAGE %s" msgstr "PICTURE clausurada no compatible con UTILIZACIÓN %s" -#: cobc/field.c:1053 cobc/field.c:1069 cobc/field.c:1131 cobc/field.c:1142 +#: cobc/field.c:1140 cobc/field.c:1159 cobc/field.c:1227 cobc/field.c:1238 #, c-format msgid "PICTURE clause required for '%s'" msgstr "PICTURE clausurada requerida para «%s»" -#: cobc/field.c:1138 +#: cobc/field.c:1234 #, c-format msgid "a non-numeric literal is expected for '%s'" msgstr "un literal no numérico está esperado para «%s»" -#: cobc/field.c:1150 +#: cobc/field.c:1247 #, c-format msgid "defining implicit picture size %d for '%s'" msgstr "definiendo tamaño implícito de dibujo %d para «%s»" -#: cobc/field.c:1171 +#: cobc/field.c:1271 #, c-format msgid "'%s' ANY LENGTH only allowed in LINKAGE" msgstr "«%s» cualquier longitud CUALQUIER LONGITUD solamente permitido en ENLACE" -#: cobc/field.c:1175 +#: cobc/field.c:1275 #, c-format msgid "'%s' ANY LENGTH must be 01 level" msgstr "«%s» ANY LENGTH debe ser nivel 01" -#: cobc/field.c:1179 +#: cobc/field.c:1279 #, c-format msgid "'%s' ANY LENGTH cannot be BASED/EXTERNAL" msgstr "«%s» ANY LENGTH no puede ser BASED/EXTERNAL" -#: cobc/field.c:1184 cobc/field.c:1210 +#: cobc/field.c:1283 cobc/field.c:1313 #, c-format msgid "'%s' ANY LENGTH has invalid definition" msgstr "«%s» ANY LENGTH tiene definición no válida" -#: cobc/field.c:1192 +#: cobc/field.c:1295 #, c-format msgid "'%s' ANY NUMERIC must be PIC 9" msgstr "«%s» ANY NUMERIC debe ser PIC 9" -#: cobc/field.c:1198 +#: cobc/field.c:1301 #, fuzzy, c-format #| msgid "'%s' ANY LENGTH must be PIC X or PIC A" -msgid "'%s' ANY LENGTH must be PIC X, PIC N or PIC 1" +msgid "'%s' ANY LENGTH must be PIC X, PIC U, PIC N or PIC 1" msgstr "«%s» ANY LENGTH debe ser PIC X o PIC A" -#: cobc/field.c:1208 +#: cobc/field.c:1311 #, c-format msgid "'%s' ANY NUMERIC has invalid definition" msgstr "«%s» ANY LENGTH tiene definición inválida" -#: cobc/field.c:1224 +#: cobc/field.c:1327 #, c-format msgid "'%s' EXTERNAL must be specified at 01/77 level" msgstr "«%s» EXTERNAL se debe que especificar a nivel 01/77" -#: cobc/field.c:1228 +#: cobc/field.c:1331 #, c-format msgid "'%s' EXTERNAL can only be specified in WORKING-STORAGE section" msgstr "«%s» EXTERNAL solo puede ser especificado en sección WORKING-STORAGE" -#: cobc/field.c:1232 +#: cobc/field.c:1335 #, c-format msgid "'%s' EXTERNAL and BASED are mutually exclusive" msgstr "«%s» EXTERNAL y BASED son mutuamente excluyentes" -#: cobc/field.c:1235 +#: cobc/field.c:1338 #, c-format msgid "'%s' EXTERNAL not allowed with REDEFINES" msgstr "«%s» EXTERNAL no permitida con REDEFINES" -#: cobc/field.c:1247 +#: cobc/field.c:1350 #, c-format msgid "'%s' BASED not allowed here" msgstr "«%s» BASED no se permite aquí" -#: cobc/field.c:1250 +#: cobc/field.c:1353 #, c-format msgid "'%s' BASED not allowed with REDEFINES" msgstr "«%s» BASED no permitido con REDEFINES" -#: cobc/field.c:1253 +#: cobc/field.c:1356 #, c-format msgid "'%s' BASED only allowed at the 01 and 77 levels" msgstr "«%s» BASED solamente se permite a los niveles 01 y 77" -#: cobc/field.c:1279 +#: cobc/field.c:1383 #, fuzzy, c-format #| msgid "'%s' cannot have the OCCURS clause due to '%s'" msgid "'%s' cannot have an OCCURS clause due to '%s'" msgstr "«%s» no puede tener la cláusula OCURRS debido a «%s»" -#: cobc/field.c:1298 +#: cobc/field.c:1402 #, fuzzy, c-format #| msgid "the original definition '%s' should not have OCCURS clause" msgid "the original definition '%s' should not have an OCCURS clause" msgstr "la definición original «%s» no debería tener cláusula OCURRS" -#: cobc/field.c:1305 +#: cobc/field.c:1408 +#, fuzzy, c-format +#| msgid "the original definition '%s' should not have OCCURS clause" +msgid "the original definition '%s' should not have an ANY LENGTH clause" +msgstr "la definición original «%s» no debería tener cláusula OCURRS" + +#: cobc/field.c:1415 msgid "REDEFINES must follow the original definition" msgstr "REDEFINES debe seguir la definición original" -#: cobc/field.c:1313 +#: cobc/field.c:1423 #, c-format msgid "'%s' cannot be variable length" msgstr "«%s» no puede ser de longitud variable" -#: cobc/field.c:1316 +#: cobc/field.c:1426 #, c-format msgid "the original definition '%s' cannot be variable length" msgstr "la definición original «%s» no puede ser de longitud variable" -#: cobc/field.c:1335 +#: cobc/field.c:1445 cobc/field.c:1708 #, fuzzy, c-format #| msgid "'%s' cannot have JUSTIFIED RIGHT" msgid "'%s' cannot have JUSTIFIED RIGHT clause" msgstr "«%s» no se puede tener JUSTIFIED RIGHT" -#: cobc/field.c:1342 +#: cobc/field.c:1453 #, fuzzy, c-format #| msgid "'%s' cannot have PICTURE clause" msgid "'%s' cannot have BLANK WHEN ZERO clause" msgstr "«%s» no puede tener cláusula de PICTURE" -#: cobc/field.c:1348 +#: cobc/field.c:1460 #, c-format msgid "SCREEN group item '%s' has invalid clause" msgstr "PANTALLA de grupo ítem «%s» tiene clausula inválida" -#: cobc/field.c:1436 +#: cobc/field.c:1548 #, fuzzy, c-format #| msgid "PICTURE clause not compatible with USAGE %s" msgid "%s USAGE %s incompatible with %s USAGE %s" msgstr "PICTURE clausurada no compatible con UTILIZACIÓN %s" -#: cobc/field.c:1516 +#: cobc/field.c:1629 #, c-format msgid "'%s' cannot have PICTURE clause" msgstr "«%s» no puede tener cláusula de PICTURE" -#: cobc/field.c:1533 -#, fuzzy, c-format -#| msgid "'%s' is not USAGE DISPLAY" -msgid "%s item '%s' should be USAGE DISPLAY" -msgstr "«%s» no es USAGE DISPLAY" - -#: cobc/field.c:1556 +#: cobc/field.c:1662 #, c-format msgid "'%s' COMP-6 with sign - changing to COMP-3" msgstr "«%s» COMP-6 con signo - modificando a COMP-3" -#: cobc/field.c:1582 +#: cobc/field.c:1688 msgid "elementary items with SIGN clause must have S in PICTURE" msgstr "ítemes elementariamente con SIGNO cláusula debe tener S en PICTURE" -#: cobc/field.c:1585 +#: cobc/field.c:1691 msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgstr "ítemes elementarios con cláusula SIGN debe ser USAGE DISPLAY o NATIONAL" -#: cobc/field.c:1602 -#, c-format -msgid "'%s' cannot have JUSTIFIED RIGHT" -msgstr "«%s» no se puede tener JUSTIFIED RIGHT" - -#: cobc/field.c:1614 +#: cobc/field.c:1720 #, c-format msgid "'%s' cannot have S in PICTURE string and BLANK WHEN ZERO" msgstr "«%s» no se puede tener S dentro de cadena PICTURE y BLANL WHEN ZERO" -#: cobc/field.c:1619 +#: cobc/field.c:1725 #, c-format msgid "'%s' cannot have BLANK WHEN ZERO without being USAGE DISPLAY or NATIONAL" msgstr "«%s» no pude mostrar NEGRO CUANDO CERO sin haber PANTALLA DE USO o NACIONAL" -#: cobc/field.c:1631 +#: cobc/field.c:1737 #, c-format msgid "'%s' cannot have * in PICTURE string and BLANK WHEN ZERO" msgstr "«%s» no puede tener * dentro de cadena PICTURE y BLANK WHEN ZERO" -#: cobc/field.c:1638 +#: cobc/field.c:1744 #, c-format msgid "'%s' is not numeric, so cannot have BLANK WHEN ZERO" msgstr "«%s» no es numérico, por lo que no puede tener BLANK WHEN ZERO" -#: cobc/field.c:1691 +#: cobc/field.c:1798 #, c-format msgid "elements in VALUE clause for '%s' (%d) exceed max amount (%d)" msgstr "" -#: cobc/field.c:1708 cobc/field.c:1712 +#: cobc/field.c:1822 +msgid "unexpected VALUES ARE for elementary item" +msgstr "" + +#: cobc/field.c:1836 cobc/field.c:1840 #, fuzzy, c-format #| msgid "initial VALUE clause ignored for %s item" msgid "initial VALUE clause ignored for %s item '%s'" msgstr "cláusula inicial de VALUE ignorada para ítem %s" -#: cobc/field.c:1725 +#: cobc/field.c:1853 msgid "FULL has no effect on numeric items; you may want REQUIRED or PIC Z" msgstr "" -#: cobc/field.c:1755 +#: cobc/field.c:1884 msgid "VALUE may not contain a figurative constant" msgstr "" -#: cobc/field.c:1763 -#, fuzzy -#| msgid "cannot specify both %s and %s" -msgid "cannot specify both FULL and JUSTIFIED" +#: cobc/field.c:1893 cobc/field.c:1935 cobc/parser.y:750 cobc/parser.y:1823 +#: cobc/parser.y:1826 +#, c-format +msgid "cannot specify both %s and %s" msgstr "no puede especificar ambos %s y %s" -#: cobc/field.c:1775 +#: cobc/field.c:1905 #, c-format msgid "'%s' has FROM, TO or USING without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1792 +#: cobc/field.c:1922 #, c-format msgid "'%s' has numeric VALUE without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1805 -#, fuzzy -#| msgid "cannot specify both %s and %s" -msgid "cannot specify both PIC and VALUE" -msgstr "no puede especificar ambos %s y %s" - -#: cobc/field.c:1813 +#: cobc/field.c:1943 msgid "cannot have PIC without FROM, TO or USING" msgstr "" -#: cobc/field.c:1822 +#: cobc/field.c:1952 msgid "cannot have numeric VALUE without PIC" msgstr "" -#: cobc/field.c:1831 +#: cobc/field.c:1961 msgid "cannot have FROM, TO or USING without PIC" msgstr "" -#: cobc/field.c:1841 +#: cobc/field.c:1971 #, fuzzy #| msgid "INITIALIZED TO item is not alphanumeric" msgid "VALUE item may not be numeric" msgstr "Ítem INITIALIZED TO no es alfanumérico" -#: cobc/field.c:1856 +#: cobc/field.c:1986 #, c-format msgid "'%s' needs a PIC, COL, LINE, VALUE, BELL or BLANK clause" msgstr "" -#: cobc/field.c:1868 +#: cobc/field.c:1998 #, c-format msgid "'%s' cannot have PIC without FROM, TO, USING or numeric VALUE" msgstr "" -#: cobc/field.c:1876 +#: cobc/field.c:2006 #, c-format msgid "'%s' needs a PIC, FROM, TO, USING, VALUE, BELL, BLANK or ERASE clause" msgstr "" -#: cobc/field.c:1912 +#: cobc/field.c:2042 msgid "cannot use AUTO, FULL, PROMPT, REQUIRED or SECURE on elementary item without TO or USING" msgstr "" -#: cobc/field.c:1919 +#: cobc/field.c:2049 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED, OCCURS or SIGN on item without FROM, TO or USING" msgstr "" -#: cobc/field.c:1938 +#: cobc/field.c:2068 msgid "cannot use AUTO, FULL, REQUIRED or SECURE on elementary item without FROM, TO or USING" msgstr "" -#: cobc/field.c:1943 +#: cobc/field.c:2073 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED or SIGN without FROM, TO or USING" msgstr "" -#: cobc/field.c:1960 +#: cobc/field.c:2090 #, fuzzy #| msgid "'%s' cannot have BLANK WHEN ZERO without being USAGE DISPLAY or NATIONAL" msgid "cannot have BLANK WHEN ZERO without PIC" msgstr "«%s» no pude mostrar NEGRO CUANDO CERO sin haber PANTALLA DE USO o NACIONAL" -#: cobc/field.c:1963 +#: cobc/field.c:2093 #, fuzzy #| msgid "'%s' cannot have JUSTIFIED RIGHT" msgid "cannot have JUSTIFIED without PIC" msgstr "«%s» no se puede tener JUSTIFIED RIGHT" -#: cobc/field.c:1983 +#: cobc/field.c:2113 msgid "cannot have AUTO without FROM, TO or USING" msgstr "" -#: cobc/field.c:1988 +#: cobc/field.c:2118 msgid "cannot use FULL or REQUIRED on item without TO or USING" msgstr "" -#: cobc/field.c:1995 +#: cobc/field.c:2125 msgid "SECURE can be used with TO only" msgstr "" -#: cobc/field.c:1997 +#: cobc/field.c:2127 #, fuzzy #| msgid "READ must be executed first" msgid "SECURE must be used with TO" msgstr "READ debe ser ejecutada primero" -#: cobc/field.c:2016 +#: cobc/field.c:2146 #, fuzzy, c-format #| msgid "'%s' is not defined" msgid "'%s' does nothing" msgstr "%s no está definido" -#: cobc/field.c:2235 +#: cobc/field.c:2361 #, fuzzy, c-format #| msgid "'%s' 77 level not allowed here" msgid "'%s' 77 level is not allowed here" msgstr "«%s» nivel 77 no se permite aquí" -#: cobc/field.c:2627 +#: cobc/field.c:2399 msgid "OCCURS and multi COLUMNs is not allowed" msgstr "" -#: cobc/field.c:2655 +#: cobc/field.c:2419 #, fuzzy, c-format #| msgid "duplicate DEFINE '%s' - ignored" msgid "duplicate LINE %d ignored" msgstr "duplica DEFINE «%s» - ignorado" -#: cobc/field.c:2672 +#: cobc/field.c:2870 #, c-format msgid "ignoring SYNCHRONIZED for group item '%s'" msgstr "ignorando SINCRONIZADO para la ítem del grupo «%s»" -#: cobc/field.c:2686 cobc/field.c:2954 +#: cobc/field.c:2884 cobc/field.c:3219 msgid "larger REDEFINES" msgstr "" -#: cobc/field.c:2699 cobc/field.c:2957 cobc/field.c:2962 +#: cobc/field.c:2898 cobc/field.c:3222 cobc/field.c:3227 #, c-format msgid "size of '%s' larger than size of '%s'" msgstr "tamaño de «%s» mayor que el tamaño de «%s»" -#: cobc/field.c:2812 cobc/field.c:2879 +#: cobc/field.c:3045 cobc/field.c:3129 cobc/parser.y:832 #, c-format msgid "'%s' cannot be larger than %d bytes" msgstr "«%s» no puede ser mayor de %d bytes" -#: cobc/field.c:2850 cobc/field.c:2858 +#: cobc/field.c:3086 cobc/field.c:3094 #, c-format msgid "'%s' binary field cannot be larger than %d digits" msgstr "«%s» campo binario no puede ser mayor de %d dígitos" -#: cobc/field.c:2940 cobc/field.c:3522 -#, c-format -msgid "unexpected USAGE: %d" -msgstr "no esperaba EMPLEO: %d" - -#: cobc/field.c:3067 cobc/parser.y:710 cobc/parser.y:712 cobc/parser.y:6274 -#: cobc/parser.y:6284 cobc/parser.y:7344 cobc/parser.y:7347 cobc/parser.y:7349 -#: cobc/parser.y:7351 cobc/parser.y:7386 cobc/parser.y:8237 cobc/parser.y:8239 -#: cobc/parser.y:8241 cobc/parser.y:8243 cobc/parser.y:8558 cobc/parser.y:8567 -#: cobc/parser.y:10564 cobc/parser.y:12075 cobc/parser.y:13492 -#: cobc/parser.y:14902 cobc/typeck.c:5034 +#: cobc/field.c:3353 cobc/parser.y:791 cobc/parser.y:793 cobc/parser.y:6529 +#: cobc/parser.y:6539 cobc/parser.y:7625 cobc/parser.y:7628 cobc/parser.y:7630 +#: cobc/parser.y:7632 cobc/parser.y:7667 cobc/parser.y:8610 cobc/parser.y:8612 +#: cobc/parser.y:8614 cobc/parser.y:8616 cobc/parser.y:8958 cobc/parser.y:8967 +#: cobc/parser.y:10897 cobc/parser.y:12460 cobc/parser.y:13920 +#: cobc/parser.y:15390 cobc/typeck.c:5200 #, c-format msgid "%s and %s are mutually exclusive" msgstr "%s y %s son mutuamente excluyentes" -#: cobc/field.c:3068 cobc/parser.y:7529 cobc/parser.y:7566 +#: cobc/field.c:3354 cobc/parser.y:7810 cobc/parser.y:7847 msgid "variable-length PICTURE" msgstr "" -#: cobc/field.c:3187 +#: cobc/field.c:3475 msgid "literal type does not match numeric data type" msgstr "tipo literal no coincide con el tipo de datos numérico" -#: cobc/field.c:3261 +#: cobc/field.c:3549 #, c-format msgid "THRU item '%s' may not come before '%s'" msgstr "Ítem THRU «%s» quizá no viene antes de «%s»" -#: cobc/field.c:3284 +#: cobc/field.c:3572 #, c-format msgid "RENAMES cannot start/end at the OCCURS item '%s'" msgstr "RENAMES no puede inidiar/terminar en el ítem OCCURS «%s»" -#: cobc/field.c:3292 +#: cobc/field.c:3580 #, c-format msgid "cannot use RENAMES on part of the table '%s'" msgstr "no puede emplear RENOMBADOS en parte de la tabla «%s»" -#: cobc/field.c:3330 +#: cobc/field.c:3618 #, c-format msgid "RENAMES may not contain '%s' as it is a pointer or object reference" msgstr "RENAMES quizá no contienen «%s» como es una referencia a puntero u objeto" -#: cobc/field.c:3335 +#: cobc/field.c:3623 #, c-format msgid "RENAMES may not contain '%s' as it is an OCCURS DEPENDING table" msgstr "RENAMES quizá no contienen «%s» como sea una distribución OCCURS DEPENDING" -#: cobc/field.c:3359 +#: cobc/field.c:3647 msgid "RENAMES may not reference a level 88" msgstr "RENOMBRA quizá no referencia un nivel 88" -#: cobc/field.c:3383 +#: cobc/field.c:3671 #, c-format msgid "'%s' must immediately follow the record '%s'" msgstr "«%s» deben inmediatamente seguir al mismo registro «%s»" -#: cobc/field.c:3391 +#: cobc/field.c:3679 #, c-format msgid "THRU item must be different to '%s'" msgstr "Ítem THRU debe ser diferente a «%s»" -#: cobc/field.c:3397 +#: cobc/field.c:3685 #, c-format msgid "'%s' and '%s' must be in the same record" msgstr "«%s» y «%s» deben estar dentro del mismo registro" -#: cobc/field.c:3408 +#: cobc/field.c:3696 #, c-format msgid "THRU item '%s' may not be subordinate to '%s'" msgstr "Ítem THRU «%s» quizá no es subordinado a «%s»" @@ -1933,44 +1951,38 @@ msgid "" " intrinsics to be used without FUNCTION keyword" msgstr "" -#: cobc/flag.def:78 -msgid "" -" -fec=<exception-name>\tenable code generation for <exception-name>,\n" -" sets -fsource-location" -msgstr "" - -#: cobc/flag.def:81 cobc/help.c:96 -msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" -msgstr "" - -#: cobc/flag.def:84 +#: cobc/flag.def:85 msgid "" " -fdump=<scope> dump data fields on abort, <scope> may be\n" " a combination of: ALL, WS, LS, RD, FD, SC, LO" msgstr "" -#: cobc/flag.def:87 +#: cobc/flag.def:88 msgid "" " -fno-dump=<scope> exclude data fields from dumping on abort, <scope> may\n" -" be a combination of: ALL, WS, LS, RD, FD, SC, LO" +" be a combination of: ALL, WS, LS, RD, FD, SC, LO\n" +" default if no scope specified: ALL" msgstr "" -#: cobc/flag.def:92 +#: cobc/flag.def:94 msgid "" " -fcallfh=<name> specifies <name> to be used for I/O\n" " as external provided EXTFH interface module" msgstr "" -#: cobc/flag.def:96 +#: cobc/flag.def:98 +msgid "" +" -febcdic-table=<cconv-table>/<file>\tEBCDIC/ASCII translation table\n" +" * e.g. default, ebcdic500_latin1..." +msgstr "" + +#: cobc/flag.def:102 msgid "" -" -febcdic-table=[DEFAULT|RESTRICTED-GC|IBM|GCOS]\tdefine EBCDIC translation table:\n" -" * default: translation to extended ASCII as per MF\n" -" * restricted-gc: translation from restricted ASCII only\n" -" * ibm: translation to restricted ASCII as per IBM\n" -" * gcos: translation to extended ASCII as per GCOS7" +" -fdefault-colseq=[ASCII|EBCDIC|NATIVE]\tdefine default collating sequence\n" +" * default: NATIVE" msgstr "" -#: cobc/flag.def:107 +#: cobc/flag.def:110 #, fuzzy #| msgid "generate WinMain instead of main when compiling as executable" msgid "" @@ -1978,41 +1990,45 @@ msgid "" " as executable" msgstr "genera WinMain en vez de principal cuando compila como ejecutable" -#: cobc/flag.def:111 +#: cobc/flag.def:114 #, fuzzy #| msgid "generate computed goto C statements" msgid " -fcomputed-goto generate computed goto C statements" msgstr "generar declaraciones computadas goto en C" -#: cobc/flag.def:114 +#: cobc/flag.def:117 msgid " -fextra-brace generate extra braces in C source" msgstr "" -#: cobc/flag.def:117 +#: cobc/flag.def:120 #, fuzzy #| msgid "attempt correction of invalid numeric display items" msgid " -fcorrect-numeric attempt correction of invalid numeric display items" msgstr "intentar corrección de los elementos numéricos mostrados inválidos" -#: cobc/flag.def:120 +#: cobc/flag.def:123 #, fuzzy #| msgid "PERFORM stack allocated on heap" msgid " -fstack-on-heap PERFORM stack allocated on heap" msgstr "Pila PERFORM asignada sobre cabecera" -#: cobc/flag.def:123 +#: cobc/flag.def:126 msgid "" " -fstack-extended store origin of entrypoints and PERFORM\n" -" * turned on by -debug/-dump" +" * turned on by --debug/-fdump" msgstr "" -#: cobc/flag.def:128 +#: cobc/flag.def:130 +msgid " -fno-fast-compare disables inline comparisions" +msgstr "" + +#: cobc/flag.def:135 msgid "" " -fno-remove-unreachable\tdisable remove of unreachable code\n" " * turned off by -g" msgstr "" -#: cobc/flag.def:132 +#: cobc/flag.def:139 #, fuzzy #| msgid "" #| " -Xref generate cross reference through 'cobxref'\n" @@ -2024,19 +2040,19 @@ msgstr "" " -Xref genera referencia cruzada mediante 'cobxref'\n" " (V. Coen's 'cobxref' debe estar en el camino)" -#: cobc/flag.def:136 +#: cobc/flag.def:143 msgid "" " -ftraceall generate trace code\n" " * scope: executed SECTION/PARAGRAPH/STATEMENTS" msgstr "" -#: cobc/flag.def:140 +#: cobc/flag.def:147 #, fuzzy #| msgid "syntax error checking only; don't emit any output" msgid " -fsyntax-only syntax error checking only; don't emit any output" msgstr "solamente comprobando error sintáctico; no emite ningún resultado" -#: cobc/flag.def:143 +#: cobc/flag.def:150 #, fuzzy #| msgid "" #| "enable debugging lines\n" @@ -2048,51 +2064,58 @@ msgstr "" "activa la depuración de lineas\n" "\t\t\t- ‘D’ en la columna de indicador o flotante >>D" -#: cobc/flag.def:147 +#: cobc/flag.def:154 #, fuzzy #| msgid "" #| "generate source location code\n" #| "\t\t\t- turned on by -debug/-g/-ftraceall" msgid "" " -fsource-location generate source location code\n" -" * turned on by -debug/-ftraceall/-fec/-dump" +" * turned on by --debug/-ftraceall/-fec/-fdump" msgstr "" "generar la ubicación del código de fuente\n" "\t\t\t- activado por -debug/-g/-ftraceall" -#: cobc/flag.def:151 +#: cobc/flag.def:158 #, fuzzy #| msgid "automatic initialization of the COBOL runtime system" msgid " -fimplicit-init automatic initialization of the COBOL runtime system" msgstr "inicialización automática del sistema de ejecución COBOL" -#: cobc/flag.def:154 +#: cobc/flag.def:161 msgid "" " -fno-recursive-check disable check of recursive program call;\n" " effectively compiling as RECURSIVE program" msgstr "" -#: cobc/flag.def:158 +#: cobc/flag.def:165 #, fuzzy #| msgid "" #| "PERFORM stack checking\n" #| "\t\t\t- turned on by -debug or -g" msgid "" " -fstack-check PERFORM stack checking\n" -" * turned on by -debug/-g" +" * turned on by --debug/-g" msgstr "" "PERFORM revisa pila\n" " \t\t\t- activado por -debug o -g" -#: cobc/flag.def:162 +#: cobc/flag.def:169 +msgid "" +" -fmemory-check=<scope> checks for invalid writes to internal storage,\n" +" <scope> may be one of: all, pointer, using, none\n" +" * default: none, set to all by --debug" +msgstr "" + +#: cobc/flag.def:174 msgid " -fsection-exit-check check that code execution does not leave the scope of SECTIONs" msgstr "" -#: cobc/flag.def:165 +#: cobc/flag.def:177 msgid " -fimplicit-goback-check\tcheck that code execution does not end implicit at end of PROCEDURE DIVISION" msgstr "" -#: cobc/flag.def:168 +#: cobc/flag.def:180 #, fuzzy #| msgid "" #| "use AFTER 1 for WRITE of LINE SEQUENTIAL\n" @@ -2104,19 +2127,13 @@ msgstr "" "utiliza AFTER 1 para WRITE de LINE SEQUENTIAL\n" "\t\t\t- por defecto : BEFORE 1" -#: cobc/flag.def:172 -#, fuzzy -#| msgid "" -#| "'*' or '/' in column 1 treated as comment\n" -#| "\t\t\t- FIXED format only" +#: cobc/flag.def:184 msgid "" -" -fmfcomment '*' or '/' in column 1 treated as comment\n" -" * FIXED format only" +" -fmfcomment '*' in column 1 treated as comment with listing suppression\n" +" * FIXED/COBOL85/VARIABLE format only" msgstr "" -"‘*’ o ‘/’ dentro de columna 1 tratada como comentario\n" -"\t\t\t- unicamente en formato FIXED" -#: cobc/flag.def:176 +#: cobc/flag.def:188 #, fuzzy #| msgid "" #| "'$' in indicator area treated as '*',\n" @@ -2128,7 +2145,7 @@ msgstr "" "'$' en área indicadora tratada como '*',\n" " '|' tratada como comentario flotante" -#: cobc/flag.def:181 +#: cobc/flag.def:193 #, fuzzy #| msgid "" #| "allow numeric field overflow\n" @@ -2140,7 +2157,7 @@ msgstr "" "permite desbordamiento del campo numérico\n" "\t\t\t- comportamiento no ANSI" -#: cobc/flag.def:185 +#: cobc/flag.def:197 #, fuzzy #| msgid "" #| "use a single quote (apostrophe) for QUOTE\n" @@ -2152,7 +2169,7 @@ msgstr "" "emplea una comilla (apóstrofe) para QUOTE\n" "\t\t\t- por defecto: doble comilla" -#: cobc/flag.def:195 +#: cobc/flag.def:207 #, fuzzy #| msgid "" #| "treat all files as OPTIONAL\n" @@ -2164,13 +2181,13 @@ msgstr "" "trata todos los ficheros como OPTIONAL\n" "\t\t\t- a menos que se especifique NOT OPTIONAL" -#: cobc/flag.def:199 +#: cobc/flag.def:211 #, fuzzy #| msgid "output static function calls for the CALL statement" msgid " -fstatic-call output static function calls for the CALL statement" msgstr "llamadas de función estática de salida para la sentencia CALL" -#: cobc/flag.def:202 +#: cobc/flag.def:214 #, fuzzy #| msgid "disable generation of C function declations for subroutines with static CALL" msgid "" @@ -2178,56 +2195,80 @@ msgid "" " for subroutines with static CALL" msgstr "desactiva generación de declaraciones de función C para subrutinas con llamada CALL estática" -#: cobc/flag.def:206 +#: cobc/flag.def:218 msgid "" " -fgen-c-line-directives\tgenerate source location directives in C code;\n" -" * turned on by -g" +" * turned on by -g/--coverage" msgstr "" -#: cobc/flag.def:210 +#: cobc/flag.def:222 msgid "" " -fgen-c-labels generate extra labels in C sources;\n" " * turned on by -g" msgstr "" -#: cobc/flag.def:214 +#: cobc/flag.def:226 msgid "" -" -fno-theaders suppress all headers and output of compilation\n" -" options from listing while keeping page breaks" +" -fno-theaders suppress all headers from listing while keeping\n" +" page breaks" msgstr "" -#: cobc/flag.def:218 +#: cobc/flag.def:230 #, fuzzy #| msgid " -F, -free use free source format" msgid " -fno-tsource suppress source from listing" msgstr " -F, -free emplear formato de origen libre" -#: cobc/flag.def:221 +#: cobc/flag.def:233 msgid " -fno-tmessages suppress warning and error summary from listing" msgstr "" -#: cobc/flag.def:224 +#: cobc/flag.def:236 #, fuzzy #| msgid " --tsymbols specify symbols in listing" msgid " -ftsymbols specify symbols in listing" msgstr " --tsymbols\t\tespecifica símbolos dentro de listado" -#: cobc/flag.def:227 +#: cobc/flag.def:239 +#, fuzzy +#| msgid " -Xref specify cross reference in listing" +msgid " -ftcmd specify command line in listing" +msgstr " -Xref especifica referencia cruzada en listado" + +#: cobc/flag.def:242 +msgid " -fno-ttimestamp suppress timestamp in listing headers" +msgstr "" + +#: cobc/flag.def:245 +msgid "" +" -fttitle=<title> set listing title with '_' replaced by spaces;\n" +" defaults to package name and version" +msgstr "" + +#: cobc/flag.def:249 msgid "" " -fno-diagnostics-show-option\tsuppress output of option that directly\n" " controls the diagnostic" msgstr "" -#: cobc/help.c:32 +#: cobc/flag.def:253 +msgid " -fno-diagnostics-show-caret\tdo not display source context on warning/error diagnostic" +msgstr "" + +#: cobc/flag.def:256 +msgid " -fno-diagnostics-show-line-numbers\tsuppress display of line numbers in diagnostics" +msgstr "" + +#: cobc/help.c:33 msgid "GnuCOBOL compiler for most COBOL dialects with lots of extensions" msgstr "Compilador GnuCOBOL para muchos dialectos COBOL con lotes de extensiones" -#: cobc/help.c:34 +#: cobc/help.c:35 #, c-format msgid "Usage: %s [options]... file..." msgstr "Modo de empleo: %s [opciones]... fichero..." -#: cobc/help.c:47 bin/cobcrun.c:143 +#: cobc/help.c:48 bin/cobcrun.c:143 #, c-format msgid "" "Report bugs to: %s\n" @@ -2236,41 +2277,40 @@ msgstr "" "Boletine defectos a: %s\n" "o (preferiblemene) utilice el seguimiento por resolución vía la página inicial." -#: cobc/help.c:51 -#, fuzzy -#| msgid "GnuCOBOL home page: <http://www.gnu.org/software/gnucobol/>" -msgid "GnuCOBOL home page: <https://www.gnu.org/software/gnucobol/>" -msgstr "Página inicial de GnuCOBOL: <http://www.gnu.org/software/gnucobol/>" +#: cobc/help.c:52 bin/cobcrun.c:146 +#, c-format +msgid "GnuCOBOL home page: <%s>" +msgstr "" -#: cobc/help.c:52 -#, fuzzy +#: cobc/help.c:54 bin/cobcrun.c:148 +#, fuzzy, c-format #| msgid "General help using GNU software: <http://www.gnu.org/gethelp/>" -msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" +msgid "General help using GNU software: <%s>" msgstr "Ayuda general utilizando software GNU: <http://www.gnu.org/gethelp/>" -#: cobc/help.c:58 bin/cobcrun.c:125 +#: cobc/help.c:61 bin/cobcrun.c:125 msgid "Options:" msgstr "Opciones:" -#: cobc/help.c:59 +#: cobc/help.c:62 #, fuzzy #| msgid " -h, -help display this help and exit" msgid " -h, --help display this help and exit" msgstr " -h, -help enseña esta ayuda y sale" -#: cobc/help.c:60 +#: cobc/help.c:63 #, fuzzy #| msgid " -V, -version display compiler version and exit" msgid " -V, --version display compiler version information and exit" msgstr " -V, -version enseña la versión del compilador y sale" -#: cobc/help.c:61 +#: cobc/help.c:64 #, fuzzy #| msgid " -V, -version display compiler version and exit" msgid " -dumpversion display compiler version and exit" msgstr " -V, -version enseña la versión del compilador y sale" -#: cobc/help.c:62 +#: cobc/help.c:65 #, fuzzy #| msgid "" #| " -i, -info display compiler information (build/environment)\n" @@ -2282,7 +2322,7 @@ msgstr "" " -i, -info enseña información del compilador (compliar/entorno)\n" " y sale" -#: cobc/help.c:64 +#: cobc/help.c:67 msgid "" " -v, --verbose verbose mode, display additional information;\n" " multiple -v options increase the verbosity,\n" @@ -2293,33 +2333,33 @@ msgid "" " (3) pass verbose option to linker" msgstr "" -#: cobc/help.c:71 +#: cobc/help.c:74 #, fuzzy #| msgid " -q, -brief reduced displays, commands invoked not shown" msgid " -q, --brief reduced displays, commands invoked not shown" msgstr " -q, -brief pantallas reducidas, órdenes invocadas no mostradas" -#: cobc/help.c:72 +#: cobc/help.c:75 #, fuzzy #| msgid " -### like -v but commands not executed" msgid " -### like -v but commands not executed" msgstr " -### como -v pero órdenes no ejecutadas" -#: cobc/help.c:73 +#: cobc/help.c:76 msgid " -x build an executable program" msgstr " -x compila un programa ejecutable" -#: cobc/help.c:74 +#: cobc/help.c:77 msgid " -m build a dynamically loadable module (default)" msgstr " -m compila un módulo de carga dinámicamente (predet.)" -#: cobc/help.c:75 +#: cobc/help.c:78 #, fuzzy #| msgid " -j [<args>], -job[=<args>]\trun program after build, passing <args>" msgid " -j [<args>], --job[=<args>]\trun program after build, passing <args>" msgstr " -j [<args>], -job[=<args>]\tejecuta un programa tras compilación, pasando <args>" -#: cobc/help.c:76 +#: cobc/help.c:79 #, fuzzy #| msgid "" #| " -std=<dialect> warnings/features for a specific dialect\n" @@ -2348,13 +2388,13 @@ msgstr "" " vea ficheros de configuración en el directorio de\n" " configuración" -#: cobc/help.c:84 +#: cobc/help.c:87 #, fuzzy #| msgid " -F, -free use free source format" msgid " -F, --free use free source format (alias for -fformat=free)" msgstr " -F, -free emplear formato de origen libre" -#: cobc/help.c:85 +#: cobc/help.c:88 #, fuzzy #| msgid " -fixed use fixed source format (default)" msgid "" @@ -2362,23 +2402,23 @@ msgid "" " -fformat=fixed)" msgstr " -fixed emplear formato de origen fijo (predeterminado)" -#: cobc/help.c:87 +#: cobc/help.c:90 msgid " -O, -O2, -O3, -Os enable optimization" msgstr " -O, -O2, -O3, -Os optimización activada" -#: cobc/help.c:88 +#: cobc/help.c:91 #, fuzzy #| msgid " -W enable all warnings" msgid " -O0 disable optimization" msgstr " -W activa todas las advertencias" -#: cobc/help.c:89 +#: cobc/help.c:92 #, fuzzy #| msgid " -g enable C compiler debug / stack check / trace" msgid " -g enable C compiler debug and stack check" msgstr " -g activa depuración de compilador C / compilación de pila / traza" -#: cobc/help.c:90 +#: cobc/help.c:93 #, fuzzy #| msgid " -d, -debug enable all run-time error checking" msgid "" @@ -2386,18 +2426,22 @@ msgid "" " equal to -fstack-check -fec=EC-ALL" msgstr " -d, -debug permite todas las comprobaciones de error en tiempo de ejecución" -#: cobc/help.c:93 +#: cobc/help.c:97 msgid "" " -fec=<exception-name>\tenable code generation for <exception-name>,\n" " see --list-exceptions for the possible values,\n" " sets -fsource-location" msgstr "" -#: cobc/help.c:97 +#: cobc/help.c:100 +msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" +msgstr "" + +#: cobc/help.c:101 msgid " -o <file> place the output into <file>" msgstr " -o <file> lugar de salida al <fichero>" -#: cobc/help.c:98 +#: cobc/help.c:102 msgid "" " -b combine all input files into a single\n" " dynamically loadable module" @@ -2405,45 +2449,39 @@ msgstr "" " -b combinar todos los ficheros de entrada en un solo\n" " módulo dinámicamente cargable" -#: cobc/help.c:100 +#: cobc/help.c:104 msgid " -E preprocess only; do not compile or link" msgstr " -E preprocesar solamente; no compilar o enlazar" -#: cobc/help.c:101 +#: cobc/help.c:105 msgid " -C translation only; convert COBOL to C" msgstr " -C traducción solamente; convertir COBOL a C" -#: cobc/help.c:102 +#: cobc/help.c:106 msgid " -S compile only; output assembly file" msgstr " -S compilar solamente; salida de fichero ensamblado" -#: cobc/help.c:103 +#: cobc/help.c:107 msgid " -c compile and assemble, but do not link" msgstr " -c compila y ensambla, pero no enlaza" -#: cobc/help.c:104 +#: cobc/help.c:108 msgid " -T <file> generate and place a wide program listing into <file>" msgstr " -T <file> genera y ubica un programa ancho listando dentro de <file>" -#: cobc/help.c:105 +#: cobc/help.c:109 msgid " -t <file> generate and place a program listing into <file>" msgstr " -t <file>\t\tgenera y ubica un programa listando dentro de <file>" -#: cobc/help.c:106 +#: cobc/help.c:110 msgid " --tlines=<lines> specify lines per page in listing, default = 55" msgstr " --tlines=<lines> líneas especificas por página en lista, predeterminada = 55" -#: cobc/help.c:108 -#, fuzzy -#| msgid " --tsymbols specify symbols in listing" -msgid " --tsymbols specify symbols in listing, use -ftsymbols instead" -msgstr " --tsymbols\t\tespecifica símbolos dentro de listado" - -#: cobc/help.c:110 +#: cobc/help.c:111 msgid " -P[=<dir or file>] generate preprocessed program listing (.lst)" msgstr " -P(=<dir o file>) genera listado de programa preprocesado (.lst)" -#: cobc/help.c:112 +#: cobc/help.c:113 #, fuzzy #| msgid "" #| " -Xref generate cross reference through 'cobxref'\n" @@ -2455,77 +2493,81 @@ msgstr "" " -Xref genera referencia cruzada mediante 'cobxref'\n" " (V. Coen's 'cobxref' debe estar en el camino)" -#: cobc/help.c:115 +#: cobc/help.c:116 #, fuzzy #| msgid " -Xref specify cross reference in listing" msgid " -X, --Xref specify cross reference in listing" msgstr " -Xref especifica referencia cruzada en listado" -#: cobc/help.c:117 +#: cobc/help.c:118 msgid " -I <directory> add <directory> to copy/include search path" msgstr " -I <directory> añade <directory> para copiar/incluir ruta de búsqueda" -#: cobc/help.c:118 +#: cobc/help.c:119 msgid " -L <directory> add <directory> to library search path" msgstr " -L <directory> añade el <directorio> a ruta de búsqueda de biblioteca" -#: cobc/help.c:119 +#: cobc/help.c:120 msgid " -l <lib> link the library <lib>" msgstr " -l <lib> enlaza la biblioteca <lib>" -#: cobc/help.c:120 -msgid " -A <options> add <options> to the C compile phase" -msgstr " -A <options> añade <opciones> a la fase de compilador C" - #: cobc/help.c:121 -msgid " -Q <options> add <options> to the C link phase" -msgstr " -Q <options> añade <opciones> a la frase de enlace C" +msgid " -K <entry> generate CALL to <entry> as static" +msgstr " -K <entry> generar CALL a <entry> como estática" #: cobc/help.c:122 msgid " -D <define> define <define> for COBOL compilation" msgstr " -D <define> define <define> para compilación COBOL" #: cobc/help.c:123 -msgid " -K <entry> generate CALL to <entry> as static" -msgstr " -K <entry> generar CALL a <entry> como estática" +msgid " -A <options> add <options> to the C compile phase" +msgstr " -A <options> añade <opciones> a la fase de compilador C" #: cobc/help.c:124 +msgid " -Q <options> add <options> to the C link phase" +msgstr " -Q <options> añade <opciones> a la frase de enlace C" + +#: cobc/help.c:125 +msgid " --coverage instrument generated binaries for coverage" +msgstr "" + +#: cobc/help.c:126 #, fuzzy #| msgid " -conf=<file> user-defined dialect configuration; see -std" msgid " --conf=<file> user-defined dialect configuration; see -std" msgstr " -conf=<file> configuración de dialecto definido por usuario; vea -std" -#: cobc/help.c:125 +#: cobc/help.c:127 #, fuzzy #| msgid " -list-reserved display reserved words" msgid " --list-reserved display reserved words" msgstr " -list-reserved enseña palabras reservadas" -#: cobc/help.c:126 +#: cobc/help.c:128 #, fuzzy #| msgid " -list-intrinsics display intrinsic functions" msgid " --list-intrinsics display intrinsic functions" msgstr " -list-intrinsics enseña funciones intrínsecas" -#: cobc/help.c:127 +#: cobc/help.c:129 #, fuzzy #| msgid " -list-mnemonics display mnemonic names" msgid " --list-mnemonics display mnemonic names" msgstr " -list-mnemonics enseña nombres mnemónicos" -#: cobc/help.c:128 +#: cobc/help.c:130 #, fuzzy #| msgid " -list-mnemonics display mnemonic names" msgid " --list-exceptions display exception names" msgstr " -list-mnemonics enseña nombres mnemónicos" -#: cobc/help.c:129 +#: cobc/help.c:131 #, fuzzy #| msgid " -list-system display system routines" msgid " --list-system display system routines" msgstr " -list-system enseña rutinas del sistema" -#: cobc/help.c:130 +#: cobc/help.c:132 #, fuzzy #| msgid "" #| " -save-temps[=<dir>] save intermediate files\n" @@ -2537,3913 +2579,3999 @@ msgstr "" " -save-temps[=<dir>] guarda ficheros intermedios\n" " - predeterminado: directorio actual" -#: cobc/help.c:132 +#: cobc/help.c:134 +msgid " -MT <target> set/add target file used in dependency list" +msgstr "" + +#: cobc/help.c:135 +#, fuzzy +#| msgid " -o <file> place the output into <file>" +msgid " -MF <file> place dependency list into <file>" +msgstr " -o <file> lugar de salida al <fichero>" + +#: cobc/help.c:136 msgid " -ext <extension> add file extension for resolving COPY" msgstr " -ext <extension> añade extensión de fichero para resolver COPY" -#: cobc/help.c:139 +#: cobc/help.c:143 #, fuzzy #| msgid "unknown warning option '%s'" msgid "Warning options:" msgstr "opción de aviso desconocido «%s»" -#: cobc/help.c:140 +#: cobc/help.c:144 msgid " -Wall enable most warnings (all except as noted below)" msgstr " -Wall activar la mayoría de las advertencias (todas excepto como se anotaron debajo)" -#: cobc/help.c:141 +#: cobc/help.c:145 #, fuzzy #| msgid " -W enable all warnings" msgid " -Wextra like -Wall but enable some extra warning flags" msgstr " -W activa todas las advertencias" -#: cobc/help.c:142 +#: cobc/help.c:146 #, fuzzy #| msgid " -W enable all warnings" msgid " -w disable all warnings" msgstr " -W activa todas las advertencias" -#: cobc/help.c:143 +#: cobc/help.c:147 #, fuzzy #| msgid " -Wno-<warning> disable warning enabled by -W or -Wall" msgid " -Wno-<warning> disable warning enabled by default, -Wall or -Wextra" msgstr " -Wno-<warning> desactiva advertencias activadas por -W o -Wall" #. TRANSLATORS: This msgid is appended to msgid for -Wno-pending and others -#: cobc/help.c:149 +#: cobc/help.c:153 #, fuzzy #| msgid " -W enable all warnings" msgid " * ALWAYS active" msgstr " -W activa todas las advertencias" #. TRANSLATORS: This msgid is appended to msgid for -Wpossible-truncate and others -#: cobc/help.c:153 +#: cobc/help.c:157 #, fuzzy #| msgid " -W enable all warnings" msgid " * NOT set with -Wall" msgstr " -W activa todas las advertencias" -#: cobc/help.c:161 +#: cobc/help.c:165 +msgid " -fdiagnostics-plain-output\tmake diagnostic output as plain as possible" +msgstr "" + +#: cobc/help.c:166 msgid " -Werror treat all warnings as errors" msgstr " -Werror trata todas las advertencias como errores" -#: cobc/help.c:162 +#: cobc/help.c:167 #, fuzzy #| msgid " -Werror treat all warnings as errors" msgid " -Wno-error don't treat warnings as errors" msgstr " -Werror trata todas las advertencias como errores" -#: cobc/help.c:163 +#: cobc/help.c:168 msgid " -Werror=<warning> treat specified <warning> as error" msgstr " -Werror=<advertencia> tratar especificado <advertencia> como error" -#: cobc/help.c:164 +#: cobc/help.c:169 #, fuzzy #| msgid " -Werror=<warning> treat specified <warning> as error" msgid " -Wno-error=<warning> don't treat specified <warning> as error" msgstr " -Werror=<advertencia> tratar especificado <advertencia> como error" -#: cobc/help.c:180 +#: cobc/help.c:185 msgid "Compiler options:" msgstr "" -#: cobc/help.c:198 +#: cobc/help.c:203 msgid "" " -fibmcomp sets -fbinary-size=2-4-8 -fsynchronized-clause=ok\n" " -fno-ibmcomp sets -fbinary-size=1--8 -fsynchronized-clause=ignore" msgstr "" -#: cobc/help.c:201 +#: cobc/help.c:206 msgid "" " -falternate-ebcdic use restricted ASCII to EBCDIC translate\n" " -fno-alternate-ebcdic use extended ASCII to EBCDIC translate" msgstr "" -#: cobc/help.c:230 +#: cobc/help.c:235 msgid "Compiler dialect configuration options:" msgstr "" -#: cobc/help.c:232 cobc/help.c:238 +#: cobc/help.c:237 cobc/help.c:243 msgid "<value>" msgstr "<valor>" -#: cobc/help.c:242 +#: cobc/help.c:247 msgid "<support>" msgstr "<compatible>" -#: cobc/help.c:251 +#: cobc/help.c:256 msgid "where <support> is one of the following:" msgstr "donde <compatible> es uno de lo siguiente:" #. TRANSLATORS: This msgid is used when a variable name #. or label is referenced in a compiler message. -#: cobc/help.c:254 cobc/help.c:257 cobc/help.c:260 cobc/help.c:263 -#: cobc/help.c:266 cobc/help.c:269 cobc/help.c:272 cobc/help.c:275 -#: cobc/typeck.c:2361 +#: cobc/help.c:259 cobc/help.c:262 cobc/help.c:265 cobc/help.c:268 +#: cobc/help.c:271 cobc/help.c:274 cobc/help.c:277 cobc/help.c:280 +#: cobc/typeck.c:2378 #, c-format msgid "'%s'" msgstr "" -#: cobc/help.c:277 +#: cobc/help.c:282 msgid "word to be taken out of the reserved words list" msgstr "palabra para ser tomada fuera de la lista de palabras reservadas" -#: cobc/help.c:277 cobc/help.c:278 cobc/help.c:280 +#: cobc/help.c:282 cobc/help.c:283 cobc/help.c:285 msgid "<word>" msgstr "<palabra>" -#: cobc/help.c:278 +#: cobc/help.c:283 msgid "word to be added to reserved words list" msgstr "palabra a ser añadida para listado de palabras reservadas" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "word to be added to reserved words list as alias" msgstr "palabra a ser añadida para listado de palabras reservadas como alias" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "<word>:<alias>" msgstr "<palabra>:<alias>" -#: cobc/help.c:280 +#: cobc/help.c:285 #, fuzzy #| msgid "special register %s is unknown" msgid "special register to disable" msgstr "registro especial %s es desconocido" -#: cobc/help.c:281 +#: cobc/help.c:286 #, fuzzy #| msgid "special register %s is unknown" msgid "special register to enable" msgstr "registro especial %s es desconocido" -#: cobc/help.c:282 +#: cobc/help.c:287 msgid "<word> or <word>:<definition>, where definition uses backslash escaped spaces" msgstr "" -#: cobc/parser.y:315 cobc/parser.y:323 +#: cobc/parser.y:307 #, c-format msgid "'%s' should start in Area A" msgstr "" -#: cobc/parser.y:331 cobc/parser.y:333 +#: cobc/parser.y:315 +#, c-format +msgid "%s should start in Area A" +msgstr "" + +#: cobc/parser.y:322 +#, fuzzy, c-format +#| msgid "should not contain '%c'" +msgid "%s should not start in Area A" +msgstr "debería no contener «%c»" + +#: cobc/parser.y:330 cobc/parser.y:332 msgid "start of statement in Area A" msgstr "" -#: cobc/parser.y:344 cobc/parser.y:379 +#: cobc/parser.y:428 #, c-format msgid "unreachable statement '%s'" msgstr "estado no alcanzable «%s»" -#: cobc/parser.y:470 +#: cobc/parser.y:542 #, c-format msgid "ENTRY '%s' duplicated" msgstr "ENTRY «%s» duplicado" -#: cobc/parser.y:520 +#: cobc/parser.y:594 #, fuzzy, c-format #| msgid "ENTRY '%s' duplicated" msgid "ENTRY FOR GO TO '%s' duplicated" msgstr "ENTRY «%s» duplicado" -#: cobc/parser.y:536 +#: cobc/parser.y:610 #, c-format msgid "maximum nested program depth exceeded (%d)" msgstr "profundidad máxima excedida para programa anidados (%d)" -#: cobc/parser.y:562 cobc/parser.y:589 +#: cobc/parser.y:636 cobc/parser.y:663 #, c-format msgid "%s statement not terminated by %s" msgstr "%s declaración no terminada por %s" -#: cobc/parser.y:592 +#: cobc/parser.y:666 #, c-format msgid "%s statement not terminated" msgstr "declaración %s no terminada" -#: cobc/parser.y:634 -msgid "USE statement invalid for SORT file" +#: cobc/parser.y:708 +#, fuzzy +#| msgid "USE statement invalid for SORT file" +msgid "USE statement invalid for SD file" msgstr "Declaracion USE no válida con fichero SORT" -#: cobc/parser.y:676 cobc/parser.y:1670 cobc/parser.y:1673 -#, c-format -msgid "cannot specify both %s and %s" -msgstr "no puede especificar ambos %s y %s" - -#: cobc/parser.y:677 +#: cobc/parser.y:751 #, fuzzy, c-format #| msgid "%s ignored" msgid "%s is ignored" msgstr "%s ignorado" -#: cobc/parser.y:686 +#: cobc/parser.y:760 #, c-format -msgid "Cannot specify %s without number of lines on page" +msgid "cannot specify %s without number of lines on page" msgstr "" -#: cobc/parser.y:696 +#: cobc/parser.y:770 #, c-format msgid "maximum OCCURS depth exceeded (%d)" msgstr "máxima profundidad excedida para OCURRS (%d)" -#: cobc/parser.y:704 cobc/typeck.c:3037 +#: cobc/parser.y:785 cobc/typeck.c:3127 #, c-format msgid "'%s' is not in LINKAGE SECTION" msgstr "«%s» no esta en LINKAGE SECTION" -#: cobc/parser.y:725 +#: cobc/parser.y:806 msgid "TO phrase without DEPENDING phrase" msgstr "PARA frase sin frase DEPENDIENTE" -#: cobc/parser.y:727 +#: cobc/parser.y:808 #, fuzzy #| msgid "maximum number of occurences assumed to be exact number" msgid "maximum number of occurrences assumed to be exact number" msgstr "número máximo de ocurrencias asumidas a ser número exacto" -#: cobc/parser.y:732 cobc/parser.y:8032 +#: cobc/parser.y:813 cobc/parser.y:8398 msgid "OCCURS TO must be greater than OCCURS FROM" msgstr "OCURRE PARA debe ser mayor que OCURRE DESDE" -#: cobc/parser.y:741 +#: cobc/parser.y:823 #, fuzzy #| msgid "ODO without TO phrase" msgid "OCCURS DEPENDING ON without TO phrase" msgstr "ODO sin frase TO" -#: cobc/parser.y:806 +#: cobc/parser.y:899 #, c-format msgid "%s header missing" msgstr "%s encabezado ausente" -#: cobc/parser.y:807 +#: cobc/parser.y:900 #, fuzzy, c-format #| msgid "%s header missing - assumed" msgid "%s header assumed" msgstr "%s encabezado ausente - asumido" -#: cobc/parser.y:939 -#, fuzzy, c-format -#| msgid "duplicate %s clause" -msgid "duplicate %s" -msgstr "cláusula duplicada %s" - -#: cobc/parser.y:941 +#: cobc/parser.y:1053 #, c-format msgid "%s incorrectly after %s" msgstr "" -#: cobc/parser.y:1078 +#: cobc/parser.y:1208 #, c-format msgid "redefinition of program name '%s'" msgstr "redefinición de nombre del programa '%s'" -#: cobc/parser.y:1083 +#: cobc/parser.y:1213 #, c-format msgid "redefinition of program ID '%s'" msgstr "redefinición de ID programa «%s»" -#: cobc/parser.y:1117 +#: cobc/parser.y:1247 #, c-format msgid "FUNCTION '%s' has no PROCEDURE DIVISION" msgstr "FUNCTION «%s» no tiene ningún PROCEDURE DIVISION" -#: cobc/parser.y:1228 +#: cobc/parser.y:1372 msgid "functions may not be defined within a program/function" msgstr "funciones quizá no son definidas dentro de un programa/función" -#: cobc/parser.y:1278 +#: cobc/parser.y:1426 #, c-format msgid "END FUNCTION '%s' is different from FUNCTION-ID '%s'" msgstr "END FUNCTION «%s» es diferente desde FUNCTION-ID «%s»" -#: cobc/parser.y:1292 +#: cobc/parser.y:1440 #, c-format msgid "END PROGRAM '%s' is different from PROGRAM-ID '%s'" msgstr "END PROGRAM «%s» es diferente del PROGRAM-ID «%s»" -#: cobc/parser.y:1341 +#: cobc/parser.y:1489 #, fuzzy #| msgid "'%s' CURSOR must be 4 or 6 characters long" msgid "currency symbol must be one character long" msgstr "«%s» CURSOR no es de 4 o 6 caracteres de longitud" -#: cobc/parser.y:1398 +#: cobc/parser.y:1546 #, fuzzy, c-format #| msgid "a trailing currency symbol" msgid "invalid character '%c' in currency symbol" msgstr "un símbolo monetario trasero" -#: cobc/parser.y:1414 +#: cobc/parser.y:1562 msgid "prototype has same name as current function and will be ignored" msgstr "prototipo tiene el mismo nombre como función actual y será ignorada" -#: cobc/parser.y:1441 +#: cobc/parser.y:1589 #, c-format msgid "duplicate REPOSITORY entries for '%s' do not match" msgstr "duplicación de asientos de REPOSITORIO para «%s» no coincide" -#: cobc/parser.y:1445 +#: cobc/parser.y:1593 #, c-format msgid "duplicate REPOSITORY entry for '%s'" msgstr "duplica asiento REPOSITORIO para «%s»" -#: cobc/parser.y:1510 +#: cobc/parser.y:1658 #, c-format msgid "ORGANIZATION %s is incompatible with RECORD DELIMITER" msgstr "" -#: cobc/parser.y:1548 cobc/parser.y:1939 cobc/typeck.c:829 +#: cobc/parser.y:1694 cobc/parser.y:2142 cobc/typeck.c:835 #, fuzzy, c-format #| msgid "reference modification not allowed here" msgid "condition-name not allowed here: '%s'" msgstr "modificación referencial no permitida aquí" -#: cobc/parser.y:1554 cobc/parser.y:2127 +#: cobc/parser.y:1700 cobc/parser.y:2345 #, fuzzy #| msgid "'%s' cannot be used here" msgid "SCREEN item cannot be used here" msgstr "«%s» no puede ser empleado aquí" -#: cobc/parser.y:1557 +#: cobc/parser.y:1703 #, fuzzy #| msgid "'%s' cannot be used here" msgid "REPORT item cannot be used here" msgstr "«%s» no puede ser empleado aquí" -#: cobc/parser.y:1563 +#: cobc/parser.y:1709 #, fuzzy #| msgid "'%s' cannot be used here" msgid "TYPEDEF item cannot be used here" msgstr "«%s» no puede ser empleado aquí" -#: cobc/parser.y:1572 +#: cobc/parser.y:1718 #, fuzzy #| msgid "integer value expected" msgid "elementary item expected" msgstr "valor entero esperado" -#: cobc/parser.y:1579 +#: cobc/parser.y:1725 #, fuzzy #| msgid "RENAMES may not reference a level 88" msgid "item may not reference itself" msgstr "RENOMBRA quizá no referencia un nivel 88" -#: cobc/parser.y:1586 +#: cobc/parser.y:1733 #, fuzzy #| msgid "THRU item '%s' may not be subordinate to '%s'" msgid "item may not be subordinate to any item with USAGE clause" msgstr "Ítem THRU «%s» quizá no es subordinado a «%s»" -#: cobc/parser.y:1588 +#: cobc/parser.y:1735 #, fuzzy #| msgid "THRU item '%s' may not be subordinate to '%s'" msgid "item may not be subordinate to any item with SIGN clause" msgstr "Ítem THRU «%s» quizá no es subordinado a «%s»" -#: cobc/parser.y:1631 +#: cobc/parser.y:1780 #, c-format msgid "illegal combination of %s with other clauses" msgstr "" -#: cobc/parser.y:1641 +#: cobc/parser.y:1794 #, fuzzy, c-format #| msgid "THRU item '%s' may not be subordinate to '%s'" msgid "entry following %s may not be subordinate to it" msgstr "Ítem THRU «%s» quizá no es subordinado a «%s»" -#: cobc/parser.y:1859 +#: cobc/parser.y:2042 +msgid "INITIAL specified on non-input field" +msgstr "INITIAL especificado en campo no de entrada" + +#: cobc/parser.y:2054 +msgid "relative LINE/COLUMN clause required with OCCURS" +msgstr "clálusula LÍNEA/COLUMNA relativa requerida con OCURRENCIAS" + +#: cobc/parser.y:2072 msgid "FOR phrase cannot immediately follow ALL/LEADING/TRAILING" msgstr "PARA frase no puede seguir inmediatamente TODO/FRENTE/COLA" -#: cobc/parser.y:1861 +#: cobc/parser.y:2074 msgid "missing CHARACTERS/ALL/LEADING/TRAILING phrase after FOR phrase" msgstr "faltando frase CARÁCTER/TODO/FRENTE/COLA tras frase PARA" -#: cobc/parser.y:1868 +#: cobc/parser.y:2081 #, fuzzy #| msgid "missing value between CHARACTERS/ALL/LEADING/TRAILING words" msgid "missing value between ALL/LEADING/TRAILING words" msgstr "faltando valor entre palabras CARACTERES/TODO/CABECERA/COLA" -#: cobc/parser.y:1873 +#: cobc/parser.y:2086 msgid "missing FOR phrase before CHARACTERS/ALL/LEADING/TRAILING phrase" msgstr "faltando frase PARA antes de frase CARACTERES/TODO/CABECERA/COLA" -#: cobc/parser.y:1880 +#: cobc/parser.y:2093 msgid "missing ALL/LEADING/TRAILING before value" msgstr "falta ALL/LEADING/TRAILING antes de valor" -#: cobc/parser.y:1935 +#: cobc/parser.y:2138 msgid "use of condition-name in place of data-name" msgstr "" -#: cobc/parser.y:1966 +#: cobc/parser.y:2169 msgid "cannot specify NO ADVANCING in screen DISPLAY" msgstr "no puede especificar NO ADVANCING en pantalla DISPLAY" -#: cobc/parser.y:2029 cobc/parser.y:2046 +#: cobc/parser.y:2232 cobc/parser.y:2249 msgid "non-standard DISPLAY" msgstr "no común DISPLAY" -#: cobc/parser.y:2033 +#: cobc/parser.y:2236 msgid "screens may only be displayed on CRT" msgstr "pantalla quizá solo son enseñadas en CRT" -#: cobc/parser.y:2038 cobc/parser.y:2081 +#: cobc/parser.y:2241 cobc/parser.y:2284 msgid "cannot mix screens and fields in the same DISPLAY statement" msgstr "no puede mezclar pantallas y campos en la misma declaración VISOR" -#: cobc/parser.y:2042 +#: cobc/parser.y:2245 msgid "screen clauses may only be used for DISPLAY on CRT" msgstr "cláusulas apantallada quizá solo se emplea para VISTAS en CRT " -#: cobc/parser.y:2087 +#: cobc/parser.y:2290 msgid "ambiguous DISPLAY; put items to display on device in separate DISPLAY" msgstr "PANTALL ambigua; pero ítemes para pantalla en dispositivo en PANTALA separada" -#: cobc/parser.y:2103 +#: cobc/parser.y:2301 #, c-format msgid "%s is not an alphanumeric literal" msgstr "%s no es un literal alfanumérico" -#: cobc/parser.y:2105 +#: cobc/parser.y:2305 #, c-format msgid "'%s' is not USAGE DISPLAY" msgstr "«%s» no es USAGE DISPLAY" -#: cobc/parser.y:2120 cobc/typeck.c:9790 +#: cobc/parser.y:2322 cobc/parser.y:19534 +#, c-format +msgid "'%s' is not a field" +msgstr "%s no es un campo" + +#: cobc/parser.y:2338 cobc/typeck.c:10231 #, c-format msgid "invalid target for %s" msgstr "invalida objetivo para %s" -#: cobc/parser.y:2129 +#: cobc/parser.y:2347 #, fuzzy #| msgid "a constant may not be used here - '%s'" msgid "RENAMES item may not be used here" msgstr "una constante quizá no está utilizada aquí - «%s»" -#: cobc/parser.y:2131 cobc/typeck.c:2737 cobc/typeck.c:2828 +#: cobc/parser.y:2349 cobc/typeck.c:2822 cobc/typeck.c:2913 msgid "ANY LENGTH item not allowed here" msgstr "Elemento ANY LENGTH no permitido aquí" -#: cobc/parser.y:2135 +#: cobc/parser.y:2353 #, c-format msgid "item '%s' has wrong class for VALIDATE" msgstr "" -#: cobc/parser.y:2144 +#: cobc/parser.y:2362 #, fuzzy #| msgid "REDEFINES clause must follow entry-name" msgid "WHEN clause must follow EVERY clause" msgstr "Cláusula de REDEFINES debe seguir nombre de entrada" -#: cobc/parser.y:2229 cobc/parser.y:18631 +#: cobc/parser.y:2447 cobc/parser.y:19251 #, fuzzy #| msgid "integer value expected" msgid "non-zero value expected" msgstr "valor entero esperado" -#: cobc/parser.y:2235 cobc/tree.c:4735 +#: cobc/parser.y:2453 cobc/tree.c:4803 #, fuzzy, c-format #| msgid "RECORD size exceeds maximum allowed (%d)" msgid "RECORD size (IDX) exceeds maximum allowed (%d)" msgstr "RECORD de tamaño excede el máximo permitido (%d)" -#: cobc/parser.y:2239 cobc/tree.c:4739 +#: cobc/parser.y:2457 cobc/tree.c:4807 #, c-format msgid "RECORD size exceeds maximum allowed (%d)" msgstr "RECORD de tamaño excede el máximo permitido (%d)" -#: cobc/parser.y:2244 +#: cobc/parser.y:2462 msgid "RECORD clause invalid" msgstr "RECORD de cláusula no válido" -#: cobc/parser.y:3368 +#: cobc/parser.y:3595 msgid "multiple PROGRAM-ID's without matching END PROGRAM" msgstr "múltiples PROGRAM-ID sin coincidencia de END PROGRAM" -#: cobc/parser.y:3371 +#: cobc/parser.y:3598 msgid "executable requested but no program found" msgstr "ejecutable solicitado pero ningún programa encontrado" -#: cobc/parser.y:3488 +#: cobc/parser.y:3717 msgid "prototypes must be come before any program/function definitions" msgstr "" -#: cobc/parser.y:3691 +#: cobc/parser.y:3930 msgid "COMMON may only be used in a contained program" msgstr "COMÚN quizá solo es utilizado dentro de un programa contenido" -#: cobc/parser.y:3778 +#: cobc/parser.y:4017 msgid "CALL prototypes" msgstr "Prototipos CALL" -#: cobc/parser.y:3953 cobc/parser.y:4235 cobc/parser.y:4281 cobc/parser.y:4394 -#: cobc/parser.y:4608 cobc/parser.y:4705 cobc/parser.y:4744 cobc/parser.y:4803 -#: cobc/parser.y:4824 cobc/parser.y:4867 cobc/parser.y:4946 cobc/parser.y:4965 -#: cobc/parser.y:4981 cobc/parser.y:4999 cobc/parser.y:5017 cobc/parser.y:5034 -#: cobc/parser.y:5052 cobc/parser.y:7404 cobc/parser.y:8628 +#: cobc/parser.y:4192 cobc/parser.y:4471 cobc/parser.y:4517 cobc/parser.y:4632 +#: cobc/parser.y:4846 cobc/parser.y:4943 cobc/parser.y:4982 cobc/parser.y:5041 +#: cobc/parser.y:5062 cobc/parser.y:5105 cobc/parser.y:5184 cobc/parser.y:5203 +#: cobc/parser.y:5219 cobc/parser.y:5237 cobc/parser.y:5255 cobc/parser.y:5272 +#: cobc/parser.y:5290 cobc/parser.y:7685 cobc/parser.y:9028 #, c-format msgid "%s not allowed in nested programs" msgstr "%s no esta permitido en programas anidados" -#: cobc/parser.y:4109 +#: cobc/parser.y:4345 msgid "segment-number must be in range of values 1 to 49" msgstr "segmento-número debe estar dentro del rango de valores de 1 a 49" -#: cobc/parser.y:4121 +#: cobc/parser.y:4357 msgid "duplicate CLASSIFICATION clause" msgstr "duplica cláusula CLASSIFICATION" -#: cobc/parser.y:4200 +#: cobc/parser.y:4436 msgid "PROGRAM phrase" msgstr "PROGRAMA de frase" -#: cobc/parser.y:4302 cobc/parser.y:4313 cobc/parser.y:4657 +#: cobc/parser.y:4538 cobc/parser.y:4549 cobc/parser.y:4895 #, c-format msgid "invalid %s clause" msgstr "cláusula %s es inválida" -#: cobc/parser.y:4616 cobc/parser.y:4754 +#: cobc/parser.y:4854 cobc/parser.y:4992 #, fuzzy #| msgid "literal type does not match numeric data type" msgid "type does not match alphabet" msgstr "tipo literal no coincide con el tipo de datos numérico" -#: cobc/parser.y:4760 +#: cobc/parser.y:4998 #, fuzzy #| msgid "'%s' is not an alphabet-name" msgid "CLASS IS integer IN alphabet-name" msgstr "«%s» no es un nombre alfabético" -#: cobc/parser.y:4780 cobc/parser.y:4784 +#: cobc/parser.y:5018 cobc/parser.y:5022 msgid "CLASS literal with THRU must have size 1" msgstr "CLASS literal con THRU debe tener un tamaño de 1" -#: cobc/parser.y:4879 +#: cobc/parser.y:5117 msgid "separate currency symbol and currency string" msgstr "" -#: cobc/parser.y:4912 +#: cobc/parser.y:5150 #, c-format msgid "invalid CURRENCY SIGN '%s'" msgstr "invalida SIGNO MONETARIO «%s»" -#: cobc/parser.y:5139 +#: cobc/parser.y:5377 msgid "cannot use RELATIVE KEY clause on INDEXED files" msgstr "" -#: cobc/parser.y:5143 +#: cobc/parser.y:5381 msgid "cannot use RECORD KEY clause on RELATIVE files" msgstr "" -#: cobc/parser.y:5215 +#: cobc/parser.y:5453 msgid "EXTERNAL/DYNAMIC cannot be used with literals" msgstr "" -#: cobc/parser.y:5235 +#: cobc/parser.y:5473 msgid "EXTERNAL/DYNAMIC cannot be used with USING/VARYING" msgstr "" -#: cobc/parser.y:5246 +#: cobc/parser.y:5484 msgid "EXTERNAL/DYNAMIC cannot be used with DISK FROM" msgstr "" -#: cobc/parser.y:5248 -msgid "ASSIGN DISK FROM" -msgstr "" - -#: cobc/parser.y:5370 +#: cobc/parser.y:5608 msgid "ASSIGN EXTERNAL/DYNAMIC" msgstr "" -#: cobc/parser.y:5486 cobc/parser.y:5666 +#: cobc/parser.y:5724 cobc/parser.y:5921 #, c-format msgid "%s only valid with ORGANIZATION %s" msgstr "" -#: cobc/parser.y:5583 +#: cobc/parser.y:5818 cobc/typeck.c:3818 #, c-format msgid "'%s' is not an alphabet-name" msgstr "«%s» no es un nombre alfabético" -#: cobc/parser.y:5599 +#: cobc/parser.y:5854 msgid "VSAM status" msgstr "" -#: cobc/parser.y:5733 cobc/parser.y:5758 +#: cobc/parser.y:5988 cobc/parser.y:6013 #, fuzzy, c-format #| msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgid "RECORD DELIMITER %s only allowed with SEQUENTIAL files" msgstr "MODO DE RECORDATORIO U o S puede solo ser empleado con ficheros REGISTRO SECUENCIAL" -#: cobc/parser.y:5745 +#: cobc/parser.y:6000 #, fuzzy, c-format #| msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgid "RECORD DELIMITER %s only allowed with (LINE) SEQUENTIAL files" msgstr "MODO DE RECORDATORIO U o S puede solo ser empleado con ficheros REGISTRO SECUENCIAL" -#: cobc/parser.y:5751 +#: cobc/parser.y:6006 msgid "LINE-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5764 +#: cobc/parser.y:6019 msgid "BINARY-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5772 +#: cobc/parser.y:6027 #, fuzzy #| msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgid "RECORD DELIMITER clause only allowed with (LINE) SEQUENTIAL files" msgstr "MODO DE RECORDATORIO U o S puede solo ser empleado con ficheros REGISTRO SECUENCIAL" -#: cobc/parser.y:5776 +#: cobc/parser.y:6031 #, c-format msgid "RECORD DELIMITER %s not recognized; will be ignored" msgstr "" -#: cobc/parser.y:5814 +#: cobc/parser.y:6069 msgid "DUPLICATES for primary keys" msgstr "" -#: cobc/parser.y:6058 +#: cobc/parser.y:6313 msgid "DOS/VS APPLY phrase" msgstr "" -#: cobc/parser.y:6212 +#: cobc/parser.y:6467 msgid "RECORD description missing or invalid" msgstr "RECORD descrito faltante o no válido" -#: cobc/parser.y:6239 +#: cobc/parser.y:6494 #, fuzzy, c-format #| msgid "duplicate values in class '%s'" msgid "duplicate file description for %s" msgstr "valores duplicados en clase '%s'" -#: cobc/parser.y:6288 cobc/parser.y:6893 cobc/parser.y:7389 cobc/parser.y:13485 -#: cobc/parser.y:16686 +#: cobc/parser.y:6543 cobc/parser.y:7170 cobc/parser.y:7670 cobc/parser.y:13913 +#: cobc/parser.y:17210 #, c-format msgid "%s is invalid in a user FUNCTION" msgstr "%s es no válido en una FUNCIÓN de usuario" -#: cobc/parser.y:6326 cobc/parser.y:6336 +#: cobc/parser.y:6581 cobc/parser.y:6591 msgid "RECORD clause ignored for LINE SEQUENTIAL" msgstr "RECORD de cláusula ignorado para LINE SEQUENTIAL" -#: cobc/parser.y:6433 +#: cobc/parser.y:6688 msgid "LINAGE clause with wrong file type" msgstr "LINAGE de cláusula con tipo de fichero equivocado" -#: cobc/parser.y:6495 +#: cobc/parser.y:6750 msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgstr "MODO DE RECORDATORIO U o S puede solo ser empleado con ficheros REGISTRO SECUENCIAL" -#: cobc/parser.y:6532 +#: cobc/parser.y:6787 #, c-format msgid "ignoring CODE-SET '%s'" msgstr "ignorando CODE-SET «%s»" -#: cobc/parser.y:6541 +#: cobc/parser.y:6796 msgid "CODE-SET clause invalid for file type" msgstr "CODE-SET de cláusula invalidada por tipo de fichero" -#: cobc/parser.y:6562 +#: cobc/parser.y:6817 msgid "REPORT clause with wrong file type" msgstr "REPORT clausura con el tipo de fichero equivocado" -#: cobc/parser.y:6641 +#: cobc/parser.y:6899 msgid "CD record missing" msgstr "CD registrado ausente" -#: cobc/parser.y:7091 +#: cobc/parser.y:7372 msgid "CONSTANT item not at 01 level" msgstr "Ítem CONSTANTE no en el nivel 01" -#: cobc/parser.y:7236 +#: cobc/parser.y:7517 #, fuzzy #| msgid "REDEFINES clause must follow entry-name" msgid "REDEFINES clause not following entry-name" msgstr "Cláusula de REDEFINES debe seguir nombre de entrada" -#: cobc/parser.y:7309 cobc/parser.y:7339 cobc/parser.y:7381 cobc/parser.y:7470 -#: cobc/parser.y:8233 +#: cobc/parser.y:7590 cobc/parser.y:7620 cobc/parser.y:7662 cobc/parser.y:7751 +#: cobc/parser.y:8606 #, c-format msgid "%s only allowed at 01/77 level" msgstr "%s solamente permitido a nivel 01/77" -#: cobc/parser.y:7312 cobc/parser.y:7341 cobc/parser.y:7383 cobc/parser.y:8235 -#: cobc/parser.y:8587 cobc/parser.y:8609 +#: cobc/parser.y:7593 cobc/parser.y:7622 cobc/parser.y:7664 cobc/parser.y:8608 +#: cobc/parser.y:8987 cobc/parser.y:9009 #, c-format msgid "%s requires a data name" msgstr "%s requiere un nombre de datos" -#: cobc/parser.y:7316 cobc/parser.y:7565 +#: cobc/parser.y:7597 cobc/parser.y:7846 #, fuzzy, c-format #| msgid "%s not allowed on %s files" msgid "%s not allowed in %s" msgstr "%s no permitida en ficheros de %s" -#: cobc/parser.y:7337 cobc/parser.y:7391 cobc/parser.y:8231 cobc/parser.y:8583 -#: cobc/parser.y:8607 +#: cobc/parser.y:7618 cobc/parser.y:7672 cobc/parser.y:8604 cobc/parser.y:8983 +#: cobc/parser.y:9007 #, c-format msgid "%s not allowed here" msgstr "%s no se permite aquí" -#: cobc/parser.y:7528 +#: cobc/parser.y:7809 #, fuzzy, c-format #| msgid "%s FILE requires a FROM clause" msgid "%s requires DEPENDING clause" msgstr "FICHERO %s requiere una cláusula FROM" -#: cobc/parser.y:7544 +#: cobc/parser.y:7825 msgid "a locale-format PICTURE string must only consist of '9', '.', '+', 'Z' and the currency-sign" msgstr "" -#: cobc/parser.y:7554 +#: cobc/parser.y:7835 msgid "DEPENDING clause needs either an OCCURS clause or a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7560 +#: cobc/parser.y:7841 msgid "only USAGE DISPLAY may specify a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7610 cobc/typeck.c:4752 +#: cobc/parser.y:7893 cobc/typeck.c:4916 #, fuzzy, c-format #| msgid "'%s' is not a locale name" msgid "'%s' is not a locale-name" msgstr "«%s» no es un nombre local" -#: cobc/parser.y:7656 +#: cobc/parser.y:7939 #, fuzzy, c-format #| msgid "'%s' is not a valid data name" msgid "'%s' is not a valid USAGE" msgstr "«%s» no es un nombre válido de datos" -#: cobc/parser.y:7661 +#: cobc/parser.y:7944 #, fuzzy, c-format #| msgid "unknown failure: %d" msgid "unknown USAGE: %s" msgstr "fallo desconocido: %d" -#: cobc/parser.y:7808 +#: cobc/parser.y:8139 #, c-format msgid "unknown HANDLE type: %s" msgstr "" -#: cobc/parser.y:8082 +#: cobc/parser.y:8347 +#, fuzzy, c-format +#| msgid "'%s' is not USAGE DISPLAY" +msgid "'%s' is not USAGE UTF-8" +msgstr "«%s» no es USAGE DISPLAY" + +#: cobc/parser.y:8448 msgid "INDEXED should follow ASCENDING/DESCENDING" msgstr "INDEXED debería seguir ASCENDIENTE/DESCENDIENTE" -#: cobc/parser.y:8317 +#: cobc/parser.y:8658 cobc/parser.y:8660 +#, fuzzy, c-format +#| msgid "unexpected size: %d" +msgid "unexpected %s" +msgstr "tamaño inesperado: %d" + +#: cobc/parser.y:8709 msgid "amount of entries in FROM and TO must match" msgstr "" -#: cobc/parser.y:8326 +#: cobc/parser.y:8718 #, c-format msgid "entry in FROM (%d) must be <= entry in TO (%d)" msgstr "" -#: cobc/parser.y:8585 +#: cobc/parser.y:8985 #, fuzzy, c-format #| msgid "%s only allowed at 01/77 level" msgid "%s only allowed at 01 level" msgstr "%s solamente permitido a nivel 01/77" -#: cobc/parser.y:8589 cobc/parser.y:8611 +#: cobc/parser.y:8989 cobc/parser.y:9011 #, c-format msgid "%s and %s combination not allowed" msgstr "" -#: cobc/parser.y:8723 +#: cobc/parser.y:9127 msgid "GLOBAL is not allowed with RD" msgstr "GLOBAL no se permite con RD" -#: cobc/parser.y:9247 +#: cobc/parser.y:9650 #, fuzzy, c-format #| msgid "'%s' is not a field or file" msgid "%s is not valid for VARYING" msgstr "«%s» no es campo o fichero" -#: cobc/parser.y:9283 +#: cobc/parser.y:9686 msgid "LINE with OCCURS is not supported" msgstr "" -#: cobc/parser.y:9323 +#: cobc/parser.y:9726 msgid "PLUS is not recommended with LEFT, RIGHT or CENTER" msgstr "" -#: cobc/parser.y:9325 +#: cobc/parser.y:9728 #, fuzzy #| msgid "GLOBAL is not allowed with RD" msgid "PLUS is not allowed with LEFT, RIGHT or CENTER" msgstr "GLOBAL no se permite con RD" -#: cobc/parser.y:9363 +#: cobc/parser.y:9766 msgid "PLUS is ignored on first field of line" msgstr "" -#: cobc/parser.y:9394 +#: cobc/parser.y:9797 msgid "invalid COLUMN integer; must be > 0" msgstr "" -#: cobc/parser.y:9396 +#: cobc/parser.y:9799 msgid "COLUMN numbers should increase" msgstr "" -#: cobc/parser.y:9492 cobc/parser.y:9547 -msgid "INITIAL specified on non-input field" -msgstr "INITIAL especificado en campo no de entrada" - -#: cobc/parser.y:9504 cobc/parser.y:9559 -msgid "relative LINE/COLUMN clause required with OCCURS" -msgstr "clálusula LÍNEA/COLUMNA relativa requerida con OCURRENCIAS" - -#: cobc/parser.y:9661 cobc/parser.y:9665 +#: cobc/parser.y:9990 cobc/parser.y:9994 msgid "screen positions from data-item" msgstr "" -#: cobc/parser.y:9821 +#: cobc/parser.y:10153 #, fuzzy, c-format #| msgid "missing definitions:" msgid "missing %s" msgstr "definiciones ausentes:" -#: cobc/parser.y:10508 +#: cobc/parser.y:10840 #, fuzzy #| msgid "GLOBAL screen items" msgid "OCCURS screen items" msgstr "GLOBAL de elementos de pantalla" -#: cobc/parser.y:10520 +#: cobc/parser.y:10852 msgid "GLOBAL screen items" msgstr "GLOBAL de elementos de pantalla" -#: cobc/parser.y:10571 +#: cobc/parser.y:10904 msgid "overriding convention specified in ENTRY-CONVENTION" msgstr "sobrevalorando convención especificada en ENTRY-CONVENTION" -#: cobc/parser.y:10586 +#: cobc/parser.y:10917 msgid "executable program requested but PROCEDURE/ENTRY has USING clause" msgstr "programa ejecutable requerido pero PROCEDURE/ENTRY tiene cláusula USING" -#: cobc/parser.y:10654 cobc/parser.y:10671 cobc/parser.y:12278 +#: cobc/parser.y:10987 cobc/parser.y:11004 cobc/parser.y:12667 #, fuzzy, c-format #| msgid "number of parameters exceeds maximum %d" msgid "number of arguments exceeds maximum %d" msgstr "número de parámetros excede el máximo %d" -#: cobc/parser.y:10663 +#: cobc/parser.y:10996 msgid "CHAINING invalid in user FUNCTION" msgstr "CHAINING no válido en FUNCTION de usuario" -#: cobc/parser.y:10699 +#: cobc/parser.y:11032 msgid "ANY LENGTH items may only be BY REFERENCE formal parameters" msgstr "Elementos ANY LENGTH quizá solo está por parámetros formales referenciado por BY REFERENCE" -#: cobc/parser.y:10716 cobc/parser.y:12337 cobc/parser.y:12350 +#: cobc/parser.y:11049 cobc/parser.y:12728 cobc/parser.y:12741 #, c-format msgid "%s not allowed in CHAINED programs" msgstr "%s no es permitido en programa CHAINED" -#: cobc/parser.y:10718 +#: cobc/parser.y:11051 msgid "parameters passed BY VALUE" msgstr "parámetro pasado POR VALOR" -#: cobc/parser.y:10733 cobc/parser.y:10742 cobc/parser.y:10750 -#: cobc/parser.y:10771 +#: cobc/parser.y:11066 cobc/parser.y:11075 cobc/parser.y:11083 +#: cobc/parser.y:11104 msgid "SIZE only allowed for BY VALUE items" msgstr "SIZE solamente permitido para elementos BY VALUE" -#: cobc/parser.y:10773 cobc/parser.y:10798 +#: cobc/parser.y:11106 cobc/parser.y:11131 msgid "invalid value for SIZE" msgstr "valor inválido para TAMAÑO" -#: cobc/parser.y:10813 +#: cobc/parser.y:11146 msgid "MEMORY SIZE phrase in CALL statement" msgstr "" -#: cobc/parser.y:10825 +#: cobc/parser.y:11162 msgid "OPTIONAL only allowed for BY REFERENCE items" msgstr "OPTIONAL solo permitido para elementos BY REFERENCE" -#: cobc/parser.y:10837 +#: cobc/parser.y:11177 msgid "RETURNING clause is required for a FUNCTION" msgstr "DEVOLVIENDO cláusula es requerida para una FUNCTION" -#: cobc/parser.y:10843 +#: cobc/parser.y:11183 msgid "RETURNING clause cannot be OMITTED for main program" msgstr "DEVOLVIENDO cláusula no puede ser OMITIDA para programa principal" -#: cobc/parser.y:10846 +#: cobc/parser.y:11186 msgid "RETURNING clause cannot be OMITTED for a FUNCTION" msgstr "DEVOLVIENDO cláusula no puede ser OMITIDA para una FUNCTION" -#: cobc/parser.y:10859 +#: cobc/parser.y:11199 msgid "RETURNING item is not defined in LINKAGE SECTION" msgstr "DEVOLVIENDO ítem no está definido en LINKAGE SECTION" -#: cobc/parser.y:10861 +#: cobc/parser.y:11201 msgid "RETURNING item must have level 01" msgstr "DEVOLVIENDO ítem debe de tener un nivel 01" -#: cobc/parser.y:10863 +#: cobc/parser.y:11203 msgid "RETURNING item should not have OCCURS" msgstr "DEVOLVIENDO ítem no debería tomar OCURRENCIAS" -#: cobc/parser.y:10867 +#: cobc/parser.y:11207 msgid "function RETURNING item may not be ANY LENGTH" msgstr "función RETORNANDO ítem quizá no es CUALQUIER LONGITUD" -#: cobc/parser.y:11080 +#: cobc/parser.y:11421 #, c-format msgid "'%s' is not a statement" msgstr "«%s» no es una sentencia" -#: cobc/parser.y:11083 +#: cobc/parser.y:11424 #, c-format msgid "unknown statement '%s'; it may exist in another dialect" msgstr "declaración «%s» desconocida; quizá existe en otro dialecto" -#: cobc/parser.y:11087 +#: cobc/parser.y:11428 #, c-format msgid "unknown statement '%s'" msgstr "sentencia desconocida «%s»" -#: cobc/parser.y:11105 +#: cobc/parser.y:11446 msgid "SECTION segment-number must be less than or equal to 99" msgstr "Número-segmento SECCIÓN debe ser menor que o igual a 99" -#: cobc/parser.y:11108 +#: cobc/parser.y:11449 msgid "SECTION segment-number in DECLARATIVES must be less than 50" msgstr "Número-segmento SECTION dentro de DECLARATIVES deben ser menos de 50" -#: cobc/parser.y:11116 +#: cobc/parser.y:11457 msgid "SECTION segment within DECLARATIVES" msgstr "Segmento SECTION dentro de DECLARATIVES" -#: cobc/parser.y:11313 cobc/parser.y:11448 +#: cobc/parser.y:11667 cobc/parser.y:11806 msgid "non-standard ACCEPT" msgstr "no común para ACEPCIÓN" -#: cobc/parser.y:11325 +#: cobc/parser.y:11679 msgid "PROMPT clause" msgstr "Cláusula PROMPT" -#: cobc/parser.y:11329 +#: cobc/parser.y:11683 msgid "SIZE IS clause" msgstr "TAMAÑO de cláusula" -#: cobc/parser.y:11549 cobc/parser.y:11842 +#: cobc/parser.y:11907 cobc/parser.y:12226 msgid "TIME-OUT or BEFORE TIME clauses" msgstr "Cláusulas TIME-OUT o BEFORE TIME" -#: cobc/parser.y:11575 cobc/parser.y:11591 cobc/parser.y:11606 +#: cobc/parser.y:11937 cobc/parser.y:11960 cobc/parser.y:11978 msgid "AT screen-location" msgstr "AT de ubicación-pantalla" -#: cobc/parser.y:11607 +#: cobc/parser.y:11979 msgid "LINE or COLUMN" msgstr "LÍNEA o COLUMNA" -#: cobc/parser.y:11972 +#: cobc/parser.y:12358 msgid "ALLOCATE CHARACTERS requires RETURNING clause" msgstr "ALLOCATE CHARACTERS requiere cláusula DEVOLVIENDO" -#: cobc/parser.y:11987 cobc/parser.y:13289 +#: cobc/parser.y:12373 #, fuzzy, c-format #| msgid "ignoring sign" msgid "ignoring %s phrase" msgstr "ignorando signo" -#: cobc/parser.y:11989 +#: cobc/parser.y:12375 msgid "addressing mode should be either 24 or 31 bit" msgstr "" -#: cobc/parser.y:12061 +#: cobc/parser.y:12446 msgid "CALL to own PROGRAM-ID" msgstr "" -#: cobc/parser.y:12062 +#: cobc/parser.y:12447 #, fuzzy #| msgid "recursive program call - assuming RECURSIVE attribute" msgid "assuming RECURSIVE attribute" msgstr "llamada de programa recursivo - asumiendo atributo RECURSIVO" -#: cobc/parser.y:12082 +#: cobc/parser.y:12467 msgid "STATIC CALL convention ignored because of ON EXCEPTION" msgstr "" -#: cobc/parser.y:12091 +#: cobc/parser.y:12476 msgid "ON EXCEPTION ignored because of STATIC CALL" msgstr "" -#: cobc/parser.y:12205 cobc/typeck.c:13644 +#: cobc/parser.y:12594 cobc/typeck.c:14450 msgid "invalid mnemonic name" msgstr "nombre mnemónico inválido" -#: cobc/parser.y:12229 +#: cobc/parser.y:12618 msgid "id/literal ignored, using prototype name" msgstr "id/literal ignorado, utilizando nombre prototipado" -#: cobc/parser.y:12235 +#: cobc/parser.y:12624 msgid "NESTED phrase is only valid with literal" msgstr "ANIDACIÓN de frase es solo válida con literal" -#: cobc/parser.y:12296 +#: cobc/parser.y:12685 #, fuzzy, c-format #| msgid "OMITTED only allowed when parameters are passed BY REFERENCE" msgid "%s only allowed when arguments are passed %s" msgstr "OMITIDO solo permitido cuando parámetros son pasados POR REFERENCIA" -#: cobc/parser.y:12385 +#: cobc/parser.y:12776 msgid "RETURNING item must have level 01 or 77" msgstr "DEVOLVIENDO ítem debe tener un nivel 01 o 77" -#: cobc/parser.y:12389 +#: cobc/parser.y:12780 msgid "RETURNING item must be a LINKAGE SECTION item or have BASED clause" msgstr "DEVOLVIENDO ítem debe ser un ítem de LINKAGE SECTION o tener cláusula BASED" -#: cobc/parser.y:12423 cobc/parser.y:17409 cobc/parser.y:17464 +#: cobc/parser.y:12814 cobc/parser.y:17937 cobc/parser.y:18000 msgid "NOT EXCEPTION before EXCEPTION" msgstr "SIN EXCEPCIÓN tras EXCEPCIÓN" -#: cobc/parser.y:13162 +#: cobc/parser.y:13572 #, fuzzy, c-format #| msgid "HANDLE must be either a generic or a THREAD HANDLE" msgid "HANDLE must be a %s HANDLE" msgstr "HANDLE debe ser o un manipulador genérico o un THREAD HANDLE" -#: cobc/parser.y:13174 +#: cobc/parser.y:13584 #, fuzzy #| msgid "HANDLE must be either a generic or a THREAD HANDLE" msgid "HANDLE must be a generic HANDLE" msgstr "HANDLE debe ser o un manipulador genérico o un THREAD HANDLE" -#: cobc/parser.y:13251 +#: cobc/parser.y:13661 #, c-format msgid "HANDLE clause invalid for %s" msgstr "HANDLE de cláusula inválida para %s" -#: cobc/parser.y:13483 cobc/parser.y:16876 +#: cobc/parser.y:13911 cobc/parser.y:17400 #, c-format msgid "%s is invalid in nested program" msgstr "%s es no válido dentro de programas anidados" -#: cobc/parser.y:13521 cobc/parser.y:13564 cobc/parser.y:13575 -#: cobc/parser.y:13586 +#: cobc/parser.y:13940 cobc/parser.y:13983 cobc/parser.y:13994 +#: cobc/parser.y:14005 #, c-format msgid "maximum evaluate depth exceeded (%d)" msgstr "profundidad de evaluación máxima excedida (%d)" -#: cobc/parser.y:13627 cobc/parser.y:13637 +#: cobc/parser.y:14048 cobc/parser.y:14089 cobc/parser.y:14633 +#: cobc/parser.y:14644 cobc/parser.y:14653 cobc/parser.y:17959 +#: cobc/parser.y:17981 cobc/parser.y:18022 cobc/parser.y:18038 +#: cobc/parser.y:18078 cobc/parser.y:18095 cobc/parser.y:18132 +#: cobc/parser.y:18149 cobc/parser.y:18199 cobc/parser.y:18216 +#: cobc/parser.y:18252 cobc/parser.y:18269 cobc/parser.y:18310 +#: cobc/parser.y:18327 +#, fuzzy, c-format +#| msgid "'%s' is not a statement" +msgid "%s without imperative statement" +msgstr "«%s» no es una sentencia" + +#: cobc/parser.y:14056 cobc/parser.y:14066 msgid "WHEN without imperative statement" msgstr "" -#: cobc/parser.y:13655 cobc/parser.y:13665 +#: cobc/parser.y:14097 cobc/parser.y:14107 msgid "WHEN OTHER without imperative statement" msgstr "" -#: cobc/parser.y:13745 +#: cobc/parser.y:14191 msgid "invalid THROUGH usage" msgstr "inválido A TRAVÉS DE utilización" -#: cobc/parser.y:13909 +#: cobc/parser.y:14372 msgid "EXIT PROGRAM is not allowed within a USE GLOBAL procedure" msgstr "SALIR PROGRAMA no está permitido dentro de procedimiento de USE GLOBAL" -#: cobc/parser.y:13913 +#: cobc/parser.y:14376 msgid "EXIT PROGRAM not allowed within a FUNCTION" msgstr "SALIR PROGRAMA no está permitido dentro de una FUNCIÓN" -#: cobc/parser.y:13927 +#: cobc/parser.y:14390 msgid "EXIT FUNCTION is not allowed within a USE GLOBAL procedure" msgstr "EXIT FUNCTION no es permitido dentro de procedimiento de USE GLOBAL" -#: cobc/parser.y:13931 +#: cobc/parser.y:14394 msgid "EXIT FUNCTION only allowed within a FUNCTION" msgstr "EXIT FUNCTION solamente permitido dentro de una FUNCTION" -#: cobc/parser.y:13945 cobc/parser.y:13968 +#: cobc/parser.y:14408 cobc/parser.y:14431 msgid "EXIT PERFORM is only valid with inline PERFORM" msgstr "EXIT PERFORM es solamente válido con PERFORM aliniada" -#: cobc/parser.y:13990 +#: cobc/parser.y:14453 msgid "EXIT SECTION is only valid with an active SECTION" msgstr "SALIR SECCIÓN es solamente válido dentro de SECCIÓN activa" -#: cobc/parser.y:14011 +#: cobc/parser.y:14474 msgid "EXIT PARAGRAPH is only valid with an active PARAGRAPH" msgstr "EXIT PARAGRAPH es solamente válido dentro de PARAGRAPH activo" -#: cobc/parser.y:14034 +#: cobc/parser.y:14497 #, fuzzy #| msgid "RETURNING/GIVING not allowed for non-returning sources" msgid "RETURNING/GIVING not allowed for non-returning runtime elements" msgstr "RETORNANDO/DANDO no permitido para fuentes no devueltas" -#: cobc/parser.y:14166 +#: cobc/parser.y:14640 msgid "IF without imperative statement" msgstr "" -#: cobc/parser.y:14497 cobc/parser.y:14506 +#: cobc/parser.y:14983 cobc/parser.y:14992 msgid "single-character literal or data item expected" msgstr "" -#: cobc/parser.y:14524 +#: cobc/parser.y:15010 msgid "TALLYING clause is incomplete" msgstr "TALLYING de cláusula está incompleta" -#: cobc/parser.y:14640 +#: cobc/parser.y:15126 msgid "INSPECT missing ALL/FIRST/LEADING/TRAILING" msgstr "INSPECCIÓN ausente TODO/TIRADOR/ARRASTRE" -#: cobc/parser.y:14902 +#: cobc/parser.y:15390 msgid "LOCK clauses" msgstr "CANDADO de cláusula" -#: cobc/parser.y:15059 +#: cobc/parser.y:15547 msgid "inline PERFORM without imperative statement" msgstr "" -#: cobc/parser.y:15180 cobc/parser.y:15188 cobc/parser.y:15196 +#: cobc/parser.y:15670 cobc/parser.y:15678 cobc/parser.y:15686 #, c-format msgid "PERFORM VARYING '%s' (line %d of %s) is not a numeric field" msgstr "" -#: cobc/parser.y:15212 +#: cobc/parser.y:15702 #, fuzzy #| msgid "ODO without TO phrase" msgid "PERFORM VARYING without BY phrase" msgstr "ODO sin frase TO" -#: cobc/parser.y:15252 +#: cobc/parser.y:15742 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "'%s' is not an object-reference" msgstr "«%s» no es un entero" -#: cobc/parser.y:15292 cobc/typeck.c:12295 cobc/typeck.c:13552 +#: cobc/parser.y:15782 cobc/typeck.c:13066 cobc/typeck.c:14358 msgid "LOCK clause invalid with file LOCK AUTOMATIC" msgstr "CANDADO de cláusula no válida con fichero CANDADO AUTOMÁTICO" -#: cobc/parser.y:15297 +#: cobc/parser.y:15787 msgid "KEY clause invalid with this file type" msgstr "LLAVE de cláusula no válida con este tipo de fichero" -#: cobc/parser.y:15302 cobc/typeck.c:12291 cobc/typeck.c:13548 +#: cobc/parser.y:15792 cobc/typeck.c:13062 cobc/typeck.c:14354 msgid "INVALID KEY clause invalid with this file type" msgstr "INVALID KEY de cláusula no válida con este tipo de fichero" -#: cobc/parser.y:15986 -msgid "file sort requires KEY phrase" +#: cobc/parser.y:16494 +#, fuzzy +#| msgid "file sort requires KEY phrase" +msgid "MERGE requires KEY phrase" +msgstr "ordenación de fichero requiere frase KEY" + +#: cobc/parser.y:16498 +#, fuzzy +#| msgid "file sort requires KEY phrase" +msgid "file SORT requires KEY phrase" msgstr "ordenación de fichero requiere frase KEY" -#: cobc/parser.y:16010 +#: cobc/parser.y:16522 #, fuzzy #| msgid "file sort requires KEY phrase" msgid "table SORT requires KEY phrase" msgstr "ordenación de fichero requiere frase KEY" -#: cobc/parser.y:16072 -msgid "file sort requires USING or INPUT PROCEDURE" +#: cobc/parser.y:16527 +#, fuzzy +#| msgid "'%s' is not a file name" +msgid "must be an SD filename" +msgstr "«%s» no es nombre de fichero" + +#: cobc/parser.y:16585 +msgid "MERGE requires USING files" +msgstr "" + +#: cobc/parser.y:16587 +#, fuzzy +#| msgid "file sort requires USING or INPUT PROCEDURE" +msgid "file SORT requires USING or INPUT PROCEDURE" msgstr "ordenación de fichero requiere USING o INPUT PROCEDURE" -#: cobc/parser.y:16079 +#: cobc/parser.y:16595 msgid "USING invalid with table SORT" msgstr "USING no válido con tabla de SORT" -#: cobc/parser.y:16089 +#: cobc/parser.y:16605 msgid "INPUT PROCEDURE invalid with table SORT" msgstr "INPUT PROCEDURE no válido con tabla de SORT" -#: cobc/parser.y:16091 +#: cobc/parser.y:16607 msgid "INPUT PROCEDURE invalid with MERGE" msgstr "INPUT PROCEDURE no válido con MERGE" -#: cobc/parser.y:16104 -msgid "file sort requires GIVING or OUTPUT PROCEDURE" +#: cobc/parser.y:16621 +#, fuzzy +#| msgid "file sort requires GIVING or OUTPUT PROCEDURE" +msgid "MERGE requires GIVING or OUTPUT PROCEDURE" +msgstr "ordenación de fichero requiere GIVING o OUTPUT PROCEDURE" + +#: cobc/parser.y:16623 +#, fuzzy +#| msgid "file sort requires GIVING or OUTPUT PROCEDURE" +msgid "file SORT requires GIVING or OUTPUT PROCEDURE" msgstr "ordenación de fichero requiere GIVING o OUTPUT PROCEDURE" -#: cobc/parser.y:16111 +#: cobc/parser.y:16631 msgid "GIVING invalid with table SORT" msgstr "DEVOLUCIÓN inválido con tabla SORT" -#: cobc/parser.y:16121 +#: cobc/parser.y:16641 msgid "OUTPUT PROCEDURE invalid with table SORT" msgstr "OUTPUT PROCEDURE no válido con tabla de SORT" -#: cobc/parser.y:16148 +#: cobc/parser.y:16668 msgid "SIZE/LENGTH invalid here" msgstr "SIZE/LENGTH no válido aquí" -#: cobc/parser.y:16197 +#: cobc/parser.y:16717 msgid "NOT EQUAL condition not allowed on START statement" msgstr "NO IGUAL condicionada no permitida sobre declaración INICIAL" -#: cobc/parser.y:16255 +#: cobc/parser.y:16776 #, c-format msgid "%s is replaced by %s" msgstr "%s es sustituido por %s" -#: cobc/parser.y:16304 +#: cobc/parser.y:16825 msgid "STOP literal" msgstr "DETENCIÓN literal" -#: cobc/parser.y:16308 +#: cobc/parser.y:16829 msgid "STOP identifier" msgstr "DETENCIÓN de identificador" -#: cobc/parser.y:16446 +#: cobc/parser.y:16969 msgid "SUPPRESS statement must be within DECLARATIVES" msgstr "Declaración SUPRIMIDA debe estar dentro de DECLARATIVAS" -#: cobc/parser.y:16520 -msgid "UNLOCK invalid for SORT files" +#: cobc/parser.y:17043 +#, fuzzy +#| msgid "UNLOCK invalid for SORT files" +msgid "UNLOCK invalid for SD files" msgstr "DESBLOQUEO no válido en ficheros SORT" -#: cobc/parser.y:16656 cobc/parser.y:16736 +#: cobc/parser.y:17180 cobc/parser.y:17260 msgid "USE statement must be within DECLARATIVES" msgstr "Declaración de USE debe de estar dentro de DECLARATIVOS" -#: cobc/parser.y:16658 +#: cobc/parser.y:17182 msgid "SECTION header missing before USE statement" msgstr "SECTION de cabecera ausente antes de declaración de USE" -#: cobc/parser.y:16738 +#: cobc/parser.y:17262 msgid "USE DEBUGGING not supported in contained program" msgstr "USE DEBUGGING no apoyado en contenidos del programa" -#: cobc/parser.y:16786 cobc/parser.y:16795 cobc/parser.y:16813 -#: cobc/parser.y:16849 cobc/typeck.c:4886 +#: cobc/parser.y:17310 cobc/parser.y:17319 cobc/parser.y:17337 +#: cobc/parser.y:17373 cobc/typeck.c:5050 #, fuzzy, c-format #| msgid "duplicate DEFINE directive '%s'" msgid "duplicate DEBUGGING target: '%s'" msgstr "directiva DEFINE duplicada «%s»" -#: cobc/parser.y:16811 +#: cobc/parser.y:17335 #, fuzzy #| msgid "a constant may not be used here - '%s'" msgid "constant item cannot be used here" msgstr "una constante quizá no está utilizada aquí - «%s»" -#: cobc/parser.y:16837 +#: cobc/parser.y:17361 msgid "duplicate USE DEBUGGING ON ALL PROCEDURES" msgstr "duplicado EMPLEAR DEPURACIÓN EN TODOS LOS PROCEDIMIENTOS" -#: cobc/parser.y:17089 +#: cobc/parser.y:17614 msgid "ENCODING clause must come before XML-DECLARATION" msgstr "" -#: cobc/parser.y:17091 +#: cobc/parser.y:17616 msgid "ENCODING clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17094 +#: cobc/parser.y:17619 msgid "XML GENERATE ENCODING clause" msgstr "" -#: cobc/parser.y:17101 +#: cobc/parser.y:17626 msgid "XML-DECLARATION clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17104 +#: cobc/parser.y:17629 msgid "XML GENERATE XML-DECLARATION clause" msgstr "" -#: cobc/parser.y:17110 +#: cobc/parser.y:17635 msgid "XML GENERATE WITH ATTRIBUTES clause" msgstr "" -#: cobc/parser.y:17123 +#: cobc/parser.y:17648 msgid "XML GENERATE NAMESPACE clause" msgstr "" -#: cobc/parser.y:17147 +#: cobc/parser.y:17672 msgid "XML GENERATE NAME OF clause" msgstr "" -#: cobc/parser.y:17211 +#: cobc/parser.y:17736 msgid "XML GENERATE TYPE OF clause" msgstr "" -#: cobc/parser.y:17252 +#: cobc/parser.y:17777 msgid "XML GENERATE SUPPRESS clause" msgstr "" -#: cobc/parser.y:17392 +#: cobc/parser.y:17920 #, fuzzy, c-format #| msgid "'%s' is not a locale name" msgid "'%s' is not a schema name" msgstr "«%s» no es un nombre local" -#: cobc/parser.y:17510 +#: cobc/parser.y:18055 msgid "NOT SIZE ERROR before SIZE ERROR" msgstr "SIN TAMAÑO ERRÓNEO antes de TAMAÑO ERRÓNEO" -#: cobc/parser.y:17556 +#: cobc/parser.y:18109 msgid "NOT OVERFLOW before OVERFLOW" msgstr "NO DESBORDADO antes de DESBORDAMIENTO" -#: cobc/parser.y:17655 +#: cobc/parser.y:18161 cobc/parser.y:18176 +#, fuzzy +#| msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" +msgid "NOT AT END before AT END" +msgstr "NO A FIN-DE-PÁGINA antes que A FIN-DE-PÁGINA" + +#: cobc/parser.y:18229 msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" msgstr "NO A FIN-DE-PÁGINA antes que A FIN-DE-PÁGINA" -#: cobc/parser.y:17705 +#: cobc/parser.y:18287 msgid "NOT INVALID KEY before INVALID KEY" msgstr "CLAVE NO INVÁLIDA antes de CLAVE INVÁLIDA" -#: cobc/parser.y:18048 +#: cobc/parser.y:18644 msgid "LINAGE-COUNTER must be qualified here" msgstr "LINAGE-COUNTER debe ser calificado aquí" -#: cobc/parser.y:18051 +#: cobc/parser.y:18647 msgid "invalid LINAGE-COUNTER usage" msgstr "empleo no válido de LINAGE-COUNTER" -#: cobc/parser.y:18062 cobc/parser.y:18158 cobc/parser.y:18247 +#: cobc/parser.y:18658 cobc/parser.y:18754 cobc/parser.y:18843 #, c-format msgid "'%s' is not a file name" msgstr "«%s» no es nombre de fichero" -#: cobc/parser.y:18072 +#: cobc/parser.y:18668 msgid "LINE-COUNTER must be qualified here" msgstr "LINE-COUNTER debe ser calificado aquí" -#: cobc/parser.y:18076 +#: cobc/parser.y:18672 msgid "invalid LINE-COUNTER usage" msgstr "empleo no válido de LINE-COUNTER" -#: cobc/parser.y:18087 cobc/parser.y:18112 +#: cobc/parser.y:18683 cobc/parser.y:18708 #, c-format msgid "'%s' is not a report name" msgstr "«%s» no es un nombre de boletín" -#: cobc/parser.y:18097 +#: cobc/parser.y:18693 msgid "PAGE-COUNTER must be qualified here" msgstr "CONTADOR-PAGINADO debe ser cualificado aquí" -#: cobc/parser.y:18101 +#: cobc/parser.y:18697 msgid "invalid PAGE-COUNTER usage" msgstr "empleo no válido de PAGE-COUNTER" -#: cobc/parser.y:18148 cobc/typeck.c:12256 cobc/typeck.c:12339 -#: cobc/typeck.c:13516 +#: cobc/parser.y:18744 cobc/typeck.c:13027 cobc/typeck.c:13110 +#: cobc/typeck.c:14322 #, c-format msgid "%s requires a record name as subject" msgstr "%s requiere un nombre de registro como sujeto" -#: cobc/parser.y:18175 +#: cobc/parser.y:18771 #, c-format msgid "'%s' not indexed" msgstr "«%s» no indexado" -#: cobc/parser.y:18180 +#: cobc/parser.y:18776 #, fuzzy #| msgid "file sort requires KEY phrase" msgid "SEARCH ALL requires KEY phrase" msgstr "ordenación de fichero requiere frase KEY" -#: cobc/parser.y:18204 cobc/parser.y:18229 +#: cobc/parser.y:18800 cobc/parser.y:18825 #, c-format msgid "multiple reference to '%s' " msgstr "múltiples referencias para «%s» " -#: cobc/parser.y:18259 +#: cobc/parser.y:18855 #, c-format msgid "'%s' is not a CD name" msgstr "«%s» no es nombre de CD" -#: cobc/parser.y:18273 +#: cobc/parser.y:18869 #, fuzzy, c-format #| msgid "'%s' is not a report name" msgid "'%s' is not a valid report name" msgstr "«%s» no es un nombre de boletín" -#: cobc/parser.y:18526 +#: cobc/parser.y:19134 msgid "invalid mnemonic identifier" msgstr "identificador mnemónico inválido" -#: cobc/parser.y:18606 +#: cobc/parser.y:19214 +#, fuzzy +#| msgid "alphanumeric value is expected" +msgid "an alphanumeric literal is expected here" +msgstr "valor alfanumérico es esperado" + +#: cobc/parser.y:19226 #, fuzzy #| msgid "a non-numeric literal is expected for '%s'" msgid "a numeric literal is expected here" msgstr "un literal no numérico está esperado para «%s»" -#: cobc/parser.y:18618 cobc/parser.y:19366 +#: cobc/parser.y:19238 cobc/parser.y:19979 #, fuzzy #| msgid "a non-numeric literal is expected for '%s'" msgid "a non-numeric literal is expected here" msgstr "un literal no numérico está esperado para «%s»" -#: cobc/parser.y:18784 cobc/typeck.c:7302 cobc/typeck.c:7309 +#: cobc/parser.y:19404 cobc/typeck.c:993 cobc/typeck.c:4825 cobc/typeck.c:7679 +#: cobc/typeck.c:7686 #, c-format msgid "'%s' is not numeric" msgstr "«%s» no es numérico" -#: cobc/parser.y:18800 +#: cobc/parser.y:19420 #, c-format msgid "'%s' is not a field or file" -msgstr "«%s» no es campo o fichero" - -#: cobc/parser.y:18820 cobc/parser.y:18859 cobc/parser.y:18935 -#, c-format -msgid "'%s' is not a field" -msgstr "%s no es un campo" +msgstr "«%s» no es campo o fichero" -#: cobc/parser.y:18841 +#: cobc/parser.y:19446 #, fuzzy, c-format #| msgid "'%s' is not a file name" msgid "'%s' is not a type-name" msgstr "«%s» no es nombre de fichero" -#: cobc/parser.y:18927 cobc/typeck.c:2328 cobc/typeck.c:2407 +#: cobc/parser.y:19526 cobc/typeck.c:2345 cobc/typeck.c:2401 cobc/typeck.c:2550 #, c-format msgid "'%s' cannot be reference modified" msgstr "«%s» no puede ser modificado por referencia" -#: cobc/parser.y:19015 +#: cobc/parser.y:19627 #, fuzzy, c-format #| msgid "'%s' is not a field or file" msgid "'%s' is not a field or alphabet" msgstr "«%s» no es campo o fichero" -#: cobc/parser.y:19041 +#: cobc/parser.y:19653 #, fuzzy #| msgid "'%s' cannot be used here" msgid "a subscripted data-item cannot be used here" msgstr "«%s» no puede ser empleado aquí" -#: cobc/parser.y:19089 +#: cobc/parser.y:19701 #, fuzzy #| msgid "unsigned positive integer value expected" msgid "unsigned integer value expected" msgstr "esperado valor positivo sin signo" -#: cobc/parser.y:19101 cobc/parser.y:19105 cobc/parser.y:19155 +#: cobc/parser.y:19713 cobc/parser.y:19717 cobc/parser.y:19767 msgid "integer value expected" msgstr "valor entero esperado" -#: cobc/parser.y:19110 +#: cobc/parser.y:19722 msgid "invalid symbolic integer" msgstr "entero simbólico inválido" -#: cobc/parser.y:19126 cobc/parser.y:19130 +#: cobc/parser.y:19738 cobc/parser.y:19742 msgid "unsigned positive integer value expected" msgstr "esperado valor positivo sin signo" -#: cobc/parser.y:19159 -msgid "invalid CLASS value" -msgstr "valor CLASS inválido" +#: cobc/parser.y:19772 +#, c-format +msgid "CLASS value %d outside of range for the used character set" +msgstr "" -#: cobc/parser.y:19246 +#: cobc/parser.y:19859 msgid "PHYSICAL argument for LENGTH functions" msgstr "" -#: cobc/parser.y:19418 cobc/parser.y:19435 +#: cobc/parser.y:20031 cobc/parser.y:20048 msgid "cannot specify offset and SYSTEM-OFFSET at the same time" msgstr "no puede especificar desplazamiento y DESPLAZAMIENTO-SISTEMA al mismo tiempo" -#: cobc/parser.y:19702 cobc/parser.y:19711 cobc/parser.y:19721 -#: cobc/parser.y:19731 cobc/parser.y:19751 cobc/parser.y:19771 -#: cobc/parser.y:19777 +#: cobc/parser.y:20228 +msgid "terminator" +msgstr "" + +#: cobc/parser.y:20317 cobc/parser.y:20327 cobc/parser.y:20338 +#: cobc/parser.y:20348 cobc/parser.y:20369 cobc/parser.y:20389 +#: cobc/parser.y:20396 msgid "optional period" msgstr "" -#: cobc/pplex.l:257 cobc/pplex.l:2219 cobc/pplex.l:2233 +#: cobc/pplex.l:261 cobc/pplex.l:2448 cobc/pplex.l:2462 msgid "debugging indicator" msgstr "depurando indicador" -#: cobc/pplex.l:334 +#: cobc/pplex.l:348 msgid "ignoring empty directive" msgstr "ignorando directiva vacía" -#: cobc/pplex.l:344 cobc/pplex.l:411 +#: cobc/pplex.l:358 cobc/pplex.l:431 #, c-format msgid "ignoring invalid directive: '%s'" msgstr "ignorando directiva inválida: «%s»" -#: cobc/pplex.l:351 +#: cobc/pplex.l:365 msgid "ignoring invalid directive" msgstr "ignorando directiva inválida" -#: cobc/pplex.l:358 +#: cobc/pplex.l:372 msgid "VCS directive" msgstr "Directiva VCS" -#: cobc/pplex.l:420 cobc/pplex.l:441 +#: cobc/pplex.l:440 cobc/pplex.l:461 #, fuzzy, c-format #| msgid "ignoring invalid directive: '%s'" msgid "ignoring unknown directive: '%s'" msgstr "ignorando directiva inválida: «%s»" -#: cobc/pplex.l:1065 +#: cobc/pplex.l:1164 msgid "IF/ELIF/ELSE directive without matching END-IF" msgstr "Directiva IF/ELIF/ELSE sin END-IF acompañado" -#: cobc/pplex.l:1409 +#: cobc/pplex.l:1332 +msgid "free format detected" +msgstr "" + +#: cobc/pplex.l:1608 #, c-format msgid "copybook not found in library '%s', library-name ignored" msgstr "" -#: cobc/pplex.l:1469 +#: cobc/pplex.l:1667 #, fuzzy, c-format #| msgid "ignoring invalid directive: '%s'" msgid "ignoring %s directive because of %s" msgstr "ignorando directiva inválida: «%s»" -#: cobc/pplex.l:1645 +#: cobc/pplex.l:1854 #, c-format msgid "directive nest depth exceeded: %d" msgstr "profundidad excedida del nido directivo: %d" -#: cobc/pplex.l:1663 +#: cobc/pplex.l:1872 msgid "ELSE directive without matching IF/ELIF" msgstr "Directiva ELSE sin IF/ELIF acompañados" -#: cobc/pplex.l:1679 +#: cobc/pplex.l:1888 msgid "END-IF directive without matching IF/ELIF/ELSE" msgstr "Directiva END-IF sin IF/ELIF/ELSE acompañados" -#: cobc/pplex.l:1695 +#: cobc/pplex.l:1904 msgid "ELIF directive without matching IF/ELIF" msgstr "Directiva ELIF sin IF/ELIF acompañados" -#: cobc/pplex.l:1717 +#: cobc/pplex.l:1926 #, c-format msgid "invalid internal case: %u" msgstr "caso interno invalido: %u" -#: cobc/pplex.l:1914 +#: cobc/pplex.l:2139 msgid "buffer overrun - too many continuation lines" msgstr "desbordamiento de búfer - demasiadas líneas continuadas" -#: cobc/pplex.l:2009 cobc/pplex.l:2019 +#: cobc/pplex.l:2236 cobc/pplex.l:2246 msgid "line not terminated by a newline" msgstr "línea no terminado por una línea nueva" -#: cobc/pplex.l:2013 cobc/pplex.l:2023 +#: cobc/pplex.l:2240 cobc/pplex.l:2250 #, c-format msgid "source text exceeds %d bytes, will be truncated" msgstr "texto origen excede %d bytes, será truncado" -#: cobc/pplex.l:2042 +#: cobc/pplex.l:2269 msgid "version control conflict marker in file" msgstr "" -#: cobc/pplex.l:2194 +#: cobc/pplex.l:2423 msgid "invalid continuation in comment entry" msgstr "continuación inválida dentro de registro comentado" -#: cobc/pplex.l:2241 +#: cobc/pplex.l:2470 #, fuzzy, c-format #| msgid "invalid indicator '%c' at column 7" msgid "invalid indicator '\\' at column %d" msgstr "indicador «%c» inválido en columna 7" -#: cobc/pplex.l:2253 +#: cobc/pplex.l:2482 #, fuzzy, c-format #| msgid "invalid indicator '%c' at column 7" msgid "invalid indicator '%c' at column %d" msgstr "indicador «%c» inválido en columna 7" -#: cobc/pplex.l:2312 cobc/pplex.l:2323 +#: cobc/pplex.l:2541 cobc/pplex.l:2552 msgid "invalid line continuation" msgstr "continuación de línea inválida" -#: cobc/pplex.l:2331 +#: cobc/pplex.l:2560 msgid "continuation character expected" msgstr "continuación de carácter esperado" -#: cobc/pplex.l:2399 +#: cobc/pplex.l:2628 #, c-format msgid "source text after program-text area (column %d)" msgstr "texto origen tras área de texto-programa (columna %d)" -#: cobc/ppparse.y:107 +#: cobc/ppparse.y:102 cobc/ppparse.y:106 +msgid "partial replacing with literal" +msgstr "" + +#: cobc/ppparse.y:109 msgid "unexpected COBOL word in partial replacement phrase" msgstr "" -#: cobc/ppparse.y:256 +#: cobc/ppparse.y:176 +#, fuzzy +#| msgid "invalid national literal" +msgid "invalid partial replacing operand" +msgstr "nacional literal inválido" + +#: cobc/ppparse.y:291 msgid "directive comparison on different types" msgstr "directriz comparativa sobre tipos diferentes" -#: cobc/ppparse.y:324 +#: cobc/ppparse.y:359 #, c-format msgid "duplicate DEFINE directive '%s'" msgstr "directiva DEFINE duplicada «%s»" -#: cobc/ppparse.y:331 cobc/ppparse.y:341 +#: cobc/ppparse.y:366 cobc/ppparse.y:376 #, fuzzy, c-format #| msgid "invalid constant in DEFINE directive" msgid "invalid constant %s in DEFINE directive" msgstr "constante invalida dentro de directiva DEFINE" -#: cobc/ppparse.y:439 +#: cobc/ppparse.y:474 #, c-format msgid "compiler flag '%s' unknown" msgstr "" -#: cobc/ppparse.y:486 +#: cobc/ppparse.y:521 #, fuzzy, c-format #| msgid "invalid %s directive" msgid "invalid %s directive option '%s'" msgstr "invalida %s directiva" -#: cobc/ppparse.y:488 +#: cobc/ppparse.y:523 #, fuzzy, c-format #| msgid "invalid %s directive" msgid "invalid %s directive option" msgstr "invalida %s directiva" -#: cobc/ppparse.y:839 cobc/ppparse.y:848 cobc/ppparse.y:1258 +#: cobc/ppparse.y:875 cobc/ppparse.y:884 cobc/ppparse.y:1294 #, c-format msgid "invalid %s directive" msgstr "invalida %s directiva" -#: cobc/ppparse.y:1330 +#: cobc/ppparse.y:1366 msgid "LEAP-SECOND ON directive" msgstr "LEAP-SECOND ON de directiva" -#: cobc/ppparse.y:1439 cobc/ppparse.y:1471 +#: cobc/ppparse.y:1475 cobc/ppparse.y:1507 msgid "invalid constant" msgstr "constante inválida" -#: cobc/reserved.c:4012 +#: cobc/reserved.c:4029 msgid "device name" msgstr "nombre de disponitivo" -#: cobc/reserved.c:4015 +#: cobc/reserved.c:4032 msgid "switch name" msgstr "nombre intercambiado" -#: cobc/reserved.c:4018 +#: cobc/reserved.c:4035 msgid "feature name" msgstr "nombre de característica" -#: cobc/reserved.c:4129 +#: cobc/reserved.c:4146 #, fuzzy, c-format #| msgid "reserved word must have less than %d characters" msgid "reserved word (%s) must have less than %d characters" msgstr "palabra reservada debe tener menos que %d caracteres" -#: cobc/reserved.c:4149 +#: cobc/reserved.c:4166 #, fuzzy, c-format #| msgid "should not contain '%c'" msgid "reserved word (%s) may not contain '%c'" msgstr "debería no contener «%c»" -#: cobc/reserved.c:4166 +#: cobc/reserved.c:4183 msgid "ignored asterisk at end of alias target" msgstr "ignorado asterisco al final de alias objetivo" -#: cobc/reserved.c:4229 +#: cobc/reserved.c:4248 #, c-format msgid "alias target '%s' is not a default reserved word" msgstr "objetivo alias «%s» no es una palabra reservada predeterminada" -#: cobc/reserved.c:4719 +#: cobc/reserved.c:4738 #, c-format msgid "invalid system-name '%s'" msgstr "nombre-módulo inválido «%s»" -#: cobc/reserved.c:4883 +#: cobc/reserved.c:4902 #, c-format msgid "'%s' is a reserved word, but isn't supported" msgstr "«%s» es una palabra reservada, pero no es compatible" -#: cobc/reserved.c:4988 +#: cobc/reserved.c:5005 #, c-format msgid "intrinsic function %s is unknown" msgstr "función %s intrínseca no es conocida" -#: cobc/reserved.c:5016 +#: cobc/reserved.c:5033 msgid "Intrinsic Function" msgstr "Función Intrínseca" -#: cobc/reserved.c:5016 cobc/reserved.c:5249 cobc/reserved.c:5386 +#: cobc/reserved.c:5033 cobc/reserved.c:5266 cobc/reserved.c:5403 msgid "Implemented" msgstr "Implementado" -#: cobc/reserved.c:5016 cobc/typeck.c:1163 +#: cobc/reserved.c:5033 cobc/typeck.c:1178 msgid "Parameters" msgstr "Parámetros" -#: cobc/reserved.c:5020 cobc/reserved.c:5253 cobc/reserved.c:5400 -#: cobc/reserved.c:5406 +#: cobc/reserved.c:5037 cobc/reserved.c:5270 cobc/reserved.c:5417 +#: cobc/reserved.c:5423 msgid "Yes" msgstr "Sí" -#: cobc/reserved.c:5023 cobc/reserved.c:5256 cobc/reserved.c:5410 +#: cobc/reserved.c:5040 cobc/reserved.c:5273 cobc/reserved.c:5427 msgid "No" msgstr "No" -#: cobc/reserved.c:5029 +#: cobc/reserved.c:5046 msgid "Unlimited" msgstr "Ilimitado" -#: cobc/reserved.c:5046 +#: cobc/reserved.c:5063 msgid "Exception Name" msgstr "" -#: cobc/reserved.c:5148 +#: cobc/reserved.c:5165 #, fuzzy, c-format #| msgid "special register %s is unknown, needs a defintion" msgid "special register '%s' is unknown, needs a definition" msgstr "registro especial %s es desconocido, requiere una definición" -#: cobc/reserved.c:5155 +#: cobc/reserved.c:5172 #, fuzzy, c-format #| msgid "special register %s is unknown, needs a defintion" msgid "special register '%s' has a bad definition: %s" msgstr "registro especial %s es desconocido, requiere una definición" -#: cobc/reserved.c:5159 +#: cobc/reserved.c:5176 #, fuzzy, c-format #| msgid "special register %s is unknown" msgid "special register '%s' is unknown" msgstr "registro especial %s es desconocido" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Internal registers" msgstr "Registros internos" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Definition" msgstr "Definición" -#: cobc/reserved.c:5337 +#: cobc/reserved.c:5354 #, fuzzy, c-format #| msgid "unknown statement '%s'" msgid "unknown system-name '%s'" msgstr "sentencia desconocida «%s»" -#: cobc/reserved.c:5363 +#: cobc/reserved.c:5380 msgid "System names" msgstr "Nombres del sistema" -#: cobc/reserved.c:5386 +#: cobc/reserved.c:5403 msgid "Reserved Words" msgstr "Palabras Reservadas" -#: cobc/reserved.c:5398 +#: cobc/reserved.c:5415 msgid "Yes (Context sensitive)" msgstr "Sí (Contexto distingue mayúsculas)" -#: cobc/reserved.c:5408 +#: cobc/reserved.c:5425 msgid "No (Context sensitive)" msgstr "No (Contexto distinguible de mayúsculas)" -#: cobc/scanner.l:272 +#: cobc/scanner.l:281 #, fuzzy, c-format #| msgid "'%s' is a reserved word, but isn't supported" msgid "'%s' is not a reserved word, so cannot be removed" msgstr "«%s» es una palabra reservada, pero no es compatible" -#: cobc/scanner.l:320 +#: cobc/scanner.l:329 msgid "separator period in Area A" msgstr "" -#: cobc/scanner.l:1067 +#: cobc/scanner.l:1096 #, c-format msgid "a constant may not be used here - '%s'" msgstr "una constante quizá no está utilizada aquí - «%s»" -#: cobc/scanner.l:1137 +#: cobc/scanner.l:1170 msgid "ignoring redundant ." msgstr "ignorando redundante ." -#: cobc/scanner.l:1195 +#: cobc/scanner.l:1249 #, c-format msgid "invalid symbol '%s' - skipping word" msgstr "símbolo no válido: «%s» - omitiendo palabra" -#: cobc/scanner.l:1289 +#: cobc/scanner.l:1323 msgid "invalid national literal" msgstr "nacional literal inválido" -#: cobc/scanner.l:1293 cobc/tree.c:2800 +#: cobc/scanner.l:1327 cobc/tree.c:2822 #, c-format msgid "invalid literal: '%s'" msgstr "invalida literal: «%s»" -#: cobc/scanner.l:1295 +#: cobc/scanner.l:1329 #, c-format msgid "invalid hexadecimal literal: '%s'" msgstr "invalida literal hexadecimal: «%s»" -#: cobc/scanner.l:1297 cobc/tree.c:1779 +#: cobc/scanner.l:1331 cobc/tree.c:1803 #, c-format msgid "invalid numeric literal: '%s'" msgstr "invalida literal numérico: «%s»" -#: cobc/scanner.l:1299 +#: cobc/scanner.l:1333 #, c-format msgid "invalid floating-point literal: '%s'" msgstr "coma flotante literal no válida: «%s»" -#: cobc/scanner.l:1301 +#: cobc/scanner.l:1335 cobc/scanner.l:1337 #, c-format msgid "invalid %s literal: '%s'" msgstr "invalida %s literal; «%s»" -#: cobc/scanner.l:1350 +#: cobc/scanner.l:1365 +#, c-format +msgid "character code %s out of encoding range %s" +msgstr "" + +#: cobc/scanner.l:1422 +msgid "extraneous separator ',' at end of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1435 +msgid "extraneous character ',' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1440 +#, c-format +msgid "invalid character '%c' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1470 #, fuzzy, c-format #| msgid "literal length exceeds %d characters" msgid "literal length exceeds %u characters" msgstr "longitud literal excede %d caracteres" -#: cobc/scanner.l:1365 +#: cobc/scanner.l:1485 #, c-format msgid "missing terminating %c character" msgstr "" -#: cobc/scanner.l:1382 cobc/scanner.l:1444 cobc/scanner.l:1729 +#: cobc/scanner.l:1502 cobc/scanner.l:1569 cobc/scanner.l:1868 #, fuzzy #| msgid "numeric boolean literal" msgid "zero-length literal" msgstr "numérico booleano literal" -#: cobc/scanner.l:1385 +#: cobc/scanner.l:1505 #, fuzzy #| msgid "alphanumeric literal has zero length; a SPACE will be assumed" msgid "national literal has zero length; a SPACE will be assumed" msgstr "literal alfanumérica tiene longitud de cero; un ESPACIO será asumido" -#: cobc/scanner.l:1386 +#: cobc/scanner.l:1506 msgid "alphanumeric literal has zero length; a SPACE will be assumed" msgstr "literal alfanumérica tiene longitud de cero; un ESPACIO será asumido" -#: cobc/scanner.l:1412 cobc/scanner.l:1413 cobc/scanner.l:1417 -#: cobc/scanner.l:1494 +#: cobc/scanner.l:1519 +#, fuzzy +#| msgid "STOP literal" +msgid "UTF-8 literal" +msgstr "DETENCIÓN literal" + +#: cobc/scanner.l:1536 cobc/scanner.l:1537 cobc/scanner.l:1541 +#: cobc/scanner.l:1624 msgid "national literal" msgstr "literal nacinal" -#: cobc/scanner.l:1416 +#: cobc/scanner.l:1540 #, fuzzy #| msgid "national literal" msgid "national-character literal" msgstr "literal nacinal" -#: cobc/scanner.l:1447 +#: cobc/scanner.l:1571 #, fuzzy #| msgid "alphanumeric literal has zero length; a SPACE will be assumed" msgid "hexadecimal literal has zero length; X'00' will be assumed" msgstr "literal alfanumérica tiene longitud de cero; un ESPACIO será asumido" -#: cobc/scanner.l:1472 +#: cobc/scanner.l:1575 cobc/scanner.l:1601 msgid "hexadecimal-boolean literal" msgstr "booleana-hexadecimal literal" -#: cobc/scanner.l:1480 cobc/scanner.l:1499 cobc/scanner.l:1608 -#: cobc/scanner.l:1659 cobc/scanner.l:1754 cobc/scanner.l:1824 +#: cobc/scanner.l:1579 cobc/scanner.l:1619 +msgid "hexadecimal-national literal" +msgstr "nacional-hexadecimal literal" + +#: cobc/scanner.l:1609 cobc/scanner.l:1629 cobc/scanner.l:1744 +#: cobc/scanner.l:1798 cobc/scanner.l:1893 cobc/scanner.l:1963 #, fuzzy, c-format #| msgid "literal length %d exceeds %d characters" msgid "literal length %lu exceeds %u characters" msgstr "longitud literal %d excede %d caracteres" -#: cobc/scanner.l:1490 -msgid "hexadecimal-national literal" -msgstr "nacional-hexadecimal literal" - -#: cobc/scanner.l:1521 cobc/scanner.l:1551 cobc/scanner.l:1674 -#: cobc/scanner.l:1771 cobc/scanner.l:1835 +#: cobc/scanner.l:1651 cobc/scanner.l:1680 cobc/scanner.l:1813 +#: cobc/scanner.l:1910 cobc/scanner.l:1974 #, c-format msgid "literal contains invalid character '%c'" msgstr "literal contiene carácter no válido «%c»" -#: cobc/scanner.l:1573 +#: cobc/scanner.l:1704 #, c-format msgid "literal does not have an even number of digits" msgstr "literal no tiene un número par de elementos" -#: cobc/scanner.l:1599 +#: cobc/scanner.l:1735 cobc/scanner.l:1788 #, fuzzy, c-format #| msgid "literal contains invalid character '%c'" msgid "%s literals must contain at least one character" msgstr "literal contiene carácter no válido «%c»" -#: cobc/scanner.l:1639 cobc/scanner.l:1739 cobc/scanner.l:1813 +#: cobc/scanner.l:1775 cobc/scanner.l:1878 cobc/scanner.l:1952 msgid "ACUCOBOL numeric literal" msgstr "ACUCOBOL numérico literal" -#: cobc/scanner.l:1651 -#, fuzzy -#| msgid "literal contains invalid character '%c'" -msgid "H literals must contain at least one character" -msgstr "literal contiene carácter no válido «%c»" - -#: cobc/scanner.l:1690 cobc/scanner.l:1783 cobc/scanner.l:1846 +#: cobc/scanner.l:1829 cobc/scanner.l:1922 cobc/scanner.l:1985 #, c-format msgid "literal exceeds limit %u" msgstr "literal excede límite %u" -#: cobc/scanner.l:1724 +#: cobc/scanner.l:1863 msgid "numeric boolean literal" msgstr "numérico booleano literal" -#: cobc/scanner.l:1731 +#: cobc/scanner.l:1870 #, fuzzy #| msgid "alphanumeric literal has zero length; a SPACE will be assumed" -msgid "Boolean literal has zero length; B'0' will be assumed" +msgid "boolean literal has zero length; B'0' will be assumed" msgstr "literal alfanumérica tiene longitud de cero; un ESPACIO será asumido" -#: cobc/scanner.l:1807 +#: cobc/scanner.l:1946 #, fuzzy #| msgid "ACUCOBOL numeric literal" msgid "HP COBOL octal literal" msgstr "ACUCOBOL numérico literal" -#: cobc/scanner.l:1921 +#: cobc/scanner.l:2059 #, fuzzy, c-format #| msgid "literal length %d exceeds maximum of %d digits" msgid "literal length %lu exceeds maximum of %u digits" msgstr "longitud literal %d excede máximo de %d dígitos" -#: cobc/scanner.l:1927 +#: cobc/scanner.l:2065 #, fuzzy, c-format #| msgid "literal length %d exceeds %d digits" msgid "literal length %lu exceeds %u digits" msgstr "longitud literal %d excede %d dígitos" -#: cobc/scanner.l:2039 cobc/tree.c:3845 +#: cobc/scanner.l:2177 cobc/tree.c:3888 #, fuzzy, c-format #| msgid "significand has more than 34 digits" msgid "significand has more than %d digits" msgstr "significación tiene más de 34 dígitos" -#: cobc/scanner.l:2044 +#: cobc/scanner.l:2182 #, c-format msgid "exponent has decimal point" msgstr "exponente tiene coma decimal" -#: cobc/scanner.l:2050 cobc/tree.c:3853 +#: cobc/scanner.l:2188 cobc/tree.c:3896 #, c-format msgid "exponent has more than 4 digits" msgstr "exponente tiene más que 4 dígitos" -#: cobc/scanner.l:2080 +#: cobc/scanner.l:2218 #, fuzzy, c-format #| msgid "exponent not between -78 and 76" msgid "exponent not between -6143 and 6144" msgstr "exponente no entre -78 y 76" -#: cobc/scanner.l:2089 +#: cobc/scanner.l:2227 #, c-format msgid "significand of 0 must be positive" msgstr "significante de 0 debe ser positivo" -#: cobc/scanner.l:2094 +#: cobc/scanner.l:2232 #, c-format msgid "exponent of 0 must be 0" msgstr "exponente de 0 debe ser 0" -#: cobc/scanner.l:2099 +#: cobc/scanner.l:2237 #, c-format msgid "exponent of 0 must be positive" msgstr "exponente a 0 debe ser positivo" -#: cobc/scanner.l:2261 +#: cobc/scanner.l:2399 #, c-format msgid "invalid CONSTANT: %s" msgstr "invalida CONSTANTE: %s" -#: cobc/scanner.l:2271 +#: cobc/scanner.l:2409 #, c-format msgid "invalid alphanumeric CONSTANT: %s" msgstr "invalida CONSTANTE alfanumérica: %s" -#: cobc/scanner.l:2275 +#: cobc/scanner.l:2413 #, c-format msgid "empty alphanumeric CONSTANT: %s" msgstr "vacía alfanumérico CONSTANTE: %s" -#: cobc/scanner.l:2292 cobc/scanner.l:2300 cobc/scanner.l:2305 +#: cobc/scanner.l:2430 cobc/scanner.l:2438 cobc/scanner.l:2443 #, c-format msgid "invalid numeric CONSTANT: %s" msgstr "numérico CONSTANTE inválido: %s" -#: cobc/scanner.l:2384 cobc/scanner.l:2411 +#: cobc/scanner.l:2522 cobc/scanner.l:2549 #, fuzzy, c-format #| msgid "'%s' is not defined, but is a reserved word in another dialect" msgid "'%s' is not a default reserved word, so cannot be aliased" msgstr "'%s' no está definido, pero es una palabra reservada en otro dialecto" -#: cobc/scanner.l:2387 +#: cobc/scanner.l:2525 #, c-format msgid "'%s' is already reserved" msgstr "" -#: cobc/scanner.l:2389 +#: cobc/scanner.l:2527 msgid "you may want MAKESYN instead" msgstr "" -#: cobc/scanner.l:2414 +#: cobc/scanner.l:2552 #, fuzzy, c-format #| msgid "alias target '%s' is not a default reserved word" msgid "'%s' is not a reserved word" msgstr "objetivo alias «%s» no es una palabra reservada predeterminada" -#: cobc/scanner.l:2415 +#: cobc/scanner.l:2553 msgid "you may want ADDSYN or OVERRIDE instead" msgstr "" -#: cobc/tree.c:391 +#: cobc/tree.c:392 #, c-format msgid "%s clause is required for file '%s'" msgstr "Cláusula %s es requerida para el fichero «%s»" -#: cobc/tree.c:395 +#: cobc/tree.c:396 #, c-format msgid "%s clause is invalid for file '%s' (file type)" msgstr "Cláusula %s es no válida para un fichero «%s» (tipo de fichero)" -#: cobc/tree.c:399 +#: cobc/tree.c:400 #, c-format msgid "%s clause is invalid for file '%s'" msgstr "Cláusula %s es no válida para fichero «%s»" -#: cobc/tree.c:426 +#: cobc/tree.c:427 #, c-format msgid "FOR item '%s' is a record" msgstr "Ítem FOR «%s» es un registro" -#: cobc/tree.c:435 +#: cobc/tree.c:436 #, c-format msgid "FOR item '%s' is in different record to '%s'" msgstr "Ítem FOR «%s» está dentro de registro diferente a «%s»" -#: cobc/tree.c:444 +#: cobc/tree.c:445 #, c-format msgid "FOR item '%s' is not in a record associated with '%s'" msgstr "Ítem FOR «%s» no está dentro de registro asociado con «%s»" -#: cobc/tree.c:558 +#: cobc/tree.c:559 msgid "internal error node" msgstr "nodo error interno" -#: cobc/tree.c:560 +#: cobc/tree.c:561 msgid "unknown constant" msgstr "constante desconocido" -#: cobc/tree.c:571 +#: cobc/tree.c:572 #, fuzzy, c-format #| msgid "invalid literal: '%s'" msgid "literal \"%s\"" msgstr "invalida literal: «%s»" -#: cobc/tree.c:842 -#, fuzzy, c-format -#| msgid "FUNCTION %s has invalid/not supported arguments - Tag %d" -msgid "FUNCTION %s has invalid/not supported arguments - tag %d" -msgstr "FUNCTION %s tiene argumentos inválidos/no compatibles - Tag %d" - -#: cobc/tree.c:963 +#: cobc/tree.c:969 #, c-format msgid "invalid date/time function: '%d'" msgstr "función fecha/hora inválida: «%d»" -#: cobc/tree.c:995 +#: cobc/tree.c:1001 #, c-format msgid "FUNCTION '%s' has invalid date/time format" msgstr "FUNCTION «%s» tiene formato no válido de fecha/hora" -#: cobc/tree.c:1002 +#: cobc/tree.c:1008 #, c-format msgid "FUNCTION '%s' has format in variable" msgstr "FUNCTION «%s» tiene formato dentro de variable" -#: cobc/tree.c:1482 +#: cobc/tree.c:1488 #, c-format msgid "unknown tree tag: %d, category: %d" msgstr "etiqueta de árbol desconocida: %d, categoría: %d" -#: cobc/tree.c:1577 +#: cobc/tree.c:1590 #, c-format msgid "unexpected numeric USAGE: %d" msgstr "inesperada UTILIZACIÓN numérica: %d" -#: cobc/tree.c:1591 +#: cobc/tree.c:1604 #, c-format msgid "unexpected category: %d" msgstr "categoría inesperada: %d" -#: cobc/tree.c:1790 +#: cobc/tree.c:1814 #, c-format msgid "literal length %d exceeds maximum of %d digits" msgstr "longitud literal %d excede máximo de %d dígitos" -#: cobc/tree.c:1795 +#: cobc/tree.c:1819 #, c-format msgid "literal length %d exceeds %d digits" msgstr "longitud literal %d excede %d dígitos" -#: cobc/tree.c:1844 cobc/tree.c:1856 cobc/tree.c:1913 cobc/tree.c:1963 +#: cobc/tree.c:1868 cobc/tree.c:1880 cobc/tree.c:1937 cobc/tree.c:1987 #, c-format msgid "numeric literal '%s' exceeds limit '%s'" msgstr "literal numérico |%s» excede límite «%s»" -#: cobc/tree.c:2655 +#: cobc/tree.c:2676 msgid "invalid LOCALE literal" msgstr "invalida LOCALE literal" -#: cobc/tree.c:2782 +#: cobc/tree.c:2803 msgid "only literals with the same category can be concatenated" msgstr "solo literales con misma categoría puede ser concatenado" -#: cobc/tree.c:2789 +#: cobc/tree.c:2811 #, fuzzy #| msgid "only alpanumeric, national or boolean literals may be concatenated" -msgid "only alphanumeric, national or boolean literals may be concatenated" +msgid "only alphanumeric, utf-8, national or boolean literals may be concatenated" msgstr "solo alfanuméricos, nacionales o booleanos literales quizá son concatenados" -#: cobc/tree.c:2801 +#: cobc/tree.c:2823 #, c-format msgid "literal length %d exceeds %d characters" msgstr "longitud literal %d excede %d caracteres" -#: cobc/tree.c:3078 +#: cobc/tree.c:3103 msgid "B, 0 or /" msgstr "B, 0 o /" -#: cobc/tree.c:3092 +#: cobc/tree.c:3117 msgid "the sign of the floating-point exponent" msgstr "el signo del exponente a coma flotante" -#: cobc/tree.c:3094 +#: cobc/tree.c:3119 msgid "a leading +/- sign" msgstr "un signo +/- delantero" -#: cobc/tree.c:3096 +#: cobc/tree.c:3121 msgid "a trailing +/- sign" msgstr "un signo +/- trasero" -#: cobc/tree.c:3098 +#: cobc/tree.c:3123 msgid "CR or DB" msgstr "CR o DB" -#: cobc/tree.c:3100 +#: cobc/tree.c:3125 msgid "a leading currency symbol" msgstr "un símbolo monetario trasero" -#: cobc/tree.c:3102 +#: cobc/tree.c:3127 msgid "a trailing currency symbol" msgstr "un símbolo monetario trasero" -#: cobc/tree.c:3104 +#: cobc/tree.c:3129 msgid "a Z or * which is before the decimal point" msgstr "una Z o * la cual está después de la coma decimal" -#: cobc/tree.c:3106 +#: cobc/tree.c:3131 msgid "a Z or * which is after the decimal point" msgstr "una Z o * la cual está tras la coma decimal" -#: cobc/tree.c:3108 +#: cobc/tree.c:3133 msgid "a floating +/- string which is before the decimal point" msgstr "una cadena flotante +/- la cual está antes de la coma decimal" -#: cobc/tree.c:3110 +#: cobc/tree.c:3135 msgid "a floating +/- string which is after the decimal point" msgstr "una cadena de reales +/- los cuáles están tras la coma decimal" -#: cobc/tree.c:3112 +#: cobc/tree.c:3137 msgid "a floating currency symbol string which is before the decimal point" msgstr "una cadena simbólica monetaria flotante la cual está después de la coma decimal" -#: cobc/tree.c:3114 +#: cobc/tree.c:3139 msgid "a floating currency symbol string which is after the decimal point" msgstr "una cadena simbólica monetaria flotante la cual está tras la coma decimal" -#: cobc/tree.c:3118 +#: cobc/tree.c:3143 msgid "A or X" msgstr "A o X" -#: cobc/tree.c:3126 +#: cobc/tree.c:3151 msgid "a P which is before the decimal point" msgstr "una P la cual está después de la coma decimal" -#: cobc/tree.c:3128 +#: cobc/tree.c:3153 msgid "a P which is after the decimal point" msgstr "una P la cual está tras la coma decimal" -#: cobc/tree.c:3149 cobc/tree.c:3599 +#: cobc/tree.c:3176 cobc/tree.c:3638 #, c-format msgid "%s may only occur once in a PICTURE string" msgstr "%s quizá solo ocurre una vez dentro de una cadena PICTURE" -#: cobc/tree.c:3151 cobc/tree.c:3541 +#: cobc/tree.c:3178 cobc/tree.c:3570 #, c-format msgid "%s cannot follow %s" msgstr "%s no se continuar %s" -#: cobc/tree.c:3154 +#: cobc/tree.c:3181 msgid "invalid PICTURE string detected" msgstr "cadena textual PICTURE inválida detectada" -#: cobc/tree.c:3271 +#: cobc/tree.c:3299 msgid "number or constant in parentheses is not an unsigned integer" msgstr "números o constantes entre paréntesis no es un entero sin signo" -#: cobc/tree.c:3280 +#: cobc/tree.c:3308 #, fuzzy, c-format #| msgid "only up to 9 significant digits are permitted within parentheses" msgid "only up to %d significant digits are permitted within parentheses" msgstr "solo superior a 9 dígitos significantes están permitidos entre paréntesis" -#: cobc/tree.c:3288 +#: cobc/tree.c:3316 msgid "number or constant in parentheses must be greater than zero" msgstr "número o contante en paréntesis debe ser mayor que cero" -#: cobc/tree.c:3299 +#: cobc/tree.c:3327 msgid "parentheses must be preceded by a picture symbol" msgstr "" -#: cobc/tree.c:3329 +#: cobc/tree.c:3353 msgid "unbalanced parentheses" msgstr "paréntesis desequilibrados" -#: cobc/tree.c:3337 +#: cobc/tree.c:3361 #, fuzzy #| msgid "parentheses must contain (a constant-name defined as) a positive integer" msgid "parentheses must contain an unsigned integer" msgstr "paréntesis deben contener (un nombre-constante definido como) un entero positiv" -#: cobc/tree.c:3375 +#: cobc/tree.c:3409 #, c-format msgid "'%s' is not a constant-name" msgstr "«%s» no es nombre de constante" -#: cobc/tree.c:3382 -#, c-format -msgid "'%s' is not a numeric literal" -msgstr "«%s» no es un literal numérico" - -#: cobc/tree.c:3386 -#, c-format -msgid "'%s' is not an integer" +#: cobc/tree.c:3422 +#, fuzzy, c-format +#| msgid "'%s' is not an integer" +msgid "'%s' is not an unsigned positive integer" msgstr "«%s» no es un entero" -#: cobc/tree.c:3390 -#, c-format -msgid "'%s' is not unsigned" -msgstr "«%s» no es asignada" - -#: cobc/tree.c:3450 +#: cobc/tree.c:3479 msgid "missing PICTURE string" msgstr "cadena PICTURE ausente" -#: cobc/tree.c:3479 +#: cobc/tree.c:3508 msgid "C must be followed by R" msgstr "C debe ser seguido por R" -#: cobc/tree.c:3482 +#: cobc/tree.c:3511 msgid "D must be followed by B" msgstr "D debe ser seguido por B" -#: cobc/tree.c:3497 cobc/tree.c:3596 cobc/tree.c:3622 cobc/tree.c:3733 +#: cobc/tree.c:3526 cobc/tree.c:3635 cobc/tree.c:3661 cobc/tree.c:3773 #, fuzzy #| msgid "unbalanced parentheses" msgid "uncommon parentheses" msgstr "paréntesis desequilibrados" -#: cobc/tree.c:3541 +#: cobc/tree.c:3570 msgid "exponent" msgstr "" -#: cobc/tree.c:3586 +#: cobc/tree.c:3625 #, fuzzy #| msgid "S must be at start of PICTURE string" msgid "L must be at start of PICTURE string" msgstr "S debe estar al inicio de la cadena PICTURE" -#: cobc/tree.c:3604 +#: cobc/tree.c:3643 msgid "S must be at start of PICTURE string" msgstr "S debe estar al inicio de la cadena PICTURE" -#: cobc/tree.c:3660 +#: cobc/tree.c:3699 msgid "P must be at start or end of PICTURE string" msgstr "P debe estar en inicio o final de cadena PICTURE" -#: cobc/tree.c:3690 +#: cobc/tree.c:3730 msgid "cannot have both Z and * in PICTURE string" msgstr "no puede tener ambos Z y * dentro de cadena PICTURE" -#: cobc/tree.c:3768 +#: cobc/tree.c:3808 #, c-format msgid "invalid PICTURE character '%c'" msgstr "carácter PICTURE no válido «%c»" -#: cobc/tree.c:3798 +#: cobc/tree.c:3841 #, c-format msgid "PICTURE string may not contain more than %d characters; contains %d characters" msgstr "cadena PICTURE quizá no contiene más de %d caracteres; contiene %d caracteres" -#: cobc/tree.c:3803 -msgid "PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" +#: cobc/tree.c:3846 +#, fuzzy +#| msgid "PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" +msgid "PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" msgstr "cadena PICTURA debe contener al menos uno de los conjuntos A, N, X, Z, 1, 9 y *; o al menos dos del conjunto +, - y el símbolo monetario" -#: cobc/tree.c:3830 +#: cobc/tree.c:3873 #, c-format msgid "numeric field cannot be larger than %d digits" msgstr "campo numérico no puede ser mayor de %d dígitos" -#: cobc/tree.c:4267 +#: cobc/tree.c:4333 #, fuzzy, c-format #| msgid "PICTURE clause required for '%s'" msgid "needs PICTURE clause for SUM %s" msgstr "PICTURE clausurada requerida para «%s»" -#: cobc/tree.c:4274 +#: cobc/tree.c:4340 #, fuzzy, c-format #| msgid "PICTURE clause required for '%s'" msgid "non-numeric PICTURE clause for SUM %s" msgstr "PICTURE clausurada requerida para «%s»" -#: cobc/tree.c:4346 cobc/tree.c:4359 +#: cobc/tree.c:4412 cobc/tree.c:4425 #, c-format msgid "no DETAIL line defined in report %s" msgstr "" -#: cobc/tree.c:4361 +#: cobc/tree.c:4427 msgid "PAGE LIMIT FIRST DETAIL should be >= HEADING" msgstr "" -#: cobc/tree.c:4364 +#: cobc/tree.c:4430 msgid "PAGE LIMIT FOOTING should be >= HEADING" msgstr "" -#: cobc/tree.c:4366 +#: cobc/tree.c:4432 msgid "PAGE LIMIT LAST DETAIL should be >= FIRST DETAIL" msgstr "" -#: cobc/tree.c:4368 +#: cobc/tree.c:4434 msgid "PAGE LIMIT FOOTING should be >= LAST DETAIL" msgstr "" -#: cobc/tree.c:4370 +#: cobc/tree.c:4436 msgid "PAGE LIMIT LINES should be >= FOOTING" msgstr "" -#: cobc/tree.c:4563 libcob/fileio.c:8999 +#: cobc/tree.c:4631 libcob/fileio.c:9358 #, c-format msgid "maximum keys (%d/%d) exceeded for file '%s'" msgstr "" -#: cobc/tree.c:4627 cobc/tree.c:4650 +#: cobc/tree.c:4695 cobc/tree.c:4718 #, c-format msgid "invalid KEY item '%s', not in file '%s'" msgstr "ítem KEY «%s» inválido, no dentro del fichero «%s»" -#: cobc/tree.c:4661 +#: cobc/tree.c:4729 #, c-format msgid "minimal record length %d can not hold the key item '%s'; needs to be at least %d" msgstr "longitud de registro mínimo %d puede mantener el elemento clave «%s»; requiere ser al menos %d " -#: cobc/tree.c:4696 +#: cobc/tree.c:4764 #, fuzzy, c-format #| msgid "missing definitions:" msgid "missing file description for %s" msgstr "definiciones ausentes:" -#: cobc/tree.c:4745 +#: cobc/tree.c:4813 #, c-format msgid "size of record '%s' (%d) smaller than minimum of file '%s' (%d)" msgstr "tamaño de registro «%s» (%d) más pequeño que el mínimo del fichero «%s» (%d)" -#: cobc/tree.c:4748 cobc/tree.c:4765 +#: cobc/tree.c:4816 cobc/tree.c:4833 msgid "file size adjusted" msgstr "" -#: cobc/tree.c:4760 +#: cobc/tree.c:4828 #, c-format msgid "size of record '%s' (%d) larger than maximum of file '%s' (%d)" msgstr "tamaño de registro «%s» (%d) más largo que el máximo de fichero «%s» (%d)" -#: cobc/tree.c:4793 +#: cobc/tree.c:4861 msgid "RECORD VARYING specified without limits, but implied limits are equal" msgstr "" -#: cobc/tree.c:4795 +#: cobc/tree.c:4863 #, fuzzy, c-format #| msgid "%s ignored" msgid "%s clause ignored" msgstr "%s ignorado" -#: cobc/tree.c:4890 cobc/typeck.c:7695 cobc/typeck.c:14389 cobc/typeck.c:14441 -#: cobc/typeck.c:14477 libcob/fileio.c:4598 libcob/screenio.c:3720 -#: libcob/screenio.c:3750 +#: cobc/tree.c:4958 cobc/typeck.c:8128 cobc/typeck.c:15186 cobc/typeck.c:15238 +#: cobc/typeck.c:15275 libcob/fileio.c:4724 libcob/screenio.c:4613 +#: libcob/screenio.c:4639 #, fuzzy, c-format #| msgid "runtime library is not configured for this operation" msgid "runtime is not configured to support %s" msgstr "biblioteca de tiempo de ejecución no está configurado para esta operación" -#: cobc/tree.c:5395 +#: cobc/tree.c:5474 #, fuzzy, c-format #| msgid "literal is longer than field" msgid "literal '%.38s' is longer than '%s'" msgstr "literal es más largo que campo" -#: cobc/tree.c:5399 +#: cobc/tree.c:5478 #, c-format msgid "literal '%.38s' is longer than reference-modification of '%s'" msgstr "" -#: cobc/tree.c:5424 +#: cobc/tree.c:5508 #, c-format msgid "literal '%s' is alphanumeric but '%s' is numeric" msgstr "" -#: cobc/tree.c:5466 +#: cobc/tree.c:5550 #, c-format msgid "literal '%s' has more decimals than '%s'" msgstr "" -#: cobc/tree.c:5508 +#: cobc/tree.c:5598 #, c-format msgid "literal '%s' has more digits than '%s'" msgstr "" -#: cobc/tree.c:5548 cobc/tree.c:5572 +#: cobc/tree.c:5646 cobc/tree.c:5676 #, fuzzy, c-format #| msgid "THRU item '%s' may not be subordinate to '%s'" msgid "unsigned '%s' may not be %s %s" msgstr "Ítem THRU «%s» quizá no es subordinado a «%s»" -#: cobc/tree.c:5558 cobc/tree.c:5581 +#: cobc/tree.c:5658 cobc/tree.c:5689 #, c-format msgid "unsigned '%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5614 cobc/tree.c:5639 +#: cobc/tree.c:5726 cobc/tree.c:5756 #, fuzzy, c-format #| msgid "'%s' cannot be used here" msgid "'%s' may not be %s %s" msgstr "«%s» no puede ser empleado aquí" -#: cobc/tree.c:5625 cobc/tree.c:5650 +#: cobc/tree.c:5738 cobc/tree.c:5768 #, c-format msgid "'%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5795 +#: cobc/tree.c:5917 msgid "divide by constant ZERO" msgstr "divide entre constante CERO" -#: cobc/tree.c:5879 cobc/tree.c:5886 +#: cobc/tree.c:6001 cobc/tree.c:6008 #, c-format msgid "%s should be COMP-X/COMP-5 for logical operator" msgstr "" -#: cobc/tree.c:5927 cobc/tree.c:5932 cobc/tree.c:6151 cobc/typeck.c:5675 -#: cobc/typeck.c:5684 cobc/typeck.c:5691 cobc/typeck.c:6772 cobc/typeck.c:6913 -msgid "invalid expression" -msgstr "expresión no válida" - -#: cobc/tree.c:6148 +#: cobc/tree.c:6283 #, fuzzy, c-format #| msgid "invalid expression" msgid "invalid expression: %s %s %s" msgstr "expresión no válida" -#: cobc/tree.c:6195 +#: cobc/tree.c:6286 +msgid "invalid expression: boolean expected with logical operator" +msgstr "" + +#: cobc/tree.c:6330 #, c-format msgid "unexpected operator: %d" msgstr "operador inesperado: %d" -#: cobc/tree.c:6206 +#: cobc/tree.c:6341 #, c-format msgid "expression '%.38s' %s '%.38s' is always TRUE" msgstr "expresión '%.38s' %s '%.38s' siempre es TRUE" -#: cobc/tree.c:6212 +#: cobc/tree.c:6347 msgid "expression is always TRUE" msgstr "expresión es siempre VERDADERA" -#: cobc/tree.c:6225 +#: cobc/tree.c:6360 #, c-format msgid "expression '%.38s' %s '%.38s' is always FALSE" msgstr "expresión '%.38s' %s '%.38s' siempre es FALSA" -#: cobc/tree.c:6231 +#: cobc/tree.c:6366 msgid "expression is always FALSE" msgstr "expresión es siempre FALSA" -#: cobc/tree.c:6443 +#: cobc/tree.c:6588 msgid "invalid file name reference" msgstr "referencia del nombre de fichero inválido" -#: cobc/tree.c:6451 +#: cobc/tree.c:6596 #, fuzzy, c-format #| msgid "BY CONTENT assumed for alphanumeric item" msgid "BY CONTENT assumed for alphanumeric item '%s'" msgstr "BY CONTENT asumido para elementos alfanuméricos" -#: cobc/tree.c:6456 +#: cobc/tree.c:6601 #, fuzzy, c-format #| msgid "BY CONTENT assumed for alphanumeric item" msgid "BY CONTENT assumed for national item '%s'" msgstr "BY CONTENT asumido para elementos alfanuméricos" -#: cobc/tree.c:6595 +#: cobc/tree.c:6740 msgid "PERFORM FOREVER since UNTIL is always FALSE" msgstr "PERFORM FOREVER desde UNTIL siempre es FALSE" -#: cobc/tree.c:6599 +#: cobc/tree.c:6744 msgid "PERFORM ONCE since UNTIL is always TRUE" msgstr "PERFORM ONCE desde UNTIL siempre es TRUE" -#: cobc/tree.c:6602 +#: cobc/tree.c:6747 msgid "PERFORM NEVER since UNTIL is always TRUE" msgstr "PERFORM NEVER desde UNTIL siempre es TRUE" -#: cobc/tree.c:6726 +#: cobc/tree.c:6871 #, fuzzy, c-format #| msgid "no definition/prototype seen for program '%s'" msgid "no definition/prototype seen for FUNCTION '%s'" msgstr "sin definición/prototipo visto para programa «%s»" -#: cobc/tree.c:6728 +#: cobc/tree.c:6873 #, fuzzy, c-format #| msgid "no definition/prototype seen for program '%s'" msgid "no definition/prototype seen for PROGRAM '%s'" msgstr "sin definición/prototipo visto para programa «%s»" -#: cobc/tree.c:6737 +#: cobc/tree.c:6882 #, fuzzy, c-format #| msgid "no definition/prototype seen for program with external name '%s'" msgid "no definition/prototype seen for FUNCTION with external name '%s'" msgstr "ninguna definición/prototipo visto para programa con nombre externo «%s»" -#: cobc/tree.c:6739 +#: cobc/tree.c:6884 #, fuzzy, c-format #| msgid "no definition/prototype seen for program with external name '%s'" msgid "no definition/prototype seen for PROGRAM with external name '%s'" msgstr "ninguna definición/prototipo visto para programa con nombre externo «%s»" -#: cobc/tree.c:6831 +#: cobc/tree.c:6976 cobc/tree.c:7158 cobc/tree.c:7233 cobc/tree.c:7239 +#: cobc/tree.c:7247 cobc/tree.c:7255 cobc/tree.c:7277 cobc/tree.c:7287 +#: cobc/tree.c:7292 #, fuzzy, c-format #| msgid "FUNCTION '%s' has invalid parameter" -msgid "FUNCTION %s has invalid argument" +msgid "FUNCTION '%s' has invalid argument" msgstr "FUNCTION «%s» tiene parámetro no válido" -#: cobc/tree.c:6833 +#: cobc/tree.c:6978 #, c-format -msgid "either all arguments or none should be if type %s" +msgid "either all arguments or none should be of type %s" msgstr "" -#: cobc/tree.c:6863 cobc/tree.c:6869 cobc/tree.c:6911 cobc/tree.c:6916 +#: cobc/tree.c:7010 cobc/tree.c:7016 cobc/tree.c:7057 cobc/tree.c:7063 #, c-format msgid "FUNCTION '%s' has invalid reference modification" msgstr "FUNCTION «%s» tiene modificación por referencia no válida" -#: cobc/tree.c:6880 cobc/tree.c:7194 +#: cobc/tree.c:7027 cobc/tree.c:7344 #, c-format msgid "FUNCTION '%s' unknown" msgstr "FUNCTION «%s» desconocida" -#: cobc/tree.c:6884 +#: cobc/tree.c:7031 #, c-format msgid "FUNCTION '%s' is not implemented" msgstr "FUNCTION «%s» no está implementada" -#: cobc/tree.c:6891 cobc/tree.c:6898 cobc/tree.c:7179 +#: cobc/tree.c:7037 cobc/tree.c:7044 cobc/tree.c:7329 #, c-format msgid "FUNCTION '%s' has wrong number of arguments" msgstr "FUNCTION «%s» tiene el número incorrecto de argumentos" -#: cobc/tree.c:6905 +#: cobc/tree.c:7051 #, c-format msgid "FUNCTION '%s' cannot have reference modification" msgstr "FUNCTION «%s» no puede tener la modificación por referencia" -#: cobc/tree.c:7008 cobc/tree.c:7083 cobc/tree.c:7089 cobc/tree.c:7097 -#: cobc/tree.c:7105 cobc/tree.c:7127 cobc/tree.c:7137 cobc/tree.c:7142 -#, fuzzy, c-format -#| msgid "FUNCTION '%s' has invalid parameter" -msgid "FUNCTION '%s' has invalid argument" -msgstr "FUNCTION «%s» tiene parámetro no válido" - -#: cobc/tree.c:7185 +#: cobc/tree.c:7335 #, fuzzy, c-format #| msgid "FUNCTION '%s' has invalid first parameter" msgid "FUNCTION '%s' has invalid first argument" msgstr "FUNCTION «%s» tiene primer parámetro no válido" -#: cobc/typeck.c:584 +#: cobc/typeck.c:590 #, c-format msgid "%s should be COMP-5/COMP-X for logical operator" msgstr "" -#: cobc/typeck.c:850 +#: cobc/typeck.c:856 #, fuzzy, c-format #| msgid "%s not allowed here" msgid "%s item not allowed here: '%s'" msgstr "%s no se permite aquí" -#: cobc/typeck.c:892 +#: cobc/typeck.c:898 #, c-format msgid "'%s' is not a group name" msgstr "«%s» no es nombre de grupo" -#: cobc/typeck.c:911 +#: cobc/typeck.c:921 #, c-format msgid "'%s' is not a numeric name" msgstr "«%s» no es un nombre numérico" -#: cobc/typeck.c:934 +#: cobc/typeck.c:944 #, c-format msgid "'%s' is not a numeric or numeric-edited name" msgstr "«%s» no es nombre numérico o editado-numérico" -#: cobc/typeck.c:974 -#, fuzzy, c-format -#| msgid "'%s' is not a numeric value" -msgid "'%s' is Alpha, instead of a numeric value" -msgstr "«%s» no es un valor numérico" - -#: cobc/typeck.c:977 -#, fuzzy, c-format -#| msgid "'%s' is not a numeric value" -msgid "'%s' is Alpha Edited, instead of a numeric value" -msgstr "«%s» no es un valor numérico" - -#: cobc/typeck.c:990 -#, c-format -msgid "'%s' is not a numeric value" -msgstr "«%s» no es un valor numérico" - -#: cobc/typeck.c:1040 +#: cobc/typeck.c:1043 #, c-format -msgid "'%s' is not an integer value" -msgstr "«%s» no es un valor entero" +msgid "'%s' is not an integer" +msgstr "«%s» no es un entero" -#: cobc/typeck.c:1044 +#: cobc/typeck.c:1047 msgid "positive numeric integer is required here" msgstr "numérico entero positivo está requerido aquí" -#: cobc/typeck.c:1163 +#: cobc/typeck.c:1178 msgid "System routine" msgstr "Rutina de sistema" -#: cobc/typeck.c:2054 libcob/call.c:1180 +#: cobc/typeck.c:2037 libcob/call.c:1172 #, c-format msgid "'%s' literal includes leading spaces which are omitted" msgstr "«%s» literal incluye llevar espacios las cuales son omitidas" -#: cobc/typeck.c:2058 +#: cobc/typeck.c:2041 #, c-format msgid "'%s' literal includes trailing spaces which are omitted" msgstr "«%s» literal incluye llevar espacios las cuales son omitidas" -#: cobc/typeck.c:2125 +#: cobc/typeck.c:2108 msgid "ON/OFF usage requires a SWITCH name" msgstr "Uso de ON/OFF requiere el nombre de un SWITCH" -#: cobc/typeck.c:2143 +#: cobc/typeck.c:2126 #, c-format msgid "word length exceeds maximum of %d characters: '%s'" msgstr "longitud de palabra excede el máximo de %d caracteres: «%s»" -#: cobc/typeck.c:2146 +#: cobc/typeck.c:2129 #, c-format msgid "word length exceeds %d characters: '%s'" msgstr "longitud de palabra excede los %d caracteres: «%s»" -#: cobc/typeck.c:2223 +#: cobc/typeck.c:2206 #, fuzzy, c-format #| msgid "ASSIGN interpreted as %s" msgid "ASSIGN %s interpreted as '%s'" msgstr "ASSIGN interpretarse en el %s" -#: cobc/typeck.c:2315 cobc/typeck.c:2487 +#: cobc/typeck.c:2332 cobc/typeck.c:2631 #, c-format msgid "subscript missing for '%s' - defaulting to 1" msgstr "subíndice faltante para «%s» - por defecto a 1" -#: cobc/typeck.c:2338 cobc/typeck.c:2403 cobc/typeck.c:2659 +#: cobc/typeck.c:2355 cobc/typeck.c:2546 cobc/typeck.c:2746 #, c-format msgid "'%s' cannot be subscripted" msgstr "«%s» no puede ser subíndice" -#: cobc/typeck.c:2342 cobc/typeck.c:2663 +#: cobc/typeck.c:2359 cobc/typeck.c:2750 #, c-format msgid "'%s' requires one subscript" msgstr "«%s» requiere un subíndice" -#: cobc/typeck.c:2345 cobc/typeck.c:2666 +#: cobc/typeck.c:2362 cobc/typeck.c:2753 #, c-format msgid "'%s' requires %d subscripts" msgstr "«%s» requiere %d subíndices" -#: cobc/typeck.c:2363 +#: cobc/typeck.c:2380 #, c-format msgid "'%s' (accessed by '%s')" msgstr "«%s» a (accedido por «%s»)" -#: cobc/typeck.c:2471 -#, c-format -msgid "'%s' has no OCCURS clause" -msgstr "«%s» no tiene cláusula de OCCURS" +#: cobc/typeck.c:2399 cobc/typeck.c:4987 +#, fuzzy, c-format +#| msgid "'%s' cannot be reference modified" +msgid "%s may not be reference modified" +msgstr "«%s» no puede ser modificado por referencia" -#: cobc/typeck.c:2537 libcob/common.c:3941 libcob/common.c:3952 +#: cobc/typeck.c:2437 cobc/typeck.c:2442 cobc/typeck.c:2466 +#: libcob/common.c:4477 libcob/common.c:4521 #, c-format -msgid "subscript of '%s' out of bounds: %d" -msgstr "subescritura de «%s» fuera de límites: %d" +msgid "length of '%s' out of bounds: %d" +msgstr "longitud de «%s» fuera de límites: %d" -#: cobc/typeck.c:2587 cobc/typeck.c:2598 libcob/common.c:3976 -#: libcob/common.c:4027 +#: cobc/typeck.c:2453 cobc/typeck.c:2462 libcob/common.c:4462 +#: libcob/common.c:4513 #, c-format msgid "offset of '%s' out of bounds: %d" msgstr "desplazamiento de «%s» fuera de límite: %d" -#: cobc/typeck.c:2592 cobc/typeck.c:2603 cobc/typeck.c:2612 -#: libcob/common.c:3991 libcob/common.c:4035 +#: cobc/typeck.c:2458 +msgid "suspicious reference-modification: always using max. position" +msgstr "" + +#: cobc/typeck.c:2475 +msgid "suspicious reference-modification: always using max. length" +msgstr "" + +#: cobc/typeck.c:2615 #, c-format -msgid "length of '%s' out of bounds: %d" -msgstr "longitud de «%s» fuera de límites: %d" +msgid "'%s' has no OCCURS clause" +msgstr "«%s» no tiene cláusula de OCCURS" + +#: cobc/typeck.c:2694 libcob/common.c:4427 libcob/common.c:4438 +#, c-format +msgid "subscript of '%s' out of bounds: %d" +msgstr "subescritura de «%s» fuera de límites: %d" -#: cobc/typeck.c:2727 cobc/typeck.c:2806 +#: cobc/typeck.c:2812 cobc/typeck.c:2891 msgid "reference modification not allowed here" msgstr "modificación referencial no permitida aquí" -#: cobc/typeck.c:2741 cobc/typeck.c:2832 +#: cobc/typeck.c:2826 cobc/typeck.c:2917 msgid "88 level item not allowed here" msgstr "Ítem del nivel 88 no es permitido aquí" -#: cobc/typeck.c:2745 cobc/typeck.c:2836 cobc/typeck.c:2844 cobc/typeck.c:2906 +#: cobc/typeck.c:2830 cobc/typeck.c:2921 cobc/typeck.c:2929 cobc/typeck.c:2991 msgid "variable length item not allowed here" msgstr "ítem de longitud variable no permitido aquí" -#: cobc/typeck.c:2774 +#: cobc/typeck.c:2859 #, c-format msgid "'%s' has not been DEFINEd" msgstr "«%s» no ha sido definido" -#: cobc/typeck.c:2810 +#: cobc/typeck.c:2895 msgid "only field names allowed here" msgstr "solo nombres de campo permitidos aquí" -#: cobc/typeck.c:2821 +#: cobc/typeck.c:2906 #, c-format msgid "VALUE of '%s': %s target '%s' is invalid" msgstr "VALOR de «%s»: %s objetivo «%s» no es válido" -#: cobc/typeck.c:2823 cobc/typeck.c:2889 +#: cobc/typeck.c:2908 cobc/typeck.c:2974 msgid "target must be in FILE SECTION or LINKAGE SECTION or have the EXTERNAL clause" msgstr "objetivo debe estar en SECCIÓN FICHEO o SECCIÓN ENLACE o tener la cláusula EXTERNA" -#: cobc/typeck.c:2879 cobc/typeck.c:2888 +#: cobc/typeck.c:2964 cobc/typeck.c:2973 #, c-format msgid "VALUE of '%s': %s target is invalid" msgstr "VALOR de «%s»: objetivo %s no es válido" -#: cobc/typeck.c:2881 +#: cobc/typeck.c:2966 msgid "no previous data-item found" msgstr "ningún ítem-datos previo encontrado" -#: cobc/typeck.c:3040 cobc/typeck.c:4799 +#: cobc/typeck.c:3130 cobc/typeck.c:4963 #, c-format msgid "'%s' cannot be BASED/EXTERNAL" msgstr "«%s» no puede ser BASED/EXTERNAL" -#: cobc/typeck.c:3045 +#: cobc/typeck.c:3135 #, c-format msgid "'%s' is not in WORKING-STORAGE SECTION" msgstr "«%s» no esta en la WORKING-STORAGE SECTION" -#: cobc/typeck.c:3052 cobc/typeck.c:4796 +#: cobc/typeck.c:3142 cobc/typeck.c:4960 #, c-format msgid "'%s' not level 01 or 77" msgstr "«%s» no nivel 01 o 77" -#: cobc/typeck.c:3055 cobc/typeck.c:3090 cobc/typeck.c:4802 +#: cobc/typeck.c:3145 cobc/typeck.c:3180 cobc/typeck.c:4966 #, c-format msgid "'%s' REDEFINES field not allowed here" msgstr "«%s» Campo de REDEFINES no se permite aquí" -#: cobc/typeck.c:3075 cobc/typeck.c:8423 +#: cobc/typeck.c:3165 cobc/typeck.c:8876 #, fuzzy, c-format #| msgid "duplicate DEFINE directive '%s'" msgid "duplicate USING BY REFERENCE item '%s'" msgstr "directiva DEFINE duplicada «%s»" -#: cobc/typeck.c:3103 +#: cobc/typeck.c:3193 #, c-format msgid "'%s' USING item duplicates RETURNING item" msgstr "«%s» ítem usando USING duplica ítem de retorno DEVOLVIENDO" -#: cobc/typeck.c:3177 +#: cobc/typeck.c:3268 #, fuzzy, c-format #| msgid "redefinition of '%s'" msgid "prototype and definition of '%s' do not match" msgstr "redefinición de «%s»" -#: cobc/typeck.c:3256 +#: cobc/typeck.c:3389 cobc/typeck.c:3486 #, c-format msgid "parameters #%d ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3259 +#: cobc/typeck.c:3393 #, c-format msgid "returning items ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3295 +#: cobc/typeck.c:3429 #, fuzzy #| msgid "no definition/prototype seen for function '%s'" msgid "definition is a program but the prototype is a function" msgstr "sin aparecer definición/prototipo para función «%s»" -#: cobc/typeck.c:3299 +#: cobc/typeck.c:3433 #, fuzzy #| msgid "no definition/prototype seen for program '%s'" msgid "definition is a function but the prototype is a program" msgstr "sin definición/prototipo visto para programa «%s»" -#: cobc/typeck.c:3306 -msgid "DECIMAL-POINT IS COMMA clauses differ" -msgstr "" - -#: cobc/typeck.c:3312 -msgid "CURRENCY clauses differ" -msgstr "" - -#: cobc/typeck.c:3348 +#: cobc/typeck.c:3496 #, fuzzy #| msgid "number of parameters exceeds maximum %d" msgid "number of parameters differ" msgstr "número de parámetros excede el máximo %d" -#: cobc/typeck.c:3358 +#: cobc/typeck.c:3506 msgid "definition has a RETURNING item but prototype does not" msgstr "" -#: cobc/typeck.c:3362 +#: cobc/typeck.c:3510 msgid "definition does not have a RETURNING item but prototype does" msgstr "" -#: cobc/typeck.c:3411 +#: cobc/typeck.c:3560 #, c-format msgid "unexpected tree tag: %d" msgstr "etiqueta de árbol inesperada: %d" -#: cobc/typeck.c:3433 +#: cobc/typeck.c:3584 #, fuzzy, c-format #| msgid "parameters passed BY VALUE" msgid "expected argument #%d, %s, to be passed BY VALUE" msgstr "parámetro pasado POR VALOR" -#: cobc/typeck.c:3437 +#: cobc/typeck.c:3589 #, c-format msgid "expected argument #%d, %s, to be passed BY REFERENCE/CONTENT" msgstr "" -#: cobc/typeck.c:3455 cobc/typeck.c:3580 cobc/typeck.c:3583 +#: cobc/typeck.c:3608 cobc/typeck.c:3733 cobc/typeck.c:3736 #, c-format msgid "argument #%d is not optional" msgstr "" -#: cobc/typeck.c:3468 +#: cobc/typeck.c:3622 #, c-format msgid "argument #%d must be at least %d bytes long" msgstr "" -#: cobc/typeck.c:3483 +#: cobc/typeck.c:3637 #, c-format msgid "argument #%d is a different type of pointer than the parameter" msgstr "" -#: cobc/typeck.c:3490 +#: cobc/typeck.c:3644 #, c-format msgid "argument #%d is ANY LENGTH, but expecting a fixed size item" msgstr "" -#: cobc/typeck.c:3518 +#: cobc/typeck.c:3672 #, c-format msgid "argument #%d, %s, does not conform to the parameter definition" msgstr "" -#: cobc/typeck.c:3566 +#: cobc/typeck.c:3719 #, c-format msgid "expecting up to %d arguments, but found %d" msgstr "" -#: cobc/typeck.c:3598 +#: cobc/typeck.c:3752 #, fuzzy #| msgid "function RETURNING item may not be ANY LENGTH" msgid "the RETURNING item is of a fixed size, not ANY LENGTH" msgstr "función RETORNANDO ítem quizá no es CUALQUIER LONGITUD" -#: cobc/typeck.c:3603 +#: cobc/typeck.c:3758 #, fuzzy, c-format #| msgid "RETURNING item must have level 01" msgid "RETURNING item %s is not a valid type" msgstr "DEVOLVIENDO ítem debe de tener un nivel 01" -#: cobc/typeck.c:3609 +#: cobc/typeck.c:3764 #, fuzzy #| msgid "unexpected CONSTANT item" msgid "unexpected RETURNING item" msgstr "ítem CONSTANT inesperado" -#: cobc/typeck.c:3612 +#: cobc/typeck.c:3767 msgid "expecting a RETURNING item, but none provided" msgstr "" -#: cobc/typeck.c:3663 -#, c-format -msgid "'%s' is not an alphabet name" -msgstr "«%s» no es un nombre de alfabeto" - -#: cobc/typeck.c:3939 +#: cobc/typeck.c:4091 #, c-format msgid "duplicate character values in alphabet '%s': %s" msgstr "duplica valores de carácter en alfabeto «%s»: %s" -#: cobc/typeck.c:3944 +#: cobc/typeck.c:4096 #, c-format msgid "invalid character values in alphabet '%s', starting at position %d" msgstr "valores de carácter inválidos en alfabeto «%s», iniciando en posición %d" -#: cobc/typeck.c:4045 +#: cobc/typeck.c:4198 #, fuzzy, c-format #| msgid "duplicate values in class '%s'" msgid "duplicate character values in class '%s'" msgstr "valores duplicados en clase '%s'" -#: cobc/typeck.c:4074 +#: cobc/typeck.c:4227 msgid "invalid ALPHABET name" msgstr "nombre ALFABÉTICO inválido" -#: cobc/typeck.c:4103 +#: cobc/typeck.c:4256 #, c-format msgid "'%s' is not a locale name" msgstr "«%s» no es un nombre local" -#: cobc/typeck.c:4257 +#: cobc/typeck.c:4410 msgid "invalid RECORD DEPENDING item" msgstr "invalida ítem RECORD DEPENDING" -#: cobc/typeck.c:4262 +#: cobc/typeck.c:4415 msgid "RECORD DEPENDING must reference a data-item" msgstr "DEPENDENCIA REGISTRO debe referirse a ítem-dato" -#: cobc/typeck.c:4285 +#: cobc/typeck.c:4438 #, c-format msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgstr "Ítem RECORD DEPENDING «%s» debería estar definido dentro de sección WORKING-STORAGE, LOCAL-STORAGE O LINKAGE SECTION" -#: cobc/typeck.c:4298 +#: cobc/typeck.c:4451 #, fuzzy, c-format #| msgid "value in AT clause is not numeric" msgid "file %s: RELATIVE KEY %s is not numeric" msgstr "valor dentro de cláusula AT no es numérico" -#: cobc/typeck.c:4307 +#: cobc/typeck.c:4460 #, c-format msgid "file %s: RELATIVE KEY %s must be integer" msgstr "" -#: cobc/typeck.c:4312 +#: cobc/typeck.c:4465 #, c-format msgid "file %s: RELATIVE KEY %s must be unsigned" msgstr "" -#: cobc/typeck.c:4319 +#: cobc/typeck.c:4472 #, c-format msgid "file %s: RELATIVE KEY %s cannot have OCCURS" msgstr "" -#: cobc/typeck.c:4325 +#: cobc/typeck.c:4478 #, c-format msgid "RELATIVE KEY %s cannot be in file record belonging to %s" msgstr "" -#: cobc/typeck.c:4334 +#: cobc/typeck.c:4487 #, c-format msgid "file %s: RELATIVE KEY %s declared outside WORKING-STORAGE" msgstr "" -#: cobc/typeck.c:4356 cobc/typeck.c:8396 +#: cobc/typeck.c:4509 cobc/typeck.c:8833 #, c-format msgid "'%s' is not a valid data name" msgstr "«%s» no es un nombre válido de datos" -#: cobc/typeck.c:4363 +#: cobc/typeck.c:4516 #, fuzzy, c-format #| msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgid "CRT STATUS item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "Ítem RECORD DEPENDING «%s» debería estar definido dentro de sección WORKING-STORAGE, LOCAL-STORAGE O LINKAGE SECTION" -#: cobc/typeck.c:4369 +#: cobc/typeck.c:4522 #, fuzzy, c-format #| msgid "'%s' CRT STATUS must be 4 characters long" msgid "'%s' numeric CRT STATUS must have at least 4 digits" msgstr "«%s» CRT STATUS debe ser de 4 caracteres de longitud" -#: cobc/typeck.c:4375 +#: cobc/typeck.c:4528 #, fuzzy, c-format #| msgid "'%s' CRT STATUS must be 4 characters long" msgid "'%s' CRT STATUS must be 3 or 4 characters long" msgstr "«%s» CRT STATUS debe ser de 4 caracteres de longitud" -#: cobc/typeck.c:4397 +#: cobc/typeck.c:4550 #, fuzzy, c-format #| msgid "'%s' is not a field" msgid "FILE STATUS '%s' is not a field" msgstr "%s no es un campo" -#: cobc/typeck.c:4409 +#: cobc/typeck.c:4562 #, c-format msgid "FILE STATUS '%s' may not be a decimal or have a PIC with a P" msgstr "" -#: cobc/typeck.c:4414 +#: cobc/typeck.c:4567 #, c-format msgid "FILE STATUS '%s' is a numeric field, but I-O status codes are not numeric in general" msgstr "" -#: cobc/typeck.c:4418 +#: cobc/typeck.c:4571 #, fuzzy, c-format #| msgid "'%s' is not a numeric or numeric-edited name" msgid "FILE STATUS '%s' must be an alphanumeric or numeric field" msgstr "«%s» no es nombre numérico o editado-numérico" -#: cobc/typeck.c:4425 +#: cobc/typeck.c:4578 #, fuzzy, c-format #| msgid "'%s' is not USAGE DISPLAY" msgid "FILE STATUS '%s' must be USAGE DISPLAY" msgstr "«%s» no es USAGE DISPLAY" -#: cobc/typeck.c:4432 +#: cobc/typeck.c:4585 #, fuzzy, c-format #| msgid "'%s' CRT STATUS must be 4 characters long" msgid "FILE STATUS '%s' must be 2 characters long" msgstr "«%s» CRT STATUS debe ser de 4 caracteres de longitud" -#: cobc/typeck.c:4440 +#: cobc/typeck.c:4593 #, fuzzy, c-format #| msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgid "FILE STATUS '%s' must be in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE" msgstr "Ítem RECORD DEPENDING «%s» debería estar definido dentro de sección WORKING-STORAGE, LOCAL-STORAGE O LINKAGE SECTION" -#: cobc/typeck.c:4446 +#: cobc/typeck.c:4599 #, fuzzy, c-format #| msgid "RENAMES may not contain '%s' as it is an OCCURS DEPENDING table" msgid "FILE STATUS '%s' may not be located after an OCCURS DEPENDING field" msgstr "RENAMES quizá no contienen «%s» como sea una distribución OCCURS DEPENDING" -#: cobc/typeck.c:4460 +#: cobc/typeck.c:4613 #, fuzzy, c-format #| msgid "'%s' will be implicitly defined" msgid "variable '%s' will be implicitly defined" msgstr "«%s» será definido de forma implícita" -#: cobc/typeck.c:4489 cobc/typeck.c:4550 +#: cobc/typeck.c:4703 msgid "ASSIGN variable" msgstr "" -#: cobc/typeck.c:4555 +#: cobc/typeck.c:4708 #, fuzzy, c-format #| msgid "ASSIGN data item '%s' invalid" msgid "ASSIGN data item '%s' is invalid" msgstr "ASSIGN elementos de datos «%s» no válido" -#: cobc/typeck.c:4619 +#: cobc/typeck.c:4773 #, c-format msgid "'%s' CURSOR must be 4 or 6 characters long" msgstr "«%s» CURSOR no es de 4 o 6 caracteres de longitud" -#: cobc/typeck.c:4680 +#: cobc/typeck.c:4844 #, fuzzy, c-format #| msgid "'%s' cannot have OCCURS DEPENDING" msgid "'%s' cannot have nested OCCURS DEPENDING" msgstr "«%s» no puede tener OCURRS DEPENDING" -#: cobc/typeck.c:4694 +#: cobc/typeck.c:4858 #, fuzzy, c-format #| msgid "'%s' ODO field item invalid here" msgid "'%s' OCCURS DEPENDING ON field item invalid here" msgstr "«%s» ítem de campo ODO no válido aquí" -#: cobc/typeck.c:4704 +#: cobc/typeck.c:4868 #, fuzzy, c-format #| msgid "'%s' cannot have OCCURS DEPENDING" msgid "'%s' cannot have OCCURS DEPENDING because of '%s'" msgstr "«%s» no puede tener OCURRS DEPENDING" -#: cobc/typeck.c:4716 +#: cobc/typeck.c:4880 #, fuzzy, c-format #| msgid "'%s' ODO item must have GLOBAL attribute" msgid "'%s' OCCURS DEPENDING ON item must have GLOBAL attribute" msgstr "«%s» ítem ODO debe tener atributo GLOBAL" -#: cobc/typeck.c:4730 +#: cobc/typeck.c:4894 #, c-format msgid "PASSWORD '%s' for EXTERNAL file '%s' must have EXTERNAL attribute" msgstr "" -#: cobc/typeck.c:4768 +#: cobc/typeck.c:4932 #, fuzzy, c-format #| msgid "duplicate REPOSITORY entry for '%s'" msgid "duplicate APPLY COMMIT target: '%s'" msgstr "duplica asiento REPOSITORIO para «%s»" -#: cobc/typeck.c:4782 +#: cobc/typeck.c:4946 #, fuzzy #| msgid "USE statement invalid for SORT file" msgid "APPLY COMMIT statement invalid for SORT file" msgstr "Declaracion USE no válida con fichero SORT" -#: cobc/typeck.c:4785 +#: cobc/typeck.c:4949 #, fuzzy #| msgid "USE statement invalid for SORT file" msgid "APPLY COMMIT statement invalid for REPORT file" msgstr "Declaracion USE no válida con fichero SORT" -#: cobc/typeck.c:4792 +#: cobc/typeck.c:4956 #, fuzzy, c-format #| msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgid "APPLY COMMIT item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "Ítem RECORD DEPENDING «%s» debería estar definido dentro de sección WORKING-STORAGE, LOCAL-STORAGE O LINKAGE SECTION" -#: cobc/typeck.c:4806 +#: cobc/typeck.c:4970 #, fuzzy, c-format #| msgid "%s not allowed here" msgid "item not allowed here: '%s'" msgstr "%s no se permite aquí" -#: cobc/typeck.c:4819 +#: cobc/typeck.c:4983 #, fuzzy, c-format #| msgid "'%s' cannot be subscripted" msgid "%s may not be subscripted" msgstr "«%s» no puede ser subíndice" -#: cobc/typeck.c:4823 -#, fuzzy, c-format -#| msgid "'%s' cannot be reference modified" -msgid "%s may not be reference modified" -msgstr "«%s» no puede ser modificado por referencia" - -#: cobc/typeck.c:4883 +#: cobc/typeck.c:5047 #, c-format msgid "DEBUGGING target invalid: '%s'" msgstr "DEBUGGING de objetivo inválido: «%s»" -#: cobc/typeck.c:4889 +#: cobc/typeck.c:5053 #, fuzzy, c-format #| msgid "DEBUGGING target invalid with ALL PROCEDURES: '%s'" msgid "DEBUGGING target already specified with ALL PROCEDURES: '%s'" msgstr "DEBUGGING objetivo inválido con ALL PROCEDURES: «%s»" -#: cobc/typeck.c:4909 +#: cobc/typeck.c:5073 #, fuzzy #| msgid "DEBUGGING target invalid: '%s'" msgid "DEBUGGING target" msgstr "DEBUGGING de objetivo inválido: «%s»" -#: cobc/typeck.c:4916 +#: cobc/typeck.c:5080 #, c-format msgid "'%s' is not a valid DEBUGGING target" msgstr "«%s» no es un objetivo válido de DEBUGGING" -#: cobc/typeck.c:4962 cobc/typeck.c:4970 +#: cobc/typeck.c:5126 cobc/typeck.c:5134 #, c-format msgid "'%s' is not in DECLARATIVES" msgstr "«%s» no se encuentra en DECLARATIVES" -#: cobc/typeck.c:4984 +#: cobc/typeck.c:5148 #, c-format msgid "invalid reference to '%s' (in DECLARATIVES)" msgstr "invalida referencia a «%s» (en DECLARATIVAS)" -#: cobc/typeck.c:4996 +#: cobc/typeck.c:5162 #, c-format msgid "GO TO paragraph '%s' which is defined in another SECTION" msgstr "" -#: cobc/typeck.c:5006 +#: cobc/typeck.c:5172 #, c-format msgid "'%s' is not a procedure name" msgstr "«%s» no es el nombre de un procedimiento" -#: cobc/typeck.c:5041 +#: cobc/typeck.c:5207 #, fuzzy, c-format #| msgid "'%s' and '%s' must be in the same record" msgid "%s and %s are not in the same SECTION" msgstr "«%s» y «%s» deben estar dentro del mismo registro" -#: cobc/typeck.c:5046 +#: cobc/typeck.c:5212 #, fuzzy, c-format #| msgid "'%s' defined here" msgid "%s is defined before %s" msgstr "«%s» definido aquí" -#: cobc/typeck.c:5088 +#: cobc/typeck.c:5254 #, fuzzy, c-format #| msgid "ANY LENGTH items may only be BY REFERENCE formal parameters" msgid "'%s' ANY LENGTH item must be a formal parameter" msgstr "Elementos ANY LENGTH quizá solo está por parámetros formales referenciado por BY REFERENCE" -#: cobc/typeck.c:5136 +#: cobc/typeck.c:5302 #, c-format msgid "LINKAGE item '%s' is not a PROCEDURE USING parameter" msgstr "Ítem «%s» LINKAGE no es un parámetro PROCEDURE USING" -#: cobc/typeck.c:5192 +#: cobc/typeck.c:5358 #, c-format msgid "'%s' is not an alterable paragraph" msgstr "«%s» no es un párrafo modificable" -#: cobc/typeck.c:5802 cobc/typeck.c:5806 +#: cobc/typeck.c:5852 +#, fuzzy +#| msgid "invalid operator '%s' in expression" +msgid "invalid expression: unfinished expression" +msgstr "operador inválido «%s» dentro de expresión" + +#: cobc/typeck.c:5858 cobc/typeck.c:5865 +msgid "invalid expression" +msgstr "expresión no válida" + +#: cobc/typeck.c:5990 cobc/typeck.c:5994 #, c-format msgid "suggest parentheses around %s within %s" msgstr "sugiere paréntesis alrededor de %s dentro de %s" -#: cobc/typeck.c:5815 +#: cobc/typeck.c:6003 #, fuzzy #| msgid "invalid expression" msgid "invalid conditional expression" msgstr "expresión no válida" -#: cobc/typeck.c:5932 +#: cobc/typeck.c:6120 #, c-format msgid "internal decimal structure size exceeded: %d" msgstr "tamaño de estructura decimal interna excedido: %d" -#: cobc/typeck.c:5935 +#: cobc/typeck.c:6123 msgid "Try to minimize the number of parentheses or split into multiple computations." msgstr "Intenta minimizar el número de paréntess o divide en múltiples cálculos." -#: cobc/typeck.c:5959 +#: cobc/typeck.c:6147 #, fuzzy, c-format #| msgid "more than %d nested conditions" msgid "more than %d nested expressions" msgstr "más que %d condiciones anidadas" -#: cobc/typeck.c:6000 +#: cobc/typeck.c:6188 msgid "precision of result may change with arithmetic-osvs" msgstr "precisión de resultado quizá cambia con aritmética-osvs" -#: cobc/typeck.c:6080 +#: cobc/typeck.c:6268 #, c-format msgid "unexpected operation: %c (%d)" msgstr "operación no esperada: %c (%d)" -#: cobc/typeck.c:6085 +#: cobc/typeck.c:6273 #, c-format msgid "%s operator may be misplaced" msgstr "operador %s quizá desubicado" -#: cobc/typeck.c:6160 +#: cobc/typeck.c:6349 msgid "unexpected constant expansion" msgstr "expansión constante inesperada" -#: cobc/typeck.c:6882 cobc/typeck.c:11024 +#: cobc/typeck.c:7106 cobc/typeck.c:11656 cobc/typeck.c:11661 msgid "alphanumeric value is expected" msgstr "valor alfanumérico es esperado" -#: cobc/typeck.c:6884 cobc/typeck.c:11019 +#: cobc/typeck.c:7109 cobc/typeck.c:11651 msgid "numeric value is expected" msgstr "valor numérico está esperado" -#: cobc/typeck.c:6954 +#: cobc/typeck.c:7203 +#, fuzzy +#| msgid "invalid option detected" +msgid "invalid expression: condition expected" +msgstr "opción no válida detectada" + +#: cobc/typeck.c:7271 +#, fuzzy +#| msgid "invalid expression" +msgid "incomplete expression" +msgstr "expresión no válida" + +#: cobc/typeck.c:7312 #, c-format msgid "more than %d nested conditions" msgstr "más que %d condiciones anidadas" -#: cobc/typeck.c:7290 cobc/typeck.c:7371 +#: cobc/typeck.c:7667 cobc/typeck.c:7748 msgid "no CORRESPONDING items found" msgstr "ningún ítem CORRESPONDING encontrado" -#: cobc/typeck.c:7443 +#: cobc/typeck.c:7820 msgid "no items to ACCEPT found" msgstr "" -#: cobc/typeck.c:7493 +#: cobc/typeck.c:7870 #, fuzzy #| msgid "invalid type for DISPLAY operand" msgid "no items to DISPLAY found" msgstr "tipo no válido para operando DISPLAY" -#: cobc/typeck.c:7605 +#: cobc/typeck.c:7981 msgid "cannot specify figurative constant ZERO in AT clause" msgstr "no puedo especificar constante CERO figurativa dentro de cláusula AT" -#: cobc/typeck.c:7609 +#: cobc/typeck.c:7985 msgid "value in AT clause is not numeric" msgstr "valor dentro de cláusula AT no es numérico" -#: cobc/typeck.c:7615 +#: cobc/typeck.c:7991 msgid "value in AT clause must have 4 or 6 digits" msgstr "valor dentro de cláusula AT debe tener 4 o 6 dígitos" -#: cobc/typeck.c:7737 +#: cobc/typeck.c:8168 msgid "invalid PROMPT literal" msgstr "invalida PROMPT literal" -#: cobc/typeck.c:7742 +#: cobc/typeck.c:8173 msgid "invalid PROMPT identifier" msgstr "invalida idientificador PROMPT" -#: cobc/typeck.c:8032 +#: cobc/typeck.c:8465 #, c-format msgid "'%s' is not an input device" msgstr "«%s» no es un dispositivo de entrada" -#: cobc/typeck.c:8059 cobc/typeck.c:9242 +#: cobc/typeck.c:8492 cobc/typeck.c:9708 #, c-format msgid "'%s' is not defined in SPECIAL-NAMES" msgstr "«%s» no esta definido en SPECIAL-NAMES" -#: cobc/typeck.c:8064 +#: cobc/typeck.c:8497 #, c-format msgid "invalid input device '%s'" msgstr "invalida dispositivo de entrada «%s»" -#: cobc/typeck.c:8069 cobc/typeck.c:9246 +#: cobc/typeck.c:8502 cobc/typeck.c:9712 #, c-format msgid "unknown device '%s'; it may exist in another dialect" msgstr "dispositivo «%s» desconocida; quizá existe en otro dialecto" -#: cobc/typeck.c:8072 cobc/typeck.c:9249 +#: cobc/typeck.c:8505 cobc/typeck.c:9715 #, c-format msgid "unknown device '%s'; not defined in SPECIAL-NAMES" msgstr "dispositivo desconocido «%s»; no definido en SPECIAL-NAMES" -#: cobc/typeck.c:8088 +#: cobc/typeck.c:8524 msgid "target of RETURNING is not a data pointer" msgstr "objetivo de DEVOLVIENDO no es un puntero de datos" -#: cobc/typeck.c:8115 cobc/typeck.c:12634 cobc/typeck.c:12700 -#: cobc/typeck.c:12768 +#: cobc/typeck.c:8551 cobc/typeck.c:13410 cobc/typeck.c:13479 +#: cobc/typeck.c:13547 #, fuzzy, c-format #| msgid "cannot change address of '%s', which is not BASED or a linkage item" msgid "cannot change address of '%s', which is not BASED or a LINKAGE item" msgstr "no puede cambiar dirección de «%s», la cual no está BASADA o un ítem enlazado" -#: cobc/typeck.c:8121 +#: cobc/typeck.c:8557 #, fuzzy #| msgid "target of ALLOCATE is not a BASED item" msgid "target of ALLOCATE must have BASED clause" msgstr "objetivo de ALLOCATE no es un ítem BASED" -#: cobc/typeck.c:8155 cobc/typeck.c:8571 +#: cobc/typeck.c:8591 cobc/typeck.c:9023 msgid "amount must be specified as a numeric expression" msgstr "" -#: cobc/typeck.c:8161 +#: cobc/typeck.c:8597 msgid "INITIALIZED TO item is not alphanumeric" msgstr "Ítem INITIALIZED TO no es alfanumérico" -#: cobc/typeck.c:8232 +#: cobc/typeck.c:8667 msgid "only alphanumeric FUNCTION types are allowed here" msgstr "solamente tipos FUNCTION alfanuméricos son permitidos aquí" -#: cobc/typeck.c:8240 +#: cobc/typeck.c:8675 msgid "invalid RETURNING field" msgstr "campo DEVOLVIENDO inválido" -#: cobc/typeck.c:8259 +#: cobc/typeck.c:8694 msgid "STDCALL not available on this platform" msgstr "STDCALL no disponible en esta plataforma" -#: cobc/typeck.c:8263 +#: cobc/typeck.c:8698 msgid "STDCALL used on 64-bit Windows platform" msgstr "STDCALL utilizado en plataforma Windows de 64 bit" -#: cobc/typeck.c:8268 +#: cobc/typeck.c:8703 msgid "STATIC CALL convention requires a literal program name" msgstr "Convención STATIC CALL requiere un nombre literal de programa" -#: cobc/typeck.c:8273 cobc/typeck.c:11975 cobc/typeck.c:12900 -#: cobc/typeck.c:13271 +#: cobc/typeck.c:8708 cobc/typeck.c:12746 cobc/typeck.c:13681 +#: cobc/typeck.c:14077 msgid "HANDLE must be either a generic or a THREAD HANDLE" msgstr "HANDLE debe ser o un manipulador genérico o un THREAD HANDLE" -#: cobc/typeck.c:8291 +#: cobc/typeck.c:8726 msgid "numeric literal is negative" msgstr "literal numérico es negativo" -#: cobc/typeck.c:8370 +#: cobc/typeck.c:8805 msgid "numeric literal exceeds size limits" msgstr "literal numérico excede límites del tamaño" -#: cobc/typeck.c:8385 +#: cobc/typeck.c:8820 #, fuzzy, c-format #| msgid "figurative constant invalid here" msgid "figurative constant %s invalid here" msgstr "constante figurativa inválido aquí" -#: cobc/typeck.c:8403 +#: cobc/typeck.c:8840 #, c-format msgid "'%s' is not a 01 or 77 level item" msgstr "«%s» no es un ítem de nivel 01 o 77" -#: cobc/typeck.c:8407 +#: cobc/typeck.c:8856 #, c-format msgid "'%s' ANY LENGTH item not passed BY REFERENCE" msgstr "«%s» Ítem de ANY LENGTH no pasó BY REFERENCE" -#: cobc/typeck.c:8457 cobc/typeck.c:8462 +#: cobc/typeck.c:8909 cobc/typeck.c:8914 #, c-format msgid "wrong number of CALL parameters for '%s', %d given, %d expected" msgstr "número equivocado de parámetros en CALL para «%s», dados %d, esperados %d" -#: cobc/typeck.c:8529 cobc/typeck.c:8603 cobc/typeck.c:8607 cobc/typeck.c:8637 -#: cobc/typeck.c:11932 cobc/typeck.c:12092 cobc/typeck.c:12281 -#: cobc/typeck.c:12285 cobc/typeck.c:13206 cobc/typeck.c:13539 -#: cobc/typeck.c:13542 +#: cobc/typeck.c:8981 cobc/typeck.c:9055 cobc/typeck.c:9059 cobc/typeck.c:9095 +#: cobc/typeck.c:12703 cobc/typeck.c:12863 cobc/typeck.c:13052 +#: cobc/typeck.c:13056 cobc/typeck.c:14012 cobc/typeck.c:14345 +#: cobc/typeck.c:14348 #, c-format msgid "%s not allowed on %s files" msgstr "%s no permitida en ficheros de %s" -#: cobc/typeck.c:8704 +#: cobc/typeck.c:9172 msgid "positions cannot be specified for main windows" msgstr "posiciones no pueden ser especificadas para ventanas principales" -#: cobc/typeck.c:8714 cobc/typeck.c:8718 cobc/typeck.c:8740 +#: cobc/typeck.c:9183 cobc/typeck.c:9187 cobc/typeck.c:9211 #, fuzzy #| msgid "HANDLE must be either a generic or a WINDOW HANDLE" msgid "HANDLE must be either a generic or a WINDOW HANDLE or X(10)" msgstr "HANDLE debe ser o un genérico o un WINDOW HANDLE" -#: cobc/typeck.c:8849 +#: cobc/typeck.c:9324 #, c-format msgid "'%s' is an invalid type for DISPLAY operand" msgstr "«%s» es un tipo no válido de operando DISPLAY" -#: cobc/typeck.c:8854 +#: cobc/typeck.c:9329 msgid "invalid type for DISPLAY operand" msgstr "tipo no válido para operando DISPLAY" -#: cobc/typeck.c:9202 cobc/typeck.c:9235 +#: cobc/typeck.c:9668 cobc/typeck.c:9701 #, c-format msgid "'%s' is not an output device" msgstr "«%s» no es un dispositivo de salida" -#: cobc/typeck.c:9335 +#: cobc/typeck.c:9800 msgid "invalid use of 88 level in WHEN expression" msgstr "empleo inválido de nivel 88 dentro de expresión WHEN" -#: cobc/typeck.c:9396 +#: cobc/typeck.c:9861 msgid "wrong number of WHEN parameters" msgstr "número equivocado de parámetros WHEN" -#: cobc/typeck.c:9518 cobc/typeck.c:9530 +#: cobc/typeck.c:9983 cobc/typeck.c:9995 #, c-format msgid "target %d of FREE is not a BASED data item" msgstr "objetivo %d de FREE no es un ítem de datos BASED" -#: cobc/typeck.c:9536 +#: cobc/typeck.c:10001 #, c-format msgid "target %d of FREE must be a data pointer" msgstr "objetivo %d de FREE debe ser un puntero de datos" -#: cobc/typeck.c:9550 +#: cobc/typeck.c:10015 msgid "GO TO without procedure-name" msgstr "GO TO con múltiples nombres-procedimiento" -#: cobc/typeck.c:9560 +#: cobc/typeck.c:10023 msgid "GO TO with multiple procedure-names" msgstr "GO TO con multiples nombres-procedimiento" -#: cobc/typeck.c:9582 -#, fuzzy -#| msgid "GO TO with multiple procedure-names" -msgid "GO TO ENTRY with multiple entry-names" -msgstr "GO TO con multiples nombres-procedimiento" - -#: cobc/typeck.c:9646 +#: cobc/typeck.c:10088 msgid "invalid INITIALIZE statement" msgstr "estado INICIALIZAR inválido" -#: cobc/typeck.c:9752 cobc/typeck.c:9755 +#: cobc/typeck.c:10193 cobc/typeck.c:10196 #, c-format msgid "%s operands differ in size" msgstr "%s operandos difieren en tamaño" -#: cobc/typeck.c:9785 +#: cobc/typeck.c:10226 #, c-format msgid "unexpected clause %d" msgstr "cláusula inesperada %d" -#: cobc/typeck.c:9860 cobc/typeck.c:9871 cobc/typeck.c:9882 cobc/typeck.c:9893 +#: cobc/typeck.c:10301 cobc/typeck.c:10312 cobc/typeck.c:10323 +#: cobc/typeck.c:10334 #, c-format msgid "data name expected before %s" msgstr "nombre de datos esperado antes de %s" -#: cobc/typeck.c:9903 +#: cobc/typeck.c:10344 #, c-format msgid "ALL, LEADING or TRAILING expected before '%s'" msgstr "ALL, LEADING o TRAILING esperado antes de «%s»" -#: cobc/typeck.c:9913 +#: cobc/typeck.c:10354 msgid "operand has wrong size" msgstr "operando tiene tamaño equivocado" -#: cobc/typeck.c:10007 +#: cobc/typeck.c:10448 #, c-format msgid "'%s' defined here as PIC %s" msgstr "«%s» definido aquí como PIC %s" -#: cobc/typeck.c:10011 +#: cobc/typeck.c:10452 #, c-format msgid "'%s' defined here as a group of length %d" msgstr "«%s» definido aquí como un grupo de longitud %d" -#: cobc/typeck.c:10017 +#: cobc/typeck.c:10458 #, fuzzy, c-format #| msgid "internal register '%s' defined as BINARY-LONG" msgid "internal register '%s' defined as USAGE %s" msgstr "registro internos «%s» definido como BINARY-LONG" -#: cobc/typeck.c:10020 +#: cobc/typeck.c:10461 #, c-format msgid "'%s' defined here as USAGE %s" msgstr "«%s» definido aquí como USAGE %s" -#: cobc/typeck.c:10045 cobc/typeck.c:10063 +#: cobc/typeck.c:10486 cobc/typeck.c:10504 #, fuzzy, c-format #| msgid "value size exceeds data size" msgid "value size is %d" msgstr "tamaño de valor excede tamaño de datos" -#: cobc/typeck.c:10059 +#: cobc/typeck.c:10500 #, c-format msgid "value is %s" msgstr "" -#: cobc/typeck.c:10338 -msgid "invalid destination for MOVE" -msgstr "invalida destino para MOVE" - -#: cobc/typeck.c:10380 +#: cobc/typeck.c:10824 #, fuzzy #| msgid "MOVE of figurative constant to numeric item" msgid "MOVE of figurative constant SPACE to numeric item" msgstr "MOVE de constante figurativa a ítem numérico" -#: cobc/typeck.c:10395 +#: cobc/typeck.c:10839 msgid "MOVE of figurative constant QUOTE to numeric item" msgstr "MOVE de constante QUOTE figurativa a ítem numérico" -#: cobc/typeck.c:10400 cobc/typeck.c:10411 +#: cobc/typeck.c:10844 cobc/typeck.c:10855 msgid "MOVE of figurative constant to numeric item" msgstr "MOVE de constante figurativa a ítem numérico" -#: cobc/typeck.c:10469 +#: cobc/typeck.c:10936 msgid "numeric literal in VALUE clause of numeric-edited item" msgstr "literal numérico dentro de cláusula VALOR de ítem editado-numérico" -#: cobc/typeck.c:10494 +#: cobc/typeck.c:10966 msgid "numeric move to ALPHABETIC" msgstr "movimiento numérico a ALFABÉTICO" -#: cobc/typeck.c:10506 +#: cobc/typeck.c:10978 msgid "data item not signed" msgstr "ítem de dato sin signo" -#: cobc/typeck.c:10509 +#: cobc/typeck.c:10981 msgid "ignoring sign" msgstr "ignorando signo" -#: cobc/typeck.c:10821 +#: cobc/typeck.c:11381 msgid "overlapping MOVE may occur and produce unpredictable results" msgstr "sobreponiendo MOVE quizá ocurre y produce resultados impredecibles" -#: cobc/typeck.c:10828 +#: cobc/typeck.c:11388 msgid "overlapping MOVE may produce unpredictable results" msgstr "sobreposicionando MOVE quizá produce resultados impredecibles" -#: cobc/typeck.c:10961 +#: cobc/typeck.c:11593 msgid "invalid source for MOVE" msgstr "invalida origen para MOVE" -#: cobc/typeck.c:10982 +#: cobc/typeck.c:11614 msgid "source is non-numeric - substituting zero" msgstr "" -#: cobc/typeck.c:10988 cobc/typeck.c:10999 +#: cobc/typeck.c:11620 cobc/typeck.c:11631 msgid "invalid VALUE clause" msgstr "invalida cláusula VALUE" -#: cobc/typeck.c:10991 cobc/typeck.c:12841 cobc/typeck.c:12846 -#: cobc/typeck.c:12873 cobc/typeck.c:12878 +#: cobc/typeck.c:11623 cobc/typeck.c:13622 cobc/typeck.c:13627 +#: cobc/typeck.c:13654 cobc/typeck.c:13659 msgid "invalid SET statement" msgstr "invalida sentencia SET" -#: cobc/typeck.c:10993 +#: cobc/typeck.c:11625 msgid "invalid MOVE statement" msgstr "invalida sentencia MOVE" -#: cobc/typeck.c:11000 +#: cobc/typeck.c:11632 msgid "literal exceeds data size" msgstr "literal excede tamaño de datos" -#: cobc/typeck.c:11004 +#: cobc/typeck.c:11636 msgid "numeric literal exceeds data size" msgstr "literal numérico excede tamaño de dato" -#: cobc/typeck.c:11013 +#: cobc/typeck.c:11645 msgid "MOVE of non-integer to alphanumeric" msgstr "MOVE de no entero a alfanumérico" -#: cobc/typeck.c:11029 +#: cobc/typeck.c:11666 cobc/typeck.c:11671 +#, fuzzy +#| msgid "numeric value is expected" +msgid "national value is expected" +msgstr "valor numérico está esperado" + +#: cobc/typeck.c:11676 msgid "value does not fit the picture string" msgstr "valor no se ajusta a la cadena de dibujo" -#: cobc/typeck.c:11035 +#: cobc/typeck.c:11682 msgid "value size exceeds data size" msgstr "tamaño de valor excede tamaño de datos" -#: cobc/typeck.c:11040 +#: cobc/typeck.c:11687 msgid "sending field larger than receiving field" msgstr "enviando campo más largo que el campo recibido" -#: cobc/typeck.c:11045 +#: cobc/typeck.c:11692 msgid "some digits may be truncated" msgstr "algunos dígitos quizá son truncados" -#: cobc/typeck.c:11798 cobc/typeck.c:11848 +#: cobc/typeck.c:12566 cobc/typeck.c:12619 #, c-format msgid "invalid MOVE target: %s" msgstr "invalida objetivo MOVE: %s" -#: cobc/typeck.c:12105 +#: cobc/typeck.c:12876 msgid "READ PREVIOUS not allowed for this file type" msgstr "READ PREVIOUS no permitido para este tipo de fichero" -#: cobc/typeck.c:12113 +#: cobc/typeck.c:12884 msgid "KEY ignored with sequential READ" msgstr "KEY ignorado con READ secuencial" -#: cobc/typeck.c:12209 +#: cobc/typeck.c:12980 #, fuzzy #| msgid "figurative constant invalid here" msgid "figurative constants not allowed in FROM clause" msgstr "constante figurativa inválido aquí" -#: cobc/typeck.c:12216 -msgid "literal in FROM clause must be alphanumeric, national or boolean" +#: cobc/typeck.c:12987 +msgid "literal in FROM clause must be alphanumeric, utf-8, national or boolean" msgstr "" -#: cobc/typeck.c:12239 cobc/typeck.c:13499 +#: cobc/typeck.c:13010 cobc/typeck.c:14305 #, c-format msgid "%s FILE requires a FROM clause" msgstr "FICHERO %s requiere una cláusula FROM" -#: cobc/typeck.c:12261 cobc/typeck.c:12345 cobc/typeck.c:13521 +#: cobc/typeck.c:13032 cobc/typeck.c:13116 cobc/typeck.c:14327 #, c-format msgid "%s subject does not refer to a record name" msgstr "Sujeto a %s no hace referencia a un nombre de registro" -#: cobc/typeck.c:12351 +#: cobc/typeck.c:13122 msgid "RELEASE not allowed on this record item" msgstr "RELEASE no permitido en este ítem de registro" -#: cobc/typeck.c:12433 cobc/typeck.c:12454 cobc/typeck.c:12461 +#: cobc/typeck.c:13183 cobc/typeck.c:13209 cobc/typeck.c:13237 msgid "invalid SEARCH ALL condition" msgstr "invalida condición SEARCH ALL" -#: cobc/typeck.c:12578 cobc/typeck.c:12585 +#: cobc/typeck.c:13231 +msgid "SEARCH ALL requires comparision of KEY field" +msgstr "" + +#: cobc/typeck.c:13354 cobc/typeck.c:13361 msgid "SET targets must be PROGRAM-POINTER" msgstr "SET objetivo debe ser PROGRAM-POINTER" -#: cobc/typeck.c:12610 +#: cobc/typeck.c:13386 #, fuzzy, c-format #| msgid "SET target '%s' is not numeric, an index or a pointer" msgid "SET target '%s' is not numeric, an INDEX or a POINTER" msgstr "ESTABLECER objetivo «%s» no es numérico, un índice o un puntero" -#: cobc/typeck.c:12627 cobc/typeck.c:12696 cobc/typeck.c:12764 +#: cobc/typeck.c:13403 cobc/typeck.c:13475 cobc/typeck.c:13543 #, c-format msgid "cannot change address of '%s', which is not level 1 or 77" msgstr "no puede modificar dirección de «%s», la cual no es nivel 1 o 77" -#: cobc/typeck.c:12721 +#: cobc/typeck.c:13500 #, fuzzy, c-format #| msgid "SET target '%s' is not numeric, an index or a pointer" msgid "SET target '%s' is not a POINTER for FCD" msgstr "ESTABLECER objetivo «%s» no es numérico, un índice o un puntero" -#: cobc/typeck.c:12789 +#: cobc/typeck.c:13569 #, c-format msgid "SET target '%s' is not a POINTER for FCD-KEYDEF" msgstr "" -#: cobc/typeck.c:12882 +#: cobc/typeck.c:13663 msgid "field does not have a FALSE clause" msgstr "campo no tiene una cláusula FALSE" -#: cobc/typeck.c:12913 +#: cobc/typeck.c:13694 msgid "THREAD-priority must be between 1 and 32767" msgstr "HILO-prioridad debe estar entre 1 y 32767" -#: cobc/typeck.c:12933 +#: cobc/typeck.c:13714 msgid "SET ATTRIBUTE requires a screen item as subject" msgstr "SET ATTRIBUTE requiere un ítem de pantalla como sujeto" -#: cobc/typeck.c:12939 +#: cobc/typeck.c:13720 msgid "SET ATTRIBUTE subject does not refer to a screen item" msgstr "SET ATTRIBUTE sujeto no refiere a un ítem de pantalla" -#: cobc/typeck.c:12990 -msgid "invalid SORT filename" -msgstr "invalida nombre de fichero SORT" - -#: cobc/typeck.c:13051 -msgid "invalid SORT USING parameter" -msgstr "invalida parámetro SORT USING" - -#: cobc/typeck.c:13080 -msgid "invalid SORT GIVING parameter" -msgstr "invalida parámetro SORT GIVING" +#: cobc/typeck.c:13835 cobc/typeck.c:13875 +#, fuzzy, c-format +#| msgid "invalid parameter: %s" +msgid "invalid %s parameter" +msgstr "parámetro no válido: %s" -#: cobc/typeck.c:13134 cobc/typeck.c:13161 cobc/typeck.c:13181 +#: cobc/typeck.c:13940 cobc/typeck.c:13967 cobc/typeck.c:13987 msgid "invalid key item" msgstr "ítem clave inválido" -#: cobc/typeck.c:13211 +#: cobc/typeck.c:14017 msgid "LENGTH/SIZE clause only allowed on INDEXED files" msgstr "LONGITUD/TAMAÑO clausurado solamente permitido en ficheros INDEXADO" -#: cobc/typeck.c:13216 +#: cobc/typeck.c:14022 msgid "START not allowed with ACCESS MODE RANDOM" msgstr "INICIO no es permitido con MODO DE ACCESO ALEATORIO" -#: cobc/typeck.c:13305 -#, fuzzy, c-format -#| msgid "SET target '%s' is not numeric, an index or a pointer" -msgid "%s item '%s' must be numeric and an integer" -msgstr "ESTABLECER objetivo «%s» no es numérico, un índice o un puntero" - -#: cobc/typeck.c:13311 +#: cobc/typeck.c:14111 cobc/typeck.c:14117 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "%s item '%s' must be an integer" msgstr "«%s» no es un entero" -#: cobc/typeck.c:13315 +#: cobc/typeck.c:14121 #, c-format msgid "%s item '%s' may not have PICTURE with P in it" msgstr "" -#: cobc/typeck.c:13331 +#: cobc/typeck.c:14137 #, fuzzy, c-format #| msgid "'%s' is not a statement" msgid "'%s' is not an elementary item" msgstr "«%s» no es una sentencia" -#: cobc/typeck.c:13407 +#: cobc/typeck.c:14213 #, fuzzy #| msgid "RETURNING item must have level 01 or 77" msgid "STRING items must be all NATIONAL or none" msgstr "DEVOLVIENDO ítem debe tener un nivel 01 o 77" -#: cobc/typeck.c:13555 +#: cobc/typeck.c:14361 msgid "LOCK clause invalid here" msgstr "CANDADO clausurado no valida aquí" -#: cobc/typeck.c:13800 +#: cobc/typeck.c:14606 msgid "data item is not part of a report" msgstr "" -#: cobc/typeck.c:13820 +#: cobc/typeck.c:14626 msgid "improper use of SUPPRESS PRINTING" msgstr "" -#: cobc/typeck.c:13835 +#: cobc/typeck.c:14642 #, fuzzy, c-format #| msgid "%s is not an alphanumeric literal" msgid "%s must be alphanumeric or national" msgstr "%s no es un literal alfanumérico" -#: cobc/typeck.c:13846 +#: cobc/typeck.c:14652 #, c-format msgid "%s may not be a figurative constant" msgstr "" -#: cobc/typeck.c:13885 +#: cobc/typeck.c:14690 #, fuzzy, c-format #| msgid "'%s' and '%s' must be in the same record" msgid "%s must be a child of the input record" msgstr "«%s» y «%s» deben estar dentro del mismo registro" -#: cobc/typeck.c:13911 +#: cobc/typeck.c:14715 #, c-format msgid "%s may not be an ignored item in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:13922 +#: cobc/typeck.c:14725 #, fuzzy, c-format #| msgid "must be numeric" msgid "%s must be elementary" msgstr "debe ser numérico" -#: cobc/typeck.c:13935 +#: cobc/typeck.c:14737 #, fuzzy, c-format #| msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgid "STRING item '%s' must be USAGE DISPLAY or NATIONAL" msgstr "ítemes elementarios con cláusula SIGN debe ser USAGE DISPLAY o NATIONAL" -#: cobc/typeck.c:13947 +#: cobc/typeck.c:14749 #, fuzzy, c-format #| msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgid "%s must be USAGE DISPLAY or NATIONAL" msgstr "ítemes elementarios con cláusula SIGN debe ser USAGE DISPLAY o NATIONAL" -#: cobc/typeck.c:13961 +#: cobc/typeck.c:14761 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "%s must be an integer" msgstr "«%s» no es un entero" -#: cobc/typeck.c:13977 cobc/typeck.c:13983 +#: cobc/typeck.c:14776 cobc/typeck.c:14782 msgid "JSON/XML GENERATE receiving item" msgstr "" -#: cobc/typeck.c:13980 +#: cobc/typeck.c:14779 msgid "JSON/XML GENERATE receiving item may not have JUSTIFIED clause" msgstr "" -#: cobc/typeck.c:14068 +#: cobc/typeck.c:14867 #, fuzzy #| msgid "'%s' cannot be reference modified" msgid "JSON/XML GENERATE input record may not be reference modified" msgstr "«%s» no puede ser modificado por referencia" -#: cobc/typeck.c:14074 +#: cobc/typeck.c:14873 msgid "JSON/XML GENERATE input record may not have RENAMES clause" msgstr "" -#: cobc/typeck.c:14079 +#: cobc/typeck.c:14878 #, c-format msgid "all the children of '%s' are ignored in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14086 +#: cobc/typeck.c:14885 msgid "JSON/XML GENERATE input record has subrecords with non-unique names" msgstr "" -#: cobc/typeck.c:14091 +#: cobc/typeck.c:14890 msgid "floating-point items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14095 +#: cobc/typeck.c:14894 msgid "OCCURS items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14142 +#: cobc/typeck.c:14941 msgid "NAMESPACE must be a valid URI" msgstr "" -#: cobc/typeck.c:14186 +#: cobc/typeck.c:14985 msgid "NAMESPACE-PREFIX must be a valid XML name" msgstr "" -#: cobc/typeck.c:14215 cobc/typeck.c:14223 +#: cobc/typeck.c:15014 cobc/typeck.c:15022 msgid "NAME OF item" msgstr "" -#: cobc/typeck.c:14220 +#: cobc/typeck.c:15019 msgid "NAME OF item must be the input record or a child of it" msgstr "" -#: cobc/typeck.c:14230 +#: cobc/typeck.c:15029 msgid "NAME OF ... OMITTED only valid for source identifier" msgstr "" -#: cobc/typeck.c:14238 +#: cobc/typeck.c:15037 #, c-format msgid "NAME OF literal must be a valid %s identifier" msgstr "" -#: cobc/typeck.c:14265 cobc/typeck.c:14266 cobc/typeck.c:14269 -#: cobc/typeck.c:14273 +#: cobc/typeck.c:15062 cobc/typeck.c:15063 cobc/typeck.c:15066 +#: cobc/typeck.c:15070 msgid "TYPE OF item" msgstr "" -#: cobc/typeck.c:14291 +#: cobc/typeck.c:15088 msgid "SUPPRESS WHEN SPACE item" msgstr "" -#: cobc/typeck.c:14294 +#: cobc/typeck.c:15091 msgid "SUPPRESS WHEN LOW-VALUE item" msgstr "" -#: cobc/typeck.c:14296 +#: cobc/typeck.c:15093 msgid "SUPPRESS WHEN HIGH-VALUE item" msgstr "" -#: cobc/typeck.c:14325 cobc/typeck.c:14333 cobc/typeck.c:14337 +#: cobc/typeck.c:15122 cobc/typeck.c:15130 cobc/typeck.c:15134 msgid "SUPPRESS item" msgstr "" -#: cobc/typeck.c:14329 +#: cobc/typeck.c:15126 msgid "SUPPRESS item with WHEN clause" msgstr "" -#: cobc/typeck.c:14407 +#: cobc/typeck.c:15204 msgid "WITH ATTRIBUTES specified, but no attributes can be generated" msgstr "" @@ -6520,196 +6648,209 @@ msgid " -Wparentheses warn if parentheses are omitted around AND within msgstr "aviso faltante de paréntesis alrededor de Y dentro de O" #: cobc/warning.def:70 -msgid " -Wstrict-typing warn strictly about type mismatch" +msgid " -Wstrict-typing warn strictly about type mismatch, even when same size" msgstr "" #: cobc/warning.def:73 -msgid " -Wimplicit-define warn whenever data items are implicitly defined" +msgid " -Wtyping warn about type mismatch" msgstr "" #: cobc/warning.def:76 +msgid " -Wimplicit-define warn whenever data items are implicitly defined" +msgstr "" + +#: cobc/warning.def:79 #, fuzzy #| msgid "warn CORRESPONDING with no matching items" msgid " -Wno-corresponding do not warn about CORRESPONDING with no matching items" msgstr "advierte CORRESPONDIENDO con ítemes no coincidentes" -#: cobc/warning.def:79 +#: cobc/warning.def:82 #, fuzzy #| msgid "warn Initial VALUE clause ignored" msgid " -Winitial-value warn if initial VALUE clause is ignored" msgstr "advierte cláusula de VALOR inicial ignorada" -#: cobc/warning.def:82 +#: cobc/warning.def:85 #, fuzzy #| msgid "warn missing FUNCTION prototypes/definitions" msgid " -Wprototypes warn about missing FUNCTION prototypes/definitions" msgstr "advierte prototipos/definiciones de FUNCIÓN" -#: cobc/warning.def:85 +#: cobc/warning.def:88 #, fuzzy #| msgid "warn if arithmetic expression precision has changed" msgid " -Warithmetic-osvs warn if arithmetic expression precision has changed" msgstr "advierte si preción de expresión aritmética ha modificado" -#: cobc/warning.def:88 +#: cobc/warning.def:91 #, fuzzy #| msgid "warn non 01/77 items for CALL params" msgid " -Wcall-params warn about non 01/77 items for CALL parameters" msgstr "advierte elementos no 01/77 para CALL parametrizados" -#: cobc/warning.def:91 +#: cobc/warning.def:94 #, fuzzy #| msgid "warn expressions that always resolve to true/false" msgid " -Wconstant-expression warn about expressions that always resolve to true/false" msgstr "advierte expresiones que siempre resuelven a verdad/falsa" -#: cobc/warning.def:94 +#: cobc/warning.def:97 #, fuzzy #| msgid "warn expressions that always resolve to true/false" msgid " -Wconstant-numlit-expression\twarn about numeric expressions that always resolve to true/false" msgstr "advierte expresiones que siempre resuelven a verdad/falsa" -#: cobc/warning.def:97 +#: cobc/warning.def:100 msgid " -Wlarger-01-redefines warn about larger redefines allowed by COBOL standards" msgstr "" -#: cobc/warning.def:100 +#: cobc/warning.def:103 #, fuzzy #| msgid "warn text after program-text area, FIXED format" msgid " -Wcolumn-overflow warn about text after program-text area, FIXED format" msgstr "advierte texto tras área de texto programado, formato FIJADO" -#: cobc/warning.def:103 +#: cobc/warning.def:106 #, fuzzy #| msgid "warn lack of scope terminator END-XXX" msgid " -Wterminator warn about lack of scope terminator END-XXX" msgstr "advierte falta de alcance de terminador END-XXX" -#: cobc/warning.def:106 +#: cobc/warning.def:109 #, fuzzy #| msgid "warn dangling LINKAGE items" msgid " -Wlinkage warn about dangling LINKAGE items" msgstr "advierte elementos LINKAGE colgados" -#: cobc/warning.def:109 +#: cobc/warning.def:112 msgid " -Wunreachable warn about likely unreachable statements" msgstr "" -#: cobc/warning.def:112 +#: cobc/warning.def:115 msgid " -Wno-dialect do not warn about dialect specific issues" msgstr "" -#: cobc/warning.def:115 +#: cobc/warning.def:118 msgid " -Wno-goto-section do not warn about GO TO section-name" msgstr "" -#: cobc/warning.def:118 +#: cobc/warning.def:121 msgid " -Wgoto-different-section\twarn about GO TO a praragraph defined in a different section" msgstr "" -#: cobc/warning.def:121 +#: cobc/warning.def:124 msgid " -Wsuspicious-perform-thru\twarn if PERFORM THRU references procedures not in ascending order or multiple sections" msgstr "" -#: cobc/warning.def:124 +#: cobc/warning.def:127 msgid " -Wdangling-text warn about source text after program-area" msgstr "" -#: cobc/warning.def:127 +#: cobc/warning.def:130 msgid " -Wno-missing-newline do not warn about missing newlines" msgstr "" -#: cobc/warning.def:130 +#: cobc/warning.def:133 msgid " -Wno-others do not warn about different issues" msgstr "" -#: cobc/warning.def:133 +#: cobc/warning.def:136 msgid " -Wno-unsupported do not warn if runtime does not support a feature used" msgstr "" -#: libcob/call.c:94 +#: libcob/call.c:98 #, c-format msgid "LoadLibrary/GetProcAddress error %d" msgstr "LoadLibrary/GetProcAddress error %d" -#: libcob/call.c:841 +#: libcob/call.c:626 +#, c-format +msgid "preloading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:817 #, fuzzy, c-format #| msgid "PROGRAM name exceeds 31 characters" msgid "%s: PROGRAM name exceeds %d characters" msgstr "Nombre de PROGRAM excede 31 caracteres" -#: libcob/call.c:842 +#: libcob/call.c:818 #, fuzzy, c-format #| msgid "PROGRAM name exceeds 31 characters" msgid "%s: FUNCTION name exceeds %d characters" msgstr "Nombre de PROGRAM excede 31 caracteres" -#: libcob/call.c:1067 +#: libcob/call.c:945 libcob/call.c:978 +#, c-format +msgid "loading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:1049 msgid "indeterminable error in resolve of COBOL CALL" msgstr "error indeterminable dentro de resolución de LLAMADA COBOL" -#: libcob/call.c:1149 +#: libcob/call.c:1145 #, c-format msgid "user-defined FUNCTION '%s' not found" msgstr "definición de FUNCIÓN usuaria «%s» no encontrada" -#: libcob/call.c:1239 libcob/call.c:1325 libcob/call.c:1445 libcob/call.c:1472 +#: libcob/call.c:1247 libcob/call.c:1328 libcob/call.c:1448 libcob/call.c:1475 #, c-format msgid "NULL parameter passed to '%s'" msgstr "Parámetro NULO pasado a «%s»" -#: libcob/call.c:1329 +#: libcob/call.c:1332 #, c-format msgid "invalid number of arguments passed to '%s'" msgstr "número inválido de argumentos pasados a «%s»" -#: libcob/call.c:1449 +#: libcob/call.c:1452 msgid "multiple call to 'cob_setjmp'" msgstr "múltiples llamadas a 'cob_setjmp'" -#: libcob/call.c:1476 +#: libcob/call.c:1479 msgid "call to 'cob_longjmp' with no prior 'cob_setjmp'" msgstr "llamada a ‘cob_longjmp’ con ninguna proridad ‘cob_setjmp’" -#: libcob/call.c:1703 libcob/call.c:1730 libcob/common.c:8144 +#: libcob/call.c:1608 +#, c-format +msgid "preloading of '%s' failed" +msgstr "" + +#: libcob/call.c:1706 libcob/call.c:1733 libcob/common.c:8965 msgid "cob_init() has not been called" msgstr "cob_init() no ha sido llamado" -#: libcob/call.c:1709 +#: libcob/call.c:1712 #, fuzzy, c-format #| msgid "%s: param %d is not within range of %d" msgid "parameter %d is not within range of %d" msgstr "%s: parámetro %d no está dentro del rango de %d" -#: libcob/call.c:1715 +#: libcob/call.c:1718 #, fuzzy, c-format #| msgid "%s: param %d is NULL" msgid "parameter %d is NULL" msgstr "%s: parámetro %d es NULL" -#: libcob/call.c:2042 +#: libcob/call.c:2045 msgid "NULL field" msgstr "" -#: libcob/call.c:2050 +#: libcob/call.c:2053 #, fuzzy #| msgid "file not open" msgid "field not allocated" msgstr "fichero no abierto" -#: libcob/call.c:2116 +#: libcob/call.c:2119 #, fuzzy, c-format #| msgid "%s: attempt to over-write constant param %d with '%s'" msgid "attempt to over-write constant field with '%s'" msgstr "%s: intente sobrescribir parámetro contante %d con «%s»" -#: libcob/call.c:2156 libcob/call.c:2212 -#, fuzzy, c-format -#| msgid "%s: attempt to over-write constant param %d with " -msgid "attempt to over-write constant parameter %d with " -msgstr "%s: intente sobrescribir parámetro contante %d con " - -#: libcob/call.c:2263 +#: libcob/call.c:2161 libcob/call.c:2219 libcob/call.c:2270 #, fuzzy, c-format #| msgid "%s: attempt to over-write constant param %d with '%s'" msgid "attempt to over-write constant parameter %d with '%s'" @@ -6757,710 +6898,737 @@ msgstr "%s: opción no válida -- %c" msgid "%s: option requires an argument -- '%c'" msgstr "%s: la opción requiere un argumento -- %c" -#: libcob/common.c:1242 +#: libcob/common.c:1074 +#, c-format +msgid "requested coredump creation failed with status %d" +msgstr "" + +#: libcob/common.c:1303 msgid "fatal arithmetic error" msgstr "" -#: libcob/common.c:1245 +#: libcob/common.c:1306 msgid "interrupt from keyboard" msgstr "" -#: libcob/common.c:1249 +#: libcob/common.c:1310 msgid "hangup" msgstr "" -#: libcob/common.c:1253 +#: libcob/common.c:1314 msgid "quit" msgstr "" -#: libcob/common.c:1257 +#: libcob/common.c:1318 #, fuzzy #| msgid "Definition" msgid "termination" msgstr "Definición" -#: libcob/common.c:1261 +#: libcob/common.c:1322 msgid "emt termination" msgstr "" -#: libcob/common.c:1265 +#: libcob/common.c:1326 msgid "broken pipe" msgstr "" -#: libcob/common.c:1269 +#: libcob/common.c:1330 #, fuzzy #| msgid "signal %s" msgid "I/O signal" msgstr "señal %s" -#: libcob/common.c:1273 +#: libcob/common.c:1334 #, fuzzy #| msgid "attempt to reference unallocated memory" msgid "attempt to reference invalid memory address" msgstr "trata referenciar memoria no asignada" -#: libcob/common.c:1277 +#: libcob/common.c:1338 msgid "bus error" msgstr "error de bus" -#: libcob/common.c:1281 +#: libcob/common.c:1342 msgid "illegal instruction" msgstr "" -#: libcob/common.c:1285 +#: libcob/common.c:1346 #, fuzzy #| msgid "aborting" msgid "abort" msgstr "abortando" -#: libcob/common.c:1289 +#: libcob/common.c:1350 msgid "process killed" msgstr "" -#: libcob/common.c:1293 +#: libcob/common.c:1354 #, fuzzy #| msgid "caught signal" msgid "alarm signal" msgstr "señal obtenida" -#: libcob/common.c:1297 +#: libcob/common.c:1358 #, fuzzy #| msgid "preprocessing:" msgid "stop process" msgstr "preprocesando:" -#: libcob/common.c:1301 libcob/common.c:1305 +#: libcob/common.c:1362 libcob/common.c:1366 msgid "child process stopped" msgstr "" #. TRANSLATORS: This msgid is used for an OS signal like SIGABRT. -#: libcob/common.c:1312 +#: libcob/common.c:1373 #, fuzzy #| msgid "signal %s" msgid "signal" msgstr "señal %s" #. TRANSLATORS: This msgid is shown for a requested but not complete stack trace. -#: libcob/common.c:1314 +#: libcob/common.c:1375 msgid "(more COBOL runtime elements follow...)" msgstr "" -#: libcob/common.c:1316 libcob/common.c:8101 +#: libcob/common.c:1377 libcob/common.c:8922 #, c-format msgid "abnormal termination - file contents may be incorrect" msgstr "terminación anormal - contenidos de fichero quizá son incorrectos" -#: libcob/common.c:3145 libcob/common.c:8581 libcob/common.c:8595 +#: libcob/common.c:3441 libcob/common.c:9398 libcob/common.c:9412 #, fuzzy #| msgid "error: version mismatch" msgid "version mismatch" msgstr "error: versión no coincide" -#: libcob/common.c:3146 libcob/common.c:3148 libcob/common.c:8582 -#: libcob/common.c:8584 +#: libcob/common.c:3442 libcob/common.c:3444 libcob/common.c:9399 +#: libcob/common.c:9401 #, fuzzy, c-format #| msgid "%s has version/patch level %s/%d" msgid "%s has version %s.%d" msgstr "%s tiene versión/nivel de parche %s/%d" -#: libcob/common.c:3158 +#: libcob/common.c:3454 #, fuzzy, c-format #| msgid "CALL to %s requires %d parameters" msgid "CALL to %s requires %d arguments" msgstr "CALL para %s requiere %d parámetros" -#: libcob/common.c:3779 +#: libcob/common.c:4141 #, c-format msgid "code execution leaving %s" msgstr "" -#: libcob/common.c:3789 +#: libcob/common.c:4151 #, c-format msgid "BASED/LINKAGE item %s has NULL address" msgstr "BASED/LINKAGE ítem %s tiene dirección NULA" -#: libcob/common.c:3802 libcob/common.c:3806 +#: libcob/common.c:4168 +#, c-format +msgid "memory violation detected for '%s' after %s" +msgstr "" + +#: libcob/common.c:4171 +#, c-format +msgid "memory violation detected after %s" +msgstr "" + +#: libcob/common.c:4229 libcob/common.c:4244 libcob/common.c:4283 +#: libcob/common.c:4287 #, c-format msgid "LINKAGE item %s not passed by caller" msgstr "LINKAGE %s de ítem no pasado por llamador" -#: libcob/common.c:3892 +#: libcob/common.c:4253 +#, c-format +msgid "LINKAGE item %s (size %lu) too small in the caller (size %lu)" +msgstr "" + +#: libcob/common.c:4378 #, fuzzy, c-format #| msgid "'%s' not numeric: '%s'" msgid "'%s' (Type: %s) not numeric: '%s'" msgstr "«%s» no es numerico: «%s»" -#: libcob/common.c:3917 +#: libcob/common.c:4403 #, c-format msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgstr "OCCURS DEPENDING ON «%s» fuera de límites: %d" -#: libcob/common.c:3920 libcob/common.c:3958 +#: libcob/common.c:4406 libcob/common.c:4444 #, c-format msgid "maximum subscript for '%s': %d" msgstr "subcadena máxima para «%s»: %d" -#: libcob/common.c:3922 +#: libcob/common.c:4408 #, c-format msgid "minimum subscript for '%s': %d" msgstr "subscript mínimo para «%s»: %d" -#: libcob/common.c:3955 +#: libcob/common.c:4441 #, c-format msgid "current maximum subscript for '%s': %d" msgstr "subcadena máxima actual para «%s»: %d" -#: libcob/common.c:3979 +#: libcob/common.c:4465 #, fuzzy, c-format #| msgid "offset of '%s' out of bounds: %d" msgid "offset of '%s' out of bounds: %d, maximum: %d" msgstr "desplazamiento de «%s» fuera de límite: %d" -#: libcob/common.c:3994 +#: libcob/common.c:4480 #, fuzzy, c-format #| msgid "length of '%s' out of bounds: %d" msgid "length of '%s' out of bounds: %d, maximum: %d" msgstr "longitud de «%s» fuera de límites: %d" -#: libcob/common.c:4005 +#: libcob/common.c:4491 #, fuzzy, c-format #| msgid "length of '%s' out of bounds: %d" msgid "length of '%s' out of bounds: %d, starting at: %d, maximum: %d" msgstr "longitud de «%s» fuera de límites: %d" -#: libcob/common.c:4093 libcob/common.c:4098 +#: libcob/common.c:4579 libcob/common.c:4584 #, c-format msgid "EXTERNAL item '%s' previously allocated with size %d, requested size is %d" msgstr "Ítem EXTERNAL «%s» previamente asignado con tamaño %d, tamaño pedido es %d" -#: libcob/common.c:4593 +#: libcob/common.c:4961 libcob/common.c:5201 #, c-format msgid "COB_CURRENT_DATE '%s' is invalid" msgstr "COB_CURRENT_DATE «%s» es inválido" -#: libcob/common.c:5641 libcob/common.c:5644 +#: libcob/common.c:6321 libcob/common.c:6324 msgid "Program abandoned at user request" msgstr "" -#: libcob/common.c:5668 +#: libcob/common.c:6348 #, c-format msgid "parameter to SYSTEM call is larger than %d characters" msgstr "parámetro para llamada SYSTEM es mayor de %d caracteres" -#: libcob/common.c:6202 +#: libcob/common.c:6998 #, fuzzy, c-format #| msgid "Error '%s' during CBL_GC_FORK" msgid "error '%s' during CBL_GC_FORK" msgstr "Error «%s» durante CBL_GC_FORK" -#: libcob/common.c:6207 libcob/common.c:6304 +#: libcob/common.c:7003 libcob/common.c:7100 #, c-format msgid "'%s' is not supported on this platform" msgstr "«%s» no es compatible en esta plataforma" -#: libcob/common.c:6233 +#: libcob/common.c:7029 #, c-format msgid "error '%s' for P%d during CBL_GC_WAITPID" msgstr "error «%s» para P%d durante CBL_GC_WAITID" -#: libcob/common.c:6424 -msgid "Call to CBL_GC_GETOPT with wrong longoption size." +#: libcob/common.c:7220 +#, fuzzy +#| msgid "Call to CBL_GC_GETOPT with wrong longoption size." +msgid "call to CBL_GC_GETOPT with wrong longoption size" msgstr "Llama a CBL_GC_GETOPT con tamaño longoption equivocado." -#: libcob/common.c:6429 -msgid "Call to CBL_GC_GETOPT with missing longind." +#: libcob/common.c:7225 +#, fuzzy +#| msgid "Call to CBL_GC_GETOPT with missing longind." +msgid "call to CBL_GC_GETOPT with missing longind" msgstr "Llama a CBL_GC_GETOPT con longind ausente." -#: libcob/common.c:6856 libcob/common.c:6877 libcob/common.c:6890 -#: libcob/common.c:9107 libcob/common.c:9111 +#: libcob/common.c:7654 libcob/common.c:7675 libcob/common.c:7688 +#: libcob/common.c:9924 libcob/common.c:9928 #, fuzzy, c-format #| msgid " (default)" msgid "(default)" msgstr " (predeterminado)" -#: libcob/common.c:7143 libcob/common.c:7162 +#: libcob/common.c:7973 libcob/common.c:7992 msgid "should be unsigned" msgstr "" -#: libcob/common.c:7151 libcob/common.c:7200 +#: libcob/common.c:7981 libcob/common.c:8030 #, fuzzy #| msgid "must be numeric" msgid "should be numeric" msgstr "debe ser numérico" -#: libcob/common.c:7209 +#: libcob/common.c:8039 #, c-format msgid "minimum value: %lu" msgstr "valor mínimo: %lu" -#: libcob/common.c:7261 libcob/common.c:7825 libcob/common.c:7839 +#: libcob/common.c:8069 libcob/common.c:8640 libcob/common.c:8654 +#: bin/cobcrun.c:206 #, c-format msgid "should not contain '%c'" msgstr "debería no contener «%c»" -#: libcob/common.c:7342 libcob/common.c:7390 libcob/common.c:7418 -#: libcob/common.c:7427 libcob/common.c:7435 libcob/common.c:7460 +#: libcob/common.c:8150 libcob/common.c:8169 libcob/common.c:8231 +#: libcob/common.c:8240 libcob/common.c:8248 libcob/common.c:8273 #, c-format msgid "not set" msgstr "" -#: libcob/common.c:7410 libcob/common.c:7413 libcob/common.c:7416 +#: libcob/common.c:8223 libcob/common.c:8226 libcob/common.c:8229 #, fuzzy, c-format #| msgid " (set by %s)" msgid "set by %s" msgstr " (establecer para %s)" -#: libcob/common.c:7552 +#: libcob/common.c:8367 #, c-format msgid "WARNING - '%s' without a value - ignored!" msgstr "CUIDADO - «%s» sin un valor - ¡ignorado!" -#: libcob/common.c:7555 +#: libcob/common.c:8370 #, c-format msgid "'%s' without a value!" msgstr "¡«%s» sin un valor!" -#: libcob/common.c:7582 +#: libcob/common.c:8397 #, c-format msgid "WARNING - '%s %s' without a value - ignored!" msgstr "CUIDADO - «%s %s» sin un valor - ¡ignorado!" -#: libcob/common.c:8085 +#: libcob/common.c:8906 #, fuzzy #| msgid "error: " msgid "error" msgstr "error: " -#: libcob/common.c:8127 +#: libcob/common.c:8948 msgid "attempt to CANCEL active program" msgstr "intento CANCELAR programa activo" -#: libcob/common.c:8154 +#: libcob/common.c:8975 msgid "CALL of program with CHAINING clause" msgstr "CALL de programa con cláusula CHAINING" -#: libcob/common.c:8158 +#: libcob/common.c:8979 msgid "stack overflow, possible PERFORM depth exceeded" msgstr "desbordamiento de pila, posible profundidad excedida de PERFORM" -#: libcob/common.c:8163 +#: libcob/common.c:8984 msgid "invalid entry/exit in GLOBAL USE procedure" msgstr "invalida registro/salida en procedimiento GLOBAL USE" -#: libcob/common.c:8167 +#: libcob/common.c:8988 msgid "unable to allocate memory" msgstr "incapaz de asignar memoria" -#: libcob/common.c:8172 +#: libcob/common.c:8993 msgid "invalid entry into module" msgstr "registro inválido dentro del módulo" -#: libcob/common.c:8179 +#: libcob/common.c:9000 #, c-format msgid "recursive CALL from '%s' to '%s' which is NOT RECURSIVE" msgstr "" -#: libcob/common.c:8184 +#: libcob/common.c:9005 #, c-format msgid "invalid recursive COBOL CALL to '%s'" msgstr "inválido COBOL CALL recursivo para «%s»" -#: libcob/common.c:8199 +#: libcob/common.c:9020 msgid "end of file" msgstr "final del fichero" -#: libcob/common.c:8202 +#: libcob/common.c:9023 msgid "key out of range" msgstr "clave fuera de rango" -#: libcob/common.c:8205 +#: libcob/common.c:9026 msgid "key order not ascending" msgstr "orden de clave no es ascendente" -#: libcob/common.c:8208 +#: libcob/common.c:9029 msgid "record key already exists" msgstr "clave de registro ya existe" -#: libcob/common.c:8211 +#: libcob/common.c:9032 msgid "record key does not exist" msgstr "clave de registro no existe" -#: libcob/common.c:8214 +#: libcob/common.c:9035 msgid "permanent file error" msgstr "error permanente de fichero" -#: libcob/common.c:8217 +#: libcob/common.c:9038 #, fuzzy #| msgid "invalid configuration file name" msgid "inconsistent file name" msgstr "configuración del nombre de fichero inválido" -#: libcob/common.c:8220 +#: libcob/common.c:9041 msgid "file does not exist" msgstr "fichero no existente" -#: libcob/common.c:8223 +#: libcob/common.c:9044 msgid "permission denied" msgstr "permiso denegado" -#: libcob/common.c:8226 +#: libcob/common.c:9047 msgid "mismatch of fixed file attributes" msgstr "" -#: libcob/common.c:8229 +#: libcob/common.c:9050 msgid "file already open" msgstr "fichero ya abierto" -#: libcob/common.c:8232 +#: libcob/common.c:9053 msgid "file not open" msgstr "fichero no abierto" -#: libcob/common.c:8235 +#: libcob/common.c:9056 msgid "READ must be executed first" msgstr "READ debe ser ejecutada primero" -#: libcob/common.c:8238 +#: libcob/common.c:9059 msgid "record overflow" msgstr "desbordamiento de registro" -#: libcob/common.c:8241 +#: libcob/common.c:9062 #, fuzzy #| msgid "READ after uncessful READ/START" msgid "READ after unsuccessful READ/START" msgstr "READ tras READ/START no obtenido" -#: libcob/common.c:8244 +#: libcob/common.c:9065 msgid "READ/START not allowed, file not open for input" msgstr "READ/START no son permitidos, fichero no abierto para entrada" -#: libcob/common.c:8247 +#: libcob/common.c:9068 msgid "WRITE not allowed, file not open for output" msgstr "ESCRITURA no permitida, fichero no abierto para salida" -#: libcob/common.c:8250 +#: libcob/common.c:9071 msgid "DELETE/REWRITE not allowed, file not open for I-O" msgstr "DELETE/REWRITE no permitidos, fichero no abre para E/S" -#: libcob/common.c:8253 +#: libcob/common.c:9074 msgid "record locked by another file connector" msgstr "registro bloqueado por otro conector de fichero" -#: libcob/common.c:8256 +#: libcob/common.c:9077 msgid "LINAGE values invalid" msgstr "LINAGE de valores no válidos" -#: libcob/common.c:8259 +#: libcob/common.c:9080 msgid "file sharing conflict" msgstr "conflicto de compartición de fichero" -#: libcob/common.c:8262 +#: libcob/common.c:9083 msgid "invalid data in LINE SEQUENTIAL file" msgstr "" -#: libcob/common.c:8266 +#: libcob/common.c:9087 msgid "runtime library is not configured for this operation" msgstr "biblioteca de tiempo de ejecución no está configurado para esta operación" -#: libcob/common.c:8271 +#: libcob/common.c:9092 msgid "unknown file error" msgstr "error de fichero desconocido" -#: libcob/common.c:8278 +#: libcob/common.c:9099 #, fuzzy, c-format #| msgid "%s (status = %02d) file: '%s'" msgid "%s (status = %02d) for file %s" msgstr "%s (estado = %02d) fichero: «%s»" -#: libcob/common.c:8281 +#: libcob/common.c:9102 #, fuzzy, c-format #| msgid "%s (status = %02d) file: '%s'" msgid "%s (status = %02d) for file %s on %s" msgstr "%s (estado = %02d) fichero: «%s»" -#: libcob/common.c:8288 +#: libcob/common.c:9109 msgid "attempt to use non-implemented function" msgstr "intento de usar función no implementada" -#: libcob/common.c:8291 +#: libcob/common.c:9112 #, fuzzy #| msgid "attempt to use non-implemented function" msgid "attempt to use non-implemented XML I/O" msgstr "intento de usar función no implementada" -#: libcob/common.c:8294 +#: libcob/common.c:9115 #, fuzzy #| msgid "attempt to use non-implemented function" msgid "attempt to use non-implemented JSON I/O" msgstr "intento de usar función no implementada" -#: libcob/common.c:8341 +#: libcob/common.c:9162 msgid "environment variables" msgstr "variables de entorno" -#: libcob/common.c:8466 libcob/common.c:8539 libcob/common.c:8554 -#: libcob/common.c:8859 libcob/common.c:8893 libcob/common.c:8910 -#: libcob/common.c:8925 +#: libcob/common.c:9283 libcob/common.c:9356 libcob/common.c:9371 +#: libcob/common.c:9676 libcob/common.c:9710 libcob/common.c:9727 +#: libcob/common.c:9742 #, fuzzy, c-format #| msgid "C version %s%s" msgid "%s, version %d.%d.%d" msgstr "Versión C %s%s" -#: libcob/common.c:8468 libcob/common.c:8541 libcob/common.c:8558 -#: libcob/common.c:8862 libcob/common.c:8913 libcob/common.c:8928 +#: libcob/common.c:9285 libcob/common.c:9358 libcob/common.c:9375 +#: libcob/common.c:9679 libcob/common.c:9730 libcob/common.c:9745 #, c-format msgid "%s, version %d.%d.%d (compiled with %d.%d)" msgstr "" -#: libcob/common.c:8471 +#: libcob/common.c:9288 #, fuzzy, c-format #| msgid "C version %s%s" msgid "%s, version %s" msgstr "Versión C %s%s" -#: libcob/common.c:8739 +#: libcob/common.c:9556 #, fuzzy, c-format #| msgid "License LGPLv3+: GNU LGPL version 3 or later <http://gnu.org/licenses/lgpl.html>" msgid "License LGPLv3+: GNU LGPL version 3 or later <%s>" msgstr "Licencia LGPLv3+: GNU LGPL versión 3 o posterior <http://gnu.org/licenses/lgpl.html>" -#: libcob/common.c:8803 libcob/common.c:8805 +#: libcob/common.c:9620 libcob/common.c:9622 msgid "dynamic loading" msgstr "carga dinámica" -#: libcob/common.c:8938 +#: libcob/common.c:9755 #, fuzzy #| msgid "<support>" msgid "mouse support" msgstr "<compatible>" -#: libcob/common.c:8955 +#: libcob/common.c:9772 msgid "CALL configuration" msgstr "Configuración de CALL" -#: libcob/common.c:8956 +#: libcob/common.c:9773 msgid "File I/O configuration" msgstr "Configuración de fichero de E/S" -#: libcob/common.c:8957 +#: libcob/common.c:9774 msgid "Screen I/O configuration" msgstr "Configuración de E/S de pantalla" -#: libcob/common.c:8958 +#: libcob/common.c:9775 msgid "Miscellaneous" msgstr "Varias" -#: libcob/common.c:8959 +#: libcob/common.c:9776 msgid "System configuration" msgstr "Configuración del sistema" -#: libcob/common.c:8963 +#: libcob/common.c:9780 msgid "runtime configuration" msgstr "configuración de tiempo de ejecución" -#: libcob/common.c:8965 +#: libcob/common.c:9782 msgid "via" msgstr "via" -#: libcob/common.c:9040 libcob/common.c:9068 +#: libcob/common.c:9857 libcob/common.c:9885 msgid "... removed from environment" msgstr "… quitado desde entorno" -#: libcob/common.c:9094 libcob/common.c:9096 +#: libcob/common.c:9911 libcob/common.c:9913 #, fuzzy, c-format #| msgid " (set by %s)" msgid "(set by %s)" msgstr " (establecer para %s)" -#: libcob/common.c:9104 +#: libcob/common.c:9921 #, fuzzy, c-format #| msgid " (reset)" msgid "(reset)" msgstr " (restablecer)" -#: libcob/common.c:9334 +#: libcob/common.c:10151 msgid "compiler was not built with --enable-debug-log; COB_DEBUG_LOG ignored" msgstr "" -#: libcob/common.c:9524 libcob/common.c:9550 +#: libcob/common.c:10338 libcob/common.c:10364 #, c-format msgid "%s called with unknown option: %d" msgstr "" #. TRANSLATORS: This msgid is shown for a requested but empty stack trace. -#: libcob/common.c:9597 +#: libcob/common.c:10411 #, fuzzy #| msgid "%s COBOL runtime is not initialized" msgid "No COBOL runtime elements on stack." msgstr "%s tiempo de ejecución COBOL no está inicializado" -#: libcob/common.c:9915 +#: libcob/common.c:10734 #, c-format msgid "Module dump due to %s" msgstr "" -#: libcob/common.c:9943 +#: libcob/common.c:10762 #, c-format msgid "Dump Program-Id %s from %s compiled %s" msgstr "" -#: libcob/common.c:9969 +#: libcob/common.c:10788 #, fuzzy, c-format #| msgid "Written by %s\n" msgid "dump written to %s" msgstr "Escrito por %s\n" -#: libcob/fileio.c:816 libcob/fileio.c:1628 libcob/fileio.c:1882 -#: libcob/fileio.c:3812 libcob/fileio.c:4396 libcob/fileio.c:9658 -#: libcob/fileio.c:9686 libcob/numeric.c:1583 +#: libcob/fileio.c:784 libcob/fileio.c:1664 libcob/fileio.c:1926 +#: libcob/fileio.c:3938 libcob/fileio.c:4522 libcob/fileio.c:10049 +#: libcob/fileio.c:10077 libcob/numeric.c:1915 #, fuzzy, c-format #| msgid "invalid internal case: %u" msgid "invalid internal call of %s" msgstr "caso interno invalido: %u" -#: libcob/fileio.c:3359 +#: libcob/fileio.c:3486 #, c-format msgid "BDB error: %s" msgstr "Error BDB: %s" -#: libcob/fileio.c:3369 +#: libcob/fileio.c:3496 #, c-format msgid "BDB error: %s %s" msgstr "Error BDB: %s %s" -#: libcob/fileio.c:3383 libcob/fileio.c:3403 +#: libcob/fileio.c:3510 libcob/fileio.c:3530 #, c-format msgid "cannot join BDB environment (%s), error: %d %s" msgstr "no puede unir a entorno BDB (%s), error: %d %s" -#: libcob/fileio.c:3458 libcob/fileio.c:3483 libcob/fileio.c:3509 -#: libcob/fileio.c:3528 +#: libcob/fileio.c:3585 libcob/fileio.c:3610 libcob/fileio.c:3636 +#: libcob/fileio.c:3655 #, fuzzy, c-format #| msgid "BDB error: %s %s" msgid "BDB (%s), error: %d %s" msgstr "Error BDB: %s %s" -#: libcob/fileio.c:6071 +#: libcob/fileio.c:6199 #, c-format msgid "ERROR FILE %s has ASSIGN field is NULL" msgstr "" -#: libcob/fileio.c:6862 +#: libcob/fileio.c:7050 #, c-format msgid "call to CBL_OPEN_FILE with wrong access mode: %d" msgstr "llama a CBL_OPEN_FILE con modo de acceso equivocado: %d" -#: libcob/fileio.c:6946 +#: libcob/fileio.c:7135 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_lock: %d" msgstr "llama a CBL_CREATE_FILE con fichero file_lock equivocado: %d" -#: libcob/fileio.c:6949 +#: libcob/fileio.c:7138 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_dev: %d" msgstr "llama a CBL_CREATE_FILE con fichero equivocado file_dev: %d" -#: libcob/fileio.c:7174 libcob/fileio.c:7457 +#: libcob/fileio.c:7362 libcob/fileio.c:7645 #, c-format msgid "'%s' - File detail area is too short" msgstr "«%s» - de detalle de fichero es demasiada corta" -#: libcob/fileio.c:7686 +#: libcob/fileio.c:7871 msgid "SORT is unable to acquire temporary file" msgstr "SORT es incapaz para obtener fichero temporalmente" #. TRANSLATORS: This msgid is concatenated with a filename; -#. setup translation to allow this to be followed on the right side. -#: libcob/fileio.c:8432 +#. setup translation to allow this to be followed on the right side, +#. if necessary use a colon or hyphen +#: libcob/fileio.c:8777 #, fuzzy #| msgid "implicit CLOSE of %s ('%s')" msgid "implicit CLOSE of " msgstr "implicita cierre CLOSE de %s ('%s')" -#: libcob/fileio.c:9617 libcob/fileio.c:9752 +#: libcob/fileio.c:10008 libcob/fileio.c:10193 #, c-format msgid "ERROR: EXTFH called with FCD version %d" msgstr "" -#: libcob/fileio.c:9886 +#: libcob/fileio.c:10310 #, fuzzy, c-format #| msgid "REPORT clause with wrong file type" msgid "ERROR: EXTFH called with wrong file organization %d" msgstr "REPORT clausura con el tipo de fichero equivocado" -#: libcob/fileio.c:9893 +#: libcob/fileio.c:10317 #, c-format msgid "ERROR: EXTFH called with no %s pointer" msgstr "" -#: libcob/fileio.c:10029 +#: libcob/fileio.c:10461 #, c-format msgid "ERROR: EXTFH called with no %s pointer; Function %d" msgstr "" -#: libcob/fileio.c:10208 +#: libcob/fileio.c:10683 #, c-format msgid "ERROR: EXTFH called with unknown Function %d" msgstr "" -#: libcob/reportio.c:630 +#: libcob/reportio.c:629 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT %d" msgstr "" -#: libcob/reportio.c:637 libcob/reportio.c:652 +#: libcob/reportio.c:636 libcob/reportio.c:651 #, c-format msgid "INITIATE %s NEXT GROUP %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:645 +#: libcob/reportio.c:644 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:1327 +#: libcob/reportio.c:1336 #, c-format msgid "INITIATE %s was already done" msgstr "" -#: libcob/reportio.c:1343 +#: libcob/reportio.c:1352 #, c-format msgid "INITIATE %s PAGE LIMIT problem" msgstr "" -#: libcob/reportio.c:1420 +#: libcob/reportio.c:1429 #, c-format msgid "TERMINATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1565 +#: libcob/reportio.c:1574 #, c-format msgid "GENERATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1917 +#: libcob/reportio.c:1926 #, c-format msgid "could not find line to SUPPRESS in report %s" msgstr "" -#: libcob/screenio.c:568 +#: libcob/screenio.c:1055 msgid "failed to initialize curses" msgstr "fallado al inicializar cursores" -#: libcob/screenio.c:4081 +#: libcob/screenio.c:5034 msgid "end of program, please press a key to exit" msgstr "final de programa, presione una tecla para salir" -#: libcob/termio.c:78 libcob/termio.c:117 +#: libcob/termio.c:76 libcob/termio.c:136 msgid "(Not representable)" msgstr "(No representable)" -#: libcob/termio.c:354 +#: libcob/termio.c:406 #, fuzzy, c-format #| msgid "cannot specify both %s and %s" msgid "cannot open %s (=%s)" msgstr "no puede especificar ambos %s y %s" -#: libcob/termio.c:369 +#: libcob/termio.c:421 msgid "COB_DISPLAY_PUNCH_FILE is invalid, output to SYSPUNCH skipped" msgstr "" @@ -7553,33 +7721,22 @@ msgstr "" "\t\t\t\tcargada enlazada dinámica y cualquier nombre de base a\n" "\t\t\t\tla lista de precarga (COB_LIBRARY_PATH y/o COB_PRELOAD)" -#: bin/cobcrun.c:146 -#, c-format -msgid "GnuCOBOL home page: <%s>" -msgstr "" - -#: bin/cobcrun.c:148 -#, fuzzy, c-format -#| msgid "General help using GNU software: <http://www.gnu.org/gethelp/>" -msgid "General help using GNU software: <%s>" -msgstr "Ayuda general utilizando software GNU: <http://www.gnu.org/gethelp/>" - -#: bin/cobcrun.c:288 +#: bin/cobcrun.c:286 msgid "invalid configuration file name" msgstr "configuración del nombre de fichero inválido" -#: bin/cobcrun.c:355 +#: bin/cobcrun.c:353 #, fuzzy, c-format #| msgid "invalid module argument" msgid "invalid module argument '%s'" msgstr "argumento modular no válido" -#: bin/cobcrun.c:410 +#: bin/cobcrun.c:408 #, c-format msgid "%s: missing PROGRAM name" msgstr "" -#: bin/cobcrun.c:412 +#: bin/cobcrun.c:410 #, c-format msgid "Try '%s --help' for more information." msgstr "" @@ -7628,17 +7785,20 @@ msgstr "" #~ " -vvv, -verbose=3 como -vv pero opción de paso detallado adicional\n" #~ " a enlazador" +#~ msgid "GnuCOBOL home page: <http://www.gnu.org/software/gnucobol/>" +#~ msgstr "Página inicial de GnuCOBOL: <http://www.gnu.org/software/gnucobol/>" + #, c-format #~ msgid "invalid parameter -std=%s" #~ msgstr "parámetro no válido -std=%s" -#~ msgid "invalid option detected" -#~ msgstr "opción no válida detectada" - #, c-format #~ msgid "unknown option ignored:\t%s" #~ msgstr "opción desconocida ignorada:\t%s" +#~ msgid "unexpected error_node parameter" +#~ msgstr "parámetro error_node inesperado" + #, c-format #~ msgid "Invalid type for '%s'" #~ msgstr "Tipo no válido para «%s»" @@ -7664,6 +7824,10 @@ msgstr "" #~ msgid "only level 88 items may have multiple values" #~ msgstr "solamente ítem de nivel 88 quizá pueda tener valores múltiples" +#, c-format +#~ msgid "unexpected USAGE: %d" +#~ msgstr "no esperaba EMPLEO: %d" + #~ msgid "define PERFORM stack size" #~ msgstr "define tamaño de pila PERFORM" @@ -7725,6 +7889,13 @@ msgstr "" #~ "\t\t\t- ejecutado SECTION/PARAGRAPH/STATEMENTS\n" #~ "\t\t\t- activado por -debug" +#~ msgid "" +#~ "'*' or '/' in column 1 treated as comment\n" +#~ "\t\t\t- FIXED format only" +#~ msgstr "" +#~ "‘*’ o ‘/’ dentro de columna 1 tratada como comentario\n" +#~ "\t\t\t- unicamente en formato FIXED" + #~ msgid "check recursive program call" #~ msgstr "comprobar llamada de programa recursiva" @@ -7782,6 +7953,9 @@ msgstr "" #~ msgid "non-negative integer value expected" #~ msgstr "valor entero no negativo esperado" +#~ msgid "invalid CLASS value" +#~ msgstr "valor CLASS inválido" + #~ msgid "spurious '$' detected - ignored" #~ msgstr "'$' espurio detectado - ignorado" @@ -7801,12 +7975,24 @@ msgstr "" #~ msgid "Extra (obsolete) context sensitive words" #~ msgstr "Contexto adicional (obsoleto) distingue mayúsculas" +#, c-format +#~ msgid "FUNCTION %s has invalid/not supported arguments - Tag %d" +#~ msgstr "FUNCTION %s tiene argumentos inválidos/no compatibles - Tag %d" + #~ msgid "cannot find the UTC offset on this system" #~ msgstr "no puede encontrar el desplazamiento UTC en este sistema" #~ msgid "invalid literal cast" #~ msgstr "cast literal inválido" +#, c-format +#~ msgid "'%s' is not a numeric literal" +#~ msgstr "«%s» no es un literal numérico" + +#, c-format +#~ msgid "'%s' is not unsigned" +#~ msgstr "«%s» no es asignada" + #~ msgid "only one set of parentheses is permitted" #~ msgstr "solo un conjunto de paréntesos está permitido" @@ -7831,15 +8017,39 @@ msgstr "" #~ msgid "invalid use of HANDLE item" #~ msgstr "modo de empleo inválido de ítem de MANIPULADOR" +#, c-format +#~ msgid "'%s' is not a numeric value" +#~ msgstr "«%s» no es un valor numérico" + +#, c-format +#~ msgid "'%s' is not an integer value" +#~ msgstr "«%s» no es un valor entero" + #~ msgid "Variable length item not allowed here" #~ msgstr "Ítem de longitud variable no permitido aquí" +#, c-format +#~ msgid "'%s' is not an alphabet name" +#~ msgstr "«%s» no es un nombre de alfabeto" + #~ msgid "the CHARACTERS field of ALLOCATE must be numeric" #~ msgstr "el campo CHARACTERS de ALLOCATE debe ser numérico" #~ msgid "HANDLE must be either a generic or a WINDOW handle" #~ msgstr "HANDLE debe ser o un manipulador genérico o un WINDOW" +#~ msgid "invalid destination for MOVE" +#~ msgstr "invalida destino para MOVE" + +#~ msgid "invalid SORT filename" +#~ msgstr "invalida nombre de fichero SORT" + +#~ msgid "invalid SORT USING parameter" +#~ msgstr "invalida parámetro SORT USING" + +#~ msgid "invalid SORT GIVING parameter" +#~ msgstr "invalida parámetro SORT GIVING" + #~ msgid "warn incompatible redefinition of data items" #~ msgstr "advierte redefinición incompatible de ítemes de datos" @@ -7862,6 +8072,10 @@ msgstr "" #~ msgid "%s: COBOL runtime is not initialized" #~ msgstr "%s: tiempo de ejecución COBOL no está inicializado" +#, c-format +#~ msgid "%s: attempt to over-write constant param %d with " +#~ msgstr "%s: intente sobrescribir parámetro contante %d con " + #, c-format #~ msgid "%s: attempt to over-write constant param %d" #~ msgstr "%s: intente sobrescribir parámetro contante %d" diff --git a/po/fr.po b/po/fr.po index 7d37cc325..0443c8f44 100644 --- a/po/fr.po +++ b/po/fr.po @@ -7,7 +7,7 @@ msgid "" msgstr "" "Project-Id-Version: gnucobol 3.2-rc1\n" "Report-Msgid-Bugs-To: gnucobol-messages@gnu.org\n" -"POT-Creation-Date: 2022-10-23 03:06+0200\n" +"POT-Creation-Date: 2023-07-28 19:20+0200\n" "PO-Revision-Date: 2023-01-23 21:53+0100\n" "Last-Translator: Frédéric Marchal <fmarchal@perso.be>\n" "Language-Team: French <traduc@traduc.org>\n" @@ -18,170 +18,175 @@ msgstr "" "X-Bugs: Report translation errors to the Language-Team address.\n" "Plural-Forms: nplurals=2; plural=(n >= 2);\n" -#: cobc/cobc.c:98 +#: cobc/cobc.c:116 cobc/codegen.c:2655 cobc/scanner.l:1375 #, c-format msgid "invalid parameter: %s" msgstr "paramètre invalide : %s" -#: cobc/cobc.c:153 cobc/cobc.c:2233 cobc/cobc.c:2236 cobc/parser.y:802 -#: cobc/reserved.c:4022 libcob/common.c:226 libcob/common.c:1308 -#: libcob/common.c:2384 libcob/common.c:2388 libcob/common.c:2426 -#: libcob/common.c:2464 libcob/common.c:2654 libcob/common.c:7351 -#: libcob/common.c:8370 libcob/common.c:9391 libcob/common.c:9470 -#: libcob/common.c:9912 +#: cobc/cobc.c:171 cobc/cobc.c:2392 cobc/cobc.c:2395 cobc/parser.y:895 +#: cobc/reserved.c:4039 libcob/common.c:235 libcob/common.c:1369 +#: libcob/common.c:2698 libcob/common.c:2702 libcob/common.c:2740 +#: libcob/common.c:2778 libcob/common.c:2939 libcob/common.c:8159 +#: libcob/common.c:9191 libcob/common.c:10209 libcob/common.c:10284 +#: libcob/common.c:10731 msgid "unknown" msgstr "inconnu" -#: cobc/cobc.c:855 +#: cobc/cobc.c:905 msgid "internal compiler error" msgstr "erreur interne du compilateur" -#: cobc/cobc.c:921 cobc/cobc.c:1008 cobc/cobc.c:1070 cobc/cobc.c:1146 -#: cobc/cobc.c:1186 cobc/cobc.c:1262 +#: cobc/cobc.c:971 cobc/cobc.c:1058 cobc/cobc.c:1120 cobc/cobc.c:1196 +#: cobc/cobc.c:1236 cobc/cobc.c:1312 #, c-format msgid "cannot allocate %d bytes of memory" msgstr "impossible d'allouer %d octets de mémoire" -#: cobc/cobc.c:934 cobc/cobc.c:950 cobc/cobc.c:970 cobc/cobc.c:1029 -#: cobc/cobc.c:1048 cobc/cobc.c:1166 cobc/cobc.c:1281 cobc/cobc.c:1323 -#: cobc/field.c:2216 libcob/common.c:8191 +#: cobc/cobc.c:984 cobc/cobc.c:1000 cobc/cobc.c:1020 cobc/cobc.c:1079 +#: cobc/cobc.c:1098 cobc/cobc.c:1216 cobc/cobc.c:1331 cobc/cobc.c:1415 +#: cobc/field.c:2346 libcob/common.c:9012 #, c-format msgid "call to %s with NULL pointer" msgstr "appel à %s avec un pointeur NULL" -#: cobc/cobc.c:991 +#: cobc/cobc.c:1041 #, c-format msgid "cannot reallocate %d bytes of memory" msgstr "impossible de ré-allouer %d octets de mémoire" -#: cobc/cobc.c:1087 cobc/cobc.c:1203 +#: cobc/cobc.c:1137 cobc/cobc.c:1253 msgid "attempt to reallocate non-allocated memory" msgstr "tentative de ré-allouer une mémoire non allouée" -#: cobc/cobc.c:1120 cobc/cobc.c:1236 +#: cobc/cobc.c:1170 cobc/cobc.c:1286 #, c-format msgid "call to %s with invalid pointer, as it is missing in list" msgstr "appel à %s avec un pointeur invalide, comme il est manquant dans la liste" -#: cobc/cobc.c:1448 +#: cobc/cobc.c:1540 #, c-format msgid "assuming literal for unquoted '%s'" msgstr "suppose un littéral pour « %s » sans guillemets" -#: cobc/cobc.c:1495 +#: cobc/cobc.c:1587 msgid " - length exceeds maximum" msgstr " - la longueur dépasse le maximum" -#: cobc/cobc.c:1499 +#: cobc/cobc.c:1591 msgid " - name cannot be empty" msgstr " - le nom ne peut pas être vide" -#: cobc/cobc.c:1502 -msgid " - name cannot begin with space or underscore" +#: cobc/cobc.c:1594 +#, fuzzy +#| msgid " - name cannot begin with space or underscore" +msgid " - name cannot begin with space or hyphen" msgstr " - le nom ne peut pas débuter avec un espace ou un souligné" -#: cobc/cobc.c:1505 +#: cobc/cobc.c:1597 msgid " - name cannot begin with 'cob_' or 'COB_'" msgstr " - le nom ne peut pas débuter avec « cob_ » ou « COB_ »" -#: cobc/cobc.c:1508 +#: cobc/cobc.c:1600 msgid " - name duplicates a 'C' keyword" msgstr " - le nom duplique un mot clé « C »" -#: cobc/cobc.c:1511 +#: cobc/cobc.c:1603 msgid " - name cannot contain a directory separator" msgstr " - le nom ne peut pas contenir un séparateur de répertoire" -#: cobc/cobc.c:1520 +#: cobc/cobc.c:1612 #, c-format msgid "invalid file base name '%s'%s" msgstr "nom de base du fichier invalide « %s »%s" -#: cobc/cobc.c:1524 +#: cobc/cobc.c:1616 #, c-format msgid "invalid ENTRY '%s'%s" msgstr "ENTRY invalide « %s »%s" -#: cobc/cobc.c:1527 +#: cobc/cobc.c:1619 #, c-format msgid "invalid PROGRAM-ID '%s'%s" msgstr "PROGRAM-ID invalide « %s »%s" -#: cobc/cobc.c:1659 +#: cobc/cobc.c:1751 #, c-format msgid "file '%s' does not exist" msgstr "le fichier « %s » n'existe pas" -#: cobc/cobc.c:1685 +#: cobc/cobc.c:1777 #, c-format msgid "duplicate exception '%s'" msgstr "exception « %s » dupliquée" -#: cobc/cobc.c:1733 +#: cobc/cobc.c:1825 #, c-format msgid "invalid exception-name: %s" msgstr "nom d'exception invalide : %s" -#: cobc/cobc.c:1870 cobc/cobc.c:8780 +#: cobc/cobc.c:1998 cobc/cobc.c:9211 msgid "please check environment variables as noted above" msgstr "veuillez vérifier les variables d'environnement comme indiqué ci-dessus" -#: cobc/cobc.c:1882 cobc/error.c:348 cobc/error.c:382 cobc/error.c:408 -#: cobc/error.c:411 cobc/error.c:477 cobc/error.c:631 cobc/error.c:675 -#: cobc/error.c:779 cobc/error.c:782 +#: cobc/cobc.c:2010 cobc/error.c:140 msgid "error: " msgstr "erreur : " -#: cobc/cobc.c:1905 +#: cobc/cobc.c:2033 #, c-format msgid "duplicate DEFINE '%s' - ignored" msgstr "DEFINE « %s » dupliqué – ignoré" -#: cobc/cobc.c:1958 +#: cobc/cobc.c:2086 #, c-format msgid "environment variable '%s' is '%s'; should not contain '%c'" msgstr "la variable d'environnement « %s » est « %s »; elle ne devrait pas contenir « %c »" -#: cobc/cobc.c:1988 +#: cobc/cobc.c:2116 msgid "parameter buffer size exceeded" msgstr "taille du tampon de paramètre dépassée" -#: cobc/cobc.c:2028 +#: cobc/cobc.c:2156 #, c-format msgid "warning: could not move temporary file to %s" msgstr "avertissement : le fichier temporaire n'a pas su être déplacé vers %s" -#: cobc/cobc.c:2239 +#: cobc/cobc.c:2329 +#, fuzzy, c-format +#| msgid "environment variable '%s' is '%s'; should not contain '%c'" +msgid "environment variable '%s' has invalid content" +msgstr "la variable d'environnement « %s » est « %s »; elle ne devrait pas contenir « %c »" + +#: cobc/cobc.c:2398 #, c-format msgid "aborting compile of %s at line %d (%s: %s)" msgstr "interruption de la compilation de %s à la ligne %d (%s: %s)" -#: cobc/cobc.c:2243 +#: cobc/cobc.c:2402 #, c-format msgid "aborting codegen for %s, last statement at line %d (%s: %s)" msgstr "interruption de la génération de code pour %s, dernière instruction à la ligne %d (%s: %s)" -#: cobc/cobc.c:2246 +#: cobc/cobc.c:2405 #, c-format msgid "aborting codegen for %s (%s: %s)" msgstr "interruption de codegen pour %s (%s: %s)" -#: cobc/cobc.c:2251 +#: cobc/cobc.c:2410 msgid "aborting" msgstr "interruption" -#: cobc/cobc.c:2329 libcob/common.c:2823 libcob/common.c:8149 -#: bin/cobcrun.c:375 +#: cobc/cobc.c:2488 libcob/common.c:3107 libcob/common.c:8970 bin/cobcrun.c:373 #, c-format msgid "Please report this!" msgstr "Merci de signaler ceci !" -#: cobc/cobc.c:2346 bin/cobcrun.c:100 +#: cobc/cobc.c:2505 bin/cobcrun.c:100 #, c-format msgid "License GPLv3+: GNU GPL version 3 or later <%s>" msgstr "Licence GPLv3+ : GNU GPL version 3 ou ultérieure <%s>" -#: cobc/cobc.c:2348 libcob/common.c:8741 bin/cobcrun.c:102 +#: cobc/cobc.c:2507 libcob/common.c:9558 bin/cobcrun.c:102 msgid "" "This is free software; see the source for copying conditions. There is NO\n" "warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." @@ -190,390 +195,395 @@ msgstr "" "Il n'y a AUCUNE garantie; pas même pour la COMMERCIALISATION ou l'ADÉQUATION À UN\n" "BESOIN PARTICULIER." -#: cobc/cobc.c:2350 libcob/common.c:8743 bin/cobcrun.c:104 +#: cobc/cobc.c:2509 libcob/common.c:9560 bin/cobcrun.c:104 #, c-format msgid "Written by %s" msgstr "Écrit par %s" #. TRANSLATORS: This msgid is intended as the "Packaged" msgid, %s expands to date and time -#: cobc/cobc.c:2352 cobc/cobc.c:2365 libcob/common.c:8747 bin/cobcrun.c:106 +#: cobc/cobc.c:2511 cobc/cobc.c:2524 libcob/common.c:9564 bin/cobcrun.c:106 #, c-format msgid "Built %s" msgstr "Compilé %s" #. TRANSLATORS: This msgid is intended as the "Built" msgid, %s expands to date and time -#: cobc/cobc.c:2354 cobc/cobc.c:2367 libcob/common.c:8750 bin/cobcrun.c:108 +#: cobc/cobc.c:2513 cobc/cobc.c:2526 libcob/common.c:9567 bin/cobcrun.c:108 #, c-format msgid "Packaged %s" msgstr "Empaqueté %s" -#: cobc/cobc.c:2356 cobc/cobc.c:2369 cobc/cobc.c:2478 libcob/common.c:8787 +#: cobc/cobc.c:2515 cobc/cobc.c:2528 cobc/cobc.c:2637 libcob/common.c:9604 msgid "C version" msgstr "Version C" -#: cobc/cobc.c:2382 +#: cobc/cobc.c:2541 libcob/common.c:1075 msgid "executing:" msgstr "exécution :" -#: cobc/cobc.c:2384 +#: cobc/cobc.c:2543 msgid "to be executed:" msgstr "à exécuter :" -#: cobc/cobc.c:2422 cobc/cobc.c:2423 libcob/common.c:6834 libcob/common.c:6835 -#: libcob/common.c:6866 libcob/common.c:6867 +#: cobc/cobc.c:2581 cobc/cobc.c:2582 libcob/common.c:7632 libcob/common.c:7633 +#: libcob/common.c:7664 libcob/common.c:7665 msgid "env" msgstr "env" -#: cobc/cobc.c:2474 libcob/common.c:8783 +#: cobc/cobc.c:2633 libcob/common.c:9600 msgid "build information" msgstr "information de compilation" -#: cobc/cobc.c:2475 libcob/common.c:8784 +#: cobc/cobc.c:2634 libcob/common.c:9601 msgid "build environment" msgstr "environnement de compilation" -#: cobc/cobc.c:2484 libcob/common.c:8794 +#: cobc/cobc.c:2643 libcob/common.c:9611 msgid "GnuCOBOL information" msgstr "information GnuCOBOL" -#: cobc/cobc.c:2492 cobc/cobc.c:2575 cobc/cobc.c:2591 libcob/common.c:8410 -#: libcob/common.c:8777 libcob/common.c:8778 libcob/common.c:8812 -#: libcob/common.c:8878 libcob/common.c:8900 libcob/common.c:8934 +#: cobc/cobc.c:2651 cobc/cobc.c:2739 cobc/cobc.c:2755 libcob/common.c:9233 +#: libcob/common.c:9594 libcob/common.c:9595 libcob/common.c:9629 +#: libcob/common.c:9695 libcob/common.c:9717 libcob/common.c:9751 msgid "disabled" msgstr "désactivé" -#: cobc/cobc.c:2523 cobc/cobc.c:2541 libcob/common.c:7397 libcob/common.c:8400 -#: libcob/common.c:8407 libcob/common.c:8816 libcob/common.c:8834 +#: cobc/cobc.c:2687 cobc/cobc.c:2705 libcob/common.c:8179 libcob/common.c:9221 +#: libcob/common.c:9230 libcob/common.c:9633 libcob/common.c:9651 msgid "yes" msgstr "oui" -#: cobc/cobc.c:2525 cobc/cobc.c:2543 libcob/common.c:7399 libcob/common.c:8402 -#: libcob/common.c:8818 libcob/common.c:8836 +#: cobc/cobc.c:2689 cobc/cobc.c:2707 libcob/common.c:8181 libcob/common.c:9223 +#: libcob/common.c:9635 libcob/common.c:9653 msgid "no" msgstr "non" -#: cobc/cobc.c:2529 libcob/common.c:8822 +#: cobc/cobc.c:2693 libcob/common.c:9639 msgid "8 bytes" msgstr "8 octets" -#: cobc/cobc.c:2531 libcob/common.c:8824 +#: cobc/cobc.c:2695 libcob/common.c:9641 msgid "4 bytes" msgstr "4 octets" -#: cobc/cobc.c:2535 cobc/cobc.c:2537 libcob/common.c:8828 libcob/common.c:8830 +#: cobc/cobc.c:2699 cobc/cobc.c:2701 libcob/common.c:9645 libcob/common.c:9647 msgid "endianness" msgstr "boutisme" -#: cobc/cobc.c:2535 libcob/common.c:8828 +#: cobc/cobc.c:2699 libcob/common.c:9645 msgid "big-endian" msgstr "gros-boutiste" -#: cobc/cobc.c:2537 libcob/common.c:8830 +#: cobc/cobc.c:2701 libcob/common.c:9647 msgid "little-endian" msgstr "petit-boutiste" -#: cobc/cobc.c:2541 cobc/cobc.c:2543 libcob/common.c:8834 libcob/common.c:8836 +#: cobc/cobc.c:2705 cobc/cobc.c:2707 libcob/common.c:9651 libcob/common.c:9653 msgid "native EBCDIC" msgstr "EBCDIC natif" -#: cobc/cobc.c:2546 libcob/common.c:8937 +#: cobc/cobc.c:2710 libcob/common.c:9754 msgid "extended screen I/O" msgstr "E/S écran étendue" -#: cobc/cobc.c:2549 libcob/common.c:8840 +#: cobc/cobc.c:2713 libcob/common.c:9657 msgid "variable file format" msgstr "fichier de format variable" -#: cobc/cobc.c:2555 cobc/cobc.c:2557 libcob/common.c:8846 libcob/common.c:8848 +#: cobc/cobc.c:2719 cobc/cobc.c:2721 libcob/common.c:9663 libcob/common.c:9665 msgid "sequential file handler" msgstr "gestionnaire de fichier séquentiel" -#: cobc/cobc.c:2557 libcob/common.c:8848 +#: cobc/cobc.c:2721 libcob/common.c:9665 msgid "built-in" msgstr "intégré" -#: cobc/cobc.c:2561 cobc/cobc.c:2563 cobc/cobc.c:2565 cobc/cobc.c:2567 -#: cobc/cobc.c:2570 cobc/cobc.c:2572 cobc/cobc.c:2575 libcob/common.c:8852 -#: libcob/common.c:8866 libcob/common.c:8868 libcob/common.c:8870 -#: libcob/common.c:8873 libcob/common.c:8875 libcob/common.c:8878 +#: cobc/cobc.c:2725 cobc/cobc.c:2727 cobc/cobc.c:2729 cobc/cobc.c:2731 +#: cobc/cobc.c:2734 cobc/cobc.c:2736 cobc/cobc.c:2739 libcob/common.c:9669 +#: libcob/common.c:9683 libcob/common.c:9685 libcob/common.c:9687 +#: libcob/common.c:9690 libcob/common.c:9692 libcob/common.c:9695 msgid "indexed file handler" msgstr "gestionnaire de fichier indexé" -#: cobc/cobc.c:2580 cobc/cobc.c:2582 cobc/cobc.c:2585 libcob/common.c:8884 +#: cobc/cobc.c:2744 cobc/cobc.c:2746 cobc/cobc.c:2749 libcob/common.c:9701 msgid "mathematical library" msgstr "bibliothèque mathématique" -#: cobc/cobc.c:2589 cobc/cobc.c:2591 libcob/common.c:8895 libcob/common.c:8900 +#: cobc/cobc.c:2753 cobc/cobc.c:2755 libcob/common.c:9712 libcob/common.c:9717 msgid "XML library" msgstr "bibliothèque XML" -#: cobc/cobc.c:2594 libcob/common.c:8917 libcob/common.c:8932 -#: libcob/common.c:8934 +#: cobc/cobc.c:2758 libcob/common.c:9734 libcob/common.c:9749 +#: libcob/common.c:9751 msgid "JSON library" msgstr "bibliothèque JSON" -#: cobc/cobc.c:2597 libcob/common.c:8810 libcob/common.c:8941 +#: cobc/cobc.c:2761 libcob/common.c:9627 libcob/common.c:9758 msgid "enabled" msgstr "activé" -#: cobc/cobc.c:2604 +#: cobc/cobc.c:2768 msgid "only one of options 'E', 'S', 'C', 'c' may be specified" msgstr "seule une des options « E », « S », « C », « c » peut être spécifiée" -#: cobc/cobc.c:2610 +#: cobc/cobc.c:2774 msgid "only one of options 'm', 'x', 'b' may be specified" msgstr "seule une des options « m », « x », « b » peut être spécifiée" -#: cobc/cobc.c:2652 +#: cobc/cobc.c:2816 #, c-format msgid "option requires one of 'ALL', 'FD', 'WS', 'LS', 'RD', 'FD', 'SC', 'LO' - not '%s'" msgstr "l'option requiert un parmi « ALL », « FD », « WS », « LS », « RD », « FD », « SC », « LO » – pas « %s »" -#: cobc/cobc.c:2682 +#: cobc/cobc.c:2846 #, c-format msgid "'%s' is not an intrinsic function" msgstr "« %s » n'est pas une fonction intrinsèque" -#: cobc/cobc.c:2726 cobc/cobc.c:8094 cobc/cobc.c:8213 cobc/codegen.c:3783 -#: cobc/codegen.c:3884 cobc/codegen.c:5571 cobc/codegen.c:5700 -#: cobc/codegen.c:13034 cobc/tree.c:1391 cobc/tree.c:4497 cobc/tree.c:5067 -#: cobc/tree.c:5316 cobc/typeck.c:4344 cobc/typeck.c:9044 cobc/typeck.c:9079 -#: cobc/typeck.c:9977 cobc/typeck.c:12619 cobc/typeck.c:12690 -#: cobc/typeck.c:12758 cobc/typeck.c:13043 cobc/typeck.c:13086 -#: libcob/fileio.c:9703 libcob/fileio.c:9714 +#: cobc/cobc.c:2889 cobc/cobc.c:8507 cobc/cobc.c:8626 cobc/codegen.c:3761 +#: cobc/codegen.c:3864 cobc/codegen.c:5671 cobc/codegen.c:5816 +#: cobc/codegen.c:13429 cobc/parser.y:391 cobc/tree.c:1397 cobc/tree.c:4565 +#: cobc/tree.c:5135 cobc/tree.c:5392 cobc/typeck.c:4497 cobc/typeck.c:9504 +#: cobc/typeck.c:9541 cobc/typeck.c:10418 cobc/typeck.c:13395 +#: cobc/typeck.c:13469 cobc/typeck.c:13537 cobc/typeck.c:13825 +#: cobc/typeck.c:13887 libcob/fileio.c:10094 libcob/fileio.c:10105 #, c-format msgid "call to '%s' with invalid parameter '%s'" msgstr "appel à « %s » avec un paramètre « %s » invalide" -#: cobc/cobc.c:3136 +#: cobc/cobc.c:3300 msgid "loading standard configuration file 'default.conf'" msgstr "chargement du fichier de configuration standard « default.conf »" -#: cobc/cobc.c:3217 +#: cobc/cobc.c:3387 msgid "the used C compiler is known to not be able to generate assembler code" msgstr "le compilateur C utilisé est connu pour être incapable de générer du code assembleur" -#: cobc/cobc.c:3299 +#: cobc/cobc.c:3469 msgid "invalid output file name" msgstr "nom de fichier de sortie invalide" -#: cobc/cobc.c:3361 +#: cobc/cobc.c:3531 #, c-format msgid "warning: '%s' is not a directory, defaulting to current directory" msgstr "avertissement : « %s » n'est pas un répertoire, utilisation du répertoire courant par défaut" -#: cobc/cobc.c:3388 +#: cobc/cobc.c:3558 #, c-format msgid "warning: %d lines per listing page specified, using %d" msgstr "avertissement : %d ligne par page de listing spécifié, %d est utilisé" -#: cobc/cobc.c:3438 +#: cobc/cobc.c:3615 #, c-format msgid "warning: assuming '%s' is a DEFINE - did you intend to use -debug?" msgstr "avertissement : je présume que « %s » est un DEFINE – aviez-vous l'intention d'utiliser -debug ?" -#: cobc/cobc.c:3699 cobc/cobc.c:3724 cobc/cobc.c:3752 +#: cobc/cobc.c:3661 cobc/cobc.c:3702 cobc/cobc.c:4281 +#, fuzzy, c-format +#| msgid "ignoring unknown directive: '%s'" +msgid "ignoring nonexistent directory \"%s\"" +msgstr "directive inconnue ignorée : « %s »" + +#: cobc/cobc.c:3943 cobc/cobc.c:3968 cobc/cobc.c:3996 #, c-format msgid "unknown warning option '%s'" msgstr "option d'avertissement « %s » inconnue" -#: cobc/cobc.c:3813 +#: cobc/cobc.c:4063 #, c-format msgid "%s option requires a listing file" msgstr "l'option %s requiert un fichier de listing" -#: cobc/cobc.c:3820 +#: cobc/cobc.c:4070 msgid "output to stdout only valid for preprocess" msgstr "la sortie vers stdout est uniquement valable pour le préprocesseur" -#: cobc/cobc.c:3829 +#: cobc/cobc.c:4085 +msgid "-MT must be given to specify target file" +msgstr "" + +#: cobc/cobc.c:4091 msgid "all runtime checks are enabled" msgstr "tous les contrôles à l'exécution sont activés" -#: cobc/cobc.c:4030 +#: cobc/cobc.c:4316 msgid "only one stdin input allowed" msgstr "seulement une entrée stdin autorisée" -#: cobc/cobc.c:4040 +#: cobc/cobc.c:4326 #, c-format msgid "invalid file name parameter (length > %d)" msgstr "paramètre de nom de fichier invalide (longueur > %d)" -#: cobc/cobc.c:4270 +#: cobc/cobc.c:4559 msgid "return status:" msgstr "statut de retour :" -#: cobc/cobc.c:4306 libcob/common.c:5711 +#: cobc/cobc.c:4595 libcob/common.c:6391 #, c-format msgid "external process \"%s\" ended with signal %s (%d)" msgstr "le processus externe « %s » a été terminé par le signal %s (%d)" -#: cobc/cobc.c:4364 +#: cobc/cobc.c:4654 msgid "nothing for -j to run" msgstr "rien à exécuter par -j" -#: cobc/cobc.c:4406 cobc/cobc.c:4420 +#: cobc/cobc.c:4697 cobc/cobc.c:4711 #, c-format msgid "%s is resolved by environment as: %s" msgstr "%s est résolu par l'environnement en tant que : %s" -#: cobc/cobc.c:4882 +#: cobc/cobc.c:5175 msgid "preprocessing:" msgstr "pré-traitement :" -#: cobc/cobc.c:4952 +#: cobc/cobc.c:5244 msgid "'cobxref' execution unsuccessful" msgstr "exécution de « cobxref » infructueuse" -#: cobc/cobc.c:4955 +#: cobc/cobc.c:5247 #, c-format msgid "check that 'cobxref' is in %s" msgstr "vérifiez que « cobxref » est dans %s" -#: cobc/cobc.c:4957 +#: cobc/cobc.c:5249 msgid "no listing produced" msgstr "aucun listing produit" -#: cobc/cobc.c:5882 cobc/cobc.c:5921 +#: cobc/cobc.c:6234 cobc/cobc.c:6273 msgid "No fields defined." msgstr "Aucun champ défini." -#: cobc/cobc.c:5941 +#: cobc/cobc.c:6293 msgid "No labels defined." msgstr "Aucune étiquette définie." -#: cobc/cobc.c:5963 +#: cobc/cobc.c:6324 cobc/cobc.c:9292 +msgid "command line:" +msgstr "ligne de commande :" + +#: cobc/cobc.c:6342 msgid "Error/Warning summary:" msgstr "Résumé des erreurs/avertissements :" -#: cobc/cobc.c:6006 +#: cobc/cobc.c:6385 msgid "0 warnings in compilation group" msgstr "0 avertissement dans le groupe de compilation" -#: cobc/cobc.c:6010 +#: cobc/cobc.c:6389 msgid "1 warning in compilation group" msgstr "1 avertissement dans le groupe de compilation" -#: cobc/cobc.c:6014 +#: cobc/cobc.c:6393 #, c-format msgid "%d warnings in compilation group" msgstr "%d avertissements dans le groupe de compilation" -#: cobc/cobc.c:6020 +#: cobc/cobc.c:6399 msgid "0 errors in compilation group" msgstr "0 erreur dans le groupe de compilation" -#: cobc/cobc.c:6024 +#: cobc/cobc.c:6403 msgid "1 error in compilation group" msgstr "1 erreur dans le groupe de compilation" -#: cobc/cobc.c:6028 +#: cobc/cobc.c:6407 #, c-format msgid "%d errors in compilation group" msgstr "%d erreurs dans le groupe de compilation" -#: cobc/cobc.c:6034 +#: cobc/cobc.c:6413 #, c-format msgid "Too many errors in compilation group: %d maximum errors" msgstr "Trop d'erreurs dans le groupe de compilation : %d erreurs maximum" -#: cobc/cobc.c:6632 +#: cobc/cobc.c:7028 #, c-format msgid "%s:%d: too many continuation lines" msgstr "%s:%d: trop de lignes de continuation" -#: cobc/cobc.c:7552 +#: cobc/cobc.c:7956 msgid "parsing:" msgstr "analyse :" -#: cobc/cobc.c:7612 +#: cobc/cobc.c:8017 msgid "translating:" msgstr "traduction :" -#: cobc/cobc.c:8786 +#: cobc/cobc.c:9217 msgid "no input files" msgstr "pas de fichier d'entrée" -#: cobc/cobc.c:8816 +#: cobc/cobc.c:9248 #, c-format msgid "%s option invalid in this combination" msgstr "l'option %s est invalide dans cette combinaison" -#: cobc/cobc.c:8857 -msgid "command line:" -msgstr "ligne de commande :" - -#: cobc/codegen.c:1041 cobc/codegen.c:4463 cobc/codegen.c:11648 -#: cobc/codegen.c:12186 +#: cobc/codegen.c:1040 cobc/codegen.c:4506 cobc/codegen.c:11910 +#: cobc/codegen.c:12467 msgid "unexpected CONSTANT item" msgstr "élément CONSTANT inattendu" -#: cobc/codegen.c:2981 cobc/codegen.c:3261 cobc/codegen.c:8523 -#: cobc/tree.c:1413 +#: cobc/codegen.c:2921 cobc/codegen.c:3207 cobc/codegen.c:8866 cobc/tree.c:1419 #, c-format msgid "unexpected cast type: %d" msgstr "type de transtypage inattendu : %d" -#: cobc/codegen.c:3713 cobc/codegen.c:4413 +#: cobc/codegen.c:3690 cobc/codegen.c:4455 #, c-format msgid "internal statement stack depth exceeded: %d" msgstr "dépassement de la profondeur de la pile des instructions internes : %d" -#: cobc/codegen.c:3785 +#: cobc/codegen.c:3763 #, c-format msgid "%s is not a field" msgstr "%s n'est pas un champ" -#: cobc/codegen.c:4186 cobc/codegen.c:4257 +#: cobc/codegen.c:4177 cobc/codegen.c:4279 #, c-format msgid "unexpected function: %s" msgstr "fonction inattendue : %s" -#: cobc/codegen.c:5204 +#: cobc/codegen.c:5256 #, c-format msgid "unexpected tree category: %d" msgstr "catégorie d'arbre inattendue : %d" -#: cobc/codegen.c:5971 +#: cobc/codegen.c:6108 #, c-format msgid "unexpected size: %d" msgstr "taille inattendue : %d" -#: cobc/codegen.c:7595 +#: cobc/codegen.c:7894 #, c-format msgid "No ENTRY FOR GO TO '%s'" msgstr "Pas de ENTRY FOR GO TO « %s »" -#: cobc/codegen.c:7816 cobc/codegen.c:8163 +#: cobc/codegen.c:8283 cobc/codegen.c:8609 #, c-format msgid "unexpected handler type: %d" msgstr "type de gestionnaire inattendu : %d" -#: cobc/codegen.c:8254 -msgid "unexpected error_node parameter" -msgstr "paramètre error_node inattendu" - -#: cobc/codegen.c:8544 +#: cobc/codegen.c:8887 #, c-format msgid "unexpected tree type: %d" msgstr "type d'arbre inattendu : %d" -#: cobc/codegen.c:9520 +#: cobc/codegen.c:9776 msgid "Nested OCCURS in report" msgstr "OCCURS imbriqués dans le rapport" -#: cobc/codeoptim.c:2777 +#: cobc/codeoptim.c:2856 #, c-format msgid "unexpected optimization value: %d" msgstr "valeur d'optimisation inattendue : %d" -#: cobc/config.c:164 libcob/common.c:7824 libcob/common.c:7838 -#: libcob/common.c:8315 +#: cobc/config.c:164 libcob/common.c:8639 libcob/common.c:8653 +#: libcob/common.c:9136 #, c-format msgid "invalid value '%s' for configuration tag '%s'" msgstr "valeur « %s » invalide pour la balise de configuration « %s »" -#: cobc/config.c:167 libcob/common.c:7117 libcob/common.c:7234 +#: cobc/config.c:167 libcob/common.c:7915 libcob/common.c:7939 #, c-format msgid "should be one of the following values: %s" msgstr "elle devrait être l'une des valeurs suivantes : %s" @@ -582,7 +592,7 @@ msgstr "elle devrait être l'une des valeurs suivantes : %s" msgid "must be numeric" msgstr "doit être numérique" -#: cobc/config.c:171 libcob/common.c:7215 +#: cobc/config.c:171 libcob/common.c:8045 #, c-format msgid "maximum value: %lu" msgstr "valeur maximale : %lu" @@ -597,45 +607,45 @@ msgstr "valeur minimale : %d" msgid "unsupported value '%s' for configuration tag '%s'" msgstr "valeur « %s » non supportée pour la balise de configuration « %s »" -#: cobc/config.c:318 cobc/pplex.l:1185 libcob/common.c:7739 +#: cobc/config.c:319 cobc/pplex.l:1264 libcob/common.c:8554 msgid "recursive inclusion" msgstr "inclusion récursive" -#: cobc/config.c:393 libcob/common.c:7791 +#: cobc/config.c:394 libcob/common.c:8606 msgid "configuration file was included here" msgstr "le fichier de configuration a été inclus ici" -#: cobc/config.c:422 +#: cobc/config.c:423 #, c-format msgid "The previous loaded configuration '%s' will be discarded." msgstr "La configuration « %s » précédemment chargée sera abandonnée." -#: cobc/config.c:458 +#: cobc/config.c:459 msgid "missing definitions:" msgstr "définitions manquantes :" -#: cobc/config.c:460 +#: cobc/config.c:461 #, c-format msgid "\tno definition of '%s'" msgstr "\tpas de définition de « %s »" -#: cobc/config.c:523 +#: cobc/config.c:524 #, c-format msgid "invalid configuration tag '%s'" msgstr "balise de configuration « %s » invalide" -#: cobc/config.c:536 libcob/common.c:7545 libcob/common.c:7629 -#: libcob/common.c:7657 +#: cobc/config.c:537 libcob/common.c:8360 libcob/common.c:8444 +#: libcob/common.c:8472 #, c-format msgid "unknown configuration tag '%s'" msgstr "balise de configuration « %s » inconnue" -#: cobc/config.c:560 +#: cobc/config.c:561 #, c-format msgid "invalid configuration tag '%s' in word-list" msgstr "balise de configuration « %s » invalide dans la liste de mots" -#: cobc/config.c:622 +#: cobc/config.c:623 #, c-format msgid "Could not access word list for '%s'" msgstr "Impossible d'accéder la liste de mots pour « %s »" @@ -673,13 +683,21 @@ msgid "maximum numeric literal size" msgstr "taille maximale pour un littéral numérique" #: cobc/config.def:73 +#, fuzzy +#| msgid "" +#| "default initialization for fields without VALUE, may be one of\n" +#| " * character in quotes\n" +#| " * decimal 0..255 representing a character\n" +#| " * \"init\" to initialize to PICTURE/USAGE\n" +#| " * \"none\" to do no explicit initialization\n" +#| " * default: \"init\"" msgid "" "default initialization for fields without VALUE, may be one of\n" -" * character in quotes\n" -" * decimal 0..255 representing a character\n" -" * \"init\" to initialize to PICTURE/USAGE\n" -" * \"none\" to do no explicit initialization\n" -" * default: \"init\"" +" * character in quotes\n" +" * decimal 0..255 representing a character\n" +" * \"init\" to initialize to PICTURE/USAGE\n" +" * \"none\" to do no explicit initialization\n" +" * default: \"init\"" msgstr "" "initialisation par défaut pour les champs sans VALUE, peut être\n" " * caractère entre guillemets\n" @@ -712,130 +730,150 @@ msgstr "quelles règles du compilateur appliquer à l'instruction « SCREEN SEC msgid "whether DECIMAL-POINT IS COMMA has effect in XML/JSON GENERATE, may be one of: none, xml, json, all" msgstr "effet de DECIMAL-POINT IS COMMA sur XML/JSON GENERATE, peut être : none, xml, json, all" -#: cobc/config.def:103 +#: cobc/config.def:101 +msgid "checking for subscript (only done with EC-BOUND-SUBSCRIPT active), may be one of: full, max, record" +msgstr "" + +#: cobc/config.def:106 msgid "resolve file names at run time using environment variables" msgstr "résout les noms de fichiers durant l'exécution en utilisant les variables d'environnement" -#: cobc/config.def:106 +#: cobc/config.def:109 msgid "alternate formatting of numeric fields" msgstr "format alternatif des champs numériques" -#: cobc/config.def:109 +#: cobc/config.def:112 msgid "numeric truncation according to ANSI" msgstr "troncation numérique selon ANSI" -#: cobc/config.def:112 -msgid "allow complex OCCURS DEPENDING ON" +#: cobc/config.def:115 +#, fuzzy +#| msgid "allow complex OCCURS DEPENDING ON" +msgid "allow non-standard OCCURS DEPENDING ON syntax" msgstr "autoriser des OCCURS DEPENDING ON complexes" -#: cobc/config.def:115 +#: cobc/config.def:118 msgid "adjust items following OCCURS DEPENDING (implies complex-odo)" msgstr "ajuster les éléments suivants OCCURS DEPENDING (implique complex-odo)" -#: cobc/config.def:118 +#: cobc/config.def:121 +#, fuzzy +#| msgid "invalid VALUE clause" +msgid "applies JUSTIFY with VALUE clause" +msgstr "clause VALUE invalide" + +#: cobc/config.def:124 msgid "allow REDEFINES to other than last equal level number" msgstr "autoriser REDEFINES sur autre chose que le dernier nombre au niveau d'une égalité" -#: cobc/config.def:121 +#: cobc/config.def:127 msgid "allow certain syntax variations (e.g. REDEFINES position)" msgstr "autoriser certaines variations de syntaxe (par ex. REDEFINES position)" -#: cobc/config.def:124 +#: cobc/config.def:130 msgid "allow zero length reference-modification (only changed with EC-BOUND-REF-MOD active)" msgstr "autoriser la modification de référence de taille nulle (uniquement changé quand EC-BOUND-REF-MOD est actif)" -#: cobc/config.def:127 +#: cobc/config.def:133 msgid "allow non-matching level numbers" msgstr "autoriser des numéros de niveaux non concordants" -#: cobc/config.def:130 +#: cobc/config.def:136 msgid "require ASSIGN USING items to be in WORKING-STORAGE" msgstr "exiger que les éléments de ASSIGN USING soient dans WORKING-STORAGE" -#: cobc/config.def:133 +#: cobc/config.def:139 msgid "LOCAL-STORAGE SECTION implies RECURSIVE attribute" msgstr "LOCAL-STORAGE SECTION implique l'attribut RECURSIVE" -#: cobc/config.def:136 +#: cobc/config.def:142 msgid "LINKAGE SECTION items remain allocated between invocations" msgstr "les éléments de LINKAGE SECTION restent alloués entre les invocations" -#: cobc/config.def:139 +#: cobc/config.def:145 msgid "MOVE operates as on IBM (left to right, byte by byte)" msgstr "MOVE opère comme sur IBM (de gauche à droite, octet par octet)" -#: cobc/config.def:142 +#: cobc/config.def:148 msgid "exit point of any currently executing perform is recognized if reached" msgstr "le point de sortie de tout « perform » actuellement en cours d'exécution est reconnu si atteint" -#: cobc/config.def:145 +#: cobc/config.def:151 msgid "limit precision in intermediate results to precision of final result (less accurate)" msgstr "limiter la précision des résultats intermédiaires à la précision du résultat final (moins précis)" -#: cobc/config.def:148 +#: cobc/config.def:154 msgid "evaluate constant expressions at compile time" msgstr "évaluer les expressions constantes durant la compilation" -#: cobc/config.def:151 +#: cobc/config.def:157 msgid "allow hexadecimal value 'F' for NUMERIC test of signed PACKED DECIMAL field" msgstr "autoriser la valeur hexadécimale « F » pour le test NUMERIC du champ signé PACKED DECIMAL" -#: cobc/config.def:154 +#: cobc/config.def:160 msgid "program names don't lead to a reserved identifier" msgstr "les noms des programmes n'introduisent pas d'identificateurs réservés" -#: cobc/config.def:157 +#: cobc/config.def:163 msgid "set WITH UPDATE clause as default for ACCEPT dest-item, instead of WITH NO UPDATE" msgstr "définir l'instruction WITH UPDATE comme défaut pour ACCEPT dest-élément, au lieu de WITH NO UPDATE" -#: cobc/config.def:160 +#: cobc/config.def:166 msgid "set WITH AUTO clause as default for ACCEPT dest-item, instead of WITH TAB" msgstr "définir l'instruction WITH AUTO comme défaut pour ACCEPT dest-élément, au lieu de WITH TAB" -#: cobc/config.def:163 +#: cobc/config.def:169 msgid "assume CONSOLE IS CRT if not set otherwise" msgstr "supposer CONSOLE IS CRT si non défini par ailleurs" -#: cobc/config.def:166 +#: cobc/config.def:172 msgid "NO-ECHO hides input with asterisks like SECURE" msgstr "NO-ECHO cache l'entrée avec des astérisques comme SECURE" -#: cobc/config.def:169 +#: cobc/config.def:175 msgid "assume a field DISPLAY starts at LINE 0 COL 0 (i.e. at the cursor), not LINE 1 COL 1" msgstr "supposer qu'un champ DISPLAY commence à LINE 0 COL 0 (c-à-d au curseur), pas à LINE 1 COL 1" -#: cobc/config.def:172 +#: cobc/config.def:178 msgid "special behaviour of DISPLAY SPACE/ALL X'01'/ALL X'02'/ALL X'07'" msgstr "comportement spécial de DISPLAY SPACE/ALL X'01'/ALL X'02'/ALL X'07'" -#: cobc/config.def:175 +#: cobc/config.def:181 msgid "COMP-1 is a 16-bit signed integer" msgstr "COMP-1 est un entier signé sur 16 bits" -#: cobc/config.def:178 +#: cobc/config.def:184 msgid "POINTER is a 64-bit unsigned integer" msgstr "POINTER est un entier non signé sur 64 bits" -#: cobc/config.def:181 +#: cobc/config.def:187 msgid "imply zero in move of non-numeric literal to numeric items" msgstr "supposer zéro dans le déplacement d'un littéral non numérique vers des éléments numériques" -#: cobc/config.def:184 +#: cobc/config.def:190 msgid "implicitly define a variable if an ASSIGN DYNAMIC does not match any data item" msgstr "définir implicitement une variable si un ASSIGN DYNAMIC ne correspond à aucun élément de donnée" -#: cobc/config.def:187 +#: cobc/config.def:193 msgid "specifying device by mnemonic" msgstr "spécifie le périphérique avec une mnémonique" -#: cobc/config.def:193 +#: cobc/config.def:199 +#, fuzzy +#| msgid "" +#| "check contents of Area A (when reference format supports Area A enforcement),\n" +#| " enabled checks include:\n" +#| " * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" +#| " and toplevel numbers (01 and 77) must start in Area A;\n" +#| " * statements must not start in Area A; and\n" +#| " * separator periods must not be within Area A." msgid "" "check contents of Area A (when reference format supports Area A enforcement),\n" -" enabled checks include:\n" -" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" -" and toplevel numbers (01 and 77) must start in Area A;\n" -" * statements must not start in Area A; and\n" -" * separator periods must not be within Area A." +" enabled checks include:\n" +" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" +" and toplevel numbers (01 and 77) must start in Area A;\n" +" * statements must not start in Area A; and\n" +" * separator periods must not be within Area A" msgstr "" "vérifie le contenu de Area A (lorsque le format de référence supporte l'application de Area A),\n" " les vérifications activées incluent :\n" @@ -844,933 +882,940 @@ msgstr "" " * les instructions ne peuvent pas démarrer dans Area A et\n" " * les points séparateurs ne peuvent pas être dans Area A." -#: cobc/config.def:203 +#: cobc/config.def:209 msgid "comment paragraphs in IDENTIFICATION DIVISION (AUTHOR, DATE-WRITTEN, ...)" msgstr "commenter les paragraphes dans DENTIFICATION DIVISION (AUTHOR, DATE-WRITTEN, ...)" -#: cobc/config.def:207 -msgid "CONTROL DIVISION" -msgstr "CONTRÔLE DE LA DIVISION" - -#: cobc/config.def:211 cobc/ppparse.y:101 cobc/ppparse.y:104 -msgid "partial replacing with literal" -msgstr "partiel remplacé par un littéral" +#: cobc/config.def:217 +msgid "" +"apply partial replacing with literal source operand even when it replaces with spaces only;\n" +" * \"skip\" prevents such replacements" +msgstr "" -#: cobc/config.def:214 +#: cobc/config.def:221 msgid "MEMORY-SIZE clause" msgstr "clause MEMORY-SIZE" -#: cobc/config.def:217 +#: cobc/config.def:224 msgid "MULTIPLE-FILE-TAPE clause" msgstr "clause MULTIPLE-FILE-TAPE" -#: cobc/config.def:220 +#: cobc/config.def:227 msgid "LABEL-RECORDS clause" msgstr "clause LABEL-RECORDS" -#: cobc/config.def:223 +#: cobc/config.def:230 msgid "VALUE-OF clause" msgstr "clause VALUE-OF" -#: cobc/config.def:226 +#: cobc/config.def:233 msgid "DATA-RECORDS clause" msgstr "clause DATA-RECORDS" -#: cobc/config.def:229 +#: cobc/config.def:236 msgid "OCCURS clause on top-level" msgstr "clause OCCURS au plus haut niveau" -#: cobc/config.def:232 cobc/parser.y:7285 +#: cobc/config.def:239 cobc/parser.y:7566 msgid "SAME AS clause" msgstr "clause SAME AS" -#: cobc/config.def:235 cobc/parser.y:7621 +#: cobc/config.def:242 cobc/parser.y:7904 msgid "TYPE TO clause" msgstr "clause TYPE TO" -#: cobc/config.def:238 cobc/parser.y:7644 +#: cobc/config.def:245 cobc/parser.y:7927 msgid "USAGE type-name" msgstr "USAGE nom-type" -#: cobc/config.def:241 cobc/parser.y:8190 +#: cobc/config.def:248 cobc/parser.y:8563 msgid "SYNCHRONIZED clause" msgstr "clause SYNCHRONIZED" -#: cobc/config.def:244 cobc/parser.y:8193 +#: cobc/config.def:251 cobc/parser.y:8566 msgid "LEFT/RIGHT phrases in SYNCHRONIZED clause" msgstr "phrases LEFT/RIGHT dans une clause SYNCHRONIZED" -#: cobc/config.def:247 +#: cobc/config.def:254 msgid "SPECIAL-NAMES clause" msgstr "clause SPECIAL-NAMES" -#: cobc/config.def:250 -msgid "GOTO statement without name" +#: cobc/config.def:257 +#, fuzzy +#| msgid "GOTO statement without name" +msgid "GO TO statement without name" msgstr "instruction GOTO sans nom" -#: cobc/config.def:253 +#: cobc/config.def:260 msgid "STOP-literal statement" msgstr "instruction littéral STOP" -#: cobc/config.def:256 +#: cobc/config.def:263 msgid "STOP-identifier statement" msgstr "instruction identificateur STOP" -#: cobc/config.def:259 +#: cobc/config.def:266 msgid "STOP ERROR statement" msgstr "instruction STOP ERROR" -#: cobc/config.def:262 +#: cobc/config.def:269 msgid "DEBUGGING MODE and debugging indicator" msgstr "DEBUGGING MODE et indicateur de débogage" -#: cobc/config.def:268 +#: cobc/config.def:275 msgid "PADDING CHARACTER clause" msgstr "clause PADDING CHARACTER" -#: cobc/config.def:271 +#: cobc/config.def:278 msgid "NEXT SENTENCE phrase" msgstr "phrase NEXT SENTENCE" -#: cobc/config.def:274 +#: cobc/config.def:281 msgid "listing-directive statements EJECT, SKIP1, SKIP2, SKIP3" msgstr "instructions pour lister les directives EJECT, SKIP1, SKIP2, SKIP3" -#: cobc/config.def:277 +#: cobc/config.def:284 msgid "listing-directive statement TITLE" msgstr "instruction pour lister les directives TITLE" -#: cobc/config.def:280 +#: cobc/config.def:287 msgid "ENTRY statement" msgstr "instruction ENTRY" -#: cobc/config.def:283 +#: cobc/config.def:290 msgid "move noninteger to alphanumeric" msgstr "déplace un non entier vers un alphanumérique" -#: cobc/config.def:286 +#: cobc/config.def:293 msgid "move figurative constants to numeric" msgstr "déplace des constantes figuratives vers un numérique" -#: cobc/config.def:289 +#: cobc/config.def:296 msgid "move figurative constant SPACE to numeric" msgstr "déplacer une constante figurative SPACE vers un numérique" -#: cobc/config.def:292 +#: cobc/config.def:299 msgid "move figurative constant QUOTE to numeric" msgstr "déplace une constante figurative QUOTE vers un numérique" -#: cobc/config.def:295 +#: cobc/config.def:302 msgid "OCCURS DEPENDING ON without to" msgstr "OCCURS DEPENDING ON sans « to »" -#: cobc/config.def:298 cobc/parser.y:11102 +#: cobc/config.def:305 cobc/parser.y:11443 msgid "section segments" msgstr "segments de section" -#: cobc/config.def:301 +#: cobc/config.def:308 msgid "ALTER statement" msgstr "instruction ALTER" -#: cobc/config.def:304 +#: cobc/config.def:311 msgid "OVERFLOW clause for CALL" msgstr "clause OVERFLOW pour CALL" -#: cobc/config.def:307 +#: cobc/config.def:314 msgid "boolean literals (B'1010')" msgstr "littéraux booléens (B'1010')" -#: cobc/config.def:310 +#: cobc/config.def:317 msgid "hexadecimal-boolean literals (BX'A')" msgstr "littéraux booléens hexadécimaux (BX'A')" -#: cobc/config.def:313 +#: cobc/config.def:320 msgid "national literals (N'UTF-16 string')" msgstr "littéraux nationaux (N'UTF-16 string')" -#: cobc/config.def:316 +#: cobc/config.def:323 msgid "hexadecimal-national literals (NX'265E')" msgstr "littéraux hexadécimaux nationaux (NX'265E')" -#: cobc/config.def:319 +#: cobc/config.def:326 msgid "non-standard national literals (NC'UTF-16 string')" msgstr "littéraux nationaux non standard (NC'UTF-16 string')" -#: cobc/config.def:322 +#: cobc/config.def:329 msgid "HP COBOL octal literals (%377)" msgstr "littéraux octaux HP COBOL (%377)" -#: cobc/config.def:325 +#: cobc/config.def:332 msgid "ACUCOBOL-GT literals (#B #O #H #X)" msgstr "littéraux ACUCOBOL-GT (#B #O #H #X)" -#: cobc/config.def:328 cobc/pplex.l:2199 +#: cobc/config.def:335 +msgid "EBCDIC symbolic characters in literals (\" \"135,151,151\"bar\"195, 194\"Z\" for \" foobarBAZ\")" +msgstr "" + +#: cobc/config.def:338 cobc/pplex.l:2428 msgid "continuation of COBOL words" msgstr "continuation des mots COBOL" -#: cobc/config.def:331 +#: cobc/config.def:341 msgid "NOT ON EXCEPTION before ON EXCEPTION" msgstr "NOT ON EXCEPTION avant ON EXCEPTION" -#: cobc/config.def:334 +#: cobc/config.def:344 msgid "extensions to ACCEPT and DISPLAY" msgstr "extensions pour ACCEPT et DISPLAY" -#: cobc/config.def:337 cobc/field.c:3357 +#: cobc/config.def:347 cobc/field.c:3645 msgid "RENAMES of 01-, 66- and 77-level items" msgstr "RENAMES des éléments de niveau 01, 66 et 77" -#: cobc/config.def:341 +#: cobc/config.def:351 msgid "allow larger REDEFINES items" msgstr "autoriser de plus grands éléments avec REDEFINES" -#: cobc/config.def:344 +#: cobc/config.def:354 msgid "constants defined in SPECIAL-NAMES" msgstr "constantes définies dans SPECIAL-NAMES" -#: cobc/config.def:347 +#: cobc/config.def:357 msgid "constant with level 78 item (note: has left to right precedence in expressions)" msgstr "constante avec un élément de niveau 78 (note : les opérations sont évaluées de gauche à droite)" -#: cobc/config.def:350 +#: cobc/config.def:360 msgid "constant with level 01 CONSTANT AS/FROM item" msgstr "constante avec un élément CONSTANT AS/FROM de niveau 01" -#: cobc/config.def:353 +#: cobc/config.def:363 msgid "PERFORM VARYING without BY phrase (implies BY 1)" msgstr "PERFORM VARYING sans phrase BY (implique BY 1)" # Frédéric: -#: cobc/config.def:356 +#: cobc/config.def:366 msgid "references to sections not in DECLARATIVES from within DECLARATIVES" msgstr "références vers des sections qui ne sont pas dans DECLARATIVES depuis des DECLARATIVES" -#: cobc/config.def:359 cobc/parser.y:12225 cobc/parser.y:12521 +#: cobc/config.def:369 cobc/parser.y:12614 cobc/parser.y:12913 msgid "CALL/CANCEL with program-prototype-name" msgstr "CALL/CANCEL avec un nom de prototype de programme" -#: cobc/config.def:362 +#: cobc/config.def:372 msgid "specifying call-convention by mnemonic" msgstr "spécifie l'appel par convention avec une mnémonique" -#: cobc/config.def:365 +#: cobc/config.def:375 msgid "specifying call-convention by WITH ... LINKAGE" msgstr "spécifie l'appel par convention avec WITH … LINKAGE" -#: cobc/config.def:368 +#: cobc/config.def:378 +msgid "support for PROCEDURE DIVISION USING OPTIONAL" +msgstr "" + +#: cobc/config.def:381 msgid "numeric literals in VALUE clause of numeric-edited items" msgstr "littéraux numériques dans la clause VALUE des éléments édités numériques" -#: cobc/config.def:371 +#: cobc/config.def:384 msgid "incorrect order of CONFIGURATION SECTION paragraphs" msgstr "ordre incorrect des paragraphes de CONFIGURATION SECTION" -#: cobc/config.def:374 +#: cobc/config.def:387 msgid "allow >> DEFINE CONSTANT var AS literal" msgstr "autoriser >> DEFINE CONSTANT var AS littéral" -#: cobc/config.def:377 +#: cobc/config.def:390 msgid "REDEFINES clause not following entry-name in definition" msgstr "la clause REDEFINES ne suit pas le nom d'entrée dans la définition" -#: cobc/config.def:380 +#: cobc/config.def:393 msgid "record sizes does not match RECORD clause" msgstr "la taille des enregistrements ne correspond pas à la clause RECORD" -#: cobc/config.def:383 cobc/parser.y:5736 cobc/parser.y:5750 -#: cobc/parser.y:5763 cobc/parser.y:5774 +#: cobc/config.def:396 cobc/parser.y:5991 cobc/parser.y:6005 cobc/parser.y:6018 +#: cobc/parser.y:6029 msgid "RECORD DELIMITER clause" msgstr "clause RECORD DELIMITER" -#: cobc/config.def:386 +#: cobc/config.def:399 msgid "BINARY-SEQUENTIAL and LINE-SEQUENTIAL phrases in RECORD DELIMITER" msgstr "phrases BINARY-SEQUENTIAL et LINE-SEQUENTIAL dans RECORD DELIMITER" -#: cobc/config.def:389 cobc/tree.c:4805 +#: cobc/config.def:402 cobc/tree.c:4873 msgid "RECORD DELIMITER clause on file with fixed-length records" msgstr "clause RECORD DELIMITER sur un fichier avec des enregistrements de longueur fixe" -#: cobc/config.def:392 +#: cobc/config.def:405 msgid "missing statement (e.g. empty IF / PERFORM)" msgstr "instruction manquante (par exemple, IF / PERFORM vide)" -#: cobc/config.def:395 +#: cobc/config.def:408 msgid "missing period in PROCEDURE DIVISION (when reference format supports Area A enforcement)" msgstr "point manquant dans PROCEDURE DIVISION (quand le format de référence supporte l'application de Area A)" -#: cobc/config.def:398 +#: cobc/config.def:411 msgid "zero-length literals, e.g. '' and \"\"" msgstr "littéraux de longueur nulle, par ex, '' et \"\"" -#: cobc/config.def:401 +#: cobc/config.def:414 msgid "XML GENERATE's phrases other than COUNT IN" msgstr "phrases de XML GENERATE autres que COUNT IN" -#: cobc/config.def:404 cobc/typeck.c:8565 +#: cobc/config.def:417 cobc/typeck.c:9017 msgid "AFTER phrase in CONTINUE statement" msgstr "phrase AFTER dans une instruction CONTINUE" -#: cobc/config.def:407 -msgid "ENTRY FOR GOTO and GOTO ENTRY statements" +#: cobc/config.def:420 +#, fuzzy +#| msgid "ENTRY FOR GOTO and GOTO ENTRY statements" +msgid "ENTRY FOR GO TO and GO TO ENTRY statements" msgstr "instructions ENTRY FOR GOTO et GOTO ENTRY" -#: cobc/config.def:410 +#: cobc/config.def:423 cobc/typeck.c:4642 msgid "ASSIGN [TO] variable in SELECT" msgstr "variable ASSIGN [TO] dans SELECT" -#: cobc/config.def:413 +#: cobc/config.def:426 msgid "ASSIGN USING/VARYING variable in SELECT" msgstr "variable ASSIGN USING/VARYING dans SELECT" -#: cobc/config.def:416 +#: cobc/config.def:429 msgid "ASSIGN EXTERNAL/DYNAMIC in SELECT" msgstr "ASSIGN EXTERNAL/DYNAMIC dans SELECT" -#: cobc/config.def:419 +#: cobc/config.def:432 msgid "ASSIGN DISK FROM variable in SELECT" msgstr "variable ASSIGN DISK FROM dans SELECT" -#: cobc/config.def:422 +#: cobc/config.def:435 msgid "VSAM status in FILE STATUS" msgstr "statut VSAM dans FILE STATUS" -#: cobc/config.def:425 +#: cobc/config.def:438 msgid "CALL to own PROGRAM-ID implies RECURSIVE attribute" msgstr "un appel à son propre PROGRAM-ID implique l'attribut RECURSIVE" -#: cobc/config.def:428 +#: cobc/config.def:441 msgid "DEPENDING clause in RECORD CONTAINS" msgstr "clause DEPENDING dans RECORD CONTAINS" -#: cobc/config.def:431 cobc/tree.c:3584 +#: cobc/config.def:444 cobc/tree.c:3623 msgid "PICTURE string with 'L' character" msgstr "chaîne de caractères PICTURE avec le caractère « L »" -#: cobc/error.c:83 +#: cobc/error.c:141 libcob/common.c:1379 libcob/common.c:8715 +#: libcob/common.c:8766 +#, c-format +msgid "warning: " +msgstr "avertissement : " + +#: cobc/error.c:142 libcob/common.c:8784 +msgid "note: " +msgstr "note : " + +#: cobc/error.c:162 #, c-format msgid "in section '%s':" msgstr "dans la section « %s » :" -#: cobc/error.c:94 +#: cobc/error.c:173 #, c-format msgid "in paragraph '%s':" msgstr "dans le paragraphe « %s » :" -#: cobc/error.c:129 cobc/error.c:133 cobc/error.c:136 +#: cobc/error.c:227 cobc/error.c:231 cobc/error.c:234 msgid "too many errors" msgstr "trop d'erreurs" -#: cobc/error.c:145 +#: cobc/error.c:243 #, c-format msgid "in file included from " msgstr "dans le fichier inclus depuis " -#: cobc/error.c:163 libcob/common.c:8325 +#: cobc/error.c:261 libcob/common.c:9146 msgid "configuration error:" msgstr "erreur de configuration :" -#: cobc/error.c:176 libcob/common.c:861 +#: cobc/error.c:274 libcob/common.c:920 #, c-format msgid "system error %d" msgstr "erreur système %d" -#: cobc/error.c:346 cobc/error.c:413 cobc/error.c:475 cobc/error.c:631 -#: cobc/error.c:675 cobc/error.c:785 libcob/common.c:1318 libcob/common.c:7900 -#: libcob/common.c:7951 -#, c-format -msgid "warning: " -msgstr "avertissement : " - -#: cobc/error.c:518 cobc/error.c:534 cobc/error.c:868 cobc/error.c:889 +#: cobc/error.c:616 cobc/error.c:632 cobc/error.c:971 cobc/error.c:992 #, c-format msgid "%s used" msgstr "%s utilisé" -#: cobc/error.c:521 cobc/error.c:871 +#: cobc/error.c:619 cobc/error.c:974 #, c-format msgid "%s is archaic in %s" msgstr "%s est archaïque dans %s" -#: cobc/error.c:525 cobc/error.c:875 +#: cobc/error.c:623 cobc/error.c:978 #, c-format msgid "%s is obsolete in %s" msgstr "%s est obsolète dans %s" -#: cobc/error.c:531 cobc/error.c:881 cobc/parser.y:5738 +#: cobc/error.c:629 cobc/error.c:984 cobc/parser.y:5993 #, c-format msgid "%s ignored" msgstr "%s ignoré" -#: cobc/error.c:537 cobc/error.c:891 +#: cobc/error.c:635 cobc/error.c:994 #, c-format msgid "%s does not conform to %s" msgstr "%s n'est pas conforme à %s" -#: cobc/error.c:553 +#: cobc/error.c:651 msgid "configuration warning:" msgstr "avertissement de configuration :" -#: cobc/error.c:728 cobc/error.c:731 cobc/error.c:755 cobc/error.c:758 -#: libcob/common.c:7969 -msgid "note: " -msgstr "note : " - -#: cobc/error.c:933 cobc/error.c:962 +#: cobc/error.c:1040 cobc/error.c:1069 #, c-format msgid "redefinition of '%s'" msgstr "redéfinition de « %s »" -#: cobc/error.c:939 cobc/error.c:973 +#: cobc/error.c:1046 cobc/error.c:1080 #, c-format msgid "'%s' previously defined here" msgstr "« %s » précédemment défini ici" -#: cobc/error.c:1017 cobc/error.c:1023 +#: cobc/error.c:1124 cobc/error.c:1130 #, c-format msgid "'%s' is not defined" msgstr "« %s » n'est pas défini" -#: cobc/error.c:1019 +#: cobc/error.c:1126 #, c-format msgid "'%s' cannot be used here" msgstr "« %s » ne peut pas être utilisé ici" -#: cobc/error.c:1021 cobc/parser.y:7658 +#: cobc/error.c:1128 cobc/parser.y:7941 #, c-format msgid "'%s' is not defined, but is a reserved word in another dialect" msgstr "« %s » n'est pas défini mais est un mot réservé d'un autre dialecte" -#: cobc/error.c:1060 +#: cobc/error.c:1167 #, c-format msgid "'%s' is ambiguous; needs qualification" msgstr "« %s » est ambigu; qualification requise" -#: cobc/error.c:1090 +#: cobc/error.c:1197 #, c-format msgid "'%s' is a special register" msgstr "« %s » est un registre spécial" -#: cobc/error.c:1093 +#: cobc/error.c:1200 #, c-format msgid "'%s' internally defined" msgstr "« %s » défini en interne" -#: cobc/error.c:1097 cobc/parser.y:18176 cobc/parser.y:18181 -#: cobc/typeck.c:5000 cobc/typeck.c:5047 cobc/typeck.c:5048 +#: cobc/error.c:1204 cobc/parser.y:18772 cobc/parser.y:18777 cobc/typeck.c:5166 +#: cobc/typeck.c:5213 cobc/typeck.c:5214 #, c-format msgid "'%s' defined here" msgstr "« %s » défini ici" -#: cobc/error.c:1108 +#: cobc/error.c:1215 #, c-format msgid "fatal error: %s" msgstr "erreur fatale : %s" -#: cobc/error.c:1117 +#: cobc/error.c:1224 #, c-format msgid "group item '%s' cannot have %s clause" msgstr "l'élément de groupe « %s » ne peut pas avoir de clause %s" -#: cobc/error.c:1132 +#: cobc/error.c:1239 #, c-format msgid "constant item '%s' requires a %s clause" msgstr "l'élément constant « %s » requière une clause %s" -#: cobc/error.c:1136 +#: cobc/error.c:1243 #, c-format msgid "level %02d item '%s' requires a %s clause" msgstr "l'élément de niveau %02d « %s » requière une clause %s" -#: cobc/error.c:1151 +#: cobc/error.c:1258 #, c-format msgid "constant item '%s' can only have a %s clause" msgstr "l'élément constant « %s » peut uniquement avoir une clause %s" -#: cobc/error.c:1155 +#: cobc/error.c:1262 #, c-format msgid "level %02d item '%s' can only have a %s clause" msgstr "l'élément de niveau %02d « %s » peut uniquement avoir une clause %s" -#: cobc/field.c:136 +#: cobc/field.c:139 msgid "constant expression has Divide by ZERO" msgstr "l'expression constante a une division par ZÉRO" -#: cobc/field.c:192 cobc/field.c:329 cobc/field.c:337 +#: cobc/field.c:195 cobc/field.c:332 cobc/field.c:340 msgid "missing right parenthesis" msgstr "parenthèse droite manquante" -#: cobc/field.c:221 +#: cobc/field.c:224 #, c-format msgid "expression stack overflow at %d entries for operation '%c'" msgstr "débordement de pile de l'expression après %d entrées de l'opération « %c »" -#: cobc/field.c:262 +#: cobc/field.c:265 #, c-format msgid "expression stack overflow at %d entries" msgstr "débordement de pile de l'expression après %d entrées" -#: cobc/field.c:279 +#: cobc/field.c:282 msgid "missing left parenthesis" msgstr "parenthèse gauche manquante" -#: cobc/field.c:320 +#: cobc/field.c:323 #, c-format msgid "invalid operator '%s' in expression" msgstr "opérateur « %s » invalide dans l'expression" -#: cobc/field.c:339 +#: cobc/field.c:342 #, c-format msgid "'%c' operator misplaced" msgstr "opérateur « %c » mal placé" -#: cobc/field.c:400 +#: cobc/field.c:403 #, c-format msgid "invalid level number '%s'" msgstr "numéro de niveau « %s » invalide" -#: cobc/field.c:460 cobc/field.c:498 +#: cobc/field.c:463 cobc/field.c:502 msgid "level number must begin with 01 or 77" msgstr "le numéro de niveau doit commencer par 01 ou 77" -#: cobc/field.c:558 cobc/field.c:562 +#: cobc/field.c:562 cobc/field.c:566 #, c-format msgid "no previous data item of level %02d" msgstr "pas d'élément de donnée de niveau %02d précédent" -#: cobc/field.c:620 +#: cobc/field.c:631 #, c-format msgid "'%s' cannot be qualified here" msgstr "« %s » ne peut pas être qualifié ici" -#: cobc/field.c:626 +#: cobc/field.c:637 #, c-format msgid "'%s' cannot be subscripted here" msgstr "« %s » ne peut pas avoir d'indice ici" -#: cobc/field.c:642 cobc/field.c:653 +#: cobc/field.c:653 cobc/field.c:664 #, c-format msgid "'%s' is not defined in '%s'" msgstr "« %s » n'est pas défini dans « %s »" -#: cobc/field.c:660 +#: cobc/field.c:671 msgid "level number of REDEFINES entries must be identical" msgstr "le numéro de niveau des entrées REDEFINES doit être identique" -#: cobc/field.c:665 +#: cobc/field.c:676 #, c-format msgid "'%s' is not the original definition" msgstr "« %s » n'est pas la définition originale" -#: cobc/field.c:826 cobc/parser.y:659 +#: cobc/field.c:720 cobc/parser.y:1051 +#, c-format +msgid "duplicate %s" +msgstr "%s dupliqué" + +#: cobc/field.c:878 cobc/parser.y:733 #, c-format msgid "duplicate %s clause" msgstr "clause %s dupliquée" -#: cobc/field.c:906 +#: cobc/field.c:988 #, c-format msgid "%s clause not compatible with PIC %s" msgstr "la clause %s n'est pas compatible avec PIC %s" -#: cobc/field.c:917 cobc/field.c:953 +#: cobc/field.c:999 cobc/field.c:1036 #, c-format msgid "%s clause not compatible with USAGE %s" msgstr "la clause %s n'est pas compatible avec USAGE %s" -#: cobc/field.c:1053 cobc/field.c:1069 cobc/field.c:1131 cobc/field.c:1142 +#: cobc/field.c:1140 cobc/field.c:1159 cobc/field.c:1227 cobc/field.c:1238 #, c-format msgid "PICTURE clause required for '%s'" msgstr "clause PICTURE requise pour « %s »" -#: cobc/field.c:1138 +#: cobc/field.c:1234 #, c-format msgid "a non-numeric literal is expected for '%s'" msgstr "un littéral non numérique est attendu pour « %s »" -#: cobc/field.c:1150 +#: cobc/field.c:1247 #, c-format msgid "defining implicit picture size %d for '%s'" msgstr "définition implicite de la taille de l'image %d pour « %s »" -#: cobc/field.c:1171 +#: cobc/field.c:1271 #, c-format msgid "'%s' ANY LENGTH only allowed in LINKAGE" msgstr "« %s » ANY LENGTH uniquement autorisé dans LINKAGE" -#: cobc/field.c:1175 +#: cobc/field.c:1275 #, c-format msgid "'%s' ANY LENGTH must be 01 level" msgstr "« %s » ANY LENGTH doit être niveau 01" -#: cobc/field.c:1179 +#: cobc/field.c:1279 #, c-format msgid "'%s' ANY LENGTH cannot be BASED/EXTERNAL" msgstr "« %s » ANY LENGTH ne peut pas être BASED/EXTERNAL" -#: cobc/field.c:1184 cobc/field.c:1210 +#: cobc/field.c:1283 cobc/field.c:1313 #, c-format msgid "'%s' ANY LENGTH has invalid definition" msgstr "« %s » ANY LENGTH a une définition invalide" -#: cobc/field.c:1192 +#: cobc/field.c:1295 #, c-format msgid "'%s' ANY NUMERIC must be PIC 9" msgstr "« %s » ANY NUMERIC doit être PIC 9" -#: cobc/field.c:1198 -#, c-format -msgid "'%s' ANY LENGTH must be PIC X, PIC N or PIC 1" +#: cobc/field.c:1301 +#, fuzzy, c-format +#| msgid "'%s' ANY LENGTH must be PIC X, PIC N or PIC 1" +msgid "'%s' ANY LENGTH must be PIC X, PIC U, PIC N or PIC 1" msgstr "« %s » ANY LENGTH doit être PIC X, PIC N ou PIC 1" -#: cobc/field.c:1208 +#: cobc/field.c:1311 #, c-format msgid "'%s' ANY NUMERIC has invalid definition" msgstr "« %s » ANY NUMERIC a une définition invalide" -#: cobc/field.c:1224 +#: cobc/field.c:1327 #, c-format msgid "'%s' EXTERNAL must be specified at 01/77 level" msgstr "« %s » EXTERNAL doit être spécifié au niveau 01/77" -#: cobc/field.c:1228 +#: cobc/field.c:1331 #, c-format msgid "'%s' EXTERNAL can only be specified in WORKING-STORAGE section" msgstr "« %s » EXTERNAL peut uniquement être spécifié dans une section WORKING-STORAGE" -#: cobc/field.c:1232 +#: cobc/field.c:1335 #, c-format msgid "'%s' EXTERNAL and BASED are mutually exclusive" msgstr "« %s » EXTERNAL et BASED sont mutuellement exclusifs" -#: cobc/field.c:1235 +#: cobc/field.c:1338 #, c-format msgid "'%s' EXTERNAL not allowed with REDEFINES" msgstr "« %s » EXTERNAL pas permis avec REDEFINES" -#: cobc/field.c:1247 +#: cobc/field.c:1350 #, c-format msgid "'%s' BASED not allowed here" msgstr "« %s » BASED pas permis ici" -#: cobc/field.c:1250 +#: cobc/field.c:1353 #, c-format msgid "'%s' BASED not allowed with REDEFINES" msgstr "« %s » BASED pas permis avec REDEFINED" -#: cobc/field.c:1253 +#: cobc/field.c:1356 #, c-format msgid "'%s' BASED only allowed at the 01 and 77 levels" msgstr "« %s » BASED uniquement permis aux niveaux 01 et 77" -#: cobc/field.c:1279 +#: cobc/field.c:1383 #, c-format msgid "'%s' cannot have an OCCURS clause due to '%s'" msgstr "« %s » ne peut pas avoir une clause OCCURS à cause de « %s »" -#: cobc/field.c:1298 +#: cobc/field.c:1402 #, c-format msgid "the original definition '%s' should not have an OCCURS clause" msgstr "la définition originale « %s » ne devrait pas avoir de clause OCCURS" -#: cobc/field.c:1305 +#: cobc/field.c:1408 +#, fuzzy, c-format +#| msgid "the original definition '%s' should not have an OCCURS clause" +msgid "the original definition '%s' should not have an ANY LENGTH clause" +msgstr "la définition originale « %s » ne devrait pas avoir de clause OCCURS" + +#: cobc/field.c:1415 msgid "REDEFINES must follow the original definition" msgstr "REDEFINES doit suivre la définition originale" -#: cobc/field.c:1313 +#: cobc/field.c:1423 #, c-format msgid "'%s' cannot be variable length" msgstr "« %s » ne peut pas être de longueur variable" -#: cobc/field.c:1316 +#: cobc/field.c:1426 #, c-format msgid "the original definition '%s' cannot be variable length" msgstr "la définition originale « %s » ne peut pas être de longueur variable" -#: cobc/field.c:1335 +#: cobc/field.c:1445 cobc/field.c:1708 #, c-format msgid "'%s' cannot have JUSTIFIED RIGHT clause" msgstr "« %s » ne peut pas avoir de clause JUSTIFIED RIGHT" -#: cobc/field.c:1342 +#: cobc/field.c:1453 #, c-format msgid "'%s' cannot have BLANK WHEN ZERO clause" msgstr "« %s » ne peut pas avoir de clause BLANK WHEN ZERO" -#: cobc/field.c:1348 +#: cobc/field.c:1460 #, c-format msgid "SCREEN group item '%s' has invalid clause" msgstr "l'élément de groupe SCREEN « %s » a une clause invalide" -#: cobc/field.c:1436 +#: cobc/field.c:1548 #, c-format msgid "%s USAGE %s incompatible with %s USAGE %s" msgstr "%s USAGE %s n'est pas compatible avec %s USAGE %s" -#: cobc/field.c:1516 +#: cobc/field.c:1629 #, c-format msgid "'%s' cannot have PICTURE clause" msgstr "« %s » ne peut pas avoir de clause PICTURE" -#: cobc/field.c:1533 -#, c-format -msgid "%s item '%s' should be USAGE DISPLAY" -msgstr "%s élément « %s » devrait être USAGE DISPLAY" - -#: cobc/field.c:1556 +#: cobc/field.c:1662 #, c-format msgid "'%s' COMP-6 with sign - changing to COMP-3" msgstr "« %s » COMP-6 avec signe – changé en COMP-3" -#: cobc/field.c:1582 +#: cobc/field.c:1688 msgid "elementary items with SIGN clause must have S in PICTURE" msgstr "les éléments élémentaires avec la clause SIGN doivent avoir S dans PICTURE" -#: cobc/field.c:1585 +#: cobc/field.c:1691 msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgstr "les éléments élémentaires avec la clause SIGN doivent être USAGE DISPLAY ou NATIONAL" -#: cobc/field.c:1602 -#, c-format -msgid "'%s' cannot have JUSTIFIED RIGHT" -msgstr "« %s » ne peut pas avoir JUSTIFIED RIGHT" - -#: cobc/field.c:1614 +#: cobc/field.c:1720 #, c-format msgid "'%s' cannot have S in PICTURE string and BLANK WHEN ZERO" msgstr "« %s » ne peut pas avoir S dans la chaîne PICTURE et BLANK WHEN ZERO" -#: cobc/field.c:1619 +#: cobc/field.c:1725 #, c-format msgid "'%s' cannot have BLANK WHEN ZERO without being USAGE DISPLAY or NATIONAL" msgstr "« %s » ne peut pas avoir BLANK WHEN ZERO sans être USAGE DISPLAY ou NATIONAL" -#: cobc/field.c:1631 +#: cobc/field.c:1737 #, c-format msgid "'%s' cannot have * in PICTURE string and BLANK WHEN ZERO" msgstr "« %s » ne peut pas avoir * dans la chaîne PICTURE et BLANK WHEN ZERO" -#: cobc/field.c:1638 +#: cobc/field.c:1744 #, c-format msgid "'%s' is not numeric, so cannot have BLANK WHEN ZERO" msgstr "« %s » n'est pas numérique, il ne peut donc pas avoir BLANK WHEN ZERO" -#: cobc/field.c:1691 +#: cobc/field.c:1798 #, c-format msgid "elements in VALUE clause for '%s' (%d) exceed max amount (%d)" msgstr "les éléments dans la clause VALUE pour « %s » (%d) dépasse la quantité maximale (%d)" -#: cobc/field.c:1708 cobc/field.c:1712 +#: cobc/field.c:1822 +msgid "unexpected VALUES ARE for elementary item" +msgstr "" + +#: cobc/field.c:1836 cobc/field.c:1840 #, c-format msgid "initial VALUE clause ignored for %s item '%s'" msgstr "la clause de valeur initiale VALUE est ignorée pour %s élément « %s »" -#: cobc/field.c:1725 +#: cobc/field.c:1853 msgid "FULL has no effect on numeric items; you may want REQUIRED or PIC Z" msgstr "FULL n'a pas d'effet sur les éléments numériques ; vous voulez peut-être utiliser REQUIRED or PIC Z" -#: cobc/field.c:1755 +#: cobc/field.c:1884 msgid "VALUE may not contain a figurative constant" msgstr "VALUE ne peut pas contenir une constante figurative" -#: cobc/field.c:1763 -msgid "cannot specify both FULL and JUSTIFIED" -msgstr "ne peut spécifier à la fois FULL et JUSTIFIED" +#: cobc/field.c:1893 cobc/field.c:1935 cobc/parser.y:750 cobc/parser.y:1823 +#: cobc/parser.y:1826 +#, c-format +msgid "cannot specify both %s and %s" +msgstr "ne peut spécifier à la fois %s et %s" -#: cobc/field.c:1775 +#: cobc/field.c:1905 #, c-format msgid "'%s' has FROM, TO or USING without PIC; PIC will be implied" msgstr "« %s » a FROM, TO ou USING sans PIC ; PIC est implicitement utilisé" -#: cobc/field.c:1792 +#: cobc/field.c:1922 #, c-format msgid "'%s' has numeric VALUE without PIC; PIC will be implied" msgstr "« %s » a une valeur numérique sans PIC ; PIC est implicitement utilisé" -#: cobc/field.c:1805 -msgid "cannot specify both PIC and VALUE" -msgstr "ne peut spécifier à la fois PIC et VALUE" - -#: cobc/field.c:1813 +#: cobc/field.c:1943 msgid "cannot have PIC without FROM, TO or USING" msgstr "ne peut avoir PIC sans FROM, TO ou USING" -#: cobc/field.c:1822 +#: cobc/field.c:1952 msgid "cannot have numeric VALUE without PIC" msgstr "impossible d'avoir une VALUE numérique sans PIC" -#: cobc/field.c:1831 +#: cobc/field.c:1961 msgid "cannot have FROM, TO or USING without PIC" msgstr "ne peut avoir FROM, TO ou USING sans PIC" -#: cobc/field.c:1841 +#: cobc/field.c:1971 msgid "VALUE item may not be numeric" msgstr "l'élément de VALUE ne peut pas être numérique" -#: cobc/field.c:1856 +#: cobc/field.c:1986 #, c-format msgid "'%s' needs a PIC, COL, LINE, VALUE, BELL or BLANK clause" msgstr "« %s » requiert la clause PIC, COL, LINE, VALUE, BELL ou BLANK" -#: cobc/field.c:1868 +#: cobc/field.c:1998 #, c-format msgid "'%s' cannot have PIC without FROM, TO, USING or numeric VALUE" msgstr "« %s » ne peut pas avoir PIC sans FROM, TO, USING ou une valeur numérique" -#: cobc/field.c:1876 +#: cobc/field.c:2006 #, c-format msgid "'%s' needs a PIC, FROM, TO, USING, VALUE, BELL, BLANK or ERASE clause" msgstr "« %s » requiert une clause PIC, FROM, TO, USING, VALUE, BELL, BLANK ou ERASE" -#: cobc/field.c:1912 +#: cobc/field.c:2042 msgid "cannot use AUTO, FULL, PROMPT, REQUIRED or SECURE on elementary item without TO or USING" msgstr "impossible d'utiliser AUTO, FULL, PROMPT, REQUIRED ou SECURE sur un élément élémentaire sans TO ou USING" -#: cobc/field.c:1919 +#: cobc/field.c:2049 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED, OCCURS or SIGN on item without FROM, TO or USING" msgstr "impossible d'utiliser BLANK WHEN ZERO, JUSTIFIED, OCCURS ou SIGN sur un élément sans FROM, TO ou USING" -#: cobc/field.c:1938 +#: cobc/field.c:2068 msgid "cannot use AUTO, FULL, REQUIRED or SECURE on elementary item without FROM, TO or USING" msgstr "impossible d'utiliser AUTO, FULL, REQUIRED ou SECURE sur un élément élémentaire sans FROM, TO ou USING" -#: cobc/field.c:1943 +#: cobc/field.c:2073 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED or SIGN without FROM, TO or USING" msgstr "impossible d'utiliser BLANK WHEN ZERO, JUSTIFIED ou SIGN sans FROM, TO ou USING" -#: cobc/field.c:1960 +#: cobc/field.c:2090 msgid "cannot have BLANK WHEN ZERO without PIC" msgstr "BLANK WHEN ZERO ne peut pas être utilisé sans PIC" -#: cobc/field.c:1963 +#: cobc/field.c:2093 msgid "cannot have JUSTIFIED without PIC" msgstr "JUSTIFIED ne peut pas être utilisé sans PIC" -#: cobc/field.c:1983 +#: cobc/field.c:2113 msgid "cannot have AUTO without FROM, TO or USING" msgstr "AUTO ne peut pas être utilisé sans FROM, TO ou USING" -#: cobc/field.c:1988 +#: cobc/field.c:2118 msgid "cannot use FULL or REQUIRED on item without TO or USING" msgstr "FULL ou REQUIRED ne peuvent pas être utilisés sur un élément sans TO ou USING" -#: cobc/field.c:1995 +#: cobc/field.c:2125 msgid "SECURE can be used with TO only" msgstr "SECURE peut uniquement être utilisé avec TO" -#: cobc/field.c:1997 +#: cobc/field.c:2127 msgid "SECURE must be used with TO" msgstr "SECURE doit être utilisé avec TO" -#: cobc/field.c:2016 +#: cobc/field.c:2146 #, c-format msgid "'%s' does nothing" msgstr "« %s » ne fait rien" -#: cobc/field.c:2235 +#: cobc/field.c:2361 #, c-format msgid "'%s' 77 level is not allowed here" msgstr "« %s » niveau 77 n'est pas permis ici" -#: cobc/field.c:2627 +#: cobc/field.c:2399 msgid "OCCURS and multi COLUMNs is not allowed" msgstr "OCCURS et plusieurs COLUMN ne sont pas permis" -#: cobc/field.c:2655 +#: cobc/field.c:2419 #, c-format msgid "duplicate LINE %d ignored" msgstr "LINE %d dupliqué est ignoré" -#: cobc/field.c:2672 +#: cobc/field.c:2870 #, c-format msgid "ignoring SYNCHRONIZED for group item '%s'" msgstr "ignore SYNCHRONIZED pour les élément de groupe « %s »" -#: cobc/field.c:2686 cobc/field.c:2954 +#: cobc/field.c:2884 cobc/field.c:3219 msgid "larger REDEFINES" msgstr "plus grand REDEFINES" -#: cobc/field.c:2699 cobc/field.c:2957 cobc/field.c:2962 +#: cobc/field.c:2898 cobc/field.c:3222 cobc/field.c:3227 #, c-format msgid "size of '%s' larger than size of '%s'" msgstr "taille de « %s » plus grande que la taille de « %s »" -#: cobc/field.c:2812 cobc/field.c:2879 +#: cobc/field.c:3045 cobc/field.c:3129 cobc/parser.y:832 #, c-format msgid "'%s' cannot be larger than %d bytes" msgstr "« %s » ne peut pas être plus grand que %d octets" -#: cobc/field.c:2850 cobc/field.c:2858 +#: cobc/field.c:3086 cobc/field.c:3094 #, c-format msgid "'%s' binary field cannot be larger than %d digits" msgstr "le champ binaire « %s » ne peut pas être plus grand que %d chiffres" -#: cobc/field.c:2940 cobc/field.c:3522 -#, c-format -msgid "unexpected USAGE: %d" -msgstr "USAGE inattendu : %d" - -#: cobc/field.c:3067 cobc/parser.y:710 cobc/parser.y:712 cobc/parser.y:6274 -#: cobc/parser.y:6284 cobc/parser.y:7344 cobc/parser.y:7347 cobc/parser.y:7349 -#: cobc/parser.y:7351 cobc/parser.y:7386 cobc/parser.y:8237 cobc/parser.y:8239 -#: cobc/parser.y:8241 cobc/parser.y:8243 cobc/parser.y:8558 cobc/parser.y:8567 -#: cobc/parser.y:10564 cobc/parser.y:12075 cobc/parser.y:13492 -#: cobc/parser.y:14902 cobc/typeck.c:5034 +#: cobc/field.c:3353 cobc/parser.y:791 cobc/parser.y:793 cobc/parser.y:6529 +#: cobc/parser.y:6539 cobc/parser.y:7625 cobc/parser.y:7628 cobc/parser.y:7630 +#: cobc/parser.y:7632 cobc/parser.y:7667 cobc/parser.y:8610 cobc/parser.y:8612 +#: cobc/parser.y:8614 cobc/parser.y:8616 cobc/parser.y:8958 cobc/parser.y:8967 +#: cobc/parser.y:10897 cobc/parser.y:12460 cobc/parser.y:13920 +#: cobc/parser.y:15390 cobc/typeck.c:5200 #, c-format msgid "%s and %s are mutually exclusive" msgstr "%s et %s sont mutuellement exclusifs" -#: cobc/field.c:3068 cobc/parser.y:7529 cobc/parser.y:7566 +#: cobc/field.c:3354 cobc/parser.y:7810 cobc/parser.y:7847 msgid "variable-length PICTURE" msgstr "PICTURE de longueur variable" -#: cobc/field.c:3187 +#: cobc/field.c:3475 msgid "literal type does not match numeric data type" msgstr "le type littéral ne correspond pas au type de donnée numérique" -#: cobc/field.c:3261 +#: cobc/field.c:3549 #, c-format msgid "THRU item '%s' may not come before '%s'" msgstr "l'élément THRU « %s » ne peut pas arriver avant « %s »" -#: cobc/field.c:3284 +#: cobc/field.c:3572 #, c-format msgid "RENAMES cannot start/end at the OCCURS item '%s'" msgstr "RENAMES ne peuvent pas commencer/terminer à l'élément OCCURS « %s »" -#: cobc/field.c:3292 +#: cobc/field.c:3580 #, c-format msgid "cannot use RENAMES on part of the table '%s'" msgstr "ne peut utiliser RENAMES sur une partie de la table « %s »" -#: cobc/field.c:3330 +#: cobc/field.c:3618 #, c-format msgid "RENAMES may not contain '%s' as it is a pointer or object reference" msgstr "RENAMES ne peut pas contenir « %s » car il est un pointeur ou une référence à un objet" -#: cobc/field.c:3335 +#: cobc/field.c:3623 #, c-format msgid "RENAMES may not contain '%s' as it is an OCCURS DEPENDING table" msgstr "RENAMES ne peut pas contenir « %s » car il est dans une table OCCURS DEPENDING" -#: cobc/field.c:3359 +#: cobc/field.c:3647 msgid "RENAMES may not reference a level 88" msgstr "RENAMES ne peut pas faire référence au niveau 88" -#: cobc/field.c:3383 +#: cobc/field.c:3671 #, c-format msgid "'%s' must immediately follow the record '%s'" msgstr "« %s » doit suivre immédiatement l'enregistrement « %s »" -#: cobc/field.c:3391 +#: cobc/field.c:3679 #, c-format msgid "THRU item must be different to '%s'" msgstr "l'élément THRU doit être différent de « %s »" -#: cobc/field.c:3397 +#: cobc/field.c:3685 #, c-format msgid "'%s' and '%s' must be in the same record" msgstr "« %s » et « %s » doivent être dans le même enregistrement" -#: cobc/field.c:3408 +#: cobc/field.c:3696 #, c-format msgid "THRU item '%s' may not be subordinate to '%s'" msgstr "l'élément THRU « %s » ne peut pas être subordonné à « %s »" @@ -1833,19 +1878,7 @@ msgstr "" " -fintrinsics=[ALL|nom de fonction intrinsèque(,nom,…)]\n" " intrinsèques à utiliser sans le mot-clé FUNCTION" -#: cobc/flag.def:78 -msgid "" -" -fec=<exception-name>\tenable code generation for <exception-name>,\n" -" sets -fsource-location" -msgstr "" -" -fec=<nom-exception>\tactiver la génération de code pour <nom-exception>,\n" -" défini -fsource-location" - -#: cobc/flag.def:81 cobc/help.c:96 -msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" -msgstr " -fno-ec=<nom-exception>\tdésactiver la génération de code pour <nom-exception>" - -#: cobc/flag.def:84 +#: cobc/flag.def:85 msgid "" " -fdump=<scope> dump data fields on abort, <scope> may be\n" " a combination of: ALL, WS, LS, RD, FD, SC, LO" @@ -1853,15 +1886,20 @@ msgstr "" " -fdump=<portée> vidanger les champs de données lors d'une interruption, <portée>\n" " peut être une combinaison de : ALL, WS, LS, RD, FD, SC, LO" -#: cobc/flag.def:87 +#: cobc/flag.def:88 +#, fuzzy +#| msgid "" +#| " -fno-dump=<scope> exclude data fields from dumping on abort, <scope> may\n" +#| " be a combination of: ALL, WS, LS, RD, FD, SC, LO" msgid "" " -fno-dump=<scope> exclude data fields from dumping on abort, <scope> may\n" -" be a combination of: ALL, WS, LS, RD, FD, SC, LO" +" be a combination of: ALL, WS, LS, RD, FD, SC, LO\n" +" default if no scope specified: ALL" msgstr "" " -fno-dump=<portée> exclure les champs de données de la vidange sur interruption, <portée>\n" " peut être une combinaison de : ALL, WS, LS, RD, FD, SC, LO" -#: cobc/flag.def:92 +#: cobc/flag.def:94 msgid "" " -fcallfh=<name> specifies <name> to be used for I/O\n" " as external provided EXTFH interface module" @@ -1869,21 +1907,25 @@ msgstr "" " -fcallfh=<nom> spécifier le nom à utiliser dans les E/S\n" " comme fournisseur externe du module d'interface EXTFH" -#: cobc/flag.def:96 +#: cobc/flag.def:98 +msgid "" +" -febcdic-table=<cconv-table>/<file>\tEBCDIC/ASCII translation table\n" +" * e.g. default, ebcdic500_latin1..." +msgstr "" + +#: cobc/flag.def:102 +#, fuzzy +#| msgid "" +#| " -fsign=[ASCII|EBCDIC]\tdefine display sign representation\n" +#| " * default: machine native" msgid "" -" -febcdic-table=[DEFAULT|RESTRICTED-GC|IBM|GCOS]\tdefine EBCDIC translation table:\n" -" * default: translation to extended ASCII as per MF\n" -" * restricted-gc: translation from restricted ASCII only\n" -" * ibm: translation to restricted ASCII as per IBM\n" -" * gcos: translation to extended ASCII as per GCOS7" +" -fdefault-colseq=[ASCII|EBCDIC|NATIVE]\tdefine default collating sequence\n" +" * default: NATIVE" msgstr "" -" -febcdic-table=[DEFAULT|RESTRICTED-GC|IBM|GCOS]\tdéfinir la table de traduction EBCDIC :\n" -" * par défaut : traduction vers ASCII étendu selon MF\n" -" * restricted-gc : traduction uniquement depuis ASCII restreint\n" -" * ibm : traduction vers ASCII restreint selon IBM\n" -" * gcos : traduction vers ASCII étendu selon GCOS7" +" -fsign=[ASCII|EBCDIC]\tdéfinir la représentation pour l'affichage du signe\n" +" * défaut : celui de la machine native" -#: cobc/flag.def:107 +#: cobc/flag.def:110 msgid "" " -fwinmain generate WinMain instead of main when compiling\n" " as executable" @@ -1891,31 +1933,39 @@ msgstr "" " -fwinmain générer WinMain au lieu de main lors de la compilation\n" " d'un exécutable" -#: cobc/flag.def:111 +#: cobc/flag.def:114 msgid " -fcomputed-goto generate computed goto C statements" msgstr " -fcomputed-goto générer des instructions C goto calculées" -#: cobc/flag.def:114 +#: cobc/flag.def:117 msgid " -fextra-brace generate extra braces in C source" msgstr " -fextra-brace générer des accolades supplémentaires dans le source C" -#: cobc/flag.def:117 +#: cobc/flag.def:120 msgid " -fcorrect-numeric attempt correction of invalid numeric display items" msgstr " -fcorrect-numeric tenter de corriger les éléments d'affichage numériques invalides" -#: cobc/flag.def:120 +#: cobc/flag.def:123 msgid " -fstack-on-heap PERFORM stack allocated on heap" msgstr " -fstack-on-heap appliquer PERFORM d'une pile allouée sur le tas" -#: cobc/flag.def:123 +#: cobc/flag.def:126 +#, fuzzy +#| msgid "" +#| " -fstack-extended store origin of entrypoints and PERFORM\n" +#| " * turned on by -debug/-dump" msgid "" " -fstack-extended store origin of entrypoints and PERFORM\n" -" * turned on by -debug/-dump" +" * turned on by --debug/-fdump" msgstr "" " -fstack-extended stocker l'origine des points d'entrées et PERFORM\n" " * activé par -debug/-dump" -#: cobc/flag.def:128 +#: cobc/flag.def:130 +msgid " -fno-fast-compare disables inline comparisions" +msgstr "" + +#: cobc/flag.def:135 msgid "" " -fno-remove-unreachable\tdisable remove of unreachable code\n" " * turned off by -g" @@ -1923,7 +1973,7 @@ msgstr "" " -fno-remove-unreachable\tdésactive la suppression de code inatteignable\n" " * inactivé par -g" -#: cobc/flag.def:132 +#: cobc/flag.def:139 msgid "" " -ftrace generate trace code\n" " * scope: executed SECTION/PARAGRAPH" @@ -1931,7 +1981,7 @@ msgstr "" " -ftrace générer le code de traçage\n" " * portée : SECTION/PARAGRAPH exécuté" -#: cobc/flag.def:136 +#: cobc/flag.def:143 msgid "" " -ftraceall generate trace code\n" " * scope: executed SECTION/PARAGRAPH/STATEMENTS" @@ -1939,11 +1989,11 @@ msgstr "" " -ftraceall générer le code de traçage\n" " * portée : SECTION/PARAGRAPH/STATEMENTS exécutés" -#: cobc/flag.def:140 +#: cobc/flag.def:147 msgid " -fsyntax-only syntax error checking only; don't emit any output" msgstr " -fsyntax-only uniquement vérifier les erreurs de syntaxe; ne pas générer de sortie" -#: cobc/flag.def:143 +#: cobc/flag.def:150 msgid "" " -fdebugging-line enable debugging lines\n" " * 'D' in indicator column or floating >>D" @@ -1951,19 +2001,23 @@ msgstr "" " -fdebugging-line activer les lignes de débogage\n" " * « D » dans la colonne indicateur ou >>D flottant" -#: cobc/flag.def:147 +#: cobc/flag.def:154 +#, fuzzy +#| msgid "" +#| " -fsource-location generate source location code\n" +#| " * turned on by -debug/-ftraceall/-fec/-dump" msgid "" " -fsource-location generate source location code\n" -" * turned on by -debug/-ftraceall/-fec/-dump" +" * turned on by --debug/-ftraceall/-fec/-fdump" msgstr "" " -fsource-location générer le code de localisation des sources\n" " * activé par -debug/-ftraceall/-fec/-dump" -#: cobc/flag.def:151 +#: cobc/flag.def:158 msgid " -fimplicit-init automatic initialization of the COBOL runtime system" msgstr " -fimplicit-init initialisation automatique du système d'exécution COBOL" -#: cobc/flag.def:154 +#: cobc/flag.def:161 msgid "" " -fno-recursive-check disable check of recursive program call;\n" " effectively compiling as RECURSIVE program" @@ -1971,23 +2025,34 @@ msgstr "" " -fno-recursive-check désactiver la vérification des appels récursifs du programme ;\n" " compile effectivement comme un programme RECURSIVE" -#: cobc/flag.def:158 +#: cobc/flag.def:165 +#, fuzzy +#| msgid "" +#| " -fstack-check PERFORM stack checking\n" +#| " * turned on by -debug/-g" msgid "" " -fstack-check PERFORM stack checking\n" -" * turned on by -debug/-g" +" * turned on by --debug/-g" msgstr "" " -fstack-check vérification de pile PERFORM\n" " * activé par -debug/-g" -#: cobc/flag.def:162 +#: cobc/flag.def:169 +msgid "" +" -fmemory-check=<scope> checks for invalid writes to internal storage,\n" +" <scope> may be one of: all, pointer, using, none\n" +" * default: none, set to all by --debug" +msgstr "" + +#: cobc/flag.def:174 msgid " -fsection-exit-check check that code execution does not leave the scope of SECTIONs" msgstr " -fsection-exit-check vérifier que l'exécution du code ne quitte pas la portée des SECTION" -#: cobc/flag.def:165 +#: cobc/flag.def:177 msgid " -fimplicit-goback-check\tcheck that code execution does not end implicit at end of PROCEDURE DIVISION" msgstr " -fimplicit-goback-check\tvérifier que l'exécution du code ne se termine pas de manière implicite à la fin de PROCEDURE DIVISION" -#: cobc/flag.def:168 +#: cobc/flag.def:180 msgid "" " -fwrite-after use AFTER 1 for WRITE of LINE SEQUENTIAL\n" " * default: BEFORE 1" @@ -1995,15 +2060,19 @@ msgstr "" " -fwrite-after utiliser AFTER 1 pour écriture (WRITE) de LINE SEQUENTIAL\n" " * défaut: BEFORE 1" -#: cobc/flag.def:172 +#: cobc/flag.def:184 +#, fuzzy +#| msgid "" +#| " -fmfcomment '*' or '/' in column 1 treated as comment\n" +#| " * FIXED format only" msgid "" -" -fmfcomment '*' or '/' in column 1 treated as comment\n" -" * FIXED format only" +" -fmfcomment '*' in column 1 treated as comment with listing suppression\n" +" * FIXED/COBOL85/VARIABLE format only" msgstr "" " -fmfcomment « * » ou « / » dans la colonne 1 est traité comme commentaire\n" " * format FIXED uniquement" -#: cobc/flag.def:176 +#: cobc/flag.def:188 msgid "" " -facucomment '$' in indicator area treated as '*',\n" " '|' treated as floating comment" @@ -2011,7 +2080,7 @@ msgstr "" " -facucomment « $ » dans la zone indicateur est traité comme « * »,\n" " « | » traité comme commentaire flottant" -#: cobc/flag.def:181 +#: cobc/flag.def:193 msgid "" " -fno-trunc allow numeric field overflow\n" " * non-ANSI behaviour" @@ -2019,7 +2088,7 @@ msgstr "" " -fno-trunc autoriser le débordement de champs numériques\n" " * comportement non-ANSI" -#: cobc/flag.def:185 +#: cobc/flag.def:197 msgid "" " -fsingle-quote use a single quote (apostrophe) for QUOTE\n" " * default: double quote" @@ -2027,7 +2096,7 @@ msgstr "" " -fsingle-quote utiliser une apostrophe pour QUOTE\n" " * défaut : guillemet" -#: cobc/flag.def:195 +#: cobc/flag.def:207 msgid "" " -foptional-file treat all files as OPTIONAL\n" " * unless NOT OPTIONAL specified" @@ -2035,11 +2104,11 @@ msgstr "" " -foptional-file traiter tous les fichiers comme OPTIONAL\n" " * à moins que NOT OPTIONAL soit spécifié" -#: cobc/flag.def:199 +#: cobc/flag.def:211 msgid " -fstatic-call output static function calls for the CALL statement" msgstr " -fstatic-call sortir les appels de fonctions statiques pour l'instruction CALL" -#: cobc/flag.def:202 +#: cobc/flag.def:214 msgid "" " -fno-gen-c-decl-static-call\tdisable generation of C function declarations\n" " for subroutines with static CALL" @@ -2047,15 +2116,19 @@ msgstr "" " -fno-gen-c-decl-static-call\tdésactiver la génération des déclarations de\n" " fonctions C pour les sous-routines avec CALL statique" -#: cobc/flag.def:206 +#: cobc/flag.def:218 +#, fuzzy +#| msgid "" +#| " -fgen-c-line-directives\tgenerate source location directives in C code;\n" +#| " * turned on by -g" msgid "" " -fgen-c-line-directives\tgenerate source location directives in C code;\n" -" * turned on by -g" +" * turned on by -g/--coverage" msgstr "" " -fgen-c-line-directives\tgénérer des directives de localisation des sources du code C ;\n" " * activé par -g" -#: cobc/flag.def:210 +#: cobc/flag.def:222 msgid "" " -fgen-c-labels generate extra labels in C sources;\n" " * turned on by -g" @@ -2063,27 +2136,49 @@ msgstr "" " -fgen-c-labels générer des étiquettes supplémentaires dans les sources C ;\n" " * activé par -g" -#: cobc/flag.def:214 +#: cobc/flag.def:226 +#, fuzzy +#| msgid "" +#| " -fno-theaders suppress all headers and output of compilation\n" +#| " options from listing while keeping page breaks" msgid "" -" -fno-theaders suppress all headers and output of compilation\n" -" options from listing while keeping page breaks" +" -fno-theaders suppress all headers from listing while keeping\n" +" page breaks" msgstr "" " -fno-theaders supprimer tous les en-têtes et sorties des options de\n" " compilation du listing tout en gardant les sauts de pages" -#: cobc/flag.def:218 +#: cobc/flag.def:230 msgid " -fno-tsource suppress source from listing" msgstr " -fno-tsource supprimer les sources du listing" -#: cobc/flag.def:221 +#: cobc/flag.def:233 msgid " -fno-tmessages suppress warning and error summary from listing" msgstr " -fno-tmessages supprimer tous les résumés des avertissements et erreurs du listing" -#: cobc/flag.def:224 +#: cobc/flag.def:236 msgid " -ftsymbols specify symbols in listing" msgstr " -ftsymbols spécifie les symboles dans le listing" -#: cobc/flag.def:227 +#: cobc/flag.def:239 +#, fuzzy +#| msgid " -ftsymbols specify symbols in listing" +msgid " -ftcmd specify command line in listing" +msgstr " -ftsymbols spécifie les symboles dans le listing" + +#: cobc/flag.def:242 +#, fuzzy +#| msgid " -fno-tmessages suppress warning and error summary from listing" +msgid " -fno-ttimestamp suppress timestamp in listing headers" +msgstr " -fno-tmessages supprimer tous les résumés des avertissements et erreurs du listing" + +#: cobc/flag.def:245 +msgid "" +" -fttitle=<title> set listing title with '_' replaced by spaces;\n" +" defaults to package name and version" +msgstr "" + +#: cobc/flag.def:249 msgid "" " -fno-diagnostics-show-option\tsuppress output of option that directly\n" " controls the diagnostic" @@ -2091,16 +2186,24 @@ msgstr "" " -fno-diagnostics-show-option\tsupprimer la sortie de l'option qui contrôle\n" " directement le diagnostique" -#: cobc/help.c:32 +#: cobc/flag.def:253 +msgid " -fno-diagnostics-show-caret\tdo not display source context on warning/error diagnostic" +msgstr "" + +#: cobc/flag.def:256 +msgid " -fno-diagnostics-show-line-numbers\tsuppress display of line numbers in diagnostics" +msgstr "" + +#: cobc/help.c:33 msgid "GnuCOBOL compiler for most COBOL dialects with lots of extensions" msgstr "Compilateur GnuCOBOL pour la plupart des dialectes COBOL avec beaucoup d'extensions" -#: cobc/help.c:34 +#: cobc/help.c:35 #, c-format msgid "Usage: %s [options]... file..." msgstr "Usage : %s [options]… fichier…" -#: cobc/help.c:47 bin/cobcrun.c:143 +#: cobc/help.c:48 bin/cobcrun.c:143 #, c-format msgid "" "Report bugs to: %s\n" @@ -2109,31 +2212,33 @@ msgstr "" "Signalez les erreurs à : %s\n" "ou (de préférence) utilisez le suivi d'erreurs via la page d'accueil." -#: cobc/help.c:51 -msgid "GnuCOBOL home page: <https://www.gnu.org/software/gnucobol/>" -msgstr "Page d'accueil de GnuCOBOL : <https://www.gnu.org/software/gnucobol/>" +#: cobc/help.c:52 bin/cobcrun.c:146 +#, c-format +msgid "GnuCOBOL home page: <%s>" +msgstr "Page d'accueil de GnuCOBOL : <%s>" -#: cobc/help.c:52 -msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" -msgstr "Aide générale sur l'utilisation de logiciel GNU: <https://www.gnu.org/software/gethelp.fr.html>" +#: cobc/help.c:54 bin/cobcrun.c:148 +#, c-format +msgid "General help using GNU software: <%s>" +msgstr "Aide générale sur l'utilisation de logiciel GNU : <%s>" -#: cobc/help.c:58 bin/cobcrun.c:125 +#: cobc/help.c:61 bin/cobcrun.c:125 msgid "Options:" msgstr "Options :" -#: cobc/help.c:59 +#: cobc/help.c:62 msgid " -h, --help display this help and exit" msgstr " -h, --help afficher cette aide et terminer" -#: cobc/help.c:60 +#: cobc/help.c:63 msgid " -V, --version display compiler version information and exit" msgstr " -V, --version afficher les informations de version du compilateur et terminer" -#: cobc/help.c:61 +#: cobc/help.c:64 msgid " -dumpversion display compiler version and exit" msgstr " -dumpversion afficher la version du compilateur et terminer" -#: cobc/help.c:62 +#: cobc/help.c:65 msgid "" " -i, --info display compiler information (build/environment)\n" " and exit" @@ -2141,7 +2246,7 @@ msgstr "" " -i, --info afficher les informations du compilateur (compilation/environnement)\n" " et terminer" -#: cobc/help.c:64 +#: cobc/help.c:67 msgid "" " -v, --verbose verbose mode, display additional information;\n" " multiple -v options increase the verbosity,\n" @@ -2159,27 +2264,27 @@ msgstr "" " (2) passe l'option verbeuse à l'assembleur/compilateur\n" " (3) passe l'option verbeuse à l'éditeur de liens" -#: cobc/help.c:71 +#: cobc/help.c:74 msgid " -q, --brief reduced displays, commands invoked not shown" msgstr " -q, --brief affichage réduit, commandes appelées pas montrées" -#: cobc/help.c:72 +#: cobc/help.c:75 msgid " -### like -v but commands not executed" msgstr " -### comme -v mais les commandes ne sont pas exécutées" -#: cobc/help.c:73 +#: cobc/help.c:76 msgid " -x build an executable program" msgstr " -x compiler un programme exécutable" -#: cobc/help.c:74 +#: cobc/help.c:77 msgid " -m build a dynamically loadable module (default)" msgstr " -m compiler un module chargé dynamiquement (défaut)" -#: cobc/help.c:75 +#: cobc/help.c:78 msgid " -j [<args>], --job[=<args>]\trun program after build, passing <args>" msgstr " -j [<args>], --job[=<args>]\texécuter le programme après la compilation en lui passant <args>" -#: cobc/help.c:76 +#: cobc/help.c:79 msgid "" " -std=<dialect> warnings/features for a specific dialect\n" " <dialect> can be one of:\n" @@ -2199,11 +2304,11 @@ msgstr "" " gcos;\n" " voyez les fichiers de configuration dans le répertoire de configuration" -#: cobc/help.c:84 +#: cobc/help.c:87 msgid " -F, --free use free source format (alias for -fformat=free)" msgstr " -F, --free utiliser le format source libre (synonyme de -fformat=free)" -#: cobc/help.c:85 +#: cobc/help.c:88 msgid "" " --fixed use fixed source format (default; alias for\n" " -fformat=fixed)" @@ -2211,19 +2316,19 @@ msgstr "" " --fixed utiliser le format source fixe (défaut ; synonyme de\n" " -fformat=fixed)" -#: cobc/help.c:87 +#: cobc/help.c:90 msgid " -O, -O2, -O3, -Os enable optimization" msgstr " -O, -O2, -O3, -Os activer l'optimisation" -#: cobc/help.c:88 +#: cobc/help.c:91 msgid " -O0 disable optimization" msgstr " -O0 activer tous les avertissements" -#: cobc/help.c:89 +#: cobc/help.c:92 msgid " -g enable C compiler debug and stack check" msgstr " -g activer le débogage et le contrôle de pile du compilateur C" -#: cobc/help.c:90 +#: cobc/help.c:93 msgid "" " -d, --debug enable all run-time error checking,\n" " equal to -fstack-check -fec=EC-ALL" @@ -2231,7 +2336,7 @@ msgstr "" " -d, --debug activer tous les contrôles d'erreurs à l'exécution,\n" " identique à -fstack-check -fec=EC-ALL" -#: cobc/help.c:93 +#: cobc/help.c:97 msgid "" " -fec=<exception-name>\tenable code generation for <exception-name>,\n" " see --list-exceptions for the possible values,\n" @@ -2241,11 +2346,15 @@ msgstr "" " consultez --list-exceptions pour les valeurs possibles,\n" " défini -fsource-location" -#: cobc/help.c:97 +#: cobc/help.c:100 +msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" +msgstr " -fno-ec=<nom-exception>\tdésactiver la génération de code pour <nom-exception>" + +#: cobc/help.c:101 msgid " -o <file> place the output into <file>" msgstr " -o <fichier> placer la sortie dans <fichier>" -#: cobc/help.c:98 +#: cobc/help.c:102 msgid "" " -b combine all input files into a single\n" " dynamically loadable module" @@ -2253,43 +2362,39 @@ msgstr "" " -b combiner tous les fichiers en entrée en un\n" " seul module chargé dynamiquement" -#: cobc/help.c:100 +#: cobc/help.c:104 msgid " -E preprocess only; do not compile or link" msgstr " -E pré-traitement uniquement; ne pas compiler ni éditer les liens" -#: cobc/help.c:101 +#: cobc/help.c:105 msgid " -C translation only; convert COBOL to C" msgstr " -C traduire uniquement; converti COBOL en C" -#: cobc/help.c:102 +#: cobc/help.c:106 msgid " -S compile only; output assembly file" msgstr " -S compiler uniquement; sort un fichier assembleur" -#: cobc/help.c:103 +#: cobc/help.c:107 msgid " -c compile and assemble, but do not link" msgstr " -c compiler et assembler mais ne pas éditer les liens" -#: cobc/help.c:104 +#: cobc/help.c:108 msgid " -T <file> generate and place a wide program listing into <file>" msgstr " -T <fichier> générer et placer un listing large du programme dans <fichier>" -#: cobc/help.c:105 +#: cobc/help.c:109 msgid " -t <file> generate and place a program listing into <file>" msgstr " -t <fichier> générer et placer un listing du programme dans <fichier>" -#: cobc/help.c:106 +#: cobc/help.c:110 msgid " --tlines=<lines> specify lines per page in listing, default = 55" msgstr " --tlines=<lignes> spécifier les lignes par page dans un listing, défaut = 55" -#: cobc/help.c:108 -msgid " --tsymbols specify symbols in listing, use -ftsymbols instead" -msgstr " --tsymbols spécifie les symboles dans le listing, utilisez plutôt -ftsymbols" - -#: cobc/help.c:110 +#: cobc/help.c:111 msgid " -P[=<dir or file>] generate preprocessed program listing (.lst)" msgstr " -P[=<rép ou fichier>] générer le listing du programme pré-traité (.lst)" -#: cobc/help.c:112 +#: cobc/help.c:113 msgid "" " -X, --Xref generate cross reference through 'cobxref'\n" " (V. Coen's 'cobxref' must be in path)" @@ -2297,63 +2402,67 @@ msgstr "" " -X, --Xref générer la référence croisée via « cobxref »\n" " (« cobxref » de V. Coen doit être dans le path)" -#: cobc/help.c:115 +#: cobc/help.c:116 msgid " -X, --Xref specify cross reference in listing" msgstr " -X, --Xref spécifier la référence croisée dans le listing" -#: cobc/help.c:117 +#: cobc/help.c:118 msgid " -I <directory> add <directory> to copy/include search path" msgstr " -I <répertoire> ajouter <répertoire> au chemin de recherche des copies/inclusions" -#: cobc/help.c:118 +#: cobc/help.c:119 msgid " -L <directory> add <directory> to library search path" msgstr " -L <répertoire> ajouter <répertoire> au chemin de recherche des bibliothèques" -#: cobc/help.c:119 +#: cobc/help.c:120 msgid " -l <lib> link the library <lib>" msgstr " -l <bib> lier la bibliothèque <bib>" -#: cobc/help.c:120 -msgid " -A <options> add <options> to the C compile phase" -msgstr " -A <options> ajouter <options> à la phase de compilation C" - #: cobc/help.c:121 -msgid " -Q <options> add <options> to the C link phase" -msgstr " -Q <options> ajouter <options> à la phase d'édition de liens C" +msgid " -K <entry> generate CALL to <entry> as static" +msgstr " -K <entrée> générer CALL à <entrée> comme statique" #: cobc/help.c:122 msgid " -D <define> define <define> for COBOL compilation" msgstr " -D <define> définir <define> pour la compilation COBOL" #: cobc/help.c:123 -msgid " -K <entry> generate CALL to <entry> as static" -msgstr " -K <entrée> générer CALL à <entrée> comme statique" +msgid " -A <options> add <options> to the C compile phase" +msgstr " -A <options> ajouter <options> à la phase de compilation C" #: cobc/help.c:124 +msgid " -Q <options> add <options> to the C link phase" +msgstr " -Q <options> ajouter <options> à la phase d'édition de liens C" + +#: cobc/help.c:125 +msgid " --coverage instrument generated binaries for coverage" +msgstr "" + +#: cobc/help.c:126 msgid " --conf=<file> user-defined dialect configuration; see -std" msgstr " --conf=<fichier> configuration du dialecte définie par l'utilisateur; voyez -std" -#: cobc/help.c:125 +#: cobc/help.c:127 msgid " --list-reserved display reserved words" msgstr " --list-reserved afficher les mots réservés" -#: cobc/help.c:126 +#: cobc/help.c:128 msgid " --list-intrinsics display intrinsic functions" msgstr " --list-intrinsics afficher les fonctions intrinsèques" -#: cobc/help.c:127 +#: cobc/help.c:129 msgid " --list-mnemonics display mnemonic names" msgstr " --list-mnemonics afficher les noms des mnémoniques" -#: cobc/help.c:128 +#: cobc/help.c:130 msgid " --list-exceptions display exception names" msgstr " --list-exceptions afficher les noms des exceptions" -#: cobc/help.c:129 +#: cobc/help.c:131 msgid " --list-system display system routines" msgstr " --list-system afficher les routines systèmes" -#: cobc/help.c:130 +#: cobc/help.c:132 msgid "" " --save-temps[=<dir>] save intermediate files\n" " * default: current directory" @@ -2361,61 +2470,75 @@ msgstr "" " --save-temps[=<rép>] enregistrer les fichiers intermédiaires\n" " * défaut : répertoire courant" -#: cobc/help.c:132 +#: cobc/help.c:134 +msgid " -MT <target> set/add target file used in dependency list" +msgstr "" + +#: cobc/help.c:135 +#, fuzzy +#| msgid " -o <file> place the output into <file>" +msgid " -MF <file> place dependency list into <file>" +msgstr " -o <fichier> placer la sortie dans <fichier>" + +#: cobc/help.c:136 msgid " -ext <extension> add file extension for resolving COPY" msgstr " -ext <extension> ajouter l'extension de fichier pour résoudre COPY" -#: cobc/help.c:139 +#: cobc/help.c:143 msgid "Warning options:" msgstr "Options d'avertissement :" -#: cobc/help.c:140 +#: cobc/help.c:144 msgid " -Wall enable most warnings (all except as noted below)" msgstr " -Wall activer la plupart des avertissements (tous sauf ceux notés ci-dessous)" -#: cobc/help.c:141 +#: cobc/help.c:145 msgid " -Wextra like -Wall but enable some extra warning flags" msgstr " -Wextra comme -Wall mais active plus d'avertissements" -#: cobc/help.c:142 +#: cobc/help.c:146 msgid " -w disable all warnings" msgstr " -w désactiver tous les avertissements" -#: cobc/help.c:143 +#: cobc/help.c:147 msgid " -Wno-<warning> disable warning enabled by default, -Wall or -Wextra" msgstr " -Wno-<avertissement> désactiver l'avertissement activé par défaut ou par -Wall ou par -Wextra" #. TRANSLATORS: This msgid is appended to msgid for -Wno-pending and others -#: cobc/help.c:149 +#: cobc/help.c:153 msgid " * ALWAYS active" msgstr " * TOUJOURS actif" #. TRANSLATORS: This msgid is appended to msgid for -Wpossible-truncate and others -#: cobc/help.c:153 +#: cobc/help.c:157 msgid " * NOT set with -Wall" msgstr " * PAS défini par -Wall" -#: cobc/help.c:161 +#: cobc/help.c:165 +msgid " -fdiagnostics-plain-output\tmake diagnostic output as plain as possible" +msgstr "" + +#: cobc/help.c:166 msgid " -Werror treat all warnings as errors" msgstr " -Werror traiter tous les avertissements comme des erreurs" -#: cobc/help.c:162 +#: cobc/help.c:167 msgid " -Wno-error don't treat warnings as errors" msgstr " -Wno-error ne pas traiter les avertissements comme des erreurs" -#: cobc/help.c:163 +#: cobc/help.c:168 msgid " -Werror=<warning> treat specified <warning> as error" msgstr " -Werror=<avertissement> traiter l'avertissement spécifié comme une erreur" -#: cobc/help.c:164 +#: cobc/help.c:169 msgid " -Wno-error=<warning> don't treat specified <warning> as error" msgstr " -Wno-error=<avertissement> ne pas traiter l'avertissement spécifié comme une erreur" -#: cobc/help.c:180 +#: cobc/help.c:185 msgid "Compiler options:" msgstr "Options du compilateur :" -#: cobc/help.c:198 +#: cobc/help.c:203 msgid "" " -fibmcomp sets -fbinary-size=2-4-8 -fsynchronized-clause=ok\n" " -fno-ibmcomp sets -fbinary-size=1--8 -fsynchronized-clause=ignore" @@ -2423,7 +2546,7 @@ msgstr "" " -fibmcomp défini -fbinary-size=2-4-8 -fsynchronized-clause=ok\n" " -fno-ibmcomp défini -fbinary-size=1--8 -fsynchronized-clause=ignore" -#: cobc/help.c:201 +#: cobc/help.c:206 msgid "" " -falternate-ebcdic use restricted ASCII to EBCDIC translate\n" " -fno-alternate-ebcdic use extended ASCII to EBCDIC translate" @@ -2431,3588 +2554,3685 @@ msgstr "" " -falternate-ebcdic utiliser une traduction restreinte de ASCII vers EBCDIC\n" " -fno-alternate-ebcdic utiliser la traduction étendue de ASCII vers EBCDIC" -#: cobc/help.c:230 +#: cobc/help.c:235 msgid "Compiler dialect configuration options:" msgstr "Options de configuration du dialecte du compilateur :" -#: cobc/help.c:232 cobc/help.c:238 +#: cobc/help.c:237 cobc/help.c:243 msgid "<value>" msgstr "<valeur>" -#: cobc/help.c:242 +#: cobc/help.c:247 msgid "<support>" msgstr "<support>" -#: cobc/help.c:251 +#: cobc/help.c:256 msgid "where <support> is one of the following:" msgstr "où <support> est l'un de cette liste :" #. TRANSLATORS: This msgid is used when a variable name #. or label is referenced in a compiler message. -#: cobc/help.c:254 cobc/help.c:257 cobc/help.c:260 cobc/help.c:263 -#: cobc/help.c:266 cobc/help.c:269 cobc/help.c:272 cobc/help.c:275 -#: cobc/typeck.c:2361 +#: cobc/help.c:259 cobc/help.c:262 cobc/help.c:265 cobc/help.c:268 +#: cobc/help.c:271 cobc/help.c:274 cobc/help.c:277 cobc/help.c:280 +#: cobc/typeck.c:2378 #, c-format msgid "'%s'" msgstr "« %s »" -#: cobc/help.c:277 +#: cobc/help.c:282 msgid "word to be taken out of the reserved words list" msgstr "mot à enlever de la liste des mots réservés" -#: cobc/help.c:277 cobc/help.c:278 cobc/help.c:280 +#: cobc/help.c:282 cobc/help.c:283 cobc/help.c:285 msgid "<word>" msgstr "<mot>" -#: cobc/help.c:278 +#: cobc/help.c:283 msgid "word to be added to reserved words list" msgstr "mot à ajouter à la liste des mots réservés" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "word to be added to reserved words list as alias" msgstr "mot à ajouter comme synonyme à la liste des mots réservés" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "<word>:<alias>" msgstr "<mot>:<synonyme>" -#: cobc/help.c:280 +#: cobc/help.c:285 msgid "special register to disable" msgstr "le registre spécial à désactiver" -#: cobc/help.c:281 +#: cobc/help.c:286 msgid "special register to enable" msgstr "le registre spécial à activer" -#: cobc/help.c:282 +#: cobc/help.c:287 msgid "<word> or <word>:<definition>, where definition uses backslash escaped spaces" msgstr "<mot> ou <mot>:<définition>, où les définitions utilisent des espaces échappées par une barre oblique inverse" -#: cobc/parser.y:315 cobc/parser.y:323 +#: cobc/parser.y:307 #, c-format msgid "'%s' should start in Area A" msgstr "« %s » devrait démarrer dans Area A" -#: cobc/parser.y:331 cobc/parser.y:333 +#: cobc/parser.y:315 +#, fuzzy, c-format +#| msgid "'%s' should start in Area A" +msgid "%s should start in Area A" +msgstr "« %s » devrait démarrer dans Area A" + +#: cobc/parser.y:322 +#, fuzzy, c-format +#| msgid "'%s' should start in Area A" +msgid "%s should not start in Area A" +msgstr "« %s » devrait démarrer dans Area A" + +#: cobc/parser.y:330 cobc/parser.y:332 msgid "start of statement in Area A" msgstr "début d'instruction dans Area A" -#: cobc/parser.y:344 cobc/parser.y:379 +#: cobc/parser.y:428 #, c-format msgid "unreachable statement '%s'" msgstr "instruction inatteignable « %s »" -#: cobc/parser.y:470 +#: cobc/parser.y:542 #, c-format msgid "ENTRY '%s' duplicated" msgstr "ENTRY « %s » dupliqué" -#: cobc/parser.y:520 +#: cobc/parser.y:594 #, c-format msgid "ENTRY FOR GO TO '%s' duplicated" msgstr "ENTRY FOR GO TO « %s » dupliqué" -#: cobc/parser.y:536 +#: cobc/parser.y:610 #, c-format msgid "maximum nested program depth exceeded (%d)" msgstr "profondeur maximale de programme imbriqué dépassée (%d)" -#: cobc/parser.y:562 cobc/parser.y:589 +#: cobc/parser.y:636 cobc/parser.y:663 #, c-format msgid "%s statement not terminated by %s" msgstr "instruction %s pas terminée par %s" -#: cobc/parser.y:592 +#: cobc/parser.y:666 #, c-format msgid "%s statement not terminated" msgstr "instruction %s pas terminée" -#: cobc/parser.y:634 -msgid "USE statement invalid for SORT file" +#: cobc/parser.y:708 +#, fuzzy +#| msgid "USE statement invalid for SORT file" +msgid "USE statement invalid for SD file" msgstr "instruction USE invalide pour le fichier SORT" -#: cobc/parser.y:676 cobc/parser.y:1670 cobc/parser.y:1673 -#, c-format -msgid "cannot specify both %s and %s" -msgstr "ne peut spécifier à la fois %s et %s" - -#: cobc/parser.y:677 +#: cobc/parser.y:751 #, c-format msgid "%s is ignored" msgstr "%s est ignoré" -#: cobc/parser.y:686 -#, c-format -msgid "Cannot specify %s without number of lines on page" +#: cobc/parser.y:760 +#, fuzzy, c-format +#| msgid "Cannot specify %s without number of lines on page" +msgid "cannot specify %s without number of lines on page" msgstr "Il n'est pas permis de spécifier %s sans numéros de lignes sur la page" -#: cobc/parser.y:696 +#: cobc/parser.y:770 #, c-format msgid "maximum OCCURS depth exceeded (%d)" msgstr "profondeur maximale de OCCURS dépassée (%d)" -#: cobc/parser.y:704 cobc/typeck.c:3037 +#: cobc/parser.y:785 cobc/typeck.c:3127 #, c-format msgid "'%s' is not in LINKAGE SECTION" msgstr "« %s » n'est pas dans LINKAGE SECTION" -#: cobc/parser.y:725 +#: cobc/parser.y:806 msgid "TO phrase without DEPENDING phrase" msgstr "phrase TO sans phrase DEPENDING" -#: cobc/parser.y:727 +#: cobc/parser.y:808 msgid "maximum number of occurrences assumed to be exact number" msgstr "le nombre maximum d'occurrences est supposé être un nombre exact" -#: cobc/parser.y:732 cobc/parser.y:8032 +#: cobc/parser.y:813 cobc/parser.y:8398 msgid "OCCURS TO must be greater than OCCURS FROM" msgstr "OCCURS TO doit être plus grand que OCCURS FROM" -#: cobc/parser.y:741 +#: cobc/parser.y:823 msgid "OCCURS DEPENDING ON without TO phrase" msgstr "OCCURS DEPENDING ON sans phrase TO" -#: cobc/parser.y:806 +#: cobc/parser.y:899 #, c-format msgid "%s header missing" msgstr "en-tête %s manquant" -#: cobc/parser.y:807 +#: cobc/parser.y:900 #, c-format msgid "%s header assumed" msgstr "en-tête %s présumé" -#: cobc/parser.y:939 -#, c-format -msgid "duplicate %s" -msgstr "%s dupliqué" - -#: cobc/parser.y:941 +#: cobc/parser.y:1053 #, c-format msgid "%s incorrectly after %s" msgstr "%s incorrecte après %s" -#: cobc/parser.y:1078 +#: cobc/parser.y:1208 #, c-format msgid "redefinition of program name '%s'" msgstr "redéfinition du nom du programme « %s »" -#: cobc/parser.y:1083 +#: cobc/parser.y:1213 #, c-format msgid "redefinition of program ID '%s'" msgstr "redéfinition du ID du programme « %s »" -#: cobc/parser.y:1117 +#: cobc/parser.y:1247 #, c-format msgid "FUNCTION '%s' has no PROCEDURE DIVISION" msgstr "FUNCTION « %s » n'a pas de PROCEDURE DIVISION" -#: cobc/parser.y:1228 +#: cobc/parser.y:1372 msgid "functions may not be defined within a program/function" msgstr "les fonctions ne peuvent pas être définies dans un programme/fonction" -#: cobc/parser.y:1278 +#: cobc/parser.y:1426 #, c-format msgid "END FUNCTION '%s' is different from FUNCTION-ID '%s'" msgstr "END FUNCTION « %s » est différent de FUNCTION-ID « %s »" -#: cobc/parser.y:1292 +#: cobc/parser.y:1440 #, c-format msgid "END PROGRAM '%s' is different from PROGRAM-ID '%s'" msgstr "END PROGRAM « %s » est différent de PROGRAM-ID « %s »" -#: cobc/parser.y:1341 +#: cobc/parser.y:1489 msgid "currency symbol must be one character long" msgstr "le symbole monétaire doit être long d'un seul caractère" -#: cobc/parser.y:1398 +#: cobc/parser.y:1546 #, c-format msgid "invalid character '%c' in currency symbol" msgstr "caractère « %c » invalide dans le symbole monétaire" -#: cobc/parser.y:1414 +#: cobc/parser.y:1562 msgid "prototype has same name as current function and will be ignored" msgstr "le prototype a le même nom que la fonction courante et sera ignoré" -#: cobc/parser.y:1441 +#: cobc/parser.y:1589 #, c-format msgid "duplicate REPOSITORY entries for '%s' do not match" msgstr "les entrées REPOSITORY dupliquées pour « %s » ne correspondent pas" -#: cobc/parser.y:1445 +#: cobc/parser.y:1593 #, c-format msgid "duplicate REPOSITORY entry for '%s'" msgstr "entrée REPOSITORY dupliquée pour « %s »" -#: cobc/parser.y:1510 +#: cobc/parser.y:1658 #, c-format msgid "ORGANIZATION %s is incompatible with RECORD DELIMITER" msgstr "ORGANIZATION %s est incompatible avec RECORD DELIMITER" -#: cobc/parser.y:1548 cobc/parser.y:1939 cobc/typeck.c:829 +#: cobc/parser.y:1694 cobc/parser.y:2142 cobc/typeck.c:835 #, c-format msgid "condition-name not allowed here: '%s'" msgstr "nom de condition pas permis ici : « %s »" -#: cobc/parser.y:1554 cobc/parser.y:2127 +#: cobc/parser.y:1700 cobc/parser.y:2345 msgid "SCREEN item cannot be used here" msgstr "l'élément SCREEN ne peut pas être utilisé ici" -#: cobc/parser.y:1557 +#: cobc/parser.y:1703 msgid "REPORT item cannot be used here" msgstr "l'élément REPORT ne peut pas être utilisé ici" -#: cobc/parser.y:1563 +#: cobc/parser.y:1709 msgid "TYPEDEF item cannot be used here" msgstr "l'élément TYPEDEF ne peut pas être utilisé ici" -#: cobc/parser.y:1572 +#: cobc/parser.y:1718 msgid "elementary item expected" msgstr "élément élémentaire attendu" -#: cobc/parser.y:1579 +#: cobc/parser.y:1725 msgid "item may not reference itself" msgstr "un élément ne peut pas faire référence à lui-même" -#: cobc/parser.y:1586 +#: cobc/parser.y:1733 msgid "item may not be subordinate to any item with USAGE clause" msgstr "l'élément ne peut pas être subordonné à un élément ayant la clause USAGE" -#: cobc/parser.y:1588 +#: cobc/parser.y:1735 msgid "item may not be subordinate to any item with SIGN clause" msgstr "l'élément ne peut pas être subordonné à un élément avec la clause SIGN" -#: cobc/parser.y:1631 +#: cobc/parser.y:1780 #, c-format msgid "illegal combination of %s with other clauses" msgstr "combinaison illégale de %s avec d'autres clauses" -#: cobc/parser.y:1641 +#: cobc/parser.y:1794 #, c-format msgid "entry following %s may not be subordinate to it" msgstr "l'entrée suivant %s ne peut pas lui être subordonnée" -#: cobc/parser.y:1859 +#: cobc/parser.y:2042 +msgid "INITIAL specified on non-input field" +msgstr "INITIAL spécifié sur un champ qui n'est pas une entrée" + +#: cobc/parser.y:2054 +msgid "relative LINE/COLUMN clause required with OCCURS" +msgstr "clause LINE/COLUMN relative requise avec OCCURS" + +#: cobc/parser.y:2072 msgid "FOR phrase cannot immediately follow ALL/LEADING/TRAILING" msgstr "la phrase FOR ne peut pas suivre immédiatement ALL/LEADING/TRAILING" -#: cobc/parser.y:1861 +#: cobc/parser.y:2074 msgid "missing CHARACTERS/ALL/LEADING/TRAILING phrase after FOR phrase" msgstr "phrase CHARACTERS/ALL/LEADING/TRAILING manquante après une phrase FOR" -#: cobc/parser.y:1868 +#: cobc/parser.y:2081 msgid "missing value between ALL/LEADING/TRAILING words" msgstr "valeur manquante entre les mots ALL/LEADING/TRAILING" -#: cobc/parser.y:1873 +#: cobc/parser.y:2086 msgid "missing FOR phrase before CHARACTERS/ALL/LEADING/TRAILING phrase" msgstr "phrase FOR manquante avant la phrase CHARACTERS/ALL/LEADING/TRAILING" -#: cobc/parser.y:1880 +#: cobc/parser.y:2093 msgid "missing ALL/LEADING/TRAILING before value" msgstr "ALL/LEADING/TRAILING manquant avant la valeur" -#: cobc/parser.y:1935 +#: cobc/parser.y:2138 msgid "use of condition-name in place of data-name" msgstr "utilisation de nom-condition au lieu de nom-donnée" -#: cobc/parser.y:1966 +#: cobc/parser.y:2169 msgid "cannot specify NO ADVANCING in screen DISPLAY" msgstr "ne peut spécifier NO ADVANCING dans l'écran DISPLAY" -#: cobc/parser.y:2029 cobc/parser.y:2046 +#: cobc/parser.y:2232 cobc/parser.y:2249 msgid "non-standard DISPLAY" msgstr "DISPLAY non standard" # CRT est un tube cathodique mais cela n'existe plus depuis longtemps au moment où je traduits ce texte. # CRT est un mot clé historique du language dans ce contexte. -#: cobc/parser.y:2033 +#: cobc/parser.y:2236 msgid "screens may only be displayed on CRT" msgstr "les écrans peuvent uniquement être affichés sur CRT" -#: cobc/parser.y:2038 cobc/parser.y:2081 +#: cobc/parser.y:2241 cobc/parser.y:2284 msgid "cannot mix screens and fields in the same DISPLAY statement" msgstr "ne peut mélanger les écrans et les champs dans la même instruction DISPLAY" -#: cobc/parser.y:2042 +#: cobc/parser.y:2245 msgid "screen clauses may only be used for DISPLAY on CRT" msgstr "les instructions écran peuvent uniquement être utilisées avec DISPLAY sur CRT" -#: cobc/parser.y:2087 +#: cobc/parser.y:2290 msgid "ambiguous DISPLAY; put items to display on device in separate DISPLAY" msgstr "DISPLAY ambigu; mettez les éléments à afficher sur le périphérique dans des DISPLAY séparés" -#: cobc/parser.y:2103 +#: cobc/parser.y:2301 #, c-format msgid "%s is not an alphanumeric literal" msgstr "%s n'est pas un littéral alphanumérique" -#: cobc/parser.y:2105 +#: cobc/parser.y:2305 #, c-format msgid "'%s' is not USAGE DISPLAY" msgstr "« %s » n'est pas USAGE DISPLAY" -#: cobc/parser.y:2120 cobc/typeck.c:9790 +#: cobc/parser.y:2322 cobc/parser.y:19534 +#, c-format +msgid "'%s' is not a field" +msgstr "« %s » n'est pas un champ" + +#: cobc/parser.y:2338 cobc/typeck.c:10231 #, c-format msgid "invalid target for %s" msgstr "cible invalide pour %s" -#: cobc/parser.y:2129 +#: cobc/parser.y:2347 msgid "RENAMES item may not be used here" msgstr "l'élément RENAMES ne peut pas être utilisé ici" -#: cobc/parser.y:2131 cobc/typeck.c:2737 cobc/typeck.c:2828 +#: cobc/parser.y:2349 cobc/typeck.c:2822 cobc/typeck.c:2913 msgid "ANY LENGTH item not allowed here" msgstr "élément ANY LENGTH pas permis ici" -#: cobc/parser.y:2135 +#: cobc/parser.y:2353 #, c-format msgid "item '%s' has wrong class for VALIDATE" msgstr "l'élément « %s » a une mauvaise classe pour VALIDATE" -#: cobc/parser.y:2144 +#: cobc/parser.y:2362 msgid "WHEN clause must follow EVERY clause" msgstr "la clause WHEN doit suivre la clause EVERY" -#: cobc/parser.y:2229 cobc/parser.y:18631 +#: cobc/parser.y:2447 cobc/parser.y:19251 msgid "non-zero value expected" msgstr "valeur non nulle attendue" -#: cobc/parser.y:2235 cobc/tree.c:4735 +#: cobc/parser.y:2453 cobc/tree.c:4803 #, c-format msgid "RECORD size (IDX) exceeds maximum allowed (%d)" msgstr "la taille de RECORD (IDX) excède le maximum autorisé (%d)" -#: cobc/parser.y:2239 cobc/tree.c:4739 +#: cobc/parser.y:2457 cobc/tree.c:4807 #, c-format msgid "RECORD size exceeds maximum allowed (%d)" msgstr "la taille de RECORD excède le maximum autorisé (%d)" -#: cobc/parser.y:2244 +#: cobc/parser.y:2462 msgid "RECORD clause invalid" msgstr "clause RECORD invalide" -#: cobc/parser.y:3368 +#: cobc/parser.y:3595 msgid "multiple PROGRAM-ID's without matching END PROGRAM" msgstr "plusieurs PROGRAM-ID sans END PROGRAM correspondant" -#: cobc/parser.y:3371 +#: cobc/parser.y:3598 msgid "executable requested but no program found" msgstr "exécutable demandé mais pas de programme trouvé" -#: cobc/parser.y:3488 +#: cobc/parser.y:3717 msgid "prototypes must be come before any program/function definitions" msgstr "les prototypes doivent venir avant toute définition de programme/fonction" -#: cobc/parser.y:3691 +#: cobc/parser.y:3930 msgid "COMMON may only be used in a contained program" msgstr "COMMON peut uniquement être utilisé dans un programme contenu" -#: cobc/parser.y:3778 +#: cobc/parser.y:4017 msgid "CALL prototypes" msgstr "prototypes CALL" -#: cobc/parser.y:3953 cobc/parser.y:4235 cobc/parser.y:4281 cobc/parser.y:4394 -#: cobc/parser.y:4608 cobc/parser.y:4705 cobc/parser.y:4744 cobc/parser.y:4803 -#: cobc/parser.y:4824 cobc/parser.y:4867 cobc/parser.y:4946 cobc/parser.y:4965 -#: cobc/parser.y:4981 cobc/parser.y:4999 cobc/parser.y:5017 cobc/parser.y:5034 -#: cobc/parser.y:5052 cobc/parser.y:7404 cobc/parser.y:8628 +#: cobc/parser.y:4192 cobc/parser.y:4471 cobc/parser.y:4517 cobc/parser.y:4632 +#: cobc/parser.y:4846 cobc/parser.y:4943 cobc/parser.y:4982 cobc/parser.y:5041 +#: cobc/parser.y:5062 cobc/parser.y:5105 cobc/parser.y:5184 cobc/parser.y:5203 +#: cobc/parser.y:5219 cobc/parser.y:5237 cobc/parser.y:5255 cobc/parser.y:5272 +#: cobc/parser.y:5290 cobc/parser.y:7685 cobc/parser.y:9028 #, c-format msgid "%s not allowed in nested programs" msgstr "%s pas permis dans des programmes imbriqués" -#: cobc/parser.y:4109 +#: cobc/parser.y:4345 msgid "segment-number must be in range of values 1 to 49" msgstr "segment-number doit être dans l'intervalle de valeurs 1 à 49" -#: cobc/parser.y:4121 +#: cobc/parser.y:4357 msgid "duplicate CLASSIFICATION clause" msgstr "clause CLASSIFICATION dupliquée" -#: cobc/parser.y:4200 +#: cobc/parser.y:4436 msgid "PROGRAM phrase" msgstr "phrase PROGRAM" -#: cobc/parser.y:4302 cobc/parser.y:4313 cobc/parser.y:4657 +#: cobc/parser.y:4538 cobc/parser.y:4549 cobc/parser.y:4895 #, c-format msgid "invalid %s clause" msgstr "clause %s invalide" -#: cobc/parser.y:4616 cobc/parser.y:4754 +#: cobc/parser.y:4854 cobc/parser.y:4992 msgid "type does not match alphabet" msgstr "le type ne correspond pas à l'alphabet" -#: cobc/parser.y:4760 +#: cobc/parser.y:4998 msgid "CLASS IS integer IN alphabet-name" msgstr "entier CLASS IS dans nom-alphabet" -#: cobc/parser.y:4780 cobc/parser.y:4784 +#: cobc/parser.y:5018 cobc/parser.y:5022 msgid "CLASS literal with THRU must have size 1" msgstr "un littéral CLASS avec THRU doit avoir une taille 1" -#: cobc/parser.y:4879 +#: cobc/parser.y:5117 msgid "separate currency symbol and currency string" msgstr "sépare le symbole monétaire et la chaîne monétaire" -#: cobc/parser.y:4912 +#: cobc/parser.y:5150 #, c-format msgid "invalid CURRENCY SIGN '%s'" msgstr "CURRENCY SIGN « %s » invalide" -#: cobc/parser.y:5139 +#: cobc/parser.y:5377 msgid "cannot use RELATIVE KEY clause on INDEXED files" msgstr "impossible d'utiliser la clause RELATIVE KEY sur des fichiers INDEXED" -#: cobc/parser.y:5143 +#: cobc/parser.y:5381 msgid "cannot use RECORD KEY clause on RELATIVE files" msgstr "impossible d'utiliser la clause RECORD KEY sur des fichiers RELATIVE" -#: cobc/parser.y:5215 +#: cobc/parser.y:5453 msgid "EXTERNAL/DYNAMIC cannot be used with literals" msgstr "EXTERNAL/DYNAMIC ne peut pas être utilisé avec des littéraux" -#: cobc/parser.y:5235 +#: cobc/parser.y:5473 msgid "EXTERNAL/DYNAMIC cannot be used with USING/VARYING" msgstr "EXTERNAL/DYNAMIC ne peut pas être utilisé avec USING/VARYING" -#: cobc/parser.y:5246 +#: cobc/parser.y:5484 msgid "EXTERNAL/DYNAMIC cannot be used with DISK FROM" msgstr "EXTERNAL/DYNAMIC ne peut pas être utilisé avec DISK FROM" -#: cobc/parser.y:5248 -msgid "ASSIGN DISK FROM" -msgstr "ASSIGN DISK FROM" - -#: cobc/parser.y:5370 +#: cobc/parser.y:5608 msgid "ASSIGN EXTERNAL/DYNAMIC" msgstr "ASSIGN EXTERNAL/DYNAMIC" -#: cobc/parser.y:5486 cobc/parser.y:5666 +#: cobc/parser.y:5724 cobc/parser.y:5921 #, c-format msgid "%s only valid with ORGANIZATION %s" msgstr "%s uniquement valide avec ORGANIZATION %s" -#: cobc/parser.y:5583 +#: cobc/parser.y:5818 cobc/typeck.c:3818 #, c-format msgid "'%s' is not an alphabet-name" msgstr "« %s » n'est pas un nom alphabet" -#: cobc/parser.y:5599 +#: cobc/parser.y:5854 msgid "VSAM status" msgstr "statut VSAM" -#: cobc/parser.y:5733 cobc/parser.y:5758 +#: cobc/parser.y:5988 cobc/parser.y:6013 #, c-format msgid "RECORD DELIMITER %s only allowed with SEQUENTIAL files" msgstr "RECORD DELIMITER %s uniquement permis avec des fichiers SEQUENTIAL" -#: cobc/parser.y:5745 +#: cobc/parser.y:6000 #, c-format msgid "RECORD DELIMITER %s only allowed with (LINE) SEQUENTIAL files" msgstr "RECORD DELIMITER %s uniquement permis avec des fichiers (LINE) SEQUENTIAL" -#: cobc/parser.y:5751 +#: cobc/parser.y:6006 msgid "LINE-SEQUENTIAL phrase" msgstr "phrase LINE-SEQUENTIAL" -#: cobc/parser.y:5764 +#: cobc/parser.y:6019 msgid "BINARY-SEQUENTIAL phrase" msgstr "phrase BINARY-SEQUENTIAL" -#: cobc/parser.y:5772 +#: cobc/parser.y:6027 msgid "RECORD DELIMITER clause only allowed with (LINE) SEQUENTIAL files" msgstr "la clause RECORD DELIMITER est uniquement permise avec des fichiers (LINE) SEQUENTIAL" -#: cobc/parser.y:5776 +#: cobc/parser.y:6031 #, c-format msgid "RECORD DELIMITER %s not recognized; will be ignored" msgstr "RECORD DELIMITER %s non reconnu ; sera ignoré" -#: cobc/parser.y:5814 +#: cobc/parser.y:6069 msgid "DUPLICATES for primary keys" msgstr "DUPLICATES pour des clés primaires" -#: cobc/parser.y:6058 +#: cobc/parser.y:6313 msgid "DOS/VS APPLY phrase" msgstr "phrase DOS/VS APPLY" -#: cobc/parser.y:6212 +#: cobc/parser.y:6467 msgid "RECORD description missing or invalid" msgstr "description RECORD manquante ou invalide" -#: cobc/parser.y:6239 +#: cobc/parser.y:6494 #, c-format msgid "duplicate file description for %s" msgstr "description de fichier dupliquée pour %s" -#: cobc/parser.y:6288 cobc/parser.y:6893 cobc/parser.y:7389 -#: cobc/parser.y:13485 cobc/parser.y:16686 +#: cobc/parser.y:6543 cobc/parser.y:7170 cobc/parser.y:7670 cobc/parser.y:13913 +#: cobc/parser.y:17210 #, c-format msgid "%s is invalid in a user FUNCTION" msgstr "%s est invalide dans une FUNCTION utilisateur" -#: cobc/parser.y:6326 cobc/parser.y:6336 +#: cobc/parser.y:6581 cobc/parser.y:6591 msgid "RECORD clause ignored for LINE SEQUENTIAL" msgstr "clause RECORD ignorée pour LINE SEQUENTIAL" -#: cobc/parser.y:6433 +#: cobc/parser.y:6688 msgid "LINAGE clause with wrong file type" msgstr "clause LINAGE avec un mauvais type de fichier" -#: cobc/parser.y:6495 +#: cobc/parser.y:6750 msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgstr "RECORDING MODE U ou S peuvent uniquement être utilisés avec les fichiers RECORD SEQUENTIAL" -#: cobc/parser.y:6532 +#: cobc/parser.y:6787 #, c-format msgid "ignoring CODE-SET '%s'" msgstr "ignore CODE-SET « %s »" -#: cobc/parser.y:6541 +#: cobc/parser.y:6796 msgid "CODE-SET clause invalid for file type" msgstr "clause CODE-SET invalide pour le type de fichier" -#: cobc/parser.y:6562 +#: cobc/parser.y:6817 msgid "REPORT clause with wrong file type" msgstr "clause REPORT avec le mauvais type de fichier" -#: cobc/parser.y:6641 +#: cobc/parser.y:6899 msgid "CD record missing" msgstr "enregistrement CD manquant" -#: cobc/parser.y:7091 +#: cobc/parser.y:7372 msgid "CONSTANT item not at 01 level" msgstr "élément CONSTANT pas au niveau 01" -#: cobc/parser.y:7236 +#: cobc/parser.y:7517 msgid "REDEFINES clause not following entry-name" msgstr "la clause REDEFINES ne suit pas un nom d'entrée" -#: cobc/parser.y:7309 cobc/parser.y:7339 cobc/parser.y:7381 cobc/parser.y:7470 -#: cobc/parser.y:8233 +#: cobc/parser.y:7590 cobc/parser.y:7620 cobc/parser.y:7662 cobc/parser.y:7751 +#: cobc/parser.y:8606 #, c-format msgid "%s only allowed at 01/77 level" msgstr "%s uniquement autorisé au niveau 01/77" -#: cobc/parser.y:7312 cobc/parser.y:7341 cobc/parser.y:7383 cobc/parser.y:8235 -#: cobc/parser.y:8587 cobc/parser.y:8609 +#: cobc/parser.y:7593 cobc/parser.y:7622 cobc/parser.y:7664 cobc/parser.y:8608 +#: cobc/parser.y:8987 cobc/parser.y:9009 #, c-format msgid "%s requires a data name" msgstr "%s requiert un nom de donnée" -#: cobc/parser.y:7316 cobc/parser.y:7565 +#: cobc/parser.y:7597 cobc/parser.y:7846 #, c-format msgid "%s not allowed in %s" msgstr "%s n'est pas permis dans %s" -#: cobc/parser.y:7337 cobc/parser.y:7391 cobc/parser.y:8231 cobc/parser.y:8583 -#: cobc/parser.y:8607 +#: cobc/parser.y:7618 cobc/parser.y:7672 cobc/parser.y:8604 cobc/parser.y:8983 +#: cobc/parser.y:9007 #, c-format msgid "%s not allowed here" msgstr "%s pas permis ici" -#: cobc/parser.y:7528 +#: cobc/parser.y:7809 #, c-format msgid "%s requires DEPENDING clause" msgstr "%s requiert une clause DEPENDING" -#: cobc/parser.y:7544 +#: cobc/parser.y:7825 msgid "a locale-format PICTURE string must only consist of '9', '.', '+', 'Z' and the currency-sign" msgstr "une chaîne PICTURE au format internationalisable doit consister uniquement de « 9 », « . », « + », « Z » et le signe monétaire" -#: cobc/parser.y:7554 +#: cobc/parser.y:7835 msgid "DEPENDING clause needs either an OCCURS clause or a variable-length PICTURE" msgstr "la clause DEPENDING exige soit une clause OCCURS ou un PICTURE de longueur variable" -#: cobc/parser.y:7560 +#: cobc/parser.y:7841 msgid "only USAGE DISPLAY may specify a variable-length PICTURE" msgstr "seul USAGE DISPLAY peut spécifier un PICTURE de longueur variable" -#: cobc/parser.y:7610 cobc/typeck.c:4752 +#: cobc/parser.y:7893 cobc/typeck.c:4916 #, c-format msgid "'%s' is not a locale-name" msgstr "« %s » n'est pas un nom d'environnement linguistique" -#: cobc/parser.y:7656 +#: cobc/parser.y:7939 #, c-format msgid "'%s' is not a valid USAGE" msgstr "« %s » n'est pas USAGE valide" -#: cobc/parser.y:7661 +#: cobc/parser.y:7944 #, c-format msgid "unknown USAGE: %s" msgstr "USAGE inconnu : %s" -#: cobc/parser.y:7808 +#: cobc/parser.y:8139 #, c-format msgid "unknown HANDLE type: %s" msgstr "type inconnu pour HANDLE : %s" -#: cobc/parser.y:8082 +#: cobc/parser.y:8347 +#, fuzzy, c-format +#| msgid "'%s' is not USAGE DISPLAY" +msgid "'%s' is not USAGE UTF-8" +msgstr "« %s » n'est pas USAGE DISPLAY" + +#: cobc/parser.y:8448 msgid "INDEXED should follow ASCENDING/DESCENDING" msgstr "INDEXED devrait suivre ASCENDING/DESCENDING" -#: cobc/parser.y:8317 +#: cobc/parser.y:8658 cobc/parser.y:8660 +#, fuzzy, c-format +#| msgid "unexpected size: %d" +msgid "unexpected %s" +msgstr "taille inattendue : %d" + +#: cobc/parser.y:8709 msgid "amount of entries in FROM and TO must match" msgstr "le nombre d'entrées dans FROM et TO doit être le même" -#: cobc/parser.y:8326 +#: cobc/parser.y:8718 #, c-format msgid "entry in FROM (%d) must be <= entry in TO (%d)" msgstr "l'entrée dans FROM (%d) doit être <= à l'entrée dans TO (%d)" -#: cobc/parser.y:8585 +#: cobc/parser.y:8985 #, c-format msgid "%s only allowed at 01 level" msgstr "%s uniquement autorisé au niveau 01" -#: cobc/parser.y:8589 cobc/parser.y:8611 +#: cobc/parser.y:8989 cobc/parser.y:9011 #, c-format msgid "%s and %s combination not allowed" msgstr "la combinaison de %s et %s n'est pas autorisée" -#: cobc/parser.y:8723 +#: cobc/parser.y:9127 msgid "GLOBAL is not allowed with RD" msgstr "GLOBAL n'est pas permis avec RD" -#: cobc/parser.y:9247 +#: cobc/parser.y:9650 #, c-format msgid "%s is not valid for VARYING" msgstr "%s n'est pas valide pour VARYING" -#: cobc/parser.y:9283 +#: cobc/parser.y:9686 msgid "LINE with OCCURS is not supported" msgstr "LINE avec OCCURS n'est pas supporté" -#: cobc/parser.y:9323 +#: cobc/parser.y:9726 msgid "PLUS is not recommended with LEFT, RIGHT or CENTER" msgstr "PLUS n'est pas recommandé avec LEFT, RIGHT ou CENTER" -#: cobc/parser.y:9325 +#: cobc/parser.y:9728 msgid "PLUS is not allowed with LEFT, RIGHT or CENTER" msgstr "PLUS n'est pas permis avec LEFT, RIGHT ou CENTER" -#: cobc/parser.y:9363 +#: cobc/parser.y:9766 msgid "PLUS is ignored on first field of line" msgstr "PLUS est ignoré sur le premier champ de la ligne" -#: cobc/parser.y:9394 +#: cobc/parser.y:9797 msgid "invalid COLUMN integer; must be > 0" msgstr "entier invalide pour COLUMN ; doit être > 0" -#: cobc/parser.y:9396 +#: cobc/parser.y:9799 msgid "COLUMN numbers should increase" msgstr "les nombres de COLUMN doivent être croissants" -#: cobc/parser.y:9492 cobc/parser.y:9547 -msgid "INITIAL specified on non-input field" -msgstr "INITIAL spécifié sur un champ qui n'est pas une entrée" - -#: cobc/parser.y:9504 cobc/parser.y:9559 -msgid "relative LINE/COLUMN clause required with OCCURS" -msgstr "clause LINE/COLUMN relative requise avec OCCURS" - -#: cobc/parser.y:9661 cobc/parser.y:9665 +#: cobc/parser.y:9990 cobc/parser.y:9994 msgid "screen positions from data-item" msgstr "positions écran depuis un élément de donnée" -#: cobc/parser.y:9821 +#: cobc/parser.y:10153 #, c-format msgid "missing %s" msgstr "%s manquant" -#: cobc/parser.y:10508 +#: cobc/parser.y:10840 msgid "OCCURS screen items" msgstr "éléments d'écran OCCURS" -#: cobc/parser.y:10520 +#: cobc/parser.y:10852 msgid "GLOBAL screen items" msgstr "éléments d'écran GLOBAL" -#: cobc/parser.y:10571 +#: cobc/parser.y:10904 msgid "overriding convention specified in ENTRY-CONVENTION" msgstr "outrepasse la convention spécifiée dans ENTRY-CONVENTION" -#: cobc/parser.y:10586 +#: cobc/parser.y:10917 msgid "executable program requested but PROCEDURE/ENTRY has USING clause" msgstr "programme exécutable demandé mais PROCEDURE/ENTRY a la clause USING" -#: cobc/parser.y:10654 cobc/parser.y:10671 cobc/parser.y:12278 +#: cobc/parser.y:10987 cobc/parser.y:11004 cobc/parser.y:12667 #, c-format msgid "number of arguments exceeds maximum %d" msgstr "le nombre d'arguments dépasse le maximum %d" -#: cobc/parser.y:10663 +#: cobc/parser.y:10996 msgid "CHAINING invalid in user FUNCTION" msgstr "CHAINING invalide dans une FUNCTION utilisateur" -#: cobc/parser.y:10699 +#: cobc/parser.y:11032 msgid "ANY LENGTH items may only be BY REFERENCE formal parameters" msgstr "les éléments ANY LENGTH peuvent uniquement être des paramètres formels BY REFERENCE" -#: cobc/parser.y:10716 cobc/parser.y:12337 cobc/parser.y:12350 +#: cobc/parser.y:11049 cobc/parser.y:12728 cobc/parser.y:12741 #, c-format msgid "%s not allowed in CHAINED programs" msgstr "%s pas permis dans des programmes CHAINED" -#: cobc/parser.y:10718 +#: cobc/parser.y:11051 msgid "parameters passed BY VALUE" msgstr "paramètres passés BY VALUE" -#: cobc/parser.y:10733 cobc/parser.y:10742 cobc/parser.y:10750 -#: cobc/parser.y:10771 +#: cobc/parser.y:11066 cobc/parser.y:11075 cobc/parser.y:11083 +#: cobc/parser.y:11104 msgid "SIZE only allowed for BY VALUE items" msgstr "SIZE uniquement permis pour les éléments BY VALUE" -#: cobc/parser.y:10773 cobc/parser.y:10798 +#: cobc/parser.y:11106 cobc/parser.y:11131 msgid "invalid value for SIZE" msgstr "valeur invalide pour SIZE" -#: cobc/parser.y:10813 +#: cobc/parser.y:11146 msgid "MEMORY SIZE phrase in CALL statement" msgstr "phrase MEMORY SIZE dans l'instruction CALL" -#: cobc/parser.y:10825 +#: cobc/parser.y:11162 msgid "OPTIONAL only allowed for BY REFERENCE items" msgstr "OPTIONAL uniquement permis pour les éléments BY REFERENCE" -#: cobc/parser.y:10837 +#: cobc/parser.y:11177 msgid "RETURNING clause is required for a FUNCTION" msgstr "la clause RETURNING est requise pour une FUNCTION" -#: cobc/parser.y:10843 +#: cobc/parser.y:11183 msgid "RETURNING clause cannot be OMITTED for main program" msgstr "la clause RETURNING ne peut pas être OMITTED pour le programme principal" -#: cobc/parser.y:10846 +#: cobc/parser.y:11186 msgid "RETURNING clause cannot be OMITTED for a FUNCTION" msgstr "la clause RETURNING ne peut pas être OMITTED pour une FUNCTION" -#: cobc/parser.y:10859 +#: cobc/parser.y:11199 msgid "RETURNING item is not defined in LINKAGE SECTION" msgstr "RETURNING avec un élément n'est pas défini dans LINKAGE SECTION" -#: cobc/parser.y:10861 +#: cobc/parser.y:11201 msgid "RETURNING item must have level 01" msgstr "RETURNING un élément doit avoir le niveau 01" -#: cobc/parser.y:10863 +#: cobc/parser.y:11203 msgid "RETURNING item should not have OCCURS" msgstr "RETURNING un élément ne devrait pas avoir OCCURS" -#: cobc/parser.y:10867 +#: cobc/parser.y:11207 msgid "function RETURNING item may not be ANY LENGTH" msgstr "une fonction avec RETURNING d'un élément ne peut pas être ANY LENGTH" -#: cobc/parser.y:11080 +#: cobc/parser.y:11421 #, c-format msgid "'%s' is not a statement" msgstr "« %s » n'est pas une instruction" -#: cobc/parser.y:11083 +#: cobc/parser.y:11424 #, c-format msgid "unknown statement '%s'; it may exist in another dialect" msgstr "instruction « %s » inconnue; elle peut exister dans un autre dialecte" -#: cobc/parser.y:11087 +#: cobc/parser.y:11428 #, c-format msgid "unknown statement '%s'" msgstr "instruction « %s » inconnue" -#: cobc/parser.y:11105 +#: cobc/parser.y:11446 msgid "SECTION segment-number must be less than or equal to 99" msgstr "le numéro de segment de SECTION doit être inférieur ou égal à 99" -#: cobc/parser.y:11108 +#: cobc/parser.y:11449 msgid "SECTION segment-number in DECLARATIVES must be less than 50" msgstr "le numéro de segment dans SECTION dans DECLARATIVES doit être inférieur à 50" -#: cobc/parser.y:11116 +#: cobc/parser.y:11457 msgid "SECTION segment within DECLARATIVES" msgstr "segment SECTION dans DECLARATIVES" -#: cobc/parser.y:11313 cobc/parser.y:11448 +#: cobc/parser.y:11667 cobc/parser.y:11806 msgid "non-standard ACCEPT" msgstr "ACCEPT non standard" -#: cobc/parser.y:11325 +#: cobc/parser.y:11679 msgid "PROMPT clause" msgstr "clause PROMPT" -#: cobc/parser.y:11329 +#: cobc/parser.y:11683 msgid "SIZE IS clause" msgstr "clause SIZE IS" -#: cobc/parser.y:11549 cobc/parser.y:11842 +#: cobc/parser.y:11907 cobc/parser.y:12226 msgid "TIME-OUT or BEFORE TIME clauses" msgstr "clauses TIME-OUT ou BEFORE TIME" -#: cobc/parser.y:11575 cobc/parser.y:11591 cobc/parser.y:11606 +#: cobc/parser.y:11937 cobc/parser.y:11960 cobc/parser.y:11978 msgid "AT screen-location" msgstr "emplacement d'écran AT" -#: cobc/parser.y:11607 +#: cobc/parser.y:11979 msgid "LINE or COLUMN" msgstr "LINE ou COLUMN" -#: cobc/parser.y:11972 +#: cobc/parser.y:12358 msgid "ALLOCATE CHARACTERS requires RETURNING clause" msgstr "ALLOCATE CHARACTERS requiert une clause RETURNING" -#: cobc/parser.y:11987 cobc/parser.y:13289 +#: cobc/parser.y:12373 #, c-format msgid "ignoring %s phrase" msgstr "le phrase %s est ignorée" -#: cobc/parser.y:11989 +#: cobc/parser.y:12375 msgid "addressing mode should be either 24 or 31 bit" msgstr "le mode d'adressage doit être soit 24 ou 31 bits" -#: cobc/parser.y:12061 +#: cobc/parser.y:12446 msgid "CALL to own PROGRAM-ID" msgstr "appel CALL à son propre PROGRAM-ID" -#: cobc/parser.y:12062 +#: cobc/parser.y:12447 msgid "assuming RECURSIVE attribute" msgstr "suppose l'attribut RECURSIVE" -#: cobc/parser.y:12082 +#: cobc/parser.y:12467 msgid "STATIC CALL convention ignored because of ON EXCEPTION" msgstr "la convention de STATIC CALL est ignorée à cause de ON EXCEPTION" -#: cobc/parser.y:12091 +#: cobc/parser.y:12476 msgid "ON EXCEPTION ignored because of STATIC CALL" msgstr "ON EXCEPTION ignoré à cause de STATIC CALL" -#: cobc/parser.y:12205 cobc/typeck.c:13644 +#: cobc/parser.y:12594 cobc/typeck.c:14450 msgid "invalid mnemonic name" msgstr "nom de mnémonique invalide" -#: cobc/parser.y:12229 +#: cobc/parser.y:12618 msgid "id/literal ignored, using prototype name" msgstr "id/littéral ignoré, utilisation du nom de prototype" -#: cobc/parser.y:12235 +#: cobc/parser.y:12624 msgid "NESTED phrase is only valid with literal" msgstr "phrase NESTED est uniquement valide dans un littéral" -#: cobc/parser.y:12296 +#: cobc/parser.y:12685 #, c-format msgid "%s only allowed when arguments are passed %s" msgstr "%s uniquement permis quand les arguments sont passés avec %s" -#: cobc/parser.y:12385 +#: cobc/parser.y:12776 msgid "RETURNING item must have level 01 or 77" msgstr "un élément avec RETURNING doit avoir le niveau 01 ou 77" -#: cobc/parser.y:12389 +#: cobc/parser.y:12780 msgid "RETURNING item must be a LINKAGE SECTION item or have BASED clause" msgstr "un élément avec RETURNING doit être un élément de LINKAGE SECTION ou avoir une clause BASED" -#: cobc/parser.y:12423 cobc/parser.y:17409 cobc/parser.y:17464 +#: cobc/parser.y:12814 cobc/parser.y:17937 cobc/parser.y:18000 msgid "NOT EXCEPTION before EXCEPTION" msgstr "NOT EXCEPTION avant EXCEPTION" -#: cobc/parser.y:13162 +#: cobc/parser.y:13572 #, c-format msgid "HANDLE must be a %s HANDLE" msgstr "HANDLE doit être un %s HANDLE" -#: cobc/parser.y:13174 +#: cobc/parser.y:13584 msgid "HANDLE must be a generic HANDLE" msgstr "HANDLE doit être un HANDLE générique" -#: cobc/parser.y:13251 +#: cobc/parser.y:13661 #, c-format msgid "HANDLE clause invalid for %s" msgstr "clause HANDLE invalide pour %s" -#: cobc/parser.y:13483 cobc/parser.y:16876 +#: cobc/parser.y:13911 cobc/parser.y:17400 #, c-format msgid "%s is invalid in nested program" msgstr "%s est invalide dans un programme imbriqué" -#: cobc/parser.y:13521 cobc/parser.y:13564 cobc/parser.y:13575 -#: cobc/parser.y:13586 +#: cobc/parser.y:13940 cobc/parser.y:13983 cobc/parser.y:13994 +#: cobc/parser.y:14005 #, c-format msgid "maximum evaluate depth exceeded (%d)" msgstr "profondeur évaluée maximum dépassée (%d)" -#: cobc/parser.y:13627 cobc/parser.y:13637 +#: cobc/parser.y:14048 cobc/parser.y:14089 cobc/parser.y:14633 +#: cobc/parser.y:14644 cobc/parser.y:14653 cobc/parser.y:17959 +#: cobc/parser.y:17981 cobc/parser.y:18022 cobc/parser.y:18038 +#: cobc/parser.y:18078 cobc/parser.y:18095 cobc/parser.y:18132 +#: cobc/parser.y:18149 cobc/parser.y:18199 cobc/parser.y:18216 +#: cobc/parser.y:18252 cobc/parser.y:18269 cobc/parser.y:18310 +#: cobc/parser.y:18327 +#, fuzzy, c-format +#| msgid "IF without imperative statement" +msgid "%s without imperative statement" +msgstr "IF sans instruction impérative" + +#: cobc/parser.y:14056 cobc/parser.y:14066 msgid "WHEN without imperative statement" msgstr "WHEN sans instruction impérative" -#: cobc/parser.y:13655 cobc/parser.y:13665 +#: cobc/parser.y:14097 cobc/parser.y:14107 msgid "WHEN OTHER without imperative statement" msgstr "WHEN OTHER sans instruction impérative" -#: cobc/parser.y:13745 +#: cobc/parser.y:14191 msgid "invalid THROUGH usage" msgstr "utilisation de THROUGH invalide" -#: cobc/parser.y:13909 +#: cobc/parser.y:14372 msgid "EXIT PROGRAM is not allowed within a USE GLOBAL procedure" msgstr "EXIT PROGRAM n'est pas permis dans une procédure USE GLOBAL" -#: cobc/parser.y:13913 +#: cobc/parser.y:14376 msgid "EXIT PROGRAM not allowed within a FUNCTION" msgstr "EXIT PROGRAM n'est pas permis dans une FUNCTION" -#: cobc/parser.y:13927 +#: cobc/parser.y:14390 msgid "EXIT FUNCTION is not allowed within a USE GLOBAL procedure" msgstr "EXIT FUNCTION n'est pas permis dans une procédure USE GLOBAL" -#: cobc/parser.y:13931 +#: cobc/parser.y:14394 msgid "EXIT FUNCTION only allowed within a FUNCTION" msgstr "EXIT FUNCTION uniquement permis dans une FUNCTION" -#: cobc/parser.y:13945 cobc/parser.y:13968 +#: cobc/parser.y:14408 cobc/parser.y:14431 msgid "EXIT PERFORM is only valid with inline PERFORM" msgstr "EXIT PERFORM est uniquement valide dans un PERFORM en ligne" -#: cobc/parser.y:13990 +#: cobc/parser.y:14453 msgid "EXIT SECTION is only valid with an active SECTION" msgstr "EXIT SECTION est uniquement valide dans une SECTION active" -#: cobc/parser.y:14011 +#: cobc/parser.y:14474 msgid "EXIT PARAGRAPH is only valid with an active PARAGRAPH" msgstr "EXIT PARAGRAPH est uniquement valide dans un PARAGRAPH actif" -#: cobc/parser.y:14034 +#: cobc/parser.y:14497 msgid "RETURNING/GIVING not allowed for non-returning runtime elements" msgstr "RETURNING/GIVING pas permis éléments exécutés qui ne retournent pas" -#: cobc/parser.y:14166 +#: cobc/parser.y:14640 msgid "IF without imperative statement" msgstr "IF sans instruction impérative" -#: cobc/parser.y:14497 cobc/parser.y:14506 +#: cobc/parser.y:14983 cobc/parser.y:14992 msgid "single-character literal or data item expected" msgstr "littéral sur un caractère ou élément de donnée attendu" -#: cobc/parser.y:14524 +#: cobc/parser.y:15010 msgid "TALLYING clause is incomplete" msgstr "la clause TALLYING est incomplète" -#: cobc/parser.y:14640 +#: cobc/parser.y:15126 msgid "INSPECT missing ALL/FIRST/LEADING/TRAILING" msgstr "il manque ALL/FIRST/LEADING/TRAILING dans INSPECT" -#: cobc/parser.y:14902 +#: cobc/parser.y:15390 msgid "LOCK clauses" msgstr "clauses LOCK" -#: cobc/parser.y:15059 +#: cobc/parser.y:15547 msgid "inline PERFORM without imperative statement" msgstr "PERFORM en-ligne sans instruction impérative" -#: cobc/parser.y:15180 cobc/parser.y:15188 cobc/parser.y:15196 +#: cobc/parser.y:15670 cobc/parser.y:15678 cobc/parser.y:15686 #, c-format msgid "PERFORM VARYING '%s' (line %d of %s) is not a numeric field" msgstr "PERFORM VARYING « %s » (ligne %d de %s) n'est pas un champ numérique" -#: cobc/parser.y:15212 +#: cobc/parser.y:15702 msgid "PERFORM VARYING without BY phrase" msgstr "PERFORM VARYING sans phrase BY" -#: cobc/parser.y:15252 +#: cobc/parser.y:15742 #, c-format msgid "'%s' is not an object-reference" msgstr "« %s » n'est pas une référence à un objet" -#: cobc/parser.y:15292 cobc/typeck.c:12295 cobc/typeck.c:13552 +#: cobc/parser.y:15782 cobc/typeck.c:13066 cobc/typeck.c:14358 msgid "LOCK clause invalid with file LOCK AUTOMATIC" msgstr "clause LOCK invalide avec un fichier LOCK AUTOMATIC" -#: cobc/parser.y:15297 +#: cobc/parser.y:15787 msgid "KEY clause invalid with this file type" msgstr "clause KEY invalide dans ce type de fichier" -#: cobc/parser.y:15302 cobc/typeck.c:12291 cobc/typeck.c:13548 +#: cobc/parser.y:15792 cobc/typeck.c:13062 cobc/typeck.c:14354 msgid "INVALID KEY clause invalid with this file type" msgstr "clause INVALID KEY invalide avec ce type de fichier" -#: cobc/parser.y:15986 -msgid "file sort requires KEY phrase" -msgstr "le tri du fichier requiert la phrase KEY" +#: cobc/parser.y:16494 +#, fuzzy +#| msgid "SEARCH ALL requires KEY phrase" +msgid "MERGE requires KEY phrase" +msgstr "SEARCH ALL requiert la phrase KEY" -#: cobc/parser.y:16010 +#: cobc/parser.y:16498 +#, fuzzy +#| msgid "table SORT requires KEY phrase" +msgid "file SORT requires KEY phrase" +msgstr "le tri de la table requiert la phrase KEY" + +#: cobc/parser.y:16522 msgid "table SORT requires KEY phrase" msgstr "le tri de la table requiert la phrase KEY" -#: cobc/parser.y:16072 -msgid "file sort requires USING or INPUT PROCEDURE" +#: cobc/parser.y:16527 +#, fuzzy +#| msgid "%s must be an integer" +msgid "must be an SD filename" +msgstr "%s doit être un entier" + +#: cobc/parser.y:16585 +msgid "MERGE requires USING files" +msgstr "" + +#: cobc/parser.y:16587 +#, fuzzy +#| msgid "file sort requires USING or INPUT PROCEDURE" +msgid "file SORT requires USING or INPUT PROCEDURE" msgstr "le tri d'un fichier requiert USING ou INPUT PROCEDURE" -#: cobc/parser.y:16079 +#: cobc/parser.y:16595 msgid "USING invalid with table SORT" msgstr "USING invalide avec SORT sur une table" -#: cobc/parser.y:16089 +#: cobc/parser.y:16605 msgid "INPUT PROCEDURE invalid with table SORT" msgstr "INPUT PROCEDURE invalide avec SORT sur une table" -#: cobc/parser.y:16091 +#: cobc/parser.y:16607 msgid "INPUT PROCEDURE invalid with MERGE" msgstr "INPUT PROCEDURE invalide avec MERGE" -#: cobc/parser.y:16104 -msgid "file sort requires GIVING or OUTPUT PROCEDURE" +#: cobc/parser.y:16621 +#, fuzzy +#| msgid "file sort requires GIVING or OUTPUT PROCEDURE" +msgid "MERGE requires GIVING or OUTPUT PROCEDURE" msgstr "le tri d'un fichier requiert GIVING ou OUTPUT PROCEDURE" -#: cobc/parser.y:16111 +#: cobc/parser.y:16623 +#, fuzzy +#| msgid "file sort requires GIVING or OUTPUT PROCEDURE" +msgid "file SORT requires GIVING or OUTPUT PROCEDURE" +msgstr "le tri d'un fichier requiert GIVING ou OUTPUT PROCEDURE" + +#: cobc/parser.y:16631 msgid "GIVING invalid with table SORT" msgstr "GIVING invalide avec SORT sur une table" -#: cobc/parser.y:16121 +#: cobc/parser.y:16641 msgid "OUTPUT PROCEDURE invalid with table SORT" msgstr "OUTPUT PROCEDURE invalide avec SORT sur une table" -#: cobc/parser.y:16148 +#: cobc/parser.y:16668 msgid "SIZE/LENGTH invalid here" msgstr "SIZE/LENGTH invalide ici" -#: cobc/parser.y:16197 +#: cobc/parser.y:16717 msgid "NOT EQUAL condition not allowed on START statement" msgstr "condition NOT EQUAL pas permise sur une instruction START" -#: cobc/parser.y:16255 +#: cobc/parser.y:16776 #, c-format msgid "%s is replaced by %s" msgstr "%s est remplacé par %s" -#: cobc/parser.y:16304 +#: cobc/parser.y:16825 msgid "STOP literal" msgstr "littéral STOP" -#: cobc/parser.y:16308 +#: cobc/parser.y:16829 msgid "STOP identifier" msgstr "identificateur STOP" -#: cobc/parser.y:16446 +#: cobc/parser.y:16969 msgid "SUPPRESS statement must be within DECLARATIVES" msgstr "une instruction SUPPRESS doit être entre DECLARATIVES" -#: cobc/parser.y:16520 -msgid "UNLOCK invalid for SORT files" +#: cobc/parser.y:17043 +#, fuzzy +#| msgid "UNLOCK invalid for SORT files" +msgid "UNLOCK invalid for SD files" msgstr "UNLOCK invalide pour des fichiers avec SORT" -#: cobc/parser.y:16656 cobc/parser.y:16736 +#: cobc/parser.y:17180 cobc/parser.y:17260 msgid "USE statement must be within DECLARATIVES" msgstr "l'instruction USE doit être entre DECLARATIVES" -#: cobc/parser.y:16658 +#: cobc/parser.y:17182 msgid "SECTION header missing before USE statement" msgstr "en-tête de SECTION manquant avant l'instruction USE" -#: cobc/parser.y:16738 +#: cobc/parser.y:17262 msgid "USE DEBUGGING not supported in contained program" msgstr "USE DEBUGGING pas supporté dans le programme contenu" -#: cobc/parser.y:16786 cobc/parser.y:16795 cobc/parser.y:16813 -#: cobc/parser.y:16849 cobc/typeck.c:4886 +#: cobc/parser.y:17310 cobc/parser.y:17319 cobc/parser.y:17337 +#: cobc/parser.y:17373 cobc/typeck.c:5050 #, c-format msgid "duplicate DEBUGGING target: '%s'" msgstr "cible DEBUGGING dupliquée : « %s »" -#: cobc/parser.y:16811 +#: cobc/parser.y:17335 msgid "constant item cannot be used here" msgstr "l'élément constant ne peut pas être utilisé ici" -#: cobc/parser.y:16837 +#: cobc/parser.y:17361 msgid "duplicate USE DEBUGGING ON ALL PROCEDURES" msgstr "USE DEBUGGING ON ALL PROCEDURES dupliqué" -#: cobc/parser.y:17089 +#: cobc/parser.y:17614 msgid "ENCODING clause must come before XML-DECLARATION" msgstr "la clause ENCODING doit venir avant XML-DECLARATION" -#: cobc/parser.y:17091 +#: cobc/parser.y:17616 msgid "ENCODING clause must come before ATTRIBUTES" msgstr "la clause ENCODING doit venir avant ATTRIBUTES" -#: cobc/parser.y:17094 +#: cobc/parser.y:17619 msgid "XML GENERATE ENCODING clause" msgstr "clause XML GENERATE ENCODING" -#: cobc/parser.y:17101 +#: cobc/parser.y:17626 msgid "XML-DECLARATION clause must come before ATTRIBUTES" msgstr "la clause XML-DECLARATION doit venir avant ATTRIBUTES" -#: cobc/parser.y:17104 +#: cobc/parser.y:17629 msgid "XML GENERATE XML-DECLARATION clause" msgstr "clause XML GENERATE XML-DECLARATION" -#: cobc/parser.y:17110 +#: cobc/parser.y:17635 msgid "XML GENERATE WITH ATTRIBUTES clause" msgstr "clause XML GENERATE WITH ATTRIBUTES" -#: cobc/parser.y:17123 +#: cobc/parser.y:17648 msgid "XML GENERATE NAMESPACE clause" msgstr "clause XML GENERATE NAMESPACE" -#: cobc/parser.y:17147 +#: cobc/parser.y:17672 msgid "XML GENERATE NAME OF clause" msgstr "clause XML GENERATE NAME OF" -#: cobc/parser.y:17211 +#: cobc/parser.y:17736 msgid "XML GENERATE TYPE OF clause" msgstr "clause XML GENERATE TYPE OF" -#: cobc/parser.y:17252 +#: cobc/parser.y:17777 msgid "XML GENERATE SUPPRESS clause" msgstr "clause XML GENERATE SUPPRESS" -#: cobc/parser.y:17392 +#: cobc/parser.y:17920 #, c-format msgid "'%s' is not a schema name" msgstr "« %s » n'est pas un nom de schéma" -#: cobc/parser.y:17510 +#: cobc/parser.y:18055 msgid "NOT SIZE ERROR before SIZE ERROR" msgstr "NOT SIZE ERROR avant SIZE ERROR" -#: cobc/parser.y:17556 +#: cobc/parser.y:18109 msgid "NOT OVERFLOW before OVERFLOW" msgstr "NOT OVERFLOW avant OVERFLOW" -#: cobc/parser.y:17655 +#: cobc/parser.y:18161 cobc/parser.y:18176 +#, fuzzy +#| msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" +msgid "NOT AT END before AT END" +msgstr "NOT AT END-OF-PAGE avant AT END-OF-PAGE" + +#: cobc/parser.y:18229 msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" msgstr "NOT AT END-OF-PAGE avant AT END-OF-PAGE" -#: cobc/parser.y:17705 +#: cobc/parser.y:18287 msgid "NOT INVALID KEY before INVALID KEY" msgstr "NOT INVALID KEY avant INVALID KEY" -#: cobc/parser.y:18048 +#: cobc/parser.y:18644 msgid "LINAGE-COUNTER must be qualified here" msgstr "LINAGE-COUNTER doit être qualifié ici" -#: cobc/parser.y:18051 +#: cobc/parser.y:18647 msgid "invalid LINAGE-COUNTER usage" msgstr "utilisation de LINAGE-COUNTER invalide" -#: cobc/parser.y:18062 cobc/parser.y:18158 cobc/parser.y:18247 +#: cobc/parser.y:18658 cobc/parser.y:18754 cobc/parser.y:18843 #, c-format msgid "'%s' is not a file name" msgstr "« %s » n'est pas un nom de fichier" -#: cobc/parser.y:18072 +#: cobc/parser.y:18668 msgid "LINE-COUNTER must be qualified here" msgstr "LINE-COUNTER doit être qualifié ici" -#: cobc/parser.y:18076 +#: cobc/parser.y:18672 msgid "invalid LINE-COUNTER usage" msgstr "utilisation de LINE-COUNTER invalide" -#: cobc/parser.y:18087 cobc/parser.y:18112 +#: cobc/parser.y:18683 cobc/parser.y:18708 #, c-format msgid "'%s' is not a report name" msgstr "« %s » n'est pas un nom de rapport" -#: cobc/parser.y:18097 +#: cobc/parser.y:18693 msgid "PAGE-COUNTER must be qualified here" msgstr "PAGE-COUNTER doit être qualifié ici" -#: cobc/parser.y:18101 +#: cobc/parser.y:18697 msgid "invalid PAGE-COUNTER usage" msgstr "utilisation de PAGE-COUNTER invalide" -#: cobc/parser.y:18148 cobc/typeck.c:12256 cobc/typeck.c:12339 -#: cobc/typeck.c:13516 +#: cobc/parser.y:18744 cobc/typeck.c:13027 cobc/typeck.c:13110 +#: cobc/typeck.c:14322 #, c-format msgid "%s requires a record name as subject" msgstr "%s requiert un nom d'enregistrement comme sujet" -#: cobc/parser.y:18175 +#: cobc/parser.y:18771 #, c-format msgid "'%s' not indexed" msgstr "« %s » pas indexé" -#: cobc/parser.y:18180 +#: cobc/parser.y:18776 msgid "SEARCH ALL requires KEY phrase" msgstr "SEARCH ALL requiert la phrase KEY" -#: cobc/parser.y:18204 cobc/parser.y:18229 +#: cobc/parser.y:18800 cobc/parser.y:18825 #, c-format msgid "multiple reference to '%s' " msgstr "références multiples à « %s » " -#: cobc/parser.y:18259 +#: cobc/parser.y:18855 #, c-format msgid "'%s' is not a CD name" msgstr "« %s » n'est pas un nom CD" -#: cobc/parser.y:18273 +#: cobc/parser.y:18869 #, c-format msgid "'%s' is not a valid report name" msgstr "« %s » n'est pas un nom de rapport valide" -#: cobc/parser.y:18526 +#: cobc/parser.y:19134 msgid "invalid mnemonic identifier" msgstr "identificateur de mnémonique invalide" -#: cobc/parser.y:18606 +#: cobc/parser.y:19214 +#, fuzzy +#| msgid "a numeric literal is expected here" +msgid "an alphanumeric literal is expected here" +msgstr "un littéral numérique est attendu ici" + +#: cobc/parser.y:19226 msgid "a numeric literal is expected here" msgstr "un littéral numérique est attendu ici" -#: cobc/parser.y:18618 cobc/parser.y:19366 +#: cobc/parser.y:19238 cobc/parser.y:19979 msgid "a non-numeric literal is expected here" msgstr "un littéral non numérique est attendu ici" -#: cobc/parser.y:18784 cobc/typeck.c:7302 cobc/typeck.c:7309 +#: cobc/parser.y:19404 cobc/typeck.c:993 cobc/typeck.c:4825 cobc/typeck.c:7679 +#: cobc/typeck.c:7686 #, c-format msgid "'%s' is not numeric" msgstr "« %s » n'est pas numérique" -#: cobc/parser.y:18800 +#: cobc/parser.y:19420 #, c-format msgid "'%s' is not a field or file" msgstr "« %s » n'est pas un champ ou un fichier" -#: cobc/parser.y:18820 cobc/parser.y:18859 cobc/parser.y:18935 -#, c-format -msgid "'%s' is not a field" -msgstr "« %s » n'est pas un champ" - -#: cobc/parser.y:18841 +#: cobc/parser.y:19446 #, c-format msgid "'%s' is not a type-name" msgstr "« %s » n'est pas un nom de type" -#: cobc/parser.y:18927 cobc/typeck.c:2328 cobc/typeck.c:2407 +#: cobc/parser.y:19526 cobc/typeck.c:2345 cobc/typeck.c:2401 cobc/typeck.c:2550 #, c-format msgid "'%s' cannot be reference modified" msgstr "« %s » ne peut pas être modifié par référence" -#: cobc/parser.y:19015 +#: cobc/parser.y:19627 #, c-format msgid "'%s' is not a field or alphabet" msgstr "« %s » n'est pas un champ ou un alphabet" -#: cobc/parser.y:19041 +#: cobc/parser.y:19653 msgid "a subscripted data-item cannot be used here" msgstr "un élément de donnée avec indice ne peut pas être utilisé ici" -#: cobc/parser.y:19089 +#: cobc/parser.y:19701 msgid "unsigned integer value expected" msgstr "valeur entière non signée attendue" -#: cobc/parser.y:19101 cobc/parser.y:19105 cobc/parser.y:19155 +#: cobc/parser.y:19713 cobc/parser.y:19717 cobc/parser.y:19767 msgid "integer value expected" msgstr "valeur entière attendue" -#: cobc/parser.y:19110 +#: cobc/parser.y:19722 msgid "invalid symbolic integer" msgstr "entier symbolique invalide" -#: cobc/parser.y:19126 cobc/parser.y:19130 +#: cobc/parser.y:19738 cobc/parser.y:19742 msgid "unsigned positive integer value expected" msgstr "valeur entière positive non signée attendue" -#: cobc/parser.y:19159 -msgid "invalid CLASS value" -msgstr "valeur CLASS invalide" +#: cobc/parser.y:19772 +#, c-format +msgid "CLASS value %d outside of range for the used character set" +msgstr "" -#: cobc/parser.y:19246 +#: cobc/parser.y:19859 msgid "PHYSICAL argument for LENGTH functions" msgstr "argument PHYSICAL pour les fonctions LENGTH" -#: cobc/parser.y:19418 cobc/parser.y:19435 +#: cobc/parser.y:20031 cobc/parser.y:20048 msgid "cannot specify offset and SYSTEM-OFFSET at the same time" msgstr "ne peut spécifier le décalage et SYSTEM-OFFSET en même temps" -#: cobc/parser.y:19702 cobc/parser.y:19711 cobc/parser.y:19721 -#: cobc/parser.y:19731 cobc/parser.y:19751 cobc/parser.y:19771 -#: cobc/parser.y:19777 +#: cobc/parser.y:20228 +#, fuzzy +#| msgid "termination" +msgid "terminator" +msgstr "fin" + +#: cobc/parser.y:20317 cobc/parser.y:20327 cobc/parser.y:20338 +#: cobc/parser.y:20348 cobc/parser.y:20369 cobc/parser.y:20389 +#: cobc/parser.y:20396 msgid "optional period" msgstr "point optionnel" -#: cobc/pplex.l:257 cobc/pplex.l:2219 cobc/pplex.l:2233 +#: cobc/pplex.l:261 cobc/pplex.l:2448 cobc/pplex.l:2462 msgid "debugging indicator" msgstr "indicateur de débogage" -#: cobc/pplex.l:334 +#: cobc/pplex.l:348 msgid "ignoring empty directive" msgstr "directive vide ignorée" -#: cobc/pplex.l:344 cobc/pplex.l:411 +#: cobc/pplex.l:358 cobc/pplex.l:431 #, c-format msgid "ignoring invalid directive: '%s'" msgstr "directive invalide ignorée : « %s »" -#: cobc/pplex.l:351 +#: cobc/pplex.l:365 msgid "ignoring invalid directive" msgstr "directive invalide ignorée" -#: cobc/pplex.l:358 +#: cobc/pplex.l:372 msgid "VCS directive" msgstr "directive VCS" -#: cobc/pplex.l:420 cobc/pplex.l:441 +#: cobc/pplex.l:440 cobc/pplex.l:461 #, c-format msgid "ignoring unknown directive: '%s'" msgstr "directive inconnue ignorée : « %s »" -#: cobc/pplex.l:1065 +#: cobc/pplex.l:1164 msgid "IF/ELIF/ELSE directive without matching END-IF" msgstr "directive IF/ELIF/ELSE sans END-IF correspondant" -#: cobc/pplex.l:1409 +#: cobc/pplex.l:1332 +msgid "free format detected" +msgstr "" + +#: cobc/pplex.l:1608 #, c-format msgid "copybook not found in library '%s', library-name ignored" msgstr "copybook pas trouvé dans la bibliothèque « %s », le nom de la bibliothèque est ignoré" -#: cobc/pplex.l:1469 +#: cobc/pplex.l:1667 #, c-format msgid "ignoring %s directive because of %s" msgstr "directive %s ignorée à cause de %s" -#: cobc/pplex.l:1645 +#: cobc/pplex.l:1854 #, c-format msgid "directive nest depth exceeded: %d" msgstr "profondeur d'imbrication des directives dépassée : %d" -#: cobc/pplex.l:1663 +#: cobc/pplex.l:1872 msgid "ELSE directive without matching IF/ELIF" msgstr "directive ELSE sans IF/ELIF correspondant" -#: cobc/pplex.l:1679 +#: cobc/pplex.l:1888 msgid "END-IF directive without matching IF/ELIF/ELSE" msgstr "directive END-IF sans IF/ELIF/ELSE correspondant" -#: cobc/pplex.l:1695 +#: cobc/pplex.l:1904 msgid "ELIF directive without matching IF/ELIF" msgstr "directive ELIF sans IF/ELIF correspondant" -#: cobc/pplex.l:1717 +#: cobc/pplex.l:1926 #, c-format msgid "invalid internal case: %u" msgstr "cas interne invalide : %u" -#: cobc/pplex.l:1914 +#: cobc/pplex.l:2139 msgid "buffer overrun - too many continuation lines" msgstr "débordement du tampon – trop de lignes de continuation" -#: cobc/pplex.l:2009 cobc/pplex.l:2019 +#: cobc/pplex.l:2236 cobc/pplex.l:2246 msgid "line not terminated by a newline" msgstr "ligne pas terminée par un saut de ligne" -#: cobc/pplex.l:2013 cobc/pplex.l:2023 +#: cobc/pplex.l:2240 cobc/pplex.l:2250 #, c-format msgid "source text exceeds %d bytes, will be truncated" msgstr "le texte source dépasse %d octets, il sera tronqué" -#: cobc/pplex.l:2042 +#: cobc/pplex.l:2269 msgid "version control conflict marker in file" msgstr "conflit de marqueur de contrôle de version dans le fichier" -#: cobc/pplex.l:2194 +#: cobc/pplex.l:2423 msgid "invalid continuation in comment entry" msgstr "continuation invalide dans une entrée commentaire" -#: cobc/pplex.l:2241 +#: cobc/pplex.l:2470 #, c-format msgid "invalid indicator '\\' at column %d" msgstr "indicateur « \\ » invalide à la colonne %d" -#: cobc/pplex.l:2253 +#: cobc/pplex.l:2482 #, c-format msgid "invalid indicator '%c' at column %d" msgstr "indicateur « %c » invalide à la colonne %d" -#: cobc/pplex.l:2312 cobc/pplex.l:2323 +#: cobc/pplex.l:2541 cobc/pplex.l:2552 msgid "invalid line continuation" msgstr "continuation de ligne invalide" -#: cobc/pplex.l:2331 +#: cobc/pplex.l:2560 msgid "continuation character expected" msgstr "caractère de continuation attendu" -#: cobc/pplex.l:2399 +#: cobc/pplex.l:2628 #, c-format msgid "source text after program-text area (column %d)" msgstr "texte source après la zone de texte de programme (colonne %d)" -#: cobc/ppparse.y:107 +#: cobc/ppparse.y:102 cobc/ppparse.y:106 +msgid "partial replacing with literal" +msgstr "partiel remplacé par un littéral" + +#: cobc/ppparse.y:109 msgid "unexpected COBOL word in partial replacement phrase" msgstr "mot COBOL inattendu dans la phrase de remplacement partiel" -#: cobc/ppparse.y:256 +#: cobc/ppparse.y:176 +#, fuzzy +#| msgid "partial replacing with literal" +msgid "invalid partial replacing operand" +msgstr "partiel remplacé par un littéral" + +#: cobc/ppparse.y:291 msgid "directive comparison on different types" msgstr "comparaison de directive sur des types différents" -#: cobc/ppparse.y:324 +#: cobc/ppparse.y:359 #, c-format msgid "duplicate DEFINE directive '%s'" msgstr "directive DEFINE « %s » dupliquée" -#: cobc/ppparse.y:331 cobc/ppparse.y:341 +#: cobc/ppparse.y:366 cobc/ppparse.y:376 #, c-format msgid "invalid constant %s in DEFINE directive" msgstr "constante %s invalide dans la directive DEFINE" -#: cobc/ppparse.y:439 +#: cobc/ppparse.y:474 #, c-format msgid "compiler flag '%s' unknown" msgstr "fanion du compilateur « %s » inconnu" -#: cobc/ppparse.y:486 +#: cobc/ppparse.y:521 #, c-format msgid "invalid %s directive option '%s'" msgstr "directive %s invalide avec l'option « %s »" -#: cobc/ppparse.y:488 +#: cobc/ppparse.y:523 #, c-format msgid "invalid %s directive option" msgstr "directive %s invalide dans l'option" -#: cobc/ppparse.y:839 cobc/ppparse.y:848 cobc/ppparse.y:1258 +#: cobc/ppparse.y:875 cobc/ppparse.y:884 cobc/ppparse.y:1294 #, c-format msgid "invalid %s directive" msgstr "directive %s invalide" -#: cobc/ppparse.y:1330 +#: cobc/ppparse.y:1366 msgid "LEAP-SECOND ON directive" msgstr "directive LEAP-SECOND ON" -#: cobc/ppparse.y:1439 cobc/ppparse.y:1471 +#: cobc/ppparse.y:1475 cobc/ppparse.y:1507 msgid "invalid constant" msgstr "constante invalide" -#: cobc/reserved.c:4012 +#: cobc/reserved.c:4029 msgid "device name" msgstr "nom de périphérique" -#: cobc/reserved.c:4015 +#: cobc/reserved.c:4032 msgid "switch name" msgstr "nom de commutateur" -#: cobc/reserved.c:4018 +#: cobc/reserved.c:4035 msgid "feature name" msgstr "nom de fonctionnalité" -#: cobc/reserved.c:4129 +#: cobc/reserved.c:4146 #, c-format msgid "reserved word (%s) must have less than %d characters" msgstr "le mot réservé (%s) doit avoir moins de %d caractères" -#: cobc/reserved.c:4149 +#: cobc/reserved.c:4166 #, c-format msgid "reserved word (%s) may not contain '%c'" msgstr "le mot réservé (%s) ne peut pas contenir « %c »" -#: cobc/reserved.c:4166 +#: cobc/reserved.c:4183 msgid "ignored asterisk at end of alias target" msgstr "astérisque ignoré à la fin de la cible du synonyme" -#: cobc/reserved.c:4229 +#: cobc/reserved.c:4248 #, c-format msgid "alias target '%s' is not a default reserved word" msgstr "la cible du synonyme « %s » n'est pas un mot réservé par défaut" -#: cobc/reserved.c:4719 +#: cobc/reserved.c:4738 #, c-format msgid "invalid system-name '%s'" msgstr "non système « %s » invalide" -#: cobc/reserved.c:4883 +#: cobc/reserved.c:4902 #, c-format msgid "'%s' is a reserved word, but isn't supported" msgstr "« %s » est un mot réservé mais n'est pas supporté" -#: cobc/reserved.c:4988 +#: cobc/reserved.c:5005 #, c-format msgid "intrinsic function %s is unknown" msgstr "la fonction intrinsèque %s est inconnue" -#: cobc/reserved.c:5016 +#: cobc/reserved.c:5033 msgid "Intrinsic Function" msgstr "Fonction Intrinsèque" -#: cobc/reserved.c:5016 cobc/reserved.c:5249 cobc/reserved.c:5386 +#: cobc/reserved.c:5033 cobc/reserved.c:5266 cobc/reserved.c:5403 msgid "Implemented" msgstr "Implémenté" -#: cobc/reserved.c:5016 cobc/typeck.c:1163 +#: cobc/reserved.c:5033 cobc/typeck.c:1178 msgid "Parameters" msgstr "Paramètres" -#: cobc/reserved.c:5020 cobc/reserved.c:5253 cobc/reserved.c:5400 -#: cobc/reserved.c:5406 +#: cobc/reserved.c:5037 cobc/reserved.c:5270 cobc/reserved.c:5417 +#: cobc/reserved.c:5423 msgid "Yes" msgstr "Oui" -#: cobc/reserved.c:5023 cobc/reserved.c:5256 cobc/reserved.c:5410 +#: cobc/reserved.c:5040 cobc/reserved.c:5273 cobc/reserved.c:5427 msgid "No" msgstr "Non" -#: cobc/reserved.c:5029 +#: cobc/reserved.c:5046 msgid "Unlimited" msgstr "Illimité" -#: cobc/reserved.c:5046 +#: cobc/reserved.c:5063 msgid "Exception Name" msgstr "Nom d'exception" -#: cobc/reserved.c:5148 +#: cobc/reserved.c:5165 #, c-format msgid "special register '%s' is unknown, needs a definition" msgstr "le registre spécial « %s » est inconnu, on a besoin d'une définition" -#: cobc/reserved.c:5155 +#: cobc/reserved.c:5172 #, c-format msgid "special register '%s' has a bad definition: %s" msgstr "le registre spécial « %s » a une mauvaise définition : %s" -#: cobc/reserved.c:5159 +#: cobc/reserved.c:5176 #, c-format msgid "special register '%s' is unknown" msgstr "le registre spécial « %s » est inconnu" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Internal registers" msgstr "Registres internes" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Definition" msgstr "Définition" -#: cobc/reserved.c:5337 +#: cobc/reserved.c:5354 #, c-format msgid "unknown system-name '%s'" msgstr "nom système « %s » inconnu" -#: cobc/reserved.c:5363 +#: cobc/reserved.c:5380 msgid "System names" msgstr "Noms systèmes" -#: cobc/reserved.c:5386 +#: cobc/reserved.c:5403 msgid "Reserved Words" msgstr "Mots Réservés" -#: cobc/reserved.c:5398 +#: cobc/reserved.c:5415 msgid "Yes (Context sensitive)" msgstr "Oui (Sensible au contexte)" -#: cobc/reserved.c:5408 +#: cobc/reserved.c:5425 msgid "No (Context sensitive)" msgstr "Non (Sensible au contexte)" -#: cobc/scanner.l:272 +#: cobc/scanner.l:281 #, c-format msgid "'%s' is not a reserved word, so cannot be removed" msgstr "« %s » n'est pas un mot réservé, donc, il ne peut pas être supprimé" -#: cobc/scanner.l:320 +#: cobc/scanner.l:329 msgid "separator period in Area A" msgstr "point comme séparateur dans Area A" -#: cobc/scanner.l:1067 +#: cobc/scanner.l:1096 #, c-format msgid "a constant may not be used here - '%s'" msgstr "une constante ne peut pas être utilisée ici – « %s »" -#: cobc/scanner.l:1137 +#: cobc/scanner.l:1170 msgid "ignoring redundant ." msgstr "ignore le redondant ." -#: cobc/scanner.l:1195 +#: cobc/scanner.l:1249 #, c-format msgid "invalid symbol '%s' - skipping word" msgstr "symbole « %s » invalide – passe outre le mot" -#: cobc/scanner.l:1289 +#: cobc/scanner.l:1323 msgid "invalid national literal" msgstr "littéral national invalide" -#: cobc/scanner.l:1293 cobc/tree.c:2800 +#: cobc/scanner.l:1327 cobc/tree.c:2822 #, c-format msgid "invalid literal: '%s'" msgstr "littéral invalide : « %s »" -#: cobc/scanner.l:1295 +#: cobc/scanner.l:1329 #, c-format msgid "invalid hexadecimal literal: '%s'" msgstr "littéral hexadécimal invalide : « %s »" -#: cobc/scanner.l:1297 cobc/tree.c:1779 +#: cobc/scanner.l:1331 cobc/tree.c:1803 #, c-format msgid "invalid numeric literal: '%s'" msgstr "littéral numérique invalide : « %s »" -#: cobc/scanner.l:1299 +#: cobc/scanner.l:1333 #, c-format msgid "invalid floating-point literal: '%s'" msgstr "littéral en virgule flottante invalide : « %s »" -#: cobc/scanner.l:1301 +#: cobc/scanner.l:1335 cobc/scanner.l:1337 #, c-format msgid "invalid %s literal: '%s'" msgstr "littéral %s invalide : « %s »" -#: cobc/scanner.l:1350 +#: cobc/scanner.l:1365 +#, fuzzy, c-format +#| msgid "parameter %d is not within range of %d" +msgid "character code %s out of encoding range %s" +msgstr "le paramètre %d n'est pas dans la plage de %d" + +#: cobc/scanner.l:1422 +msgid "extraneous separator ',' at end of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1435 +msgid "extraneous character ',' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1440 +#, fuzzy, c-format +#| msgid "invalid character '%c' in currency symbol" +msgid "invalid character '%c' in sequence of symbolic EBCDIC characters" +msgstr "caractère « %c » invalide dans le symbole monétaire" + +#: cobc/scanner.l:1470 #, c-format msgid "literal length exceeds %u characters" msgstr "la longueur du littéral dépasse %u caractères" -#: cobc/scanner.l:1365 +#: cobc/scanner.l:1485 #, c-format msgid "missing terminating %c character" msgstr "caractère de fin %c manquant" -#: cobc/scanner.l:1382 cobc/scanner.l:1444 cobc/scanner.l:1729 +#: cobc/scanner.l:1502 cobc/scanner.l:1569 cobc/scanner.l:1868 msgid "zero-length literal" msgstr "littéral de longueur nulle" -#: cobc/scanner.l:1385 +#: cobc/scanner.l:1505 msgid "national literal has zero length; a SPACE will be assumed" msgstr "le littéral national a une longueur nulle; une ESPACE est supposée" -#: cobc/scanner.l:1386 +#: cobc/scanner.l:1506 msgid "alphanumeric literal has zero length; a SPACE will be assumed" msgstr "le littéral alphanumérique a une longueur nulle; une ESPACE est supposée" -#: cobc/scanner.l:1412 cobc/scanner.l:1413 cobc/scanner.l:1417 -#: cobc/scanner.l:1494 +#: cobc/scanner.l:1519 +#, fuzzy +#| msgid "STOP literal" +msgid "UTF-8 literal" +msgstr "littéral STOP" + +#: cobc/scanner.l:1536 cobc/scanner.l:1537 cobc/scanner.l:1541 +#: cobc/scanner.l:1624 msgid "national literal" msgstr "littéral national" -#: cobc/scanner.l:1416 +#: cobc/scanner.l:1540 msgid "national-character literal" msgstr "littéral caractère national" -#: cobc/scanner.l:1447 +#: cobc/scanner.l:1571 msgid "hexadecimal literal has zero length; X'00' will be assumed" msgstr "le littéral hexadécimal a une longueur nulle; X'00' est supposé" -#: cobc/scanner.l:1472 +#: cobc/scanner.l:1575 cobc/scanner.l:1601 msgid "hexadecimal-boolean literal" msgstr "littéral booléen-hexadécimal" -#: cobc/scanner.l:1480 cobc/scanner.l:1499 cobc/scanner.l:1608 -#: cobc/scanner.l:1659 cobc/scanner.l:1754 cobc/scanner.l:1824 +#: cobc/scanner.l:1579 cobc/scanner.l:1619 +msgid "hexadecimal-national literal" +msgstr "littéral hexadécimal-national" + +#: cobc/scanner.l:1609 cobc/scanner.l:1629 cobc/scanner.l:1744 +#: cobc/scanner.l:1798 cobc/scanner.l:1893 cobc/scanner.l:1963 #, c-format msgid "literal length %lu exceeds %u characters" msgstr "la longueur %lu du littéral dépasse %u caractères" -#: cobc/scanner.l:1490 -msgid "hexadecimal-national literal" -msgstr "littéral hexadécimal-national" - -#: cobc/scanner.l:1521 cobc/scanner.l:1551 cobc/scanner.l:1674 -#: cobc/scanner.l:1771 cobc/scanner.l:1835 +#: cobc/scanner.l:1651 cobc/scanner.l:1680 cobc/scanner.l:1813 +#: cobc/scanner.l:1910 cobc/scanner.l:1974 #, c-format msgid "literal contains invalid character '%c'" msgstr "le littéral contient le caractère invalide « %c »" -#: cobc/scanner.l:1573 +#: cobc/scanner.l:1704 #, c-format msgid "literal does not have an even number of digits" msgstr "le littéral n'a pas un nombre paire de chiffres" -#: cobc/scanner.l:1599 +#: cobc/scanner.l:1735 cobc/scanner.l:1788 #, c-format msgid "%s literals must contain at least one character" msgstr "les littéraux %s doivent contenir au moins un caractère" -#: cobc/scanner.l:1639 cobc/scanner.l:1739 cobc/scanner.l:1813 +#: cobc/scanner.l:1775 cobc/scanner.l:1878 cobc/scanner.l:1952 msgid "ACUCOBOL numeric literal" msgstr "littéral numérique ACUCOBOL" -#: cobc/scanner.l:1651 -msgid "H literals must contain at least one character" -msgstr "les littéraux H doivent contenir au moins un caractère" - -#: cobc/scanner.l:1690 cobc/scanner.l:1783 cobc/scanner.l:1846 +#: cobc/scanner.l:1829 cobc/scanner.l:1922 cobc/scanner.l:1985 #, c-format msgid "literal exceeds limit %u" msgstr "le littéral dépasse la limite %u" -#: cobc/scanner.l:1724 +#: cobc/scanner.l:1863 msgid "numeric boolean literal" msgstr "littéral booléen numérique" -#: cobc/scanner.l:1731 -msgid "Boolean literal has zero length; B'0' will be assumed" +#: cobc/scanner.l:1870 +#, fuzzy +#| msgid "Boolean literal has zero length; B'0' will be assumed" +msgid "boolean literal has zero length; B'0' will be assumed" msgstr "le littéral booléen a une longueur nulle; B'0' est supposé" -#: cobc/scanner.l:1807 +#: cobc/scanner.l:1946 msgid "HP COBOL octal literal" msgstr "littéral octal HP COBOL" -#: cobc/scanner.l:1921 +#: cobc/scanner.l:2059 #, c-format msgid "literal length %lu exceeds maximum of %u digits" msgstr "la longueur %lu du littéral dépasse le maximum de %u chiffres" -#: cobc/scanner.l:1927 +#: cobc/scanner.l:2065 #, c-format msgid "literal length %lu exceeds %u digits" msgstr "la longueur %lu du littéral dépasse %u chiffres" -#: cobc/scanner.l:2039 cobc/tree.c:3845 +#: cobc/scanner.l:2177 cobc/tree.c:3888 #, c-format msgid "significand has more than %d digits" msgstr "la mantisse a plus de %d chiffres" -#: cobc/scanner.l:2044 +#: cobc/scanner.l:2182 #, c-format msgid "exponent has decimal point" msgstr "l'exposant a un point décimal" -#: cobc/scanner.l:2050 cobc/tree.c:3853 +#: cobc/scanner.l:2188 cobc/tree.c:3896 #, c-format msgid "exponent has more than 4 digits" msgstr "l'exposant a plus de 4 chiffres" -#: cobc/scanner.l:2080 +#: cobc/scanner.l:2218 #, c-format msgid "exponent not between -6143 and 6144" msgstr "l'exposant n'est pas entre -6143 et 6144" -#: cobc/scanner.l:2089 +#: cobc/scanner.l:2227 #, c-format msgid "significand of 0 must be positive" msgstr "la mantisse de zéro doit être positive" -#: cobc/scanner.l:2094 +#: cobc/scanner.l:2232 #, c-format msgid "exponent of 0 must be 0" msgstr "l'exposant de 0 doit être 0" -#: cobc/scanner.l:2099 +#: cobc/scanner.l:2237 #, c-format msgid "exponent of 0 must be positive" msgstr "l'exposant de 0 doit être positif" -#: cobc/scanner.l:2261 +#: cobc/scanner.l:2399 #, c-format msgid "invalid CONSTANT: %s" msgstr "CONSTANT invalide : %s" -#: cobc/scanner.l:2271 +#: cobc/scanner.l:2409 #, c-format msgid "invalid alphanumeric CONSTANT: %s" msgstr "CONSTANT alphanumérique invalide : %s" -#: cobc/scanner.l:2275 +#: cobc/scanner.l:2413 #, c-format msgid "empty alphanumeric CONSTANT: %s" msgstr "CONSTANT alphanumérique vide : %s" -#: cobc/scanner.l:2292 cobc/scanner.l:2300 cobc/scanner.l:2305 +#: cobc/scanner.l:2430 cobc/scanner.l:2438 cobc/scanner.l:2443 #, c-format msgid "invalid numeric CONSTANT: %s" msgstr "CONSTANT numérique invalide : %s" -#: cobc/scanner.l:2384 cobc/scanner.l:2411 +#: cobc/scanner.l:2522 cobc/scanner.l:2549 #, c-format msgid "'%s' is not a default reserved word, so cannot be aliased" msgstr "« %s » n'est pas un mot réservé par défaut, donc, il ne peut pas avoir d'alias" -#: cobc/scanner.l:2387 +#: cobc/scanner.l:2525 #, c-format msgid "'%s' is already reserved" msgstr "« %s » est déjà réservé" -#: cobc/scanner.l:2389 +#: cobc/scanner.l:2527 msgid "you may want MAKESYN instead" msgstr "vous voulez peut-être MAKESYN à la place" -#: cobc/scanner.l:2414 +#: cobc/scanner.l:2552 #, c-format msgid "'%s' is not a reserved word" msgstr "« %s » n'est pas un mot réservé" -#: cobc/scanner.l:2415 +#: cobc/scanner.l:2553 msgid "you may want ADDSYN or OVERRIDE instead" msgstr "vous voulez peut-être ADDSYN ou OVERRIDE à la place" -#: cobc/tree.c:391 +#: cobc/tree.c:392 #, c-format msgid "%s clause is required for file '%s'" msgstr "la clause %s est requise pour le fichier « %s »" -#: cobc/tree.c:395 +#: cobc/tree.c:396 #, c-format msgid "%s clause is invalid for file '%s' (file type)" msgstr "la clause %s est invalide pour le fichier « %s » (type fichier)" -#: cobc/tree.c:399 +#: cobc/tree.c:400 #, c-format msgid "%s clause is invalid for file '%s'" msgstr "la clause %s est invalide pour le fichier « %s »" -#: cobc/tree.c:426 +#: cobc/tree.c:427 #, c-format msgid "FOR item '%s' is a record" msgstr "élément FOR « %s » dans un enregistrement" -#: cobc/tree.c:435 +#: cobc/tree.c:436 #, c-format msgid "FOR item '%s' is in different record to '%s'" msgstr "l'élément FOR « %s » est dans un enregistrement différent de « %s »" -#: cobc/tree.c:444 +#: cobc/tree.c:445 #, c-format msgid "FOR item '%s' is not in a record associated with '%s'" msgstr "l'élément FOR « %s » n'est pas un enregistrement associé avec « %s »" -#: cobc/tree.c:558 +#: cobc/tree.c:559 msgid "internal error node" msgstr "nœud d'erreur interne" -#: cobc/tree.c:560 +#: cobc/tree.c:561 msgid "unknown constant" msgstr "constante inconnue" -#: cobc/tree.c:571 +#: cobc/tree.c:572 #, c-format msgid "literal \"%s\"" msgstr "littéral « %s »" -#: cobc/tree.c:842 -#, c-format -msgid "FUNCTION %s has invalid/not supported arguments - tag %d" -msgstr "FUNCTION %s a des arguments invalides ou non supportés – balise %d" - -#: cobc/tree.c:963 +#: cobc/tree.c:969 #, c-format msgid "invalid date/time function: '%d'" msgstr "fonction date/heure invalide : « %d »" -#: cobc/tree.c:995 +#: cobc/tree.c:1001 #, c-format msgid "FUNCTION '%s' has invalid date/time format" msgstr "FUNCTION « %s » a un format date/heure invalide" -#: cobc/tree.c:1002 +#: cobc/tree.c:1008 #, c-format msgid "FUNCTION '%s' has format in variable" msgstr "FUNCTION « %s » a un format dans un variable" -#: cobc/tree.c:1482 +#: cobc/tree.c:1488 #, c-format msgid "unknown tree tag: %d, category: %d" msgstr "balise d'arbre inconnue : %d, catégorie : %d" -#: cobc/tree.c:1577 +#: cobc/tree.c:1590 #, c-format msgid "unexpected numeric USAGE: %d" msgstr "USAGE numérique inattendu : %d" -#: cobc/tree.c:1591 +#: cobc/tree.c:1604 #, c-format msgid "unexpected category: %d" msgstr "catégorie inattendue : %d" -#: cobc/tree.c:1790 +#: cobc/tree.c:1814 #, c-format msgid "literal length %d exceeds maximum of %d digits" msgstr "la longueur %d du littéral dépasse le maximum de %d chiffres" -#: cobc/tree.c:1795 +#: cobc/tree.c:1819 #, c-format msgid "literal length %d exceeds %d digits" msgstr "la longueur %d du littéral dépasse %d chiffres" -#: cobc/tree.c:1844 cobc/tree.c:1856 cobc/tree.c:1913 cobc/tree.c:1963 +#: cobc/tree.c:1868 cobc/tree.c:1880 cobc/tree.c:1937 cobc/tree.c:1987 #, c-format msgid "numeric literal '%s' exceeds limit '%s'" msgstr "le littéral numérique « %s » dépasse la limite « %s »" -#: cobc/tree.c:2655 +#: cobc/tree.c:2676 msgid "invalid LOCALE literal" msgstr "littéral LOCALE invalide" -#: cobc/tree.c:2782 +#: cobc/tree.c:2803 msgid "only literals with the same category can be concatenated" msgstr "seuls des littéraux avec la même catégorie peuvent être concaténés" -#: cobc/tree.c:2789 -msgid "only alphanumeric, national or boolean literals may be concatenated" +#: cobc/tree.c:2811 +#, fuzzy +#| msgid "only alphanumeric, national or boolean literals may be concatenated" +msgid "only alphanumeric, utf-8, national or boolean literals may be concatenated" msgstr "seuls des littéraux alphanumériques, nationaux ou booléens peuvent être concaténés" -#: cobc/tree.c:2801 +#: cobc/tree.c:2823 #, c-format msgid "literal length %d exceeds %d characters" msgstr "la longueur %d du littéral dépasse %d caractères" -#: cobc/tree.c:3078 +#: cobc/tree.c:3103 msgid "B, 0 or /" msgstr "B, 0 ou /" -#: cobc/tree.c:3092 +#: cobc/tree.c:3117 msgid "the sign of the floating-point exponent" msgstr "le signe de l'exposant en virgule flottante" -#: cobc/tree.c:3094 +#: cobc/tree.c:3119 msgid "a leading +/- sign" msgstr "un signe +/- au début" -#: cobc/tree.c:3096 +#: cobc/tree.c:3121 msgid "a trailing +/- sign" msgstr "un signe +/- à la fin" -#: cobc/tree.c:3098 +#: cobc/tree.c:3123 msgid "CR or DB" msgstr "CR ou DB" -#: cobc/tree.c:3100 +#: cobc/tree.c:3125 msgid "a leading currency symbol" msgstr "un symbole monétaire au début" -#: cobc/tree.c:3102 +#: cobc/tree.c:3127 msgid "a trailing currency symbol" msgstr "un symbole monétaire à la fin" -#: cobc/tree.c:3104 +#: cobc/tree.c:3129 msgid "a Z or * which is before the decimal point" msgstr "un Z ou * qui est avant le point décimal" -#: cobc/tree.c:3106 +#: cobc/tree.c:3131 msgid "a Z or * which is after the decimal point" msgstr "un Z ou * qui est après le point décimal" -#: cobc/tree.c:3108 +#: cobc/tree.c:3133 msgid "a floating +/- string which is before the decimal point" msgstr "une chaîne +/- flottante qui est avant le point décimal" -#: cobc/tree.c:3110 +#: cobc/tree.c:3135 msgid "a floating +/- string which is after the decimal point" msgstr "une chaîne +/- flottante qui est après le point décimal" -#: cobc/tree.c:3112 +#: cobc/tree.c:3137 msgid "a floating currency symbol string which is before the decimal point" msgstr "une chaîne du symbole de la devise monétaire qui est avant le point décimal" -#: cobc/tree.c:3114 +#: cobc/tree.c:3139 msgid "a floating currency symbol string which is after the decimal point" msgstr "une chaîne du symbole de la devise monétaire qui est après le point décimal" -#: cobc/tree.c:3118 +#: cobc/tree.c:3143 msgid "A or X" msgstr "A ou X" -#: cobc/tree.c:3126 +#: cobc/tree.c:3151 msgid "a P which is before the decimal point" msgstr "un P qui est avant le point décimal" -#: cobc/tree.c:3128 +#: cobc/tree.c:3153 msgid "a P which is after the decimal point" msgstr "un P qui est après le point décimal" -#: cobc/tree.c:3149 cobc/tree.c:3599 +#: cobc/tree.c:3176 cobc/tree.c:3638 #, c-format msgid "%s may only occur once in a PICTURE string" msgstr "%s peut apparaître une seule fois dans la chaîne de PICTURE" -#: cobc/tree.c:3151 cobc/tree.c:3541 +#: cobc/tree.c:3178 cobc/tree.c:3570 #, c-format msgid "%s cannot follow %s" msgstr "%s ne peut pas suivre %s" -#: cobc/tree.c:3154 +#: cobc/tree.c:3181 msgid "invalid PICTURE string detected" msgstr "une chaîne PICTURE invalide a été détectée" -#: cobc/tree.c:3271 +#: cobc/tree.c:3299 msgid "number or constant in parentheses is not an unsigned integer" msgstr "le nombre ou la constante entre parenthèses n'est pas un entier non signé" -#: cobc/tree.c:3280 +#: cobc/tree.c:3308 #, c-format msgid "only up to %d significant digits are permitted within parentheses" msgstr "au maximum %d chiffres significatifs sont permis entre parenthèses" -#: cobc/tree.c:3288 +#: cobc/tree.c:3316 msgid "number or constant in parentheses must be greater than zero" msgstr "le nombre ou la constante entre parenthèses doit être plus grand que zéro" -#: cobc/tree.c:3299 +#: cobc/tree.c:3327 msgid "parentheses must be preceded by a picture symbol" msgstr "les parenthèses doivent être précédées d'un symbole d'image" -#: cobc/tree.c:3329 +#: cobc/tree.c:3353 msgid "unbalanced parentheses" msgstr "parenthèses déséquilibrées" -#: cobc/tree.c:3337 +#: cobc/tree.c:3361 msgid "parentheses must contain an unsigned integer" msgstr "les parenthèses doivent contenir un entier positif" -#: cobc/tree.c:3375 +#: cobc/tree.c:3409 #, c-format msgid "'%s' is not a constant-name" msgstr "« %s » n'est pas un nom constant" -#: cobc/tree.c:3382 -#, c-format -msgid "'%s' is not a numeric literal" -msgstr "« %s » n'est pas un littéral numérique" - -#: cobc/tree.c:3386 -#, c-format -msgid "'%s' is not an integer" +#: cobc/tree.c:3422 +#, fuzzy, c-format +#| msgid "'%s' is not an integer" +msgid "'%s' is not an unsigned positive integer" msgstr "« %s » n'est pas un entier" -#: cobc/tree.c:3390 -#, c-format -msgid "'%s' is not unsigned" -msgstr "« %s » n'est pas non signé" - -#: cobc/tree.c:3450 +#: cobc/tree.c:3479 msgid "missing PICTURE string" msgstr "chaîne PICTURE manquante" -#: cobc/tree.c:3479 +#: cobc/tree.c:3508 msgid "C must be followed by R" msgstr "C doit être suivi par R" -#: cobc/tree.c:3482 +#: cobc/tree.c:3511 msgid "D must be followed by B" msgstr "D doit être suivi par B" -#: cobc/tree.c:3497 cobc/tree.c:3596 cobc/tree.c:3622 cobc/tree.c:3733 +#: cobc/tree.c:3526 cobc/tree.c:3635 cobc/tree.c:3661 cobc/tree.c:3773 msgid "uncommon parentheses" msgstr "parenthèses inhabituelles" -#: cobc/tree.c:3541 +#: cobc/tree.c:3570 msgid "exponent" msgstr "exposant" -#: cobc/tree.c:3586 +#: cobc/tree.c:3625 msgid "L must be at start of PICTURE string" msgstr "L doit être au début de la chaîne de PICTURE" -#: cobc/tree.c:3604 +#: cobc/tree.c:3643 msgid "S must be at start of PICTURE string" msgstr "S doit être au début de la chaîne de PICTURE" -#: cobc/tree.c:3660 +#: cobc/tree.c:3699 msgid "P must be at start or end of PICTURE string" msgstr "P doit être au début ou à la fin de la chaîne de PICTURE" -#: cobc/tree.c:3690 +#: cobc/tree.c:3730 msgid "cannot have both Z and * in PICTURE string" msgstr "Z et * ne peuvent pas être tous les deux dans la chaîne de PICTURE" -#: cobc/tree.c:3768 +#: cobc/tree.c:3808 #, c-format msgid "invalid PICTURE character '%c'" msgstr "le caractère « %c » est invalide dans PICTURE" -#: cobc/tree.c:3798 +#: cobc/tree.c:3841 #, c-format msgid "PICTURE string may not contain more than %d characters; contains %d characters" msgstr "la chaîne de PICTURE ne peut pas contenir plus de %d caractères; elle contient %d caractères" -#: cobc/tree.c:3803 -msgid "PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" +#: cobc/tree.c:3846 +#, fuzzy +#| msgid "PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" +msgid "PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" msgstr "la chaîne de PICTURE doit contenir au moins un parmi l'ensemble A, N, X, Z, 1, 9 et * ou au moins deux de l'ensemble +, - et le symbole monétaire" -#: cobc/tree.c:3830 +#: cobc/tree.c:3873 #, c-format msgid "numeric field cannot be larger than %d digits" msgstr "le champ numérique ne peut pas être plus grand que %d chiffres" -#: cobc/tree.c:4267 +#: cobc/tree.c:4333 #, c-format msgid "needs PICTURE clause for SUM %s" msgstr "clause PICTURE requise pour SUM %s" -#: cobc/tree.c:4274 +#: cobc/tree.c:4340 #, c-format msgid "non-numeric PICTURE clause for SUM %s" msgstr "clause PICTURE non numérique requise pour SUM %s" -#: cobc/tree.c:4346 cobc/tree.c:4359 +#: cobc/tree.c:4412 cobc/tree.c:4425 #, c-format msgid "no DETAIL line defined in report %s" msgstr "aucune ligne DETAIL définie dans le rapport %s" -#: cobc/tree.c:4361 +#: cobc/tree.c:4427 msgid "PAGE LIMIT FIRST DETAIL should be >= HEADING" msgstr "PAGE LIMIT FIRST DETAIL devrait être >= HEADING" -#: cobc/tree.c:4364 +#: cobc/tree.c:4430 msgid "PAGE LIMIT FOOTING should be >= HEADING" msgstr "PAGE LIMIT FOOTING devrait être >= HEADING" -#: cobc/tree.c:4366 +#: cobc/tree.c:4432 msgid "PAGE LIMIT LAST DETAIL should be >= FIRST DETAIL" msgstr "PAGE LIMIT LAST DETAIL devrait être >= FIRST DETAIL" -#: cobc/tree.c:4368 +#: cobc/tree.c:4434 msgid "PAGE LIMIT FOOTING should be >= LAST DETAIL" msgstr "PAGE LIMIT FOOTING devrait être >= LAST DETAIL" -#: cobc/tree.c:4370 +#: cobc/tree.c:4436 msgid "PAGE LIMIT LINES should be >= FOOTING" msgstr "PAGE LIMIT LINES devrait être >= FOOTING" -#: cobc/tree.c:4563 libcob/fileio.c:8999 +#: cobc/tree.c:4631 libcob/fileio.c:9358 #, c-format msgid "maximum keys (%d/%d) exceeded for file '%s'" msgstr "clés maximum (%d/%d) dépassé pour le fichier « %s »" -#: cobc/tree.c:4627 cobc/tree.c:4650 +#: cobc/tree.c:4695 cobc/tree.c:4718 #, c-format msgid "invalid KEY item '%s', not in file '%s'" msgstr "élément KEY « %s » invalide, pas dans le fichier « %s »" -#: cobc/tree.c:4661 +#: cobc/tree.c:4729 #, c-format msgid "minimal record length %d can not hold the key item '%s'; needs to be at least %d" msgstr "la longueur minimale %d de l'enregistrement ne sait pas contenir l'élément clé « %s »; au moins %d est nécessaire" -#: cobc/tree.c:4696 +#: cobc/tree.c:4764 #, c-format msgid "missing file description for %s" msgstr "description de fichier manquante pour %s" -#: cobc/tree.c:4745 +#: cobc/tree.c:4813 #, c-format msgid "size of record '%s' (%d) smaller than minimum of file '%s' (%d)" msgstr "la taille de l'enregistrement « %s » (%d) est plus petit que le minimum du fichier « %s » (%d)" -#: cobc/tree.c:4748 cobc/tree.c:4765 +#: cobc/tree.c:4816 cobc/tree.c:4833 msgid "file size adjusted" msgstr "taille de fichier ajustée" -#: cobc/tree.c:4760 +#: cobc/tree.c:4828 #, c-format msgid "size of record '%s' (%d) larger than maximum of file '%s' (%d)" msgstr "la taille de l'enregistrement « %s » (%d) est plus grand que le maximum du fichier « %s » (%d)" -#: cobc/tree.c:4793 +#: cobc/tree.c:4861 msgid "RECORD VARYING specified without limits, but implied limits are equal" msgstr "RECORD VARYING spécifié sans limites, mais les limites implicites sont égales" -#: cobc/tree.c:4795 +#: cobc/tree.c:4863 #, c-format msgid "%s clause ignored" msgstr "clause %s ignorée" -#: cobc/tree.c:4890 cobc/typeck.c:7695 cobc/typeck.c:14389 cobc/typeck.c:14441 -#: cobc/typeck.c:14477 libcob/fileio.c:4598 libcob/screenio.c:3720 -#: libcob/screenio.c:3750 +#: cobc/tree.c:4958 cobc/typeck.c:8128 cobc/typeck.c:15186 cobc/typeck.c:15238 +#: cobc/typeck.c:15275 libcob/fileio.c:4724 libcob/screenio.c:4613 +#: libcob/screenio.c:4639 #, c-format msgid "runtime is not configured to support %s" msgstr "le système d'exécution n'est pas configurée pour supporter %s" -#: cobc/tree.c:5395 +#: cobc/tree.c:5474 #, c-format msgid "literal '%.38s' is longer than '%s'" msgstr "le littéral « %.38s » est plus grand que « %s »" -#: cobc/tree.c:5399 +#: cobc/tree.c:5478 #, c-format msgid "literal '%.38s' is longer than reference-modification of '%s'" msgstr "le littéral « %.38s » est plus grand que la modification par référence de « %s »" -#: cobc/tree.c:5424 +#: cobc/tree.c:5508 #, c-format msgid "literal '%s' is alphanumeric but '%s' is numeric" msgstr "le littéral « %s » est alphanumérique mais « %s » est numérique" -#: cobc/tree.c:5466 +#: cobc/tree.c:5550 #, c-format msgid "literal '%s' has more decimals than '%s'" msgstr "le littéral « %s » a plus de décimales que « %s »" -#: cobc/tree.c:5508 +#: cobc/tree.c:5598 #, c-format msgid "literal '%s' has more digits than '%s'" msgstr "le littéral « %s » a plus de chiffres que « %s »" -#: cobc/tree.c:5548 cobc/tree.c:5572 +#: cobc/tree.c:5646 cobc/tree.c:5676 #, c-format msgid "unsigned '%s' may not be %s %s" msgstr "le non signé « %s » ne peut pas être %s %s" -#: cobc/tree.c:5558 cobc/tree.c:5581 +#: cobc/tree.c:5658 cobc/tree.c:5689 #, c-format msgid "unsigned '%s' may always be %s %s" msgstr "le non signé « %s » peut toujours être %s %s" -#: cobc/tree.c:5614 cobc/tree.c:5639 +#: cobc/tree.c:5726 cobc/tree.c:5756 #, c-format msgid "'%s' may not be %s %s" msgstr "« %s » ne peut pas être %s %s" -#: cobc/tree.c:5625 cobc/tree.c:5650 +#: cobc/tree.c:5738 cobc/tree.c:5768 #, c-format msgid "'%s' may always be %s %s" msgstr "« %s » peut toujours être %s %s" -#: cobc/tree.c:5795 +#: cobc/tree.c:5917 msgid "divide by constant ZERO" msgstr "division par la constante ZÉRO" -#: cobc/tree.c:5879 cobc/tree.c:5886 +#: cobc/tree.c:6001 cobc/tree.c:6008 #, c-format msgid "%s should be COMP-X/COMP-5 for logical operator" msgstr "%s devrait être COMP-X/COMP-5 pour un opérateur logique" -#: cobc/tree.c:5927 cobc/tree.c:5932 cobc/tree.c:6151 cobc/typeck.c:5675 -#: cobc/typeck.c:5684 cobc/typeck.c:5691 cobc/typeck.c:6772 cobc/typeck.c:6913 -msgid "invalid expression" -msgstr "expression invalide" - -#: cobc/tree.c:6148 +#: cobc/tree.c:6283 #, c-format msgid "invalid expression: %s %s %s" msgstr "expression invalide : %s %s %s" -#: cobc/tree.c:6195 +#: cobc/tree.c:6286 +msgid "invalid expression: boolean expected with logical operator" +msgstr "" + +#: cobc/tree.c:6330 #, c-format msgid "unexpected operator: %d" msgstr "opérateur inattendu : %d" -#: cobc/tree.c:6206 +#: cobc/tree.c:6341 #, c-format msgid "expression '%.38s' %s '%.38s' is always TRUE" msgstr "l'expression '%.38s' %s '%.38s' est toujours VRAIE" -#: cobc/tree.c:6212 +#: cobc/tree.c:6347 msgid "expression is always TRUE" msgstr "l'expression est toujours VRAIE" -#: cobc/tree.c:6225 +#: cobc/tree.c:6360 #, c-format msgid "expression '%.38s' %s '%.38s' is always FALSE" msgstr "l'expression '%.38s' %s '%.38s' est toujours FAUSSE" -#: cobc/tree.c:6231 +#: cobc/tree.c:6366 msgid "expression is always FALSE" msgstr "l'expression est toujours FAUSSE" -#: cobc/tree.c:6443 +#: cobc/tree.c:6588 msgid "invalid file name reference" msgstr "référence de nom de fichier invalide" -#: cobc/tree.c:6451 +#: cobc/tree.c:6596 #, c-format msgid "BY CONTENT assumed for alphanumeric item '%s'" msgstr "BY CONTENT supposé pour l'élément alphanumérique « %s »" -#: cobc/tree.c:6456 +#: cobc/tree.c:6601 #, c-format msgid "BY CONTENT assumed for national item '%s'" msgstr "BY CONTENT supposé pour l'élément national « %s »" -#: cobc/tree.c:6595 +#: cobc/tree.c:6740 msgid "PERFORM FOREVER since UNTIL is always FALSE" msgstr "PERFORM FOREVER depuis UNTIL est toujours FAUX" -#: cobc/tree.c:6599 +#: cobc/tree.c:6744 msgid "PERFORM ONCE since UNTIL is always TRUE" msgstr "PERFORM ONCE depuis UNTIL est toujours VRAI" -#: cobc/tree.c:6602 +#: cobc/tree.c:6747 msgid "PERFORM NEVER since UNTIL is always TRUE" msgstr "PERFORM NEVER depuis UNTIL est toujours VRAI" -#: cobc/tree.c:6726 +#: cobc/tree.c:6871 #, c-format msgid "no definition/prototype seen for FUNCTION '%s'" msgstr "pas de définition/prototype vu pour FUNCTION « %s »" -#: cobc/tree.c:6728 +#: cobc/tree.c:6873 #, c-format msgid "no definition/prototype seen for PROGRAM '%s'" msgstr "pas de définition/prototype vu pour PROGRAM « %s »" -#: cobc/tree.c:6737 +#: cobc/tree.c:6882 #, c-format msgid "no definition/prototype seen for FUNCTION with external name '%s'" msgstr "pas de définition/prototype vu pour FUNCTION avec le nom externe « %s »" -#: cobc/tree.c:6739 +#: cobc/tree.c:6884 #, c-format msgid "no definition/prototype seen for PROGRAM with external name '%s'" msgstr "pas de définition/prototype vu pour PROGRAM avec le nom externe « %s »" -#: cobc/tree.c:6831 +#: cobc/tree.c:6976 cobc/tree.c:7158 cobc/tree.c:7233 cobc/tree.c:7239 +#: cobc/tree.c:7247 cobc/tree.c:7255 cobc/tree.c:7277 cobc/tree.c:7287 +#: cobc/tree.c:7292 #, c-format -msgid "FUNCTION %s has invalid argument" -msgstr "FUNCTION %s a un paramètre invalide" +msgid "FUNCTION '%s' has invalid argument" +msgstr "FUNCTION « %s » a un argument invalide" -#: cobc/tree.c:6833 -#, c-format -msgid "either all arguments or none should be if type %s" +#: cobc/tree.c:6978 +#, fuzzy, c-format +#| msgid "either all arguments or none should be if type %s" +msgid "either all arguments or none should be of type %s" msgstr "soit tous les arguments ou aucun devrait être du type %s" -#: cobc/tree.c:6863 cobc/tree.c:6869 cobc/tree.c:6911 cobc/tree.c:6916 +#: cobc/tree.c:7010 cobc/tree.c:7016 cobc/tree.c:7057 cobc/tree.c:7063 #, c-format msgid "FUNCTION '%s' has invalid reference modification" msgstr "FUNCTION « %s » a une modification de référence invalide" -#: cobc/tree.c:6880 cobc/tree.c:7194 +#: cobc/tree.c:7027 cobc/tree.c:7344 #, c-format msgid "FUNCTION '%s' unknown" msgstr "FUNCTION « %s » inconnue" -#: cobc/tree.c:6884 +#: cobc/tree.c:7031 #, c-format msgid "FUNCTION '%s' is not implemented" msgstr "FUNCTION « %s » n'est pas implémentée" -#: cobc/tree.c:6891 cobc/tree.c:6898 cobc/tree.c:7179 +#: cobc/tree.c:7037 cobc/tree.c:7044 cobc/tree.c:7329 #, c-format msgid "FUNCTION '%s' has wrong number of arguments" msgstr "FUNCTION « %s » a le mauvais nombre d'arguments" -#: cobc/tree.c:6905 +#: cobc/tree.c:7051 #, c-format msgid "FUNCTION '%s' cannot have reference modification" msgstr "FUNCTION « %s » ne peut pas avoir de modification de référence" -#: cobc/tree.c:7008 cobc/tree.c:7083 cobc/tree.c:7089 cobc/tree.c:7097 -#: cobc/tree.c:7105 cobc/tree.c:7127 cobc/tree.c:7137 cobc/tree.c:7142 -#, c-format -msgid "FUNCTION '%s' has invalid argument" -msgstr "FUNCTION « %s » a un argument invalide" - -#: cobc/tree.c:7185 +#: cobc/tree.c:7335 #, c-format msgid "FUNCTION '%s' has invalid first argument" msgstr "FUNCTION « %s » a un premier argument invalide" -#: cobc/typeck.c:584 +#: cobc/typeck.c:590 #, c-format msgid "%s should be COMP-5/COMP-X for logical operator" msgstr "%s devrait être COMP-5/COMP-X pour un opérateur logique" -#: cobc/typeck.c:850 +#: cobc/typeck.c:856 #, c-format msgid "%s item not allowed here: '%s'" msgstr "élément %s pas permis ici : %s" -#: cobc/typeck.c:892 +#: cobc/typeck.c:898 #, c-format msgid "'%s' is not a group name" msgstr "« %s » n'est pas un nom de groupe" -#: cobc/typeck.c:911 +#: cobc/typeck.c:921 #, c-format msgid "'%s' is not a numeric name" msgstr "« %s » n'est pas un nom numérique" -#: cobc/typeck.c:934 +#: cobc/typeck.c:944 #, c-format msgid "'%s' is not a numeric or numeric-edited name" msgstr "« %s » n'est pas un nom numérique ou édité numérique" -#: cobc/typeck.c:974 -#, c-format -msgid "'%s' is Alpha, instead of a numeric value" -msgstr "« %s » est Alpha au lieu d'une valeur numérique" - -#: cobc/typeck.c:977 -#, c-format -msgid "'%s' is Alpha Edited, instead of a numeric value" -msgstr "« %s » est Alpha Edited au lieu d'une valeur numérique" - -#: cobc/typeck.c:990 -#, c-format -msgid "'%s' is not a numeric value" -msgstr "« %s » n'est pas une valeur numérique" - -#: cobc/typeck.c:1040 +#: cobc/typeck.c:1043 #, c-format -msgid "'%s' is not an integer value" -msgstr "« %s » n'est pas une valeur entière" +msgid "'%s' is not an integer" +msgstr "« %s » n'est pas un entier" -#: cobc/typeck.c:1044 +#: cobc/typeck.c:1047 msgid "positive numeric integer is required here" msgstr "un entier numérique positif est requis ici" -#: cobc/typeck.c:1163 +#: cobc/typeck.c:1178 msgid "System routine" msgstr "Routine système" -#: cobc/typeck.c:2054 libcob/call.c:1180 +#: cobc/typeck.c:2037 libcob/call.c:1172 #, c-format msgid "'%s' literal includes leading spaces which are omitted" msgstr "le littéral « %s » inclut des espaces au début qui sont omis" -#: cobc/typeck.c:2058 +#: cobc/typeck.c:2041 #, c-format msgid "'%s' literal includes trailing spaces which are omitted" msgstr "le littéral « %s » inclut des espaces de fin qui sont omis" -#: cobc/typeck.c:2125 +#: cobc/typeck.c:2108 msgid "ON/OFF usage requires a SWITCH name" msgstr "l'utilisation de ON/OFF requiert un nom SWITCH" -#: cobc/typeck.c:2143 +#: cobc/typeck.c:2126 #, c-format msgid "word length exceeds maximum of %d characters: '%s'" msgstr "la longueur du mot dépasse le maximum de %d caractères : « %s »" -#: cobc/typeck.c:2146 +#: cobc/typeck.c:2129 #, c-format msgid "word length exceeds %d characters: '%s'" msgstr "la longueur du mot dépasse %d caractères : « %s »" -#: cobc/typeck.c:2223 +#: cobc/typeck.c:2206 #, c-format msgid "ASSIGN %s interpreted as '%s'" msgstr "ASSIGN %s interprété comme « %s »" -#: cobc/typeck.c:2315 cobc/typeck.c:2487 +#: cobc/typeck.c:2332 cobc/typeck.c:2631 #, c-format msgid "subscript missing for '%s' - defaulting to 1" msgstr "indice manquant pour « %s » – 1 utilisé par défaut" -#: cobc/typeck.c:2338 cobc/typeck.c:2403 cobc/typeck.c:2659 +#: cobc/typeck.c:2355 cobc/typeck.c:2546 cobc/typeck.c:2746 #, c-format msgid "'%s' cannot be subscripted" msgstr "« %s » ne peut pas être utilisé avec un indice" -#: cobc/typeck.c:2342 cobc/typeck.c:2663 +#: cobc/typeck.c:2359 cobc/typeck.c:2750 #, c-format msgid "'%s' requires one subscript" msgstr "« %s » requiert un indice" -#: cobc/typeck.c:2345 cobc/typeck.c:2666 +#: cobc/typeck.c:2362 cobc/typeck.c:2753 #, c-format msgid "'%s' requires %d subscripts" msgstr "« %s » requiert %d indices" -#: cobc/typeck.c:2363 +#: cobc/typeck.c:2380 #, c-format msgid "'%s' (accessed by '%s')" msgstr "« %s » (accédé par « %s »)" -#: cobc/typeck.c:2471 +#: cobc/typeck.c:2399 cobc/typeck.c:4987 #, c-format -msgid "'%s' has no OCCURS clause" -msgstr "« %s » n'a pas de clause OCCURS" +msgid "%s may not be reference modified" +msgstr "%s ne peut pas être modifié par référence" -#: cobc/typeck.c:2537 libcob/common.c:3941 libcob/common.c:3952 +#: cobc/typeck.c:2437 cobc/typeck.c:2442 cobc/typeck.c:2466 +#: libcob/common.c:4477 libcob/common.c:4521 #, c-format -msgid "subscript of '%s' out of bounds: %d" -msgstr "l'indice de « %s » est hors limites : %d" +msgid "length of '%s' out of bounds: %d" +msgstr "la longueur de « %s » est hors limites : %d" -#: cobc/typeck.c:2587 cobc/typeck.c:2598 libcob/common.c:3976 -#: libcob/common.c:4027 +#: cobc/typeck.c:2453 cobc/typeck.c:2462 libcob/common.c:4462 +#: libcob/common.c:4513 #, c-format msgid "offset of '%s' out of bounds: %d" msgstr "le décalage de « %s » est hors limites : %d" -#: cobc/typeck.c:2592 cobc/typeck.c:2603 cobc/typeck.c:2612 -#: libcob/common.c:3991 libcob/common.c:4035 +#: cobc/typeck.c:2458 +msgid "suspicious reference-modification: always using max. position" +msgstr "" + +#: cobc/typeck.c:2475 +msgid "suspicious reference-modification: always using max. length" +msgstr "" + +#: cobc/typeck.c:2615 #, c-format -msgid "length of '%s' out of bounds: %d" -msgstr "la longueur de « %s » est hors limites : %d" +msgid "'%s' has no OCCURS clause" +msgstr "« %s » n'a pas de clause OCCURS" + +#: cobc/typeck.c:2694 libcob/common.c:4427 libcob/common.c:4438 +#, c-format +msgid "subscript of '%s' out of bounds: %d" +msgstr "l'indice de « %s » est hors limites : %d" -#: cobc/typeck.c:2727 cobc/typeck.c:2806 +#: cobc/typeck.c:2812 cobc/typeck.c:2891 msgid "reference modification not allowed here" msgstr "modification de référence pas permise ici" -#: cobc/typeck.c:2741 cobc/typeck.c:2832 +#: cobc/typeck.c:2826 cobc/typeck.c:2917 msgid "88 level item not allowed here" msgstr "élément de niveau 88 pas permis ici" -#: cobc/typeck.c:2745 cobc/typeck.c:2836 cobc/typeck.c:2844 cobc/typeck.c:2906 +#: cobc/typeck.c:2830 cobc/typeck.c:2921 cobc/typeck.c:2929 cobc/typeck.c:2991 msgid "variable length item not allowed here" msgstr "élément de longueur variable pas permis ici" -#: cobc/typeck.c:2774 +#: cobc/typeck.c:2859 #, c-format msgid "'%s' has not been DEFINEd" msgstr "« %s » n'a pas été défini avec DEFINE" -#: cobc/typeck.c:2810 +#: cobc/typeck.c:2895 msgid "only field names allowed here" msgstr "seuls des noms de champs sont permis ici" -#: cobc/typeck.c:2821 +#: cobc/typeck.c:2906 #, c-format msgid "VALUE of '%s': %s target '%s' is invalid" msgstr "VALUE de « %s » : la cible %s de « %s » est invalide" -#: cobc/typeck.c:2823 cobc/typeck.c:2889 +#: cobc/typeck.c:2908 cobc/typeck.c:2974 msgid "target must be in FILE SECTION or LINKAGE SECTION or have the EXTERNAL clause" msgstr "la cible doit être dans FILE SECTION ou LINKAGE SECTION ou avoir la clause EXTERNAL" -#: cobc/typeck.c:2879 cobc/typeck.c:2888 +#: cobc/typeck.c:2964 cobc/typeck.c:2973 #, c-format msgid "VALUE of '%s': %s target is invalid" msgstr "VALUE de « %s » : la cible %s est invalide" -#: cobc/typeck.c:2881 +#: cobc/typeck.c:2966 msgid "no previous data-item found" msgstr "aucun élément de type données précédent trouvé" -#: cobc/typeck.c:3040 cobc/typeck.c:4799 +#: cobc/typeck.c:3130 cobc/typeck.c:4963 #, c-format msgid "'%s' cannot be BASED/EXTERNAL" msgstr "« %s » ne peut pas être BASED/EXTERNAL" -#: cobc/typeck.c:3045 +#: cobc/typeck.c:3135 #, c-format msgid "'%s' is not in WORKING-STORAGE SECTION" msgstr "« %s » n'est pas dans une section WORKING-STORAGE" -#: cobc/typeck.c:3052 cobc/typeck.c:4796 +#: cobc/typeck.c:3142 cobc/typeck.c:4960 #, c-format msgid "'%s' not level 01 or 77" msgstr "« %s » n'est pas de niveau 01 ou 77" -#: cobc/typeck.c:3055 cobc/typeck.c:3090 cobc/typeck.c:4802 +#: cobc/typeck.c:3145 cobc/typeck.c:3180 cobc/typeck.c:4966 #, c-format msgid "'%s' REDEFINES field not allowed here" msgstr "le champs REDEFINES « %s » n'est pas permis ici" -#: cobc/typeck.c:3075 cobc/typeck.c:8423 +#: cobc/typeck.c:3165 cobc/typeck.c:8876 #, c-format msgid "duplicate USING BY REFERENCE item '%s'" msgstr "élément USING BY REFERENCE « %s » dupliquée" -#: cobc/typeck.c:3103 +#: cobc/typeck.c:3193 #, c-format msgid "'%s' USING item duplicates RETURNING item" msgstr "l'élément USING « %s » duplique l'élément RETURNING" -#: cobc/typeck.c:3177 +#: cobc/typeck.c:3268 #, c-format msgid "prototype and definition of '%s' do not match" msgstr "le prototype et la définition de « %s » ne correspondent pas" -#: cobc/typeck.c:3256 +#: cobc/typeck.c:3389 cobc/typeck.c:3486 #, c-format msgid "parameters #%d ('%s' in the definition and '%s' in the prototype) differ" msgstr "les paramètres #%d (« %s » dans la définition et « %s » dans le prototype) diffèrent" -#: cobc/typeck.c:3259 +#: cobc/typeck.c:3393 #, c-format msgid "returning items ('%s' in the definition and '%s' in the prototype) differ" msgstr "les éléments retournés (« %s » dans la définition et « %s » dans le prototype) diffèrent" -#: cobc/typeck.c:3295 +#: cobc/typeck.c:3429 msgid "definition is a program but the prototype is a function" msgstr "la définition est un programme alors que le prototype est une fonction" -#: cobc/typeck.c:3299 +#: cobc/typeck.c:3433 msgid "definition is a function but the prototype is a program" msgstr "la définition est une fonction alors que le prototype est un programme" -#: cobc/typeck.c:3306 -msgid "DECIMAL-POINT IS COMMA clauses differ" -msgstr "les clauses DECIMAL-POINT IS COMMA diffèrent" - -#: cobc/typeck.c:3312 -msgid "CURRENCY clauses differ" -msgstr "les clauses CURRENCY diffèrent" - -#: cobc/typeck.c:3348 +#: cobc/typeck.c:3496 msgid "number of parameters differ" msgstr "les nombres de paramètres diffèrent" -#: cobc/typeck.c:3358 +#: cobc/typeck.c:3506 msgid "definition has a RETURNING item but prototype does not" msgstr "la définition a un élément RETURNING alors que le prototype n'en a pas" -#: cobc/typeck.c:3362 +#: cobc/typeck.c:3510 msgid "definition does not have a RETURNING item but prototype does" msgstr "la définition n'a pas d'élément RETURNING alors que le prototype en a" -#: cobc/typeck.c:3411 +#: cobc/typeck.c:3560 #, c-format msgid "unexpected tree tag: %d" msgstr "balise d'arbre inattendue : %d" -#: cobc/typeck.c:3433 +#: cobc/typeck.c:3584 #, c-format msgid "expected argument #%d, %s, to be passed BY VALUE" msgstr "l'argument #%d, %s, est attendu comme étant passé BY VALUE" -#: cobc/typeck.c:3437 +#: cobc/typeck.c:3589 #, c-format msgid "expected argument #%d, %s, to be passed BY REFERENCE/CONTENT" msgstr "l'argument #%d, %s, est attendu comme étant passé BY REFERENCE/CONTENT" -#: cobc/typeck.c:3455 cobc/typeck.c:3580 cobc/typeck.c:3583 +#: cobc/typeck.c:3608 cobc/typeck.c:3733 cobc/typeck.c:3736 #, c-format msgid "argument #%d is not optional" msgstr "l'argument #%d n'est pas optionnel" -#: cobc/typeck.c:3468 +#: cobc/typeck.c:3622 #, c-format msgid "argument #%d must be at least %d bytes long" msgstr "l'argument #%d doit contenir au moins %d octets" -#: cobc/typeck.c:3483 +#: cobc/typeck.c:3637 #, c-format msgid "argument #%d is a different type of pointer than the parameter" msgstr "l'argument #%d est un type de pointeur différent que le paramètre" -#: cobc/typeck.c:3490 +#: cobc/typeck.c:3644 #, c-format msgid "argument #%d is ANY LENGTH, but expecting a fixed size item" msgstr "l'argument #%d est ANY LENGTH mais un élément de taille fixe est attendu" -#: cobc/typeck.c:3518 +#: cobc/typeck.c:3672 #, c-format msgid "argument #%d, %s, does not conform to the parameter definition" msgstr "l'argument #%d, %s, n'est pas conforme à la définition du paramètre" -#: cobc/typeck.c:3566 +#: cobc/typeck.c:3719 #, c-format msgid "expecting up to %d arguments, but found %d" msgstr "jusqu'à %d arguments attendus mais %d trouvés" -#: cobc/typeck.c:3598 +#: cobc/typeck.c:3752 msgid "the RETURNING item is of a fixed size, not ANY LENGTH" msgstr "l'élément de RETURNING a une taille fixe au lieu de ANY LENGTH" -#: cobc/typeck.c:3603 +#: cobc/typeck.c:3758 #, c-format msgid "RETURNING item %s is not a valid type" msgstr "l'élément %s de RETURNING n'est pas d'un type valide" -#: cobc/typeck.c:3609 +#: cobc/typeck.c:3764 msgid "unexpected RETURNING item" msgstr "élément RETURNING inattendu" -#: cobc/typeck.c:3612 +#: cobc/typeck.c:3767 msgid "expecting a RETURNING item, but none provided" msgstr "un élément est attendu pour RETURNING mais aucun n'est fourni" -#: cobc/typeck.c:3663 -#, c-format -msgid "'%s' is not an alphabet name" -msgstr "« %s » n'est pas un nom d'alphabet" - -#: cobc/typeck.c:3939 +#: cobc/typeck.c:4091 #, c-format msgid "duplicate character values in alphabet '%s': %s" msgstr "valeurs de caractères dupliquées dans l'alphabet « %s » : %s" -#: cobc/typeck.c:3944 +#: cobc/typeck.c:4096 #, c-format msgid "invalid character values in alphabet '%s', starting at position %d" msgstr "valeurs de caractères invalides dans l'alphabet « %s », en commençant à la position %d" -#: cobc/typeck.c:4045 +#: cobc/typeck.c:4198 #, c-format msgid "duplicate character values in class '%s'" msgstr "valeurs caractère dupliquées dans la classe « %s »" -#: cobc/typeck.c:4074 +#: cobc/typeck.c:4227 msgid "invalid ALPHABET name" msgstr "nom d'alphabet invalide" -#: cobc/typeck.c:4103 +#: cobc/typeck.c:4256 #, c-format msgid "'%s' is not a locale name" msgstr "« %s » n'est pas un nom d'environnement linguistique" -#: cobc/typeck.c:4257 +#: cobc/typeck.c:4410 msgid "invalid RECORD DEPENDING item" msgstr "élément RECORD DEPENDING invalide" -#: cobc/typeck.c:4262 +#: cobc/typeck.c:4415 msgid "RECORD DEPENDING must reference a data-item" msgstr "RECORD DEPENDING doit faire référence à un élément de type donnée" -#: cobc/typeck.c:4285 +#: cobc/typeck.c:4438 #, c-format msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgstr "l'élément RECORD DEPENDING « %s » devrait être défini dans WORKING-STORAGE, LOCAL-STORAGE ou LINKAGE SECTION" -#: cobc/typeck.c:4298 +#: cobc/typeck.c:4451 #, c-format msgid "file %s: RELATIVE KEY %s is not numeric" msgstr "fichier %s : RELATIVE KEY %s n'est pas numérique" -#: cobc/typeck.c:4307 +#: cobc/typeck.c:4460 #, c-format msgid "file %s: RELATIVE KEY %s must be integer" msgstr "fichier %s : RELATIVE KEY %s doit être un entier" -#: cobc/typeck.c:4312 +#: cobc/typeck.c:4465 #, c-format msgid "file %s: RELATIVE KEY %s must be unsigned" msgstr "fichier %s : RELATIVE KEY %s doit être non signé" -#: cobc/typeck.c:4319 +#: cobc/typeck.c:4472 #, c-format msgid "file %s: RELATIVE KEY %s cannot have OCCURS" msgstr "fichier %s : RELATIVE KEY %s ne peut pas avoir OCCURS" -#: cobc/typeck.c:4325 +#: cobc/typeck.c:4478 #, c-format msgid "RELATIVE KEY %s cannot be in file record belonging to %s" msgstr "RELATIVE KEY %s ne peut pas être dans l'enregistrement de fichier appartenant à %s" -#: cobc/typeck.c:4334 +#: cobc/typeck.c:4487 #, c-format msgid "file %s: RELATIVE KEY %s declared outside WORKING-STORAGE" msgstr "fichier %s : RELATIVE KEY %s déclarée en dehors de WORKING-STORAGE" -#: cobc/typeck.c:4356 cobc/typeck.c:8396 +#: cobc/typeck.c:4509 cobc/typeck.c:8833 #, c-format msgid "'%s' is not a valid data name" msgstr "« %s » n'est pas un nom de donnée valide" -#: cobc/typeck.c:4363 +#: cobc/typeck.c:4516 #, c-format msgid "CRT STATUS item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "l'élément CRT STATUS « %s » devrait être défini dans WORKING-STORAGE ou LOCAL-STORAGE" -#: cobc/typeck.c:4369 +#: cobc/typeck.c:4522 #, c-format msgid "'%s' numeric CRT STATUS must have at least 4 digits" msgstr "le numérique de CRT STATUS « %s » doit avoir au moins 4 chiffres" -#: cobc/typeck.c:4375 +#: cobc/typeck.c:4528 #, c-format msgid "'%s' CRT STATUS must be 3 or 4 characters long" msgstr "le CRT STATUS « %s » doit avoir 3 ou 4 caractères" -#: cobc/typeck.c:4397 +#: cobc/typeck.c:4550 #, c-format msgid "FILE STATUS '%s' is not a field" msgstr "FILE STATUS « %s » n'est pas un champ" -#: cobc/typeck.c:4409 +#: cobc/typeck.c:4562 #, c-format msgid "FILE STATUS '%s' may not be a decimal or have a PIC with a P" msgstr "FILE STATUS « %s » ne peut pas être un décimal ou avoir un PIC avec un P" -#: cobc/typeck.c:4414 +#: cobc/typeck.c:4567 #, c-format msgid "FILE STATUS '%s' is a numeric field, but I-O status codes are not numeric in general" msgstr "FILE STATUS « %s » est un champ numérique, mais les codes de statut E/S ne sont pas numériques en général" -#: cobc/typeck.c:4418 +#: cobc/typeck.c:4571 #, c-format msgid "FILE STATUS '%s' must be an alphanumeric or numeric field" msgstr "FILE STATUS « %s » doit être un champ alphanumérique ou numérique" -#: cobc/typeck.c:4425 +#: cobc/typeck.c:4578 #, c-format msgid "FILE STATUS '%s' must be USAGE DISPLAY" msgstr "FILE STATUS « %s » doit être USAGE DISPLAY" -#: cobc/typeck.c:4432 +#: cobc/typeck.c:4585 #, c-format msgid "FILE STATUS '%s' must be 2 characters long" msgstr "le FILE STATUS « %s » doit avoir une longueur de 2 caractères" -#: cobc/typeck.c:4440 +#: cobc/typeck.c:4593 #, c-format msgid "FILE STATUS '%s' must be in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE" msgstr "FILE STATUS « %s » doit être dans WORKING-STORAGE, LOCAL-STORAGE ou LINKAGE" -#: cobc/typeck.c:4446 +#: cobc/typeck.c:4599 #, c-format msgid "FILE STATUS '%s' may not be located after an OCCURS DEPENDING field" msgstr "FILE STATUS « %s » ne peut pas être placé après un champ OCCURS DEPENDING" -#: cobc/typeck.c:4460 +#: cobc/typeck.c:4613 #, c-format msgid "variable '%s' will be implicitly defined" msgstr "la variable « %s » sera définie implicitement" -#: cobc/typeck.c:4489 cobc/typeck.c:4550 +#: cobc/typeck.c:4703 msgid "ASSIGN variable" msgstr "variable ASSIGN" -#: cobc/typeck.c:4555 +#: cobc/typeck.c:4708 #, c-format msgid "ASSIGN data item '%s' is invalid" msgstr "l'élément de donnée « %s » de ASSIGN est invalide" -#: cobc/typeck.c:4619 +#: cobc/typeck.c:4773 #, c-format msgid "'%s' CURSOR must be 4 or 6 characters long" msgstr "le CURSOR « %s » doit avoir une longueur de 4 ou 6 caractères" -#: cobc/typeck.c:4680 +#: cobc/typeck.c:4844 #, c-format msgid "'%s' cannot have nested OCCURS DEPENDING" msgstr "« %s » ne peut pas avoir de OCCURS DEPENDING imbriqué" -#: cobc/typeck.c:4694 +#: cobc/typeck.c:4858 #, c-format msgid "'%s' OCCURS DEPENDING ON field item invalid here" msgstr "l'élément du champ OCCURS DEPENDING ON « %s » est invalide ici" -#: cobc/typeck.c:4704 +#: cobc/typeck.c:4868 #, c-format msgid "'%s' cannot have OCCURS DEPENDING because of '%s'" msgstr "« %s » ne peut pas avoir OCCURS DEPENDING à cause de « %s »" -#: cobc/typeck.c:4716 +#: cobc/typeck.c:4880 #, c-format msgid "'%s' OCCURS DEPENDING ON item must have GLOBAL attribute" msgstr "l'élément OCCURS DEPENDING ON « %s » doit avoir l'attribut GLOBAL" -#: cobc/typeck.c:4730 +#: cobc/typeck.c:4894 #, c-format msgid "PASSWORD '%s' for EXTERNAL file '%s' must have EXTERNAL attribute" msgstr "Le PASSWORD « %s » pour le fichier EXTERNAL « %s » doit avoir l'attribut EXTERNAL" -#: cobc/typeck.c:4768 +#: cobc/typeck.c:4932 #, c-format msgid "duplicate APPLY COMMIT target: '%s'" msgstr "la cible de APPLY COMMIT est dupliquée : « %s »" -#: cobc/typeck.c:4782 +#: cobc/typeck.c:4946 msgid "APPLY COMMIT statement invalid for SORT file" msgstr "instruction APPLY COMMIT invalide pour le fichier SORT" -#: cobc/typeck.c:4785 +#: cobc/typeck.c:4949 msgid "APPLY COMMIT statement invalid for REPORT file" msgstr "instruction APPLY COMMIT invalide pour le fichier REPORT" -#: cobc/typeck.c:4792 +#: cobc/typeck.c:4956 #, c-format msgid "APPLY COMMIT item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "l'élément APPLY COMMIT « %s » devrait être défini dans WORKING-STORAGE ou LOCAL-STORAGE" -#: cobc/typeck.c:4806 +#: cobc/typeck.c:4970 #, c-format msgid "item not allowed here: '%s'" msgstr "élément pas permis ici : « %s »" -#: cobc/typeck.c:4819 +#: cobc/typeck.c:4983 #, c-format msgid "%s may not be subscripted" msgstr "%s ne peut pas être utilisé avec un indice" -#: cobc/typeck.c:4823 -#, c-format -msgid "%s may not be reference modified" -msgstr "%s ne peut pas être modifié par référence" - -#: cobc/typeck.c:4883 +#: cobc/typeck.c:5047 #, c-format msgid "DEBUGGING target invalid: '%s'" msgstr "la cible de DEBUGGING est invalide : « %s »" -#: cobc/typeck.c:4889 +#: cobc/typeck.c:5053 #, c-format msgid "DEBUGGING target already specified with ALL PROCEDURES: '%s'" msgstr "la cible de DEBUGGING est déjà spécifiée avec ALL PROCEDURES : « %s »" -#: cobc/typeck.c:4909 +#: cobc/typeck.c:5073 msgid "DEBUGGING target" msgstr "cible de DEBUGGING" -#: cobc/typeck.c:4916 +#: cobc/typeck.c:5080 #, c-format msgid "'%s' is not a valid DEBUGGING target" msgstr "« %s » n'est pas une cible valide pour DEBUGGING" -#: cobc/typeck.c:4962 cobc/typeck.c:4970 +#: cobc/typeck.c:5126 cobc/typeck.c:5134 #, c-format msgid "'%s' is not in DECLARATIVES" msgstr "« %s » n'est pas dans DECLARATIVES" -#: cobc/typeck.c:4984 +#: cobc/typeck.c:5148 #, c-format msgid "invalid reference to '%s' (in DECLARATIVES)" msgstr "référence invalide à « %s » (dans DECLARATIVES)" -#: cobc/typeck.c:4996 +#: cobc/typeck.c:5162 #, c-format msgid "GO TO paragraph '%s' which is defined in another SECTION" msgstr "GO TO vers le paragraphe « %s » qui est défini dans une autre SECTION" -#: cobc/typeck.c:5006 +#: cobc/typeck.c:5172 #, c-format msgid "'%s' is not a procedure name" msgstr "« %s » n'est pas un nom de procédure" -#: cobc/typeck.c:5041 +#: cobc/typeck.c:5207 #, c-format msgid "%s and %s are not in the same SECTION" msgstr "%s et %s ne sont pas dans la même SECTION" -#: cobc/typeck.c:5046 +#: cobc/typeck.c:5212 #, c-format msgid "%s is defined before %s" msgstr "%s est défini avant %s" -#: cobc/typeck.c:5088 +#: cobc/typeck.c:5254 #, c-format msgid "'%s' ANY LENGTH item must be a formal parameter" msgstr "l'élément « %s » ANY LENGTH doit être un paramètre formel" -#: cobc/typeck.c:5136 +#: cobc/typeck.c:5302 #, c-format msgid "LINKAGE item '%s' is not a PROCEDURE USING parameter" msgstr "l'élément LINKAGE « %s » n'est pas un paramètre de PROCEDURE USING" -#: cobc/typeck.c:5192 +#: cobc/typeck.c:5358 #, c-format msgid "'%s' is not an alterable paragraph" msgstr "« %s » n'est pas une paragraphe altérable" -#: cobc/typeck.c:5802 cobc/typeck.c:5806 +#: cobc/typeck.c:5852 +#, fuzzy +#| msgid "invalid expression: %s %s %s" +msgid "invalid expression: unfinished expression" +msgstr "expression invalide : %s %s %s" + +#: cobc/typeck.c:5858 cobc/typeck.c:5865 +msgid "invalid expression" +msgstr "expression invalide" + +#: cobc/typeck.c:5990 cobc/typeck.c:5994 #, c-format msgid "suggest parentheses around %s within %s" msgstr "parenthèses suggérées autour de %s dans %s" -#: cobc/typeck.c:5815 +#: cobc/typeck.c:6003 msgid "invalid conditional expression" msgstr "expression conditionnelle invalide" -#: cobc/typeck.c:5932 +#: cobc/typeck.c:6120 #, c-format msgid "internal decimal structure size exceeded: %d" msgstr "la taille de la structure décimale interne est dépassée : %d" -#: cobc/typeck.c:5935 +#: cobc/typeck.c:6123 msgid "Try to minimize the number of parentheses or split into multiple computations." msgstr "Essayez de minimiser le nombre de parenthèses ou scindez le en plusieurs calculs" -#: cobc/typeck.c:5959 +#: cobc/typeck.c:6147 #, c-format msgid "more than %d nested expressions" msgstr "plus de %d expressions imbriquées" -#: cobc/typeck.c:6000 +#: cobc/typeck.c:6188 msgid "precision of result may change with arithmetic-osvs" msgstr "la précision du résultat pourrait changer avec l'arithmétique osvs" -#: cobc/typeck.c:6080 +#: cobc/typeck.c:6268 #, c-format msgid "unexpected operation: %c (%d)" msgstr "opération inattendue : %c (%d)" -#: cobc/typeck.c:6085 +#: cobc/typeck.c:6273 #, c-format msgid "%s operator may be misplaced" msgstr "l'opérateur %s est peut-être mal placé" -#: cobc/typeck.c:6160 +#: cobc/typeck.c:6349 msgid "unexpected constant expansion" msgstr "expansion de constante inattendue" -#: cobc/typeck.c:6882 cobc/typeck.c:11024 +#: cobc/typeck.c:7106 cobc/typeck.c:11656 cobc/typeck.c:11661 msgid "alphanumeric value is expected" msgstr "une valeur alphanumérique est attendue" -#: cobc/typeck.c:6884 cobc/typeck.c:11019 +#: cobc/typeck.c:7109 cobc/typeck.c:11651 msgid "numeric value is expected" msgstr "une valeur numérique est attendue" -#: cobc/typeck.c:6954 +#: cobc/typeck.c:7203 +#, fuzzy +#| msgid "invalid option detected" +msgid "invalid expression: condition expected" +msgstr "option invalide détectée" + +#: cobc/typeck.c:7271 +#, fuzzy +#| msgid "invalid expression" +msgid "incomplete expression" +msgstr "expression invalide" + +#: cobc/typeck.c:7312 #, c-format msgid "more than %d nested conditions" msgstr "plus de %d conditions imbriquées" -#: cobc/typeck.c:7290 cobc/typeck.c:7371 +#: cobc/typeck.c:7667 cobc/typeck.c:7748 msgid "no CORRESPONDING items found" msgstr "pas d'éléments dans CORRESPONDING trouvés" -#: cobc/typeck.c:7443 +#: cobc/typeck.c:7820 msgid "no items to ACCEPT found" msgstr "aucun élément trouvé pour ACCEPT" -#: cobc/typeck.c:7493 +#: cobc/typeck.c:7870 msgid "no items to DISPLAY found" msgstr "aucun élément trouvé pour DISPLAY" -#: cobc/typeck.c:7605 +#: cobc/typeck.c:7981 msgid "cannot specify figurative constant ZERO in AT clause" msgstr "impossible de spécifier la constante ZÉRO figurative dans la clause AT" -#: cobc/typeck.c:7609 +#: cobc/typeck.c:7985 msgid "value in AT clause is not numeric" msgstr "la valeur dans la clause AT n'est pas numérique" -#: cobc/typeck.c:7615 +#: cobc/typeck.c:7991 msgid "value in AT clause must have 4 or 6 digits" msgstr "la valeur dans la clause AT doit avoir 4 ou 6 chiffres" -#: cobc/typeck.c:7737 +#: cobc/typeck.c:8168 msgid "invalid PROMPT literal" msgstr "littéral PROMPT invalide" -#: cobc/typeck.c:7742 +#: cobc/typeck.c:8173 msgid "invalid PROMPT identifier" msgstr "identificateur PROMPT invalide" -#: cobc/typeck.c:8032 +#: cobc/typeck.c:8465 #, c-format msgid "'%s' is not an input device" msgstr "« %s » n'est pas un périphérique d'entrée" -#: cobc/typeck.c:8059 cobc/typeck.c:9242 +#: cobc/typeck.c:8492 cobc/typeck.c:9708 #, c-format msgid "'%s' is not defined in SPECIAL-NAMES" msgstr "« %s » n'est pas défini dans SPECIAL-NAMES" -#: cobc/typeck.c:8064 +#: cobc/typeck.c:8497 #, c-format msgid "invalid input device '%s'" msgstr "périphérique d'entrée « %s » invalide" -#: cobc/typeck.c:8069 cobc/typeck.c:9246 +#: cobc/typeck.c:8502 cobc/typeck.c:9712 #, c-format msgid "unknown device '%s'; it may exist in another dialect" msgstr "périphérique « %s » inconnu; il peut exister dans un autre dialecte" -#: cobc/typeck.c:8072 cobc/typeck.c:9249 +#: cobc/typeck.c:8505 cobc/typeck.c:9715 #, c-format msgid "unknown device '%s'; not defined in SPECIAL-NAMES" msgstr "périphérique « %s » inconnu; pas défini dans SPECIAL-NAMES" -#: cobc/typeck.c:8088 +#: cobc/typeck.c:8524 msgid "target of RETURNING is not a data pointer" msgstr "la cible de RETURNING n'est pas un pointeur de données" -#: cobc/typeck.c:8115 cobc/typeck.c:12634 cobc/typeck.c:12700 -#: cobc/typeck.c:12768 +#: cobc/typeck.c:8551 cobc/typeck.c:13410 cobc/typeck.c:13479 +#: cobc/typeck.c:13547 #, c-format msgid "cannot change address of '%s', which is not BASED or a LINKAGE item" msgstr "impossible de changer l'adresse de « %s » qui n'est pas BASED ni un élément LINKAGE" -#: cobc/typeck.c:8121 +#: cobc/typeck.c:8557 msgid "target of ALLOCATE must have BASED clause" msgstr "la cible de ALLOCATE doit avoir une clause BASED" -#: cobc/typeck.c:8155 cobc/typeck.c:8571 +#: cobc/typeck.c:8591 cobc/typeck.c:9023 msgid "amount must be specified as a numeric expression" msgstr "le montant doit être spécifié sous forme d'expression numérique" -#: cobc/typeck.c:8161 +#: cobc/typeck.c:8597 msgid "INITIALIZED TO item is not alphanumeric" msgstr "l'élément de INITIALIZED TO n'est pas alphanumérique" -#: cobc/typeck.c:8232 +#: cobc/typeck.c:8667 msgid "only alphanumeric FUNCTION types are allowed here" msgstr "seuls des types de FUNCTION alphanumériques sont autorisés ici" -#: cobc/typeck.c:8240 +#: cobc/typeck.c:8675 msgid "invalid RETURNING field" msgstr "champ RETURNING invalide" -#: cobc/typeck.c:8259 +#: cobc/typeck.c:8694 msgid "STDCALL not available on this platform" msgstr "STDCALL pas disponible sur cette plateforme" -#: cobc/typeck.c:8263 +#: cobc/typeck.c:8698 msgid "STDCALL used on 64-bit Windows platform" msgstr "STDCALL utilisé sur la plateforme Windows 64 bits" -#: cobc/typeck.c:8268 +#: cobc/typeck.c:8703 msgid "STATIC CALL convention requires a literal program name" msgstr "la convention STATIC CALL requiert un nom de programme littéral" -#: cobc/typeck.c:8273 cobc/typeck.c:11975 cobc/typeck.c:12900 -#: cobc/typeck.c:13271 +#: cobc/typeck.c:8708 cobc/typeck.c:12746 cobc/typeck.c:13681 +#: cobc/typeck.c:14077 msgid "HANDLE must be either a generic or a THREAD HANDLE" msgstr "HANDLE doit soit être un générique ou soit un THREAD HANDLE" -#: cobc/typeck.c:8291 +#: cobc/typeck.c:8726 msgid "numeric literal is negative" msgstr "le littéral numérique est négatif" -#: cobc/typeck.c:8370 +#: cobc/typeck.c:8805 msgid "numeric literal exceeds size limits" msgstr "le littéral numérique dépasse les limites de la taille" -#: cobc/typeck.c:8385 +#: cobc/typeck.c:8820 #, c-format msgid "figurative constant %s invalid here" msgstr "constante figurative %s invalide ici" -#: cobc/typeck.c:8403 +#: cobc/typeck.c:8840 #, c-format msgid "'%s' is not a 01 or 77 level item" msgstr "« %s » n'est pas un élément de niveau 01 ou 77" -#: cobc/typeck.c:8407 +#: cobc/typeck.c:8856 #, c-format msgid "'%s' ANY LENGTH item not passed BY REFERENCE" msgstr "l'élément « %s » ANY LENGTH n'est pas passé BY REFERENCE" -#: cobc/typeck.c:8457 cobc/typeck.c:8462 +#: cobc/typeck.c:8909 cobc/typeck.c:8914 #, c-format msgid "wrong number of CALL parameters for '%s', %d given, %d expected" msgstr "mauvais nombre de paramètres dans CALL pour « %s », %d donnés, %d attendus" -#: cobc/typeck.c:8529 cobc/typeck.c:8603 cobc/typeck.c:8607 cobc/typeck.c:8637 -#: cobc/typeck.c:11932 cobc/typeck.c:12092 cobc/typeck.c:12281 -#: cobc/typeck.c:12285 cobc/typeck.c:13206 cobc/typeck.c:13539 -#: cobc/typeck.c:13542 +#: cobc/typeck.c:8981 cobc/typeck.c:9055 cobc/typeck.c:9059 cobc/typeck.c:9095 +#: cobc/typeck.c:12703 cobc/typeck.c:12863 cobc/typeck.c:13052 +#: cobc/typeck.c:13056 cobc/typeck.c:14012 cobc/typeck.c:14345 +#: cobc/typeck.c:14348 #, c-format msgid "%s not allowed on %s files" msgstr "%s n'est pas permis sur les fichiers %s" -#: cobc/typeck.c:8704 +#: cobc/typeck.c:9172 msgid "positions cannot be specified for main windows" msgstr "les positions ne peuvent pas être spécifiées pour les fenêtres principales" -#: cobc/typeck.c:8714 cobc/typeck.c:8718 cobc/typeck.c:8740 +#: cobc/typeck.c:9183 cobc/typeck.c:9187 cobc/typeck.c:9211 msgid "HANDLE must be either a generic or a WINDOW HANDLE or X(10)" msgstr "HANDLE doit soit être un générique ou soit un WINDOW HANDLE ou soit X(10)" -#: cobc/typeck.c:8849 +#: cobc/typeck.c:9324 #, c-format msgid "'%s' is an invalid type for DISPLAY operand" msgstr "« %s » est un type invalide pour l'opérande DISPLAY" -#: cobc/typeck.c:8854 +#: cobc/typeck.c:9329 msgid "invalid type for DISPLAY operand" msgstr "type invalide pour l'opérande DISPLAY" -#: cobc/typeck.c:9202 cobc/typeck.c:9235 +#: cobc/typeck.c:9668 cobc/typeck.c:9701 #, c-format msgid "'%s' is not an output device" msgstr "« %s » n'est pas un périphérique de sortie" -#: cobc/typeck.c:9335 +#: cobc/typeck.c:9800 msgid "invalid use of 88 level in WHEN expression" msgstr "utilisation invalide du niveau 88 dans l'expression WHEN" -#: cobc/typeck.c:9396 +#: cobc/typeck.c:9861 msgid "wrong number of WHEN parameters" msgstr "mauvais nombre de paramètres à WHEN" -#: cobc/typeck.c:9518 cobc/typeck.c:9530 +#: cobc/typeck.c:9983 cobc/typeck.c:9995 #, c-format msgid "target %d of FREE is not a BASED data item" msgstr "la cible %d de FREE n'est pas un élément de donnée BASED" -#: cobc/typeck.c:9536 +#: cobc/typeck.c:10001 #, c-format msgid "target %d of FREE must be a data pointer" msgstr "la cible %d de FREE doit être un pointeur de donnée" -#: cobc/typeck.c:9550 +#: cobc/typeck.c:10015 msgid "GO TO without procedure-name" msgstr "GO TO sans nom de procédure" -#: cobc/typeck.c:9560 +#: cobc/typeck.c:10023 msgid "GO TO with multiple procedure-names" msgstr "GO TO avec plusieurs noms de procédures" -#: cobc/typeck.c:9582 -msgid "GO TO ENTRY with multiple entry-names" -msgstr "GO TO ENTRY avec plusieurs noms d'entrées" - -#: cobc/typeck.c:9646 +#: cobc/typeck.c:10088 msgid "invalid INITIALIZE statement" msgstr "instruction INITIALIZE invalide" -#: cobc/typeck.c:9752 cobc/typeck.c:9755 +#: cobc/typeck.c:10193 cobc/typeck.c:10196 #, c-format msgid "%s operands differ in size" msgstr "les opérandes de %s diffèrent dans leurs tailles" -#: cobc/typeck.c:9785 +#: cobc/typeck.c:10226 #, c-format msgid "unexpected clause %d" msgstr "clause %d inattendue" -#: cobc/typeck.c:9860 cobc/typeck.c:9871 cobc/typeck.c:9882 cobc/typeck.c:9893 +#: cobc/typeck.c:10301 cobc/typeck.c:10312 cobc/typeck.c:10323 +#: cobc/typeck.c:10334 #, c-format msgid "data name expected before %s" msgstr "nom de donnée attendu avant %s" -#: cobc/typeck.c:9903 +#: cobc/typeck.c:10344 #, c-format msgid "ALL, LEADING or TRAILING expected before '%s'" msgstr "ALL, LEADING ou TRAILING attendu avant « %s »" -#: cobc/typeck.c:9913 +#: cobc/typeck.c:10354 msgid "operand has wrong size" msgstr "l'opérande a la mauvaise taille" -#: cobc/typeck.c:10007 +#: cobc/typeck.c:10448 #, c-format msgid "'%s' defined here as PIC %s" msgstr "« %s » défini ici comme PIC %s" -#: cobc/typeck.c:10011 +#: cobc/typeck.c:10452 #, c-format msgid "'%s' defined here as a group of length %d" msgstr "« %s » défini ici comme un groupe de longueur %d" -#: cobc/typeck.c:10017 +#: cobc/typeck.c:10458 #, c-format msgid "internal register '%s' defined as USAGE %s" msgstr "le registre interne « %s » est défini comme USAGE %s" -#: cobc/typeck.c:10020 +#: cobc/typeck.c:10461 #, c-format msgid "'%s' defined here as USAGE %s" msgstr "« %s » défini ici comme USAGE %s" -#: cobc/typeck.c:10045 cobc/typeck.c:10063 +#: cobc/typeck.c:10486 cobc/typeck.c:10504 #, c-format msgid "value size is %d" msgstr "la taille de la valeur est %d" -#: cobc/typeck.c:10059 +#: cobc/typeck.c:10500 #, c-format msgid "value is %s" msgstr "la valeur est %s" -#: cobc/typeck.c:10338 -msgid "invalid destination for MOVE" -msgstr "destination invalide pour MOVE" - -#: cobc/typeck.c:10380 +#: cobc/typeck.c:10824 msgid "MOVE of figurative constant SPACE to numeric item" msgstr "MOVE d'une constante figurative SPACE vers un élément numérique" -#: cobc/typeck.c:10395 +#: cobc/typeck.c:10839 msgid "MOVE of figurative constant QUOTE to numeric item" msgstr "MOVE de la constante figurative QUOTE vers un élément numérique" -#: cobc/typeck.c:10400 cobc/typeck.c:10411 +#: cobc/typeck.c:10844 cobc/typeck.c:10855 msgid "MOVE of figurative constant to numeric item" msgstr "MOVE d'une constante figurative vers un élément numérique" -#: cobc/typeck.c:10469 +#: cobc/typeck.c:10936 msgid "numeric literal in VALUE clause of numeric-edited item" msgstr "littéral numérique dans la clause VALUE de l'élément édité numérique" -#: cobc/typeck.c:10494 +#: cobc/typeck.c:10966 msgid "numeric move to ALPHABETIC" msgstr "déplacement numérique vers ALPHABETIC" -#: cobc/typeck.c:10506 +#: cobc/typeck.c:10978 msgid "data item not signed" msgstr "élément de donnée pas signé" -#: cobc/typeck.c:10509 +#: cobc/typeck.c:10981 msgid "ignoring sign" msgstr "le signe est ignoré" -#: cobc/typeck.c:10821 +#: cobc/typeck.c:11381 msgid "overlapping MOVE may occur and produce unpredictable results" msgstr "un recouvrement dû à MOVE peut avoir lieu et produire un résultat imprévisible" -#: cobc/typeck.c:10828 +#: cobc/typeck.c:11388 msgid "overlapping MOVE may produce unpredictable results" msgstr "un recouvrement dû à MOVE peut produire un résultat imprévisible" -#: cobc/typeck.c:10961 +#: cobc/typeck.c:11593 msgid "invalid source for MOVE" msgstr "source invalide pour MOVE" -#: cobc/typeck.c:10982 +#: cobc/typeck.c:11614 msgid "source is non-numeric - substituting zero" msgstr "la source est non numérique – zéro est substitué" -#: cobc/typeck.c:10988 cobc/typeck.c:10999 +#: cobc/typeck.c:11620 cobc/typeck.c:11631 msgid "invalid VALUE clause" msgstr "clause VALUE invalide" -#: cobc/typeck.c:10991 cobc/typeck.c:12841 cobc/typeck.c:12846 -#: cobc/typeck.c:12873 cobc/typeck.c:12878 +#: cobc/typeck.c:11623 cobc/typeck.c:13622 cobc/typeck.c:13627 +#: cobc/typeck.c:13654 cobc/typeck.c:13659 msgid "invalid SET statement" msgstr "instruction SET invalide" -#: cobc/typeck.c:10993 +#: cobc/typeck.c:11625 msgid "invalid MOVE statement" msgstr "instruction MOVE invalide" -#: cobc/typeck.c:11000 +#: cobc/typeck.c:11632 msgid "literal exceeds data size" msgstr "le littéral dépasse la taille des données" -#: cobc/typeck.c:11004 +#: cobc/typeck.c:11636 msgid "numeric literal exceeds data size" msgstr "le littéral numérique dépasse la taille des données" -#: cobc/typeck.c:11013 +#: cobc/typeck.c:11645 msgid "MOVE of non-integer to alphanumeric" msgstr "MOVE d'un non entier vers un alphanumérique" -#: cobc/typeck.c:11029 +#: cobc/typeck.c:11666 cobc/typeck.c:11671 +#, fuzzy +#| msgid "numeric value is expected" +msgid "national value is expected" +msgstr "une valeur numérique est attendue" + +#: cobc/typeck.c:11676 msgid "value does not fit the picture string" msgstr "la valeur ne tient pas dans la chaîne de l'image" -#: cobc/typeck.c:11035 +#: cobc/typeck.c:11682 msgid "value size exceeds data size" msgstr "la taille de la valeur dépasse la taille de la donnée" -#: cobc/typeck.c:11040 +#: cobc/typeck.c:11687 msgid "sending field larger than receiving field" msgstr "le champ d'envoi est plus grand que le champ de réception" -#: cobc/typeck.c:11045 +#: cobc/typeck.c:11692 msgid "some digits may be truncated" msgstr "certains chiffres peuvent être tronqués" -#: cobc/typeck.c:11798 cobc/typeck.c:11848 +#: cobc/typeck.c:12566 cobc/typeck.c:12619 #, c-format msgid "invalid MOVE target: %s" msgstr "cible MOVE invalide : %s" -#: cobc/typeck.c:12105 +#: cobc/typeck.c:12876 msgid "READ PREVIOUS not allowed for this file type" msgstr "READ PREVIOUS n'est pas permis pour ce type de fichier" -#: cobc/typeck.c:12113 +#: cobc/typeck.c:12884 msgid "KEY ignored with sequential READ" msgstr "KEY ignoré avec un READ séquentiel" -#: cobc/typeck.c:12209 +#: cobc/typeck.c:12980 msgid "figurative constants not allowed in FROM clause" msgstr "constante figurative pas permise dans une clause FROM" -#: cobc/typeck.c:12216 -msgid "literal in FROM clause must be alphanumeric, national or boolean" +#: cobc/typeck.c:12987 +#, fuzzy +#| msgid "literal in FROM clause must be alphanumeric, national or boolean" +msgid "literal in FROM clause must be alphanumeric, utf-8, national or boolean" msgstr "le littéral dans une clause FROM doit être alphanumérique ou national ou booléen" -#: cobc/typeck.c:12239 cobc/typeck.c:13499 +#: cobc/typeck.c:13010 cobc/typeck.c:14305 #, c-format msgid "%s FILE requires a FROM clause" msgstr "FILE %s requiert une clause FROM" -#: cobc/typeck.c:12261 cobc/typeck.c:12345 cobc/typeck.c:13521 +#: cobc/typeck.c:13032 cobc/typeck.c:13116 cobc/typeck.c:14327 #, c-format msgid "%s subject does not refer to a record name" msgstr "le sujet %s ne fait pas référence à un nom d'enregistrement" -#: cobc/typeck.c:12351 +#: cobc/typeck.c:13122 msgid "RELEASE not allowed on this record item" msgstr "RELEASE n'est pas permis sur cet élément d'enregistrement" -#: cobc/typeck.c:12433 cobc/typeck.c:12454 cobc/typeck.c:12461 +#: cobc/typeck.c:13183 cobc/typeck.c:13209 cobc/typeck.c:13237 msgid "invalid SEARCH ALL condition" msgstr "condition SEARCH ALL invalide" -#: cobc/typeck.c:12578 cobc/typeck.c:12585 +#: cobc/typeck.c:13231 +#, fuzzy +#| msgid "SEARCH ALL requires KEY phrase" +msgid "SEARCH ALL requires comparision of KEY field" +msgstr "SEARCH ALL requiert la phrase KEY" + +#: cobc/typeck.c:13354 cobc/typeck.c:13361 msgid "SET targets must be PROGRAM-POINTER" msgstr "les cibles de SET doivent être des PROGRAM-POINTER" -#: cobc/typeck.c:12610 +#: cobc/typeck.c:13386 #, c-format msgid "SET target '%s' is not numeric, an INDEX or a POINTER" msgstr "la cible « %s » de SET n'est pas numérique, un INDEX ou un POINTER" -#: cobc/typeck.c:12627 cobc/typeck.c:12696 cobc/typeck.c:12764 +#: cobc/typeck.c:13403 cobc/typeck.c:13475 cobc/typeck.c:13543 #, c-format msgid "cannot change address of '%s', which is not level 1 or 77" msgstr "impossible de changer l'adresse de « %s » qui n'est pas de niveau 1 ou 77" -#: cobc/typeck.c:12721 +#: cobc/typeck.c:13500 #, c-format msgid "SET target '%s' is not a POINTER for FCD" msgstr "la cible « %s » de SET n'est pas un POINTER pour FCD" -#: cobc/typeck.c:12789 +#: cobc/typeck.c:13569 #, c-format msgid "SET target '%s' is not a POINTER for FCD-KEYDEF" msgstr "la cible « %s » de SET n'est pas un POINTER pour FCD-KEYDEF" -#: cobc/typeck.c:12882 +#: cobc/typeck.c:13663 msgid "field does not have a FALSE clause" msgstr "le champ n'a pas une clause FALSE" -#: cobc/typeck.c:12913 +#: cobc/typeck.c:13694 msgid "THREAD-priority must be between 1 and 32767" msgstr "la priorité de THREAD doit être entre 1 et 32767" -#: cobc/typeck.c:12933 +#: cobc/typeck.c:13714 msgid "SET ATTRIBUTE requires a screen item as subject" msgstr "SET ATTRIBUTE requiert un élément écran comme sujet" -#: cobc/typeck.c:12939 +#: cobc/typeck.c:13720 msgid "SET ATTRIBUTE subject does not refer to a screen item" msgstr "le sujet de SET ATTRIBUTE ne fait pas référence à un élément écran" -#: cobc/typeck.c:12990 -msgid "invalid SORT filename" -msgstr "nom de fichier SORT invalide" - -#: cobc/typeck.c:13051 -msgid "invalid SORT USING parameter" -msgstr "paramètre SORT USING invalide" - -#: cobc/typeck.c:13080 -msgid "invalid SORT GIVING parameter" -msgstr "paramètre SORT GIVING invalide" +#: cobc/typeck.c:13835 cobc/typeck.c:13875 +#, fuzzy, c-format +#| msgid "invalid parameter: %s" +msgid "invalid %s parameter" +msgstr "paramètre invalide : %s" -#: cobc/typeck.c:13134 cobc/typeck.c:13161 cobc/typeck.c:13181 +#: cobc/typeck.c:13940 cobc/typeck.c:13967 cobc/typeck.c:13987 msgid "invalid key item" msgstr "élément de clé invalide" -#: cobc/typeck.c:13211 +#: cobc/typeck.c:14017 msgid "LENGTH/SIZE clause only allowed on INDEXED files" msgstr "clause LENGTH/SIZE uniquement autorisée sur des fichiers INDEXED" -#: cobc/typeck.c:13216 +#: cobc/typeck.c:14022 msgid "START not allowed with ACCESS MODE RANDOM" msgstr "START n'est pas permis avec ACCESS MODE RANDOM" -#: cobc/typeck.c:13305 -#, c-format -msgid "%s item '%s' must be numeric and an integer" -msgstr "l'élément %s « %s » doit être numérique et un entier" - -#: cobc/typeck.c:13311 +#: cobc/typeck.c:14111 cobc/typeck.c:14117 #, c-format msgid "%s item '%s' must be an integer" msgstr "l'élément %s « %s » doit être un entier" -#: cobc/typeck.c:13315 +#: cobc/typeck.c:14121 #, c-format msgid "%s item '%s' may not have PICTURE with P in it" msgstr "l'élément %s « %s » ne peut pas avoir PICTURE avec P dedans" -#: cobc/typeck.c:13331 +#: cobc/typeck.c:14137 #, c-format msgid "'%s' is not an elementary item" msgstr "« %s » n'est pas un élément élémentaire" -#: cobc/typeck.c:13407 +#: cobc/typeck.c:14213 msgid "STRING items must be all NATIONAL or none" msgstr "les éléments STRING doivent tous être NATIONAL ou rien" -#: cobc/typeck.c:13555 +#: cobc/typeck.c:14361 msgid "LOCK clause invalid here" msgstr "clause LOCK invalide ici" -#: cobc/typeck.c:13800 +#: cobc/typeck.c:14606 msgid "data item is not part of a report" msgstr "l'élément de donnée ne fait pas partie d'un rapport" -#: cobc/typeck.c:13820 +#: cobc/typeck.c:14626 msgid "improper use of SUPPRESS PRINTING" msgstr "utilisation incorrecte de SUPPRESS PRINTING" -#: cobc/typeck.c:13835 +#: cobc/typeck.c:14642 #, c-format msgid "%s must be alphanumeric or national" msgstr "%s doit être alphanumérique ou national" -#: cobc/typeck.c:13846 +#: cobc/typeck.c:14652 #, c-format msgid "%s may not be a figurative constant" msgstr "%s ne peut pas être une constante figurative" -#: cobc/typeck.c:13885 +#: cobc/typeck.c:14690 #, c-format msgid "%s must be a child of the input record" msgstr "%s doit être un enfant de l'enregistrement d'entrée" -#: cobc/typeck.c:13911 +#: cobc/typeck.c:14715 #, c-format msgid "%s may not be an ignored item in JSON/XML GENERATE" msgstr "%s ne peut pas être un élément ignoré dans JSON/XML GENERATE" -#: cobc/typeck.c:13922 +#: cobc/typeck.c:14725 #, c-format msgid "%s must be elementary" msgstr "%s doit être élémentaire" -#: cobc/typeck.c:13935 +#: cobc/typeck.c:14737 #, c-format msgid "STRING item '%s' must be USAGE DISPLAY or NATIONAL" msgstr "l'élément STRING « %s » doit être USAGE DISPLAY ou NATIONAL" -#: cobc/typeck.c:13947 +#: cobc/typeck.c:14749 #, c-format msgid "%s must be USAGE DISPLAY or NATIONAL" msgstr "%s doit être USAGE DISPLAY ou NATIONAL" -#: cobc/typeck.c:13961 +#: cobc/typeck.c:14761 #, c-format msgid "%s must be an integer" msgstr "%s doit être un entier" -#: cobc/typeck.c:13977 cobc/typeck.c:13983 +#: cobc/typeck.c:14776 cobc/typeck.c:14782 msgid "JSON/XML GENERATE receiving item" msgstr "élément reçu de JSON/XML GENERATE" -#: cobc/typeck.c:13980 +#: cobc/typeck.c:14779 msgid "JSON/XML GENERATE receiving item may not have JUSTIFIED clause" msgstr "l'élément reçu de JSON/XML GENERATE ne peut pas avoir la clause JUSTIFIED" -#: cobc/typeck.c:14068 +#: cobc/typeck.c:14867 msgid "JSON/XML GENERATE input record may not be reference modified" msgstr "l'enregistrement d'entrée de JSON/XML GENERATE ne peut pas être modifié par référence" -#: cobc/typeck.c:14074 +#: cobc/typeck.c:14873 msgid "JSON/XML GENERATE input record may not have RENAMES clause" msgstr "l'enregistrement d'entrée de JSON/XML GENERATE ne peut pas avoir de clause RENAMES" -#: cobc/typeck.c:14079 +#: cobc/typeck.c:14878 #, c-format msgid "all the children of '%s' are ignored in JSON/XML GENERATE" msgstr "tous les enfants de « %s » sont ignorés dans JSON/XML GENERATE" -#: cobc/typeck.c:14086 +#: cobc/typeck.c:14885 msgid "JSON/XML GENERATE input record has subrecords with non-unique names" msgstr "l'élément d'entrée de JSON/XML GENERATE a des sous-enregistrements avec des noms non uniques" -#: cobc/typeck.c:14091 +#: cobc/typeck.c:14890 msgid "floating-point items in JSON/XML GENERATE" msgstr "éléments en virgule flottante dans JSON/XML GENERATE" -#: cobc/typeck.c:14095 +#: cobc/typeck.c:14894 msgid "OCCURS items in JSON/XML GENERATE" msgstr "éléments OCCURS dans JSON/XML GENERATE" -#: cobc/typeck.c:14142 +#: cobc/typeck.c:14941 msgid "NAMESPACE must be a valid URI" msgstr "NAMESPACE doit être un URI valide" -#: cobc/typeck.c:14186 +#: cobc/typeck.c:14985 msgid "NAMESPACE-PREFIX must be a valid XML name" msgstr "NAMESPACE-PREFIX doit être un nom XML valide" -#: cobc/typeck.c:14215 cobc/typeck.c:14223 +#: cobc/typeck.c:15014 cobc/typeck.c:15022 msgid "NAME OF item" msgstr "élément NAME OF" -#: cobc/typeck.c:14220 +#: cobc/typeck.c:15019 msgid "NAME OF item must be the input record or a child of it" msgstr "l'élément NAME OF doit être l'enregistrement d'entrée ou un de ses enfants" -#: cobc/typeck.c:14230 +#: cobc/typeck.c:15029 msgid "NAME OF ... OMITTED only valid for source identifier" msgstr "NAME OF ... OMITTED est uniquement valable pour un identificateur source" -#: cobc/typeck.c:14238 +#: cobc/typeck.c:15037 #, c-format msgid "NAME OF literal must be a valid %s identifier" msgstr "le littéral de NAME OF doit être un identificateur %s valide" -#: cobc/typeck.c:14265 cobc/typeck.c:14266 cobc/typeck.c:14269 -#: cobc/typeck.c:14273 +#: cobc/typeck.c:15062 cobc/typeck.c:15063 cobc/typeck.c:15066 +#: cobc/typeck.c:15070 msgid "TYPE OF item" msgstr "élément TYPE OF" -#: cobc/typeck.c:14291 +#: cobc/typeck.c:15088 msgid "SUPPRESS WHEN SPACE item" msgstr "élément SUPPRESS WHEN SPACE" -#: cobc/typeck.c:14294 +#: cobc/typeck.c:15091 msgid "SUPPRESS WHEN LOW-VALUE item" msgstr "élément SUPPRESS WHEN LOW-VALUE" -#: cobc/typeck.c:14296 +#: cobc/typeck.c:15093 msgid "SUPPRESS WHEN HIGH-VALUE item" msgstr "élément SUPPRESS WHEN HIGH-VALUE" -#: cobc/typeck.c:14325 cobc/typeck.c:14333 cobc/typeck.c:14337 +#: cobc/typeck.c:15122 cobc/typeck.c:15130 cobc/typeck.c:15134 msgid "SUPPRESS item" msgstr "élément SUPPRESS" -#: cobc/typeck.c:14329 +#: cobc/typeck.c:15126 msgid "SUPPRESS item with WHEN clause" msgstr "élément SUPPRESS avec clause WHEN" -#: cobc/typeck.c:14407 +#: cobc/typeck.c:15204 msgid "WITH ATTRIBUTES specified, but no attributes can be generated" msgstr "WITH ATTRIBUTES spécifié mais aucun attribut ne sait être généré" @@ -6069,168 +6289,186 @@ msgid " -Wparentheses warn if parentheses are omitted around AND within msgstr " -Wparentheses avertir s'il manque des parenthèses autours de AND à l'intérieur de OR" #: cobc/warning.def:70 -msgid " -Wstrict-typing warn strictly about type mismatch" +#, fuzzy +#| msgid " -Wstrict-typing warn strictly about type mismatch" +msgid " -Wstrict-typing warn strictly about type mismatch, even when same size" msgstr " -Wstrict-typing avertir de manière stricte à propos des désaccords de types" #: cobc/warning.def:73 +#, fuzzy +#| msgid " -Wstrict-typing warn strictly about type mismatch" +msgid " -Wtyping warn about type mismatch" +msgstr " -Wstrict-typing avertir de manière stricte à propos des désaccords de types" + +#: cobc/warning.def:76 msgid " -Wimplicit-define warn whenever data items are implicitly defined" msgstr " -Wimplicit-define avertir quand des éléments de données sont définis implicitement" -#: cobc/warning.def:76 +#: cobc/warning.def:79 msgid " -Wno-corresponding do not warn about CORRESPONDING with no matching items" msgstr " -Wno-corresponding ne pas avertir au sujet de CORRESPONDIG sans éléments correspondants" -#: cobc/warning.def:79 +#: cobc/warning.def:82 msgid " -Winitial-value warn if initial VALUE clause is ignored" msgstr " -Winitial-value avertir quand la clause Initial VALUE est ignorée" -#: cobc/warning.def:82 +#: cobc/warning.def:85 msgid " -Wprototypes warn about missing FUNCTION prototypes/definitions" msgstr " -Wprototypes avertir quand les prototypes/définitions des FUNCTION sont manquants" -#: cobc/warning.def:85 +#: cobc/warning.def:88 msgid " -Warithmetic-osvs warn if arithmetic expression precision has changed" msgstr " -Warithmetic-osvs avertir si la précision de l'expression arithmétique a changé" -#: cobc/warning.def:88 +#: cobc/warning.def:91 msgid " -Wcall-params warn about non 01/77 items for CALL parameters" msgstr " -Wcall-params avertir sur les éléments 01/77 pour les paramètres de CALL" -#: cobc/warning.def:91 +#: cobc/warning.def:94 msgid " -Wconstant-expression warn about expressions that always resolve to true/false" msgstr " -Wconstant-expression avertir au sujet des expressions qui aboutissent toujours à vrai/faux" -#: cobc/warning.def:94 +#: cobc/warning.def:97 msgid " -Wconstant-numlit-expression\twarn about numeric expressions that always resolve to true/false" msgstr " -Wconstant-numlit-expression\tavertir au sujet des expressions numériques qui aboutissent toujours à vrai/faux" -#: cobc/warning.def:97 +#: cobc/warning.def:100 msgid " -Wlarger-01-redefines warn about larger redefines allowed by COBOL standards" msgstr " -Wlarger-01-redefines avertir au sujet des plus grosses redéfinitions autorisées par les standards COBOL" -#: cobc/warning.def:100 +#: cobc/warning.def:103 msgid " -Wcolumn-overflow warn about text after program-text area, FIXED format" msgstr " -Wcolumn-overflow avertir si un texte est après la zone de texte programme, format FIXED" -#: cobc/warning.def:103 +#: cobc/warning.def:106 msgid " -Wterminator warn about lack of scope terminator END-XXX" msgstr " -Wterminator avertir quand il manque un terminateur de portée END-XXX" -#: cobc/warning.def:106 +#: cobc/warning.def:109 msgid " -Wlinkage warn about dangling LINKAGE items" msgstr " -Wlinkage avertir au sujet des éléments LINKAGE ballants" -#: cobc/warning.def:109 +#: cobc/warning.def:112 msgid " -Wunreachable warn about likely unreachable statements" msgstr " -Wunreachable avertir au sujet d'instructions probablement inatteignables" -#: cobc/warning.def:112 +#: cobc/warning.def:115 msgid " -Wno-dialect do not warn about dialect specific issues" msgstr " -Wno-dialect ne pas avertir au sujet de problèmes spécifiques au dialecte" -#: cobc/warning.def:115 +#: cobc/warning.def:118 msgid " -Wno-goto-section do not warn about GO TO section-name" msgstr " -Wno-goto-section ne pas avertir à propos de nom de section de GO TO" -#: cobc/warning.def:118 +#: cobc/warning.def:121 msgid " -Wgoto-different-section\twarn about GO TO a praragraph defined in a different section" msgstr " -Wgoto-different-section\tavertir à propos de GO TO allant vers un paragraphe défini dans une section différente" -#: cobc/warning.def:121 +#: cobc/warning.def:124 msgid " -Wsuspicious-perform-thru\twarn if PERFORM THRU references procedures not in ascending order or multiple sections" msgstr " -Wsuspicious-perform-thru\tavertir si PERFORM THRU référence des procédures pas dans l'ordre croissant ou des sections multiples" -#: cobc/warning.def:124 +#: cobc/warning.def:127 msgid " -Wdangling-text warn about source text after program-area" msgstr " -Wdangling-text avertir au sujet de texte source après la zone du programme" -#: cobc/warning.def:127 +#: cobc/warning.def:130 msgid " -Wno-missing-newline do not warn about missing newlines" msgstr " -Wno-missing-newline ne pas avertir au sujet de sauts de ligne manquants" -#: cobc/warning.def:130 +#: cobc/warning.def:133 msgid " -Wno-others do not warn about different issues" msgstr " -Wno-others ne pas avertir à propos de problèmes différents" -#: cobc/warning.def:133 +#: cobc/warning.def:136 msgid " -Wno-unsupported do not warn if runtime does not support a feature used" msgstr " -Wno-unsupported ne pas avertir si le système d'exécution ne supporte pas une fonctionnalité utilisée" -#: libcob/call.c:94 +#: libcob/call.c:98 #, c-format msgid "LoadLibrary/GetProcAddress error %d" msgstr "erreur %d dans LoadLibrary/GetProcAddress" -#: libcob/call.c:841 +#: libcob/call.c:626 +#, c-format +msgid "preloading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:817 #, c-format msgid "%s: PROGRAM name exceeds %d characters" msgstr "%s : le nom du programme dépasse %d caractères" -#: libcob/call.c:842 +#: libcob/call.c:818 #, c-format msgid "%s: FUNCTION name exceeds %d characters" msgstr "%s : le nom du la fonction dépasse %d caractères" -#: libcob/call.c:1067 +#: libcob/call.c:945 libcob/call.c:978 +#, c-format +msgid "loading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:1049 msgid "indeterminable error in resolve of COBOL CALL" msgstr "erreur indéterminée dans la résolution de CALL du COBOL" -#: libcob/call.c:1149 +#: libcob/call.c:1145 #, c-format msgid "user-defined FUNCTION '%s' not found" msgstr "FUNCTION « %s » définie par l'utilisateur n'est pas trouvée" -#: libcob/call.c:1239 libcob/call.c:1325 libcob/call.c:1445 libcob/call.c:1472 +#: libcob/call.c:1247 libcob/call.c:1328 libcob/call.c:1448 libcob/call.c:1475 #, c-format msgid "NULL parameter passed to '%s'" msgstr "paramètre NULL passé à « %s »" -#: libcob/call.c:1329 +#: libcob/call.c:1332 #, c-format msgid "invalid number of arguments passed to '%s'" msgstr "nombre de paramètres invalide passés à « %s »" -#: libcob/call.c:1449 +#: libcob/call.c:1452 msgid "multiple call to 'cob_setjmp'" msgstr "appels multiples à « cob_setjmp »" -#: libcob/call.c:1476 +#: libcob/call.c:1479 msgid "call to 'cob_longjmp' with no prior 'cob_setjmp'" msgstr "appel à « cob_longjmp » sans « cob_setjmp » précédent" -#: libcob/call.c:1703 libcob/call.c:1730 libcob/common.c:8144 +#: libcob/call.c:1608 +#, c-format +msgid "preloading of '%s' failed" +msgstr "" + +#: libcob/call.c:1706 libcob/call.c:1733 libcob/common.c:8965 msgid "cob_init() has not been called" msgstr "cob_init() n'a pas été appelé" -#: libcob/call.c:1709 +#: libcob/call.c:1712 #, c-format msgid "parameter %d is not within range of %d" msgstr "le paramètre %d n'est pas dans la plage de %d" -#: libcob/call.c:1715 +#: libcob/call.c:1718 #, c-format msgid "parameter %d is NULL" msgstr "le paramètre %d est NULL" -#: libcob/call.c:2042 +#: libcob/call.c:2045 msgid "NULL field" msgstr "champ NULL" -#: libcob/call.c:2050 +#: libcob/call.c:2053 msgid "field not allocated" msgstr "champ pas alloué" -#: libcob/call.c:2116 +#: libcob/call.c:2119 #, c-format msgid "attempt to over-write constant field with '%s'" msgstr "tentative d'écraser le champ constant avec « %s »" -#: libcob/call.c:2156 libcob/call.c:2212 -#, c-format -msgid "attempt to over-write constant parameter %d with " -msgstr "tentative d'écraser le paramètre constant %d avec " - -#: libcob/call.c:2263 +#: libcob/call.c:2161 libcob/call.c:2219 libcob/call.c:2270 #, c-format msgid "attempt to over-write constant parameter %d with '%s'" msgstr "tentative d'écraser le paramètre constant %d avec « %s »" @@ -6270,655 +6508,682 @@ msgstr "%s: option invalide — « %c »" msgid "%s: option requires an argument -- '%c'" msgstr "%s: l'option requiert un argument — « %c »" -#: libcob/common.c:1242 +#: libcob/common.c:1074 +#, c-format +msgid "requested coredump creation failed with status %d" +msgstr "" + +#: libcob/common.c:1303 msgid "fatal arithmetic error" msgstr "erreur arithmétique fatale" -#: libcob/common.c:1245 +#: libcob/common.c:1306 msgid "interrupt from keyboard" msgstr "interruption depuis le clavier" -#: libcob/common.c:1249 +#: libcob/common.c:1310 msgid "hangup" msgstr "raccroché" -#: libcob/common.c:1253 +#: libcob/common.c:1314 msgid "quit" msgstr "quitté" -#: libcob/common.c:1257 +#: libcob/common.c:1318 msgid "termination" msgstr "fin" -#: libcob/common.c:1261 +#: libcob/common.c:1322 msgid "emt termination" msgstr "fin emt" -#: libcob/common.c:1265 +#: libcob/common.c:1326 msgid "broken pipe" msgstr "pipe interrompu" -#: libcob/common.c:1269 +#: libcob/common.c:1330 msgid "I/O signal" msgstr "signal E/S" -#: libcob/common.c:1273 +#: libcob/common.c:1334 msgid "attempt to reference invalid memory address" msgstr "tentative de référencer une adresse mémoire invalide" -#: libcob/common.c:1277 +#: libcob/common.c:1338 msgid "bus error" msgstr "erreur de bus" -#: libcob/common.c:1281 +#: libcob/common.c:1342 msgid "illegal instruction" msgstr "instruction illégale" -#: libcob/common.c:1285 +#: libcob/common.c:1346 msgid "abort" msgstr "interruption" -#: libcob/common.c:1289 +#: libcob/common.c:1350 msgid "process killed" msgstr "processus tué" -#: libcob/common.c:1293 +#: libcob/common.c:1354 msgid "alarm signal" msgstr "signal d'alarme" -#: libcob/common.c:1297 +#: libcob/common.c:1358 msgid "stop process" msgstr "arrêt du processus" -#: libcob/common.c:1301 libcob/common.c:1305 +#: libcob/common.c:1362 libcob/common.c:1366 msgid "child process stopped" msgstr "processus enfant stoppé" #. TRANSLATORS: This msgid is used for an OS signal like SIGABRT. -#: libcob/common.c:1312 +#: libcob/common.c:1373 msgid "signal" msgstr "signal" #. TRANSLATORS: This msgid is shown for a requested but not complete stack trace. -#: libcob/common.c:1314 +#: libcob/common.c:1375 msgid "(more COBOL runtime elements follow...)" msgstr "(plus d'éléments du système d'exécution COBOL suivent…)" -#: libcob/common.c:1316 libcob/common.c:8101 +#: libcob/common.c:1377 libcob/common.c:8922 #, c-format msgid "abnormal termination - file contents may be incorrect" msgstr "fin anormale – le contenu du fichier peut être incorrect" -#: libcob/common.c:3145 libcob/common.c:8581 libcob/common.c:8595 +#: libcob/common.c:3441 libcob/common.c:9398 libcob/common.c:9412 msgid "version mismatch" msgstr "désaccord de version" -#: libcob/common.c:3146 libcob/common.c:3148 libcob/common.c:8582 -#: libcob/common.c:8584 +#: libcob/common.c:3442 libcob/common.c:3444 libcob/common.c:9399 +#: libcob/common.c:9401 #, c-format msgid "%s has version %s.%d" msgstr "%s a la version %s.%d" -#: libcob/common.c:3158 +#: libcob/common.c:3454 #, c-format msgid "CALL to %s requires %d arguments" msgstr "CALL à %s requiert %d arguments" -#: libcob/common.c:3779 +#: libcob/common.c:4141 #, c-format msgid "code execution leaving %s" msgstr "exécution du code sortant de %s" -#: libcob/common.c:3789 +#: libcob/common.c:4151 #, c-format msgid "BASED/LINKAGE item %s has NULL address" msgstr "l'élément %s BASED/LINKAGE a une adresse NULL" -#: libcob/common.c:3802 libcob/common.c:3806 +#: libcob/common.c:4168 +#, c-format +msgid "memory violation detected for '%s' after %s" +msgstr "" + +#: libcob/common.c:4171 +#, c-format +msgid "memory violation detected after %s" +msgstr "" + +#: libcob/common.c:4229 libcob/common.c:4244 libcob/common.c:4283 +#: libcob/common.c:4287 #, c-format msgid "LINKAGE item %s not passed by caller" msgstr "l'élément LINKAGE %s n'est pas passé par l'appelant" -#: libcob/common.c:3892 +#: libcob/common.c:4253 +#, c-format +msgid "LINKAGE item %s (size %lu) too small in the caller (size %lu)" +msgstr "" + +#: libcob/common.c:4378 #, c-format msgid "'%s' (Type: %s) not numeric: '%s'" msgstr "« %s » (Type : %s) pas numérique : « %s »" -#: libcob/common.c:3917 +#: libcob/common.c:4403 #, c-format msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgstr "OCCURS DEPENDING ON « %s » hors limites : %d" -#: libcob/common.c:3920 libcob/common.c:3958 +#: libcob/common.c:4406 libcob/common.c:4444 #, c-format msgid "maximum subscript for '%s': %d" msgstr "indice maximum pour « %s » : %d" -#: libcob/common.c:3922 +#: libcob/common.c:4408 #, c-format msgid "minimum subscript for '%s': %d" msgstr "indice minimum pour « %s » : %d" -#: libcob/common.c:3955 +#: libcob/common.c:4441 #, c-format msgid "current maximum subscript for '%s': %d" msgstr "indice maximum actuel pour « %s » : %d" -#: libcob/common.c:3979 +#: libcob/common.c:4465 #, c-format msgid "offset of '%s' out of bounds: %d, maximum: %d" msgstr "le décalage de « %s » est hors limites : %d, maximum : %d" -#: libcob/common.c:3994 +#: libcob/common.c:4480 #, c-format msgid "length of '%s' out of bounds: %d, maximum: %d" msgstr "la longueur de « %s » est hors limites : %d, maximum : %d" -#: libcob/common.c:4005 +#: libcob/common.c:4491 #, c-format msgid "length of '%s' out of bounds: %d, starting at: %d, maximum: %d" msgstr "la longueur de « %s » est hors limites : %d, débute à %d, maximum : %d" -#: libcob/common.c:4093 libcob/common.c:4098 +#: libcob/common.c:4579 libcob/common.c:4584 #, c-format msgid "EXTERNAL item '%s' previously allocated with size %d, requested size is %d" msgstr "l'élément EXTERNAL « %s » précédemment alloué avec la taille %d, la taille demandée est %d" -#: libcob/common.c:4593 +#: libcob/common.c:4961 libcob/common.c:5201 #, c-format msgid "COB_CURRENT_DATE '%s' is invalid" msgstr "COB_CURRENT_DATE « %s » est invalide" -#: libcob/common.c:5641 libcob/common.c:5644 +#: libcob/common.c:6321 libcob/common.c:6324 msgid "Program abandoned at user request" msgstr "Programme abandonné à la demande de l'utilisateur" -#: libcob/common.c:5668 +#: libcob/common.c:6348 #, c-format msgid "parameter to SYSTEM call is larger than %d characters" msgstr "le paramètre à l'appel SYSTEM est plus grand que %d caractères" -#: libcob/common.c:6202 +#: libcob/common.c:6998 #, c-format msgid "error '%s' during CBL_GC_FORK" msgstr "erreur « %s » durant CBL_GC_FORK" -#: libcob/common.c:6207 libcob/common.c:6304 +#: libcob/common.c:7003 libcob/common.c:7100 #, c-format msgid "'%s' is not supported on this platform" msgstr "« %s » n'est pas supporté sur cette plateforme" -#: libcob/common.c:6233 +#: libcob/common.c:7029 #, c-format msgid "error '%s' for P%d during CBL_GC_WAITPID" msgstr "erreur « %s » pour P%d durant CBL_GC_WAITPID" -#: libcob/common.c:6424 -msgid "Call to CBL_GC_GETOPT with wrong longoption size." +#: libcob/common.c:7220 +#, fuzzy +#| msgid "Call to CBL_GC_GETOPT with wrong longoption size." +msgid "call to CBL_GC_GETOPT with wrong longoption size" msgstr "Appel à CBL_GC_GETOPT avec la mauvaise taille de longoption." -#: libcob/common.c:6429 -msgid "Call to CBL_GC_GETOPT with missing longind." +#: libcob/common.c:7225 +#, fuzzy +#| msgid "Call to CBL_GC_GETOPT with missing longind." +msgid "call to CBL_GC_GETOPT with missing longind" msgstr "Appel à CBL_GC_GETOPT avec longind manquant." -#: libcob/common.c:6856 libcob/common.c:6877 libcob/common.c:6890 -#: libcob/common.c:9107 libcob/common.c:9111 +#: libcob/common.c:7654 libcob/common.c:7675 libcob/common.c:7688 +#: libcob/common.c:9924 libcob/common.c:9928 #, c-format msgid "(default)" msgstr "(défaut)" -#: libcob/common.c:7143 libcob/common.c:7162 +#: libcob/common.c:7973 libcob/common.c:7992 msgid "should be unsigned" msgstr "devrait être non signé" -#: libcob/common.c:7151 libcob/common.c:7200 +#: libcob/common.c:7981 libcob/common.c:8030 msgid "should be numeric" msgstr "devrait être numérique" -#: libcob/common.c:7209 +#: libcob/common.c:8039 #, c-format msgid "minimum value: %lu" msgstr "valeur minimum : %lu" -#: libcob/common.c:7261 libcob/common.c:7825 libcob/common.c:7839 +#: libcob/common.c:8069 libcob/common.c:8640 libcob/common.c:8654 +#: bin/cobcrun.c:206 #, c-format msgid "should not contain '%c'" msgstr "ne devrait pas contenir « %c »" -#: libcob/common.c:7342 libcob/common.c:7390 libcob/common.c:7418 -#: libcob/common.c:7427 libcob/common.c:7435 libcob/common.c:7460 +#: libcob/common.c:8150 libcob/common.c:8169 libcob/common.c:8231 +#: libcob/common.c:8240 libcob/common.c:8248 libcob/common.c:8273 #, c-format msgid "not set" msgstr "non défini" -#: libcob/common.c:7410 libcob/common.c:7413 libcob/common.c:7416 +#: libcob/common.c:8223 libcob/common.c:8226 libcob/common.c:8229 #, c-format msgid "set by %s" msgstr "défini par %s" -#: libcob/common.c:7552 +#: libcob/common.c:8367 #, c-format msgid "WARNING - '%s' without a value - ignored!" msgstr "AVERTISSEMENT – « %s » sans valeur – ignoré !" -#: libcob/common.c:7555 +#: libcob/common.c:8370 #, c-format msgid "'%s' without a value!" msgstr "« %s » sans valeur !" -#: libcob/common.c:7582 +#: libcob/common.c:8397 #, c-format msgid "WARNING - '%s %s' without a value - ignored!" msgstr "AVERTISSEMENT – « %s %s » sans valeur – ignoré !" -#: libcob/common.c:8085 +#: libcob/common.c:8906 msgid "error" msgstr "erreur" -#: libcob/common.c:8127 +#: libcob/common.c:8948 msgid "attempt to CANCEL active program" msgstr "tentative d'utiliser CANCEL sur le programme actif" -#: libcob/common.c:8154 +#: libcob/common.c:8975 msgid "CALL of program with CHAINING clause" msgstr "CALL au programme avec la clause CHAINING" -#: libcob/common.c:8158 +#: libcob/common.c:8979 msgid "stack overflow, possible PERFORM depth exceeded" msgstr "débordement de pile, la profondeur PERFORM est peut-être dépassée" -#: libcob/common.c:8163 +#: libcob/common.c:8984 msgid "invalid entry/exit in GLOBAL USE procedure" msgstr "entrée/sortie invalide dans la procédure GLOBAL USE" -#: libcob/common.c:8167 +#: libcob/common.c:8988 msgid "unable to allocate memory" msgstr "impossible d'allouer la mémoire" -#: libcob/common.c:8172 +#: libcob/common.c:8993 msgid "invalid entry into module" msgstr "entrée invalide dans le module" -#: libcob/common.c:8179 +#: libcob/common.c:9000 #, c-format msgid "recursive CALL from '%s' to '%s' which is NOT RECURSIVE" msgstr "appel récursif (CALL) de « %s » vers « %s » qui n'est pas récursive" -#: libcob/common.c:8184 +#: libcob/common.c:9005 #, c-format msgid "invalid recursive COBOL CALL to '%s'" msgstr "CALL récursif de COBOL invalide à « %s »" -#: libcob/common.c:8199 +#: libcob/common.c:9020 msgid "end of file" msgstr "fin du fichier" -#: libcob/common.c:8202 +#: libcob/common.c:9023 msgid "key out of range" msgstr "clé hors limite" -#: libcob/common.c:8205 +#: libcob/common.c:9026 msgid "key order not ascending" msgstr "l'ordre de la clé n'est pas croissant" -#: libcob/common.c:8208 +#: libcob/common.c:9029 msgid "record key already exists" msgstr "la clé d'enregistrement existe déjà" -#: libcob/common.c:8211 +#: libcob/common.c:9032 msgid "record key does not exist" msgstr "la clé d'enregistrement n'existe pas" -#: libcob/common.c:8214 +#: libcob/common.c:9035 msgid "permanent file error" msgstr "erreur de fichier permanente" -#: libcob/common.c:8217 +#: libcob/common.c:9038 msgid "inconsistent file name" msgstr "nom de fichier incohérent" -#: libcob/common.c:8220 +#: libcob/common.c:9041 msgid "file does not exist" msgstr "le fichier n'existe pas" -#: libcob/common.c:8223 +#: libcob/common.c:9044 msgid "permission denied" msgstr "permission refusée" -#: libcob/common.c:8226 +#: libcob/common.c:9047 msgid "mismatch of fixed file attributes" msgstr "désaccord des attributs du fichier" -#: libcob/common.c:8229 +#: libcob/common.c:9050 msgid "file already open" msgstr "le fichier est déjà ouvert" -#: libcob/common.c:8232 +#: libcob/common.c:9053 msgid "file not open" msgstr "fichier pas ouvert" -#: libcob/common.c:8235 +#: libcob/common.c:9056 msgid "READ must be executed first" msgstr "READ doit être exécuté en premier" -#: libcob/common.c:8238 +#: libcob/common.c:9059 msgid "record overflow" msgstr "débordement de l'enregistrement" -#: libcob/common.c:8241 +#: libcob/common.c:9062 msgid "READ after unsuccessful READ/START" msgstr "READ après un READ/START infructueux" -#: libcob/common.c:8244 +#: libcob/common.c:9065 msgid "READ/START not allowed, file not open for input" msgstr "READ/START pas permis, fichier pas ouvert en lecture" -#: libcob/common.c:8247 +#: libcob/common.c:9068 msgid "WRITE not allowed, file not open for output" msgstr "WRITE pas permis, fichier pas ouvert en écriture" -#: libcob/common.c:8250 +#: libcob/common.c:9071 msgid "DELETE/REWRITE not allowed, file not open for I-O" msgstr "DELETE/REWRITE pas permis, fichier pas ouvert pour E-S" -#: libcob/common.c:8253 +#: libcob/common.c:9074 msgid "record locked by another file connector" msgstr "enregistrement verrouillé par un autre connecteur de fichier" -#: libcob/common.c:8256 +#: libcob/common.c:9077 msgid "LINAGE values invalid" msgstr "valeurs LINAGE invalides" -#: libcob/common.c:8259 +#: libcob/common.c:9080 msgid "file sharing conflict" msgstr "confit de partage de fichier" -#: libcob/common.c:8262 +#: libcob/common.c:9083 msgid "invalid data in LINE SEQUENTIAL file" msgstr "donnée invalide dans le fichier LINE SEQUENTIAL" -#: libcob/common.c:8266 +#: libcob/common.c:9087 msgid "runtime library is not configured for this operation" msgstr "la bibliothèque d'exécution n'est pas configurée pour cette opération" -#: libcob/common.c:8271 +#: libcob/common.c:9092 msgid "unknown file error" msgstr "erreur de fichier inconnue" -#: libcob/common.c:8278 +#: libcob/common.c:9099 #, c-format msgid "%s (status = %02d) for file %s" msgstr "%s (statut = %02d) pour le fichier « %s »" -#: libcob/common.c:8281 +#: libcob/common.c:9102 #, c-format msgid "%s (status = %02d) for file %s on %s" msgstr "%s (statut = %02d) pour le fichier %s sur %s" -#: libcob/common.c:8288 +#: libcob/common.c:9109 msgid "attempt to use non-implemented function" msgstr "tentative d'utiliser une fonction non implémentée" -#: libcob/common.c:8291 +#: libcob/common.c:9112 msgid "attempt to use non-implemented XML I/O" msgstr "tentative d'utiliser une E/S XML non implémentée" -#: libcob/common.c:8294 +#: libcob/common.c:9115 msgid "attempt to use non-implemented JSON I/O" msgstr "tentative d'utiliser une E/S JSON non implémentée" -#: libcob/common.c:8341 +#: libcob/common.c:9162 msgid "environment variables" msgstr "variables d'environnement" -#: libcob/common.c:8466 libcob/common.c:8539 libcob/common.c:8554 -#: libcob/common.c:8859 libcob/common.c:8893 libcob/common.c:8910 -#: libcob/common.c:8925 +#: libcob/common.c:9283 libcob/common.c:9356 libcob/common.c:9371 +#: libcob/common.c:9676 libcob/common.c:9710 libcob/common.c:9727 +#: libcob/common.c:9742 #, c-format msgid "%s, version %d.%d.%d" msgstr "%s, version %d.%d.%d" -#: libcob/common.c:8468 libcob/common.c:8541 libcob/common.c:8558 -#: libcob/common.c:8862 libcob/common.c:8913 libcob/common.c:8928 +#: libcob/common.c:9285 libcob/common.c:9358 libcob/common.c:9375 +#: libcob/common.c:9679 libcob/common.c:9730 libcob/common.c:9745 #, c-format msgid "%s, version %d.%d.%d (compiled with %d.%d)" msgstr "%s, version %d.%d.%d (compilé avec %d.%d)" -#: libcob/common.c:8471 +#: libcob/common.c:9288 #, c-format msgid "%s, version %s" msgstr "%s, version %s" -#: libcob/common.c:8739 +#: libcob/common.c:9556 #, c-format msgid "License LGPLv3+: GNU LGPL version 3 or later <%s>" msgstr "Licence LGPLv3+ : GNU LGPL version 3 ou ultérieure <%s>" -#: libcob/common.c:8803 libcob/common.c:8805 +#: libcob/common.c:9620 libcob/common.c:9622 msgid "dynamic loading" msgstr "chargement dynamique" -#: libcob/common.c:8938 +#: libcob/common.c:9755 msgid "mouse support" msgstr "support de la souris" -#: libcob/common.c:8955 +#: libcob/common.c:9772 msgid "CALL configuration" msgstr "Configuration CALL" -#: libcob/common.c:8956 +#: libcob/common.c:9773 msgid "File I/O configuration" msgstr "Configuration E/S fichier" -#: libcob/common.c:8957 +#: libcob/common.c:9774 msgid "Screen I/O configuration" msgstr "Configuration E/S écran" -#: libcob/common.c:8958 +#: libcob/common.c:9775 msgid "Miscellaneous" msgstr "Divers" -#: libcob/common.c:8959 +#: libcob/common.c:9776 msgid "System configuration" msgstr "Configuration système" -#: libcob/common.c:8963 +#: libcob/common.c:9780 msgid "runtime configuration" msgstr "configuration de l'exécution" -#: libcob/common.c:8965 +#: libcob/common.c:9782 msgid "via" msgstr "via" -#: libcob/common.c:9040 libcob/common.c:9068 +#: libcob/common.c:9857 libcob/common.c:9885 msgid "... removed from environment" msgstr "... retiré de l'environnement" -#: libcob/common.c:9094 libcob/common.c:9096 +#: libcob/common.c:9911 libcob/common.c:9913 #, c-format msgid "(set by %s)" msgstr "(défini par %s)" -#: libcob/common.c:9104 +#: libcob/common.c:9921 #, c-format msgid "(reset)" msgstr "(réinitialisé)" -#: libcob/common.c:9334 +#: libcob/common.c:10151 msgid "compiler was not built with --enable-debug-log; COB_DEBUG_LOG ignored" msgstr "le compilateur n'a pas été compilé avec --enable-debug-log ; COB_DEBUG_LOG est ignoré" -#: libcob/common.c:9524 libcob/common.c:9550 +#: libcob/common.c:10338 libcob/common.c:10364 #, c-format msgid "%s called with unknown option: %d" msgstr "%s appelé avec l'option inconnue : %d" #. TRANSLATORS: This msgid is shown for a requested but empty stack trace. -#: libcob/common.c:9597 +#: libcob/common.c:10411 msgid "No COBOL runtime elements on stack." msgstr "Pas d'éléments du système d'exécution COBOL sur la pile." -#: libcob/common.c:9915 +#: libcob/common.c:10734 #, c-format msgid "Module dump due to %s" msgstr "Vidange du module à cause de %s" -#: libcob/common.c:9943 +#: libcob/common.c:10762 #, c-format msgid "Dump Program-Id %s from %s compiled %s" msgstr "Vidange Program-id %s de %s compilé %s" -#: libcob/common.c:9969 +#: libcob/common.c:10788 #, c-format msgid "dump written to %s" msgstr "vidange écrite dans %s" -#: libcob/fileio.c:816 libcob/fileio.c:1628 libcob/fileio.c:1882 -#: libcob/fileio.c:3812 libcob/fileio.c:4396 libcob/fileio.c:9658 -#: libcob/fileio.c:9686 libcob/numeric.c:1583 +#: libcob/fileio.c:784 libcob/fileio.c:1664 libcob/fileio.c:1926 +#: libcob/fileio.c:3938 libcob/fileio.c:4522 libcob/fileio.c:10049 +#: libcob/fileio.c:10077 libcob/numeric.c:1915 #, c-format msgid "invalid internal call of %s" msgstr "appel interne invalide de %s" -#: libcob/fileio.c:3359 +#: libcob/fileio.c:3486 #, c-format msgid "BDB error: %s" msgstr "erreur BDB : %s" -#: libcob/fileio.c:3369 +#: libcob/fileio.c:3496 #, c-format msgid "BDB error: %s %s" msgstr "erreur BDB : %s %s" -#: libcob/fileio.c:3383 libcob/fileio.c:3403 +#: libcob/fileio.c:3510 libcob/fileio.c:3530 #, c-format msgid "cannot join BDB environment (%s), error: %d %s" msgstr "impossible de joindre l'environnement BDB (%s), erreur : %d %s" -#: libcob/fileio.c:3458 libcob/fileio.c:3483 libcob/fileio.c:3509 -#: libcob/fileio.c:3528 +#: libcob/fileio.c:3585 libcob/fileio.c:3610 libcob/fileio.c:3636 +#: libcob/fileio.c:3655 #, c-format msgid "BDB (%s), error: %d %s" msgstr "BOB (%s), erreur : %d %s" -#: libcob/fileio.c:6071 +#: libcob/fileio.c:6199 #, c-format msgid "ERROR FILE %s has ASSIGN field is NULL" msgstr "ERROR FILE %s a le champ ASSIGN à NULL" -#: libcob/fileio.c:6862 +#: libcob/fileio.c:7050 #, c-format msgid "call to CBL_OPEN_FILE with wrong access mode: %d" msgstr "appel à CBL_OPEN_FILE avec le mauvais mode d'accès : %d" -#: libcob/fileio.c:6946 +#: libcob/fileio.c:7135 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_lock: %d" msgstr "appel à CBL_CREATE_FILE avec le mauvais file_lock : %d" -#: libcob/fileio.c:6949 +#: libcob/fileio.c:7138 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_dev: %d" msgstr "appel à CBL_CREATE_FILE avec le mauvais file_dev : %d" -#: libcob/fileio.c:7174 libcob/fileio.c:7457 +#: libcob/fileio.c:7362 libcob/fileio.c:7645 #, c-format msgid "'%s' - File detail area is too short" msgstr "« %s » – La zone des détails du fichier est trop courte" -#: libcob/fileio.c:7686 +#: libcob/fileio.c:7871 msgid "SORT is unable to acquire temporary file" msgstr "SORT est incapable d'acquérir un fichier temporaire" #. TRANSLATORS: This msgid is concatenated with a filename; -#. setup translation to allow this to be followed on the right side. -#: libcob/fileio.c:8432 +#. setup translation to allow this to be followed on the right side, +#. if necessary use a colon or hyphen +#: libcob/fileio.c:8777 msgid "implicit CLOSE of " msgstr "CLOSE implicite de " -#: libcob/fileio.c:9617 libcob/fileio.c:9752 +#: libcob/fileio.c:10008 libcob/fileio.c:10193 #, c-format msgid "ERROR: EXTFH called with FCD version %d" msgstr "ERREUR : EXTFH appelé avec FCD version %d" -#: libcob/fileio.c:9886 +#: libcob/fileio.c:10310 #, c-format msgid "ERROR: EXTFH called with wrong file organization %d" msgstr "ERREUR : EXTFH appelé avec la mauvaise organisation de fichier %d" -#: libcob/fileio.c:9893 +#: libcob/fileio.c:10317 #, c-format msgid "ERROR: EXTFH called with no %s pointer" msgstr "ERREUR : EXTFH appelé avec aucun pointeur %s" -#: libcob/fileio.c:10029 +#: libcob/fileio.c:10461 #, c-format msgid "ERROR: EXTFH called with no %s pointer; Function %d" msgstr "ERREUR : EXTFH appelé avec aucun pointeur %s ; Fonction %d" -#: libcob/fileio.c:10208 +#: libcob/fileio.c:10683 #, c-format msgid "ERROR: EXTFH called with unknown Function %d" msgstr "ERREUR : EXTFH appelé avec la Fonction %d inconnue" -#: libcob/reportio.c:630 +#: libcob/reportio.c:629 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT %d" msgstr "INITIATE %s LINE %d excède PAGE LIMIT %d" -#: libcob/reportio.c:637 libcob/reportio.c:652 +#: libcob/reportio.c:636 libcob/reportio.c:651 #, c-format msgid "INITIATE %s NEXT GROUP %d exceeds PAGE LIMIT" msgstr "INITIATE %s NEXT GROUP %d excède PAGE LIMIT" -#: libcob/reportio.c:645 +#: libcob/reportio.c:644 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT" msgstr "INITIATE %s LINE %d excède PAGE LIMIT" -#: libcob/reportio.c:1327 +#: libcob/reportio.c:1336 #, c-format msgid "INITIATE %s was already done" msgstr "INITIATE %s a déjà été réalisé" -#: libcob/reportio.c:1343 +#: libcob/reportio.c:1352 #, c-format msgid "INITIATE %s PAGE LIMIT problem" msgstr "problème de INITIATE %s PAGE LIMIT" -#: libcob/reportio.c:1420 +#: libcob/reportio.c:1429 #, c-format msgid "TERMINATE %s but no INITIATE was done" msgstr "TERMINATE %s mais pas de INITIATE réalisé" -#: libcob/reportio.c:1565 +#: libcob/reportio.c:1574 #, c-format msgid "GENERATE %s but no INITIATE was done" msgstr "GENERATE %s mais pas de INITIATE réalisé" -#: libcob/reportio.c:1917 +#: libcob/reportio.c:1926 #, c-format msgid "could not find line to SUPPRESS in report %s" msgstr "impossible de trouver la ligne à supprimer dans le rapport %s" -#: libcob/screenio.c:568 +#: libcob/screenio.c:1055 msgid "failed to initialize curses" msgstr "échec de l'initialisation de curses" -#: libcob/screenio.c:4081 +#: libcob/screenio.c:5034 msgid "end of program, please press a key to exit" msgstr "fin du programme, appuyez sur une touche pour sortir" -#: libcob/termio.c:78 libcob/termio.c:117 +#: libcob/termio.c:76 libcob/termio.c:136 msgid "(Not representable)" msgstr "(Pas représentable)" -#: libcob/termio.c:354 +#: libcob/termio.c:406 #, c-format msgid "cannot open %s (=%s)" msgstr "impossible d'ouvrir %s (=%s)" -#: libcob/termio.c:369 +#: libcob/termio.c:421 msgid "COB_DISPLAY_PUNCH_FILE is invalid, output to SYSPUNCH skipped" msgstr "COB_DISPLAY_PUNCH_FILE est invalide, sortie vers SYSPUNCH ignorée" @@ -6986,35 +7251,155 @@ msgstr "" " base à la liste de modules préchargés\n" " (COB_LIBRARY_PATH ou COB_PRELOAD)" -#: bin/cobcrun.c:146 -#, c-format -msgid "GnuCOBOL home page: <%s>" -msgstr "Page d'accueil de GnuCOBOL : <%s>" - -#: bin/cobcrun.c:148 -#, c-format -msgid "General help using GNU software: <%s>" -msgstr "Aide générale sur l'utilisation de logiciel GNU : <%s>" - -#: bin/cobcrun.c:288 +#: bin/cobcrun.c:286 msgid "invalid configuration file name" msgstr "nom de fichier de configuration invalide" -#: bin/cobcrun.c:355 +#: bin/cobcrun.c:353 #, c-format msgid "invalid module argument '%s'" msgstr "argument de module invalide « %s »" -#: bin/cobcrun.c:410 +#: bin/cobcrun.c:408 #, c-format msgid "%s: missing PROGRAM name" msgstr "%s : nom de programme manquant" -#: bin/cobcrun.c:412 +#: bin/cobcrun.c:410 #, c-format msgid "Try '%s --help' for more information." msgstr "Essayez « %s --help » pour plus d'informations." +#~ msgid "unexpected error_node parameter" +#~ msgstr "paramètre error_node inattendu" + +#~ msgid "CONTROL DIVISION" +#~ msgstr "CONTRÔLE DE LA DIVISION" + +#, c-format +#~ msgid "%s item '%s' should be USAGE DISPLAY" +#~ msgstr "%s élément « %s » devrait être USAGE DISPLAY" + +#, c-format +#~ msgid "'%s' cannot have JUSTIFIED RIGHT" +#~ msgstr "« %s » ne peut pas avoir JUSTIFIED RIGHT" + +#~ msgid "cannot specify both FULL and JUSTIFIED" +#~ msgstr "ne peut spécifier à la fois FULL et JUSTIFIED" + +#~ msgid "cannot specify both PIC and VALUE" +#~ msgstr "ne peut spécifier à la fois PIC et VALUE" + +#, c-format +#~ msgid "unexpected USAGE: %d" +#~ msgstr "USAGE inattendu : %d" + +#~ msgid "" +#~ " -fec=<exception-name>\tenable code generation for <exception-name>,\n" +#~ " sets -fsource-location" +#~ msgstr "" +#~ " -fec=<nom-exception>\tactiver la génération de code pour <nom-exception>,\n" +#~ " défini -fsource-location" + +#~ msgid "" +#~ " -febcdic-table=[DEFAULT|RESTRICTED-GC|IBM|GCOS]\tdefine EBCDIC translation table:\n" +#~ " * default: translation to extended ASCII as per MF\n" +#~ " * restricted-gc: translation from restricted ASCII only\n" +#~ " * ibm: translation to restricted ASCII as per IBM\n" +#~ " * gcos: translation to extended ASCII as per GCOS7" +#~ msgstr "" +#~ " -febcdic-table=[DEFAULT|RESTRICTED-GC|IBM|GCOS]\tdéfinir la table de traduction EBCDIC :\n" +#~ " * par défaut : traduction vers ASCII étendu selon MF\n" +#~ " * restricted-gc : traduction uniquement depuis ASCII restreint\n" +#~ " * ibm : traduction vers ASCII restreint selon IBM\n" +#~ " * gcos : traduction vers ASCII étendu selon GCOS7" + +#~ msgid "GnuCOBOL home page: <https://www.gnu.org/software/gnucobol/>" +#~ msgstr "Page d'accueil de GnuCOBOL : <https://www.gnu.org/software/gnucobol/>" + +#~ msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" +#~ msgstr "Aide générale sur l'utilisation de logiciel GNU: <https://www.gnu.org/software/gethelp.fr.html>" + +#~ msgid " --tsymbols specify symbols in listing, use -ftsymbols instead" +#~ msgstr " --tsymbols spécifie les symboles dans le listing, utilisez plutôt -ftsymbols" + +#~ msgid "ASSIGN DISK FROM" +#~ msgstr "ASSIGN DISK FROM" + +#~ msgid "file sort requires KEY phrase" +#~ msgstr "le tri du fichier requiert la phrase KEY" + +#~ msgid "invalid CLASS value" +#~ msgstr "valeur CLASS invalide" + +#~ msgid "H literals must contain at least one character" +#~ msgstr "les littéraux H doivent contenir au moins un caractère" + +#, c-format +#~ msgid "FUNCTION %s has invalid/not supported arguments - tag %d" +#~ msgstr "FUNCTION %s a des arguments invalides ou non supportés – balise %d" + +#, c-format +#~ msgid "'%s' is not a numeric literal" +#~ msgstr "« %s » n'est pas un littéral numérique" + +#, c-format +#~ msgid "'%s' is not unsigned" +#~ msgstr "« %s » n'est pas non signé" + +#, c-format +#~ msgid "FUNCTION %s has invalid argument" +#~ msgstr "FUNCTION %s a un paramètre invalide" + +#, c-format +#~ msgid "'%s' is Alpha, instead of a numeric value" +#~ msgstr "« %s » est Alpha au lieu d'une valeur numérique" + +#, c-format +#~ msgid "'%s' is Alpha Edited, instead of a numeric value" +#~ msgstr "« %s » est Alpha Edited au lieu d'une valeur numérique" + +#, c-format +#~ msgid "'%s' is not a numeric value" +#~ msgstr "« %s » n'est pas une valeur numérique" + +#, c-format +#~ msgid "'%s' is not an integer value" +#~ msgstr "« %s » n'est pas une valeur entière" + +#~ msgid "DECIMAL-POINT IS COMMA clauses differ" +#~ msgstr "les clauses DECIMAL-POINT IS COMMA diffèrent" + +#~ msgid "CURRENCY clauses differ" +#~ msgstr "les clauses CURRENCY diffèrent" + +#, c-format +#~ msgid "'%s' is not an alphabet name" +#~ msgstr "« %s » n'est pas un nom d'alphabet" + +#~ msgid "GO TO ENTRY with multiple entry-names" +#~ msgstr "GO TO ENTRY avec plusieurs noms d'entrées" + +#~ msgid "invalid destination for MOVE" +#~ msgstr "destination invalide pour MOVE" + +#~ msgid "invalid SORT filename" +#~ msgstr "nom de fichier SORT invalide" + +#~ msgid "invalid SORT USING parameter" +#~ msgstr "paramètre SORT USING invalide" + +#~ msgid "invalid SORT GIVING parameter" +#~ msgstr "paramètre SORT GIVING invalide" + +#, c-format +#~ msgid "%s item '%s' must be numeric and an integer" +#~ msgstr "l'élément %s « %s » doit être numérique et un entier" + +#, c-format +#~ msgid "attempt to over-write constant parameter %d with " +#~ msgstr "tentative d'écraser le paramètre constant %d avec " + #~ msgid "set right margin for source (fixed format only)" #~ msgstr "défini la marge de droite pour les sources (format fixe uniquement)" @@ -7124,9 +7509,6 @@ msgstr "Essayez « %s --help » pour plus d'informations." #~ msgid "invalid parameter -std=%s" #~ msgstr "paramètre invalide -std=%s" -#~ msgid "invalid option detected" -#~ msgstr "option invalide détectée" - #~ msgid "unknown option ignored:\t%s" #~ msgstr "option inconnue ignorée :\t%s" diff --git a/po/gnucobol.pot b/po/gnucobol.pot index 24e529469..f46b0e5ca 100644 --- a/po/gnucobol.pot +++ b/po/gnucobol.pot @@ -1,14 +1,14 @@ -# LANGUAGE translation for GnuCOBOL. -# Copyright (C) 2002-2020 Free Software Foundation, Inc. +# SOME DESCRIPTIVE TITLE. +# Copyright (C) YEAR Free Software Foundation, Inc. # This file is distributed under the same license as the gnucobol package. # FIRST AUTHOR <EMAIL@ADDRESS>, YEAR. # #, fuzzy msgid "" msgstr "" -"Project-Id-Version: gnucobol 3.2-preview\n" +"Project-Id-Version: gnucobol 3.2\n" "Report-Msgid-Bugs-To: gnucobol-messages@gnu.org\n" -"POT-Creation-Date: 2022-10-23 03:06+0200\n" +"POT-Creation-Date: 2023-07-28 19:20+0200\n" "PO-Revision-Date: YEAR-MO-DA HO:MI+ZONE\n" "Last-Translator: FULL NAME <EMAIL@ADDRESS>\n" "Language-Team: LANGUAGE <LL@li.org>\n" @@ -17,559 +17,567 @@ msgstr "" "Content-Type: text/plain; charset=CHARSET\n" "Content-Transfer-Encoding: 8bit\n" -#: cobc/cobc.c:98 +#: cobc/cobc.c:116 cobc/codegen.c:2655 cobc/scanner.l:1375 #, c-format msgid "invalid parameter: %s" msgstr "" -#: cobc/cobc.c:153 cobc/cobc.c:2233 cobc/cobc.c:2236 cobc/parser.y:802 -#: cobc/reserved.c:4022 libcob/common.c:226 libcob/common.c:1308 -#: libcob/common.c:2384 libcob/common.c:2388 libcob/common.c:2426 -#: libcob/common.c:2464 libcob/common.c:2654 libcob/common.c:7351 -#: libcob/common.c:8370 libcob/common.c:9391 libcob/common.c:9470 -#: libcob/common.c:9912 +#: cobc/cobc.c:171 cobc/cobc.c:2392 cobc/cobc.c:2395 cobc/parser.y:895 +#: cobc/reserved.c:4039 libcob/common.c:235 libcob/common.c:1369 +#: libcob/common.c:2698 libcob/common.c:2702 libcob/common.c:2740 +#: libcob/common.c:2778 libcob/common.c:2939 libcob/common.c:8159 +#: libcob/common.c:9191 libcob/common.c:10209 libcob/common.c:10284 +#: libcob/common.c:10731 msgid "unknown" msgstr "" -#: cobc/cobc.c:855 +#: cobc/cobc.c:905 msgid "internal compiler error" msgstr "" -#: cobc/cobc.c:921 cobc/cobc.c:1008 cobc/cobc.c:1070 cobc/cobc.c:1146 -#: cobc/cobc.c:1186 cobc/cobc.c:1262 +#: cobc/cobc.c:971 cobc/cobc.c:1058 cobc/cobc.c:1120 cobc/cobc.c:1196 +#: cobc/cobc.c:1236 cobc/cobc.c:1312 #, c-format msgid "cannot allocate %d bytes of memory" msgstr "" -#: cobc/cobc.c:934 cobc/cobc.c:950 cobc/cobc.c:970 cobc/cobc.c:1029 -#: cobc/cobc.c:1048 cobc/cobc.c:1166 cobc/cobc.c:1281 cobc/cobc.c:1323 -#: cobc/field.c:2216 libcob/common.c:8191 +#: cobc/cobc.c:984 cobc/cobc.c:1000 cobc/cobc.c:1020 cobc/cobc.c:1079 +#: cobc/cobc.c:1098 cobc/cobc.c:1216 cobc/cobc.c:1331 cobc/cobc.c:1415 +#: cobc/field.c:2346 libcob/common.c:9012 #, c-format msgid "call to %s with NULL pointer" msgstr "" -#: cobc/cobc.c:991 +#: cobc/cobc.c:1041 #, c-format msgid "cannot reallocate %d bytes of memory" msgstr "" -#: cobc/cobc.c:1087 cobc/cobc.c:1203 +#: cobc/cobc.c:1137 cobc/cobc.c:1253 msgid "attempt to reallocate non-allocated memory" msgstr "" -#: cobc/cobc.c:1120 cobc/cobc.c:1236 +#: cobc/cobc.c:1170 cobc/cobc.c:1286 #, c-format msgid "call to %s with invalid pointer, as it is missing in list" msgstr "" -#: cobc/cobc.c:1448 +#: cobc/cobc.c:1540 #, c-format msgid "assuming literal for unquoted '%s'" msgstr "" -#: cobc/cobc.c:1495 +#: cobc/cobc.c:1587 msgid " - length exceeds maximum" msgstr "" -#: cobc/cobc.c:1499 +#: cobc/cobc.c:1591 msgid " - name cannot be empty" msgstr "" -#: cobc/cobc.c:1502 -msgid " - name cannot begin with space or underscore" +#: cobc/cobc.c:1594 +msgid " - name cannot begin with space or hyphen" msgstr "" -#: cobc/cobc.c:1505 +#: cobc/cobc.c:1597 msgid " - name cannot begin with 'cob_' or 'COB_'" msgstr "" -#: cobc/cobc.c:1508 +#: cobc/cobc.c:1600 msgid " - name duplicates a 'C' keyword" msgstr "" -#: cobc/cobc.c:1511 +#: cobc/cobc.c:1603 msgid " - name cannot contain a directory separator" msgstr "" -#: cobc/cobc.c:1520 +#: cobc/cobc.c:1612 #, c-format msgid "invalid file base name '%s'%s" msgstr "" -#: cobc/cobc.c:1524 +#: cobc/cobc.c:1616 #, c-format msgid "invalid ENTRY '%s'%s" msgstr "" -#: cobc/cobc.c:1527 +#: cobc/cobc.c:1619 #, c-format msgid "invalid PROGRAM-ID '%s'%s" msgstr "" -#: cobc/cobc.c:1659 +#: cobc/cobc.c:1751 #, c-format msgid "file '%s' does not exist" msgstr "" -#: cobc/cobc.c:1685 +#: cobc/cobc.c:1777 #, c-format msgid "duplicate exception '%s'" msgstr "" -#: cobc/cobc.c:1733 +#: cobc/cobc.c:1825 #, c-format msgid "invalid exception-name: %s" msgstr "" -#: cobc/cobc.c:1870 cobc/cobc.c:8780 +#: cobc/cobc.c:1998 cobc/cobc.c:9211 msgid "please check environment variables as noted above" msgstr "" -#: cobc/cobc.c:1882 cobc/error.c:348 cobc/error.c:382 cobc/error.c:408 -#: cobc/error.c:411 cobc/error.c:477 cobc/error.c:631 cobc/error.c:675 -#: cobc/error.c:779 cobc/error.c:782 +#: cobc/cobc.c:2010 cobc/error.c:140 msgid "error: " msgstr "" -#: cobc/cobc.c:1905 +#: cobc/cobc.c:2033 #, c-format msgid "duplicate DEFINE '%s' - ignored" msgstr "" -#: cobc/cobc.c:1958 +#: cobc/cobc.c:2086 #, c-format msgid "environment variable '%s' is '%s'; should not contain '%c'" msgstr "" -#: cobc/cobc.c:1988 +#: cobc/cobc.c:2116 msgid "parameter buffer size exceeded" msgstr "" -#: cobc/cobc.c:2028 +#: cobc/cobc.c:2156 #, c-format msgid "warning: could not move temporary file to %s" msgstr "" -#: cobc/cobc.c:2239 +#: cobc/cobc.c:2329 +#, c-format +msgid "environment variable '%s' has invalid content" +msgstr "" + +#: cobc/cobc.c:2398 #, c-format msgid "aborting compile of %s at line %d (%s: %s)" msgstr "" -#: cobc/cobc.c:2243 +#: cobc/cobc.c:2402 #, c-format msgid "aborting codegen for %s, last statement at line %d (%s: %s)" msgstr "" -#: cobc/cobc.c:2246 +#: cobc/cobc.c:2405 #, c-format msgid "aborting codegen for %s (%s: %s)" msgstr "" -#: cobc/cobc.c:2251 +#: cobc/cobc.c:2410 msgid "aborting" msgstr "" -#: cobc/cobc.c:2329 libcob/common.c:2823 libcob/common.c:8149 bin/cobcrun.c:375 +#: cobc/cobc.c:2488 libcob/common.c:3107 libcob/common.c:8970 bin/cobcrun.c:373 #, c-format msgid "Please report this!" msgstr "" -#: cobc/cobc.c:2346 bin/cobcrun.c:100 +#: cobc/cobc.c:2505 bin/cobcrun.c:100 #, c-format msgid "License GPLv3+: GNU GPL version 3 or later <%s>" msgstr "" -#: cobc/cobc.c:2348 libcob/common.c:8741 bin/cobcrun.c:102 +#: cobc/cobc.c:2507 libcob/common.c:9558 bin/cobcrun.c:102 msgid "" "This is free software; see the source for copying conditions. There is NO\n" "warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." msgstr "" -#: cobc/cobc.c:2350 libcob/common.c:8743 bin/cobcrun.c:104 +#: cobc/cobc.c:2509 libcob/common.c:9560 bin/cobcrun.c:104 #, c-format msgid "Written by %s" msgstr "" #. TRANSLATORS: This msgid is intended as the "Packaged" msgid, %s expands to date and time -#: cobc/cobc.c:2352 cobc/cobc.c:2365 libcob/common.c:8747 bin/cobcrun.c:106 +#: cobc/cobc.c:2511 cobc/cobc.c:2524 libcob/common.c:9564 bin/cobcrun.c:106 #, c-format msgid "Built %s" msgstr "" #. TRANSLATORS: This msgid is intended as the "Built" msgid, %s expands to date and time -#: cobc/cobc.c:2354 cobc/cobc.c:2367 libcob/common.c:8750 bin/cobcrun.c:108 +#: cobc/cobc.c:2513 cobc/cobc.c:2526 libcob/common.c:9567 bin/cobcrun.c:108 #, c-format msgid "Packaged %s" msgstr "" -#: cobc/cobc.c:2356 cobc/cobc.c:2369 cobc/cobc.c:2478 libcob/common.c:8787 +#: cobc/cobc.c:2515 cobc/cobc.c:2528 cobc/cobc.c:2637 libcob/common.c:9604 msgid "C version" msgstr "" -#: cobc/cobc.c:2382 +#: cobc/cobc.c:2541 libcob/common.c:1075 msgid "executing:" msgstr "" -#: cobc/cobc.c:2384 +#: cobc/cobc.c:2543 msgid "to be executed:" msgstr "" -#: cobc/cobc.c:2422 cobc/cobc.c:2423 libcob/common.c:6834 libcob/common.c:6835 -#: libcob/common.c:6866 libcob/common.c:6867 +#: cobc/cobc.c:2581 cobc/cobc.c:2582 libcob/common.c:7632 libcob/common.c:7633 +#: libcob/common.c:7664 libcob/common.c:7665 msgid "env" msgstr "" -#: cobc/cobc.c:2474 libcob/common.c:8783 +#: cobc/cobc.c:2633 libcob/common.c:9600 msgid "build information" msgstr "" -#: cobc/cobc.c:2475 libcob/common.c:8784 +#: cobc/cobc.c:2634 libcob/common.c:9601 msgid "build environment" msgstr "" -#: cobc/cobc.c:2484 libcob/common.c:8794 +#: cobc/cobc.c:2643 libcob/common.c:9611 msgid "GnuCOBOL information" msgstr "" -#: cobc/cobc.c:2492 cobc/cobc.c:2575 cobc/cobc.c:2591 libcob/common.c:8410 -#: libcob/common.c:8777 libcob/common.c:8778 libcob/common.c:8812 -#: libcob/common.c:8878 libcob/common.c:8900 libcob/common.c:8934 +#: cobc/cobc.c:2651 cobc/cobc.c:2739 cobc/cobc.c:2755 libcob/common.c:9233 +#: libcob/common.c:9594 libcob/common.c:9595 libcob/common.c:9629 +#: libcob/common.c:9695 libcob/common.c:9717 libcob/common.c:9751 msgid "disabled" msgstr "" -#: cobc/cobc.c:2523 cobc/cobc.c:2541 libcob/common.c:7397 libcob/common.c:8400 -#: libcob/common.c:8407 libcob/common.c:8816 libcob/common.c:8834 +#: cobc/cobc.c:2687 cobc/cobc.c:2705 libcob/common.c:8179 libcob/common.c:9221 +#: libcob/common.c:9230 libcob/common.c:9633 libcob/common.c:9651 msgid "yes" msgstr "" -#: cobc/cobc.c:2525 cobc/cobc.c:2543 libcob/common.c:7399 libcob/common.c:8402 -#: libcob/common.c:8818 libcob/common.c:8836 +#: cobc/cobc.c:2689 cobc/cobc.c:2707 libcob/common.c:8181 libcob/common.c:9223 +#: libcob/common.c:9635 libcob/common.c:9653 msgid "no" msgstr "" -#: cobc/cobc.c:2529 libcob/common.c:8822 +#: cobc/cobc.c:2693 libcob/common.c:9639 msgid "8 bytes" msgstr "" -#: cobc/cobc.c:2531 libcob/common.c:8824 +#: cobc/cobc.c:2695 libcob/common.c:9641 msgid "4 bytes" msgstr "" -#: cobc/cobc.c:2535 cobc/cobc.c:2537 libcob/common.c:8828 libcob/common.c:8830 +#: cobc/cobc.c:2699 cobc/cobc.c:2701 libcob/common.c:9645 libcob/common.c:9647 msgid "endianness" msgstr "" -#: cobc/cobc.c:2535 libcob/common.c:8828 +#: cobc/cobc.c:2699 libcob/common.c:9645 msgid "big-endian" msgstr "" -#: cobc/cobc.c:2537 libcob/common.c:8830 +#: cobc/cobc.c:2701 libcob/common.c:9647 msgid "little-endian" msgstr "" -#: cobc/cobc.c:2541 cobc/cobc.c:2543 libcob/common.c:8834 libcob/common.c:8836 +#: cobc/cobc.c:2705 cobc/cobc.c:2707 libcob/common.c:9651 libcob/common.c:9653 msgid "native EBCDIC" msgstr "" -#: cobc/cobc.c:2546 libcob/common.c:8937 +#: cobc/cobc.c:2710 libcob/common.c:9754 msgid "extended screen I/O" msgstr "" -#: cobc/cobc.c:2549 libcob/common.c:8840 +#: cobc/cobc.c:2713 libcob/common.c:9657 msgid "variable file format" msgstr "" -#: cobc/cobc.c:2555 cobc/cobc.c:2557 libcob/common.c:8846 libcob/common.c:8848 +#: cobc/cobc.c:2719 cobc/cobc.c:2721 libcob/common.c:9663 libcob/common.c:9665 msgid "sequential file handler" msgstr "" -#: cobc/cobc.c:2557 libcob/common.c:8848 +#: cobc/cobc.c:2721 libcob/common.c:9665 msgid "built-in" msgstr "" -#: cobc/cobc.c:2561 cobc/cobc.c:2563 cobc/cobc.c:2565 cobc/cobc.c:2567 -#: cobc/cobc.c:2570 cobc/cobc.c:2572 cobc/cobc.c:2575 libcob/common.c:8852 -#: libcob/common.c:8866 libcob/common.c:8868 libcob/common.c:8870 -#: libcob/common.c:8873 libcob/common.c:8875 libcob/common.c:8878 +#: cobc/cobc.c:2725 cobc/cobc.c:2727 cobc/cobc.c:2729 cobc/cobc.c:2731 +#: cobc/cobc.c:2734 cobc/cobc.c:2736 cobc/cobc.c:2739 libcob/common.c:9669 +#: libcob/common.c:9683 libcob/common.c:9685 libcob/common.c:9687 +#: libcob/common.c:9690 libcob/common.c:9692 libcob/common.c:9695 msgid "indexed file handler" msgstr "" -#: cobc/cobc.c:2580 cobc/cobc.c:2582 cobc/cobc.c:2585 libcob/common.c:8884 +#: cobc/cobc.c:2744 cobc/cobc.c:2746 cobc/cobc.c:2749 libcob/common.c:9701 msgid "mathematical library" msgstr "" -#: cobc/cobc.c:2589 cobc/cobc.c:2591 libcob/common.c:8895 libcob/common.c:8900 +#: cobc/cobc.c:2753 cobc/cobc.c:2755 libcob/common.c:9712 libcob/common.c:9717 msgid "XML library" msgstr "" -#: cobc/cobc.c:2594 libcob/common.c:8917 libcob/common.c:8932 -#: libcob/common.c:8934 +#: cobc/cobc.c:2758 libcob/common.c:9734 libcob/common.c:9749 +#: libcob/common.c:9751 msgid "JSON library" msgstr "" -#: cobc/cobc.c:2597 libcob/common.c:8810 libcob/common.c:8941 +#: cobc/cobc.c:2761 libcob/common.c:9627 libcob/common.c:9758 msgid "enabled" msgstr "" -#: cobc/cobc.c:2604 +#: cobc/cobc.c:2768 msgid "only one of options 'E', 'S', 'C', 'c' may be specified" msgstr "" -#: cobc/cobc.c:2610 +#: cobc/cobc.c:2774 msgid "only one of options 'm', 'x', 'b' may be specified" msgstr "" -#: cobc/cobc.c:2652 +#: cobc/cobc.c:2816 #, c-format msgid "" "option requires one of 'ALL', 'FD', 'WS', 'LS', 'RD', 'FD', 'SC', 'LO' - not " "'%s'" msgstr "" -#: cobc/cobc.c:2682 +#: cobc/cobc.c:2846 #, c-format msgid "'%s' is not an intrinsic function" msgstr "" -#: cobc/cobc.c:2726 cobc/cobc.c:8094 cobc/cobc.c:8213 cobc/codegen.c:3783 -#: cobc/codegen.c:3884 cobc/codegen.c:5571 cobc/codegen.c:5700 -#: cobc/codegen.c:13034 cobc/tree.c:1391 cobc/tree.c:4497 cobc/tree.c:5067 -#: cobc/tree.c:5316 cobc/typeck.c:4344 cobc/typeck.c:9044 cobc/typeck.c:9079 -#: cobc/typeck.c:9977 cobc/typeck.c:12619 cobc/typeck.c:12690 -#: cobc/typeck.c:12758 cobc/typeck.c:13043 cobc/typeck.c:13086 -#: libcob/fileio.c:9703 libcob/fileio.c:9714 +#: cobc/cobc.c:2889 cobc/cobc.c:8507 cobc/cobc.c:8626 cobc/codegen.c:3761 +#: cobc/codegen.c:3864 cobc/codegen.c:5671 cobc/codegen.c:5816 +#: cobc/codegen.c:13429 cobc/parser.y:391 cobc/tree.c:1397 cobc/tree.c:4565 +#: cobc/tree.c:5135 cobc/tree.c:5392 cobc/typeck.c:4497 cobc/typeck.c:9504 +#: cobc/typeck.c:9541 cobc/typeck.c:10418 cobc/typeck.c:13395 +#: cobc/typeck.c:13469 cobc/typeck.c:13537 cobc/typeck.c:13825 +#: cobc/typeck.c:13887 libcob/fileio.c:10094 libcob/fileio.c:10105 #, c-format msgid "call to '%s' with invalid parameter '%s'" msgstr "" -#: cobc/cobc.c:3136 +#: cobc/cobc.c:3300 msgid "loading standard configuration file 'default.conf'" msgstr "" -#: cobc/cobc.c:3217 +#: cobc/cobc.c:3387 msgid "the used C compiler is known to not be able to generate assembler code" msgstr "" -#: cobc/cobc.c:3299 +#: cobc/cobc.c:3469 msgid "invalid output file name" msgstr "" -#: cobc/cobc.c:3361 +#: cobc/cobc.c:3531 #, c-format msgid "warning: '%s' is not a directory, defaulting to current directory" msgstr "" -#: cobc/cobc.c:3388 +#: cobc/cobc.c:3558 #, c-format msgid "warning: %d lines per listing page specified, using %d" msgstr "" -#: cobc/cobc.c:3438 +#: cobc/cobc.c:3615 #, c-format msgid "warning: assuming '%s' is a DEFINE - did you intend to use -debug?" msgstr "" -#: cobc/cobc.c:3699 cobc/cobc.c:3724 cobc/cobc.c:3752 +#: cobc/cobc.c:3661 cobc/cobc.c:3702 cobc/cobc.c:4281 +#, c-format +msgid "ignoring nonexistent directory \"%s\"" +msgstr "" + +#: cobc/cobc.c:3943 cobc/cobc.c:3968 cobc/cobc.c:3996 #, c-format msgid "unknown warning option '%s'" msgstr "" -#: cobc/cobc.c:3813 +#: cobc/cobc.c:4063 #, c-format msgid "%s option requires a listing file" msgstr "" -#: cobc/cobc.c:3820 +#: cobc/cobc.c:4070 msgid "output to stdout only valid for preprocess" msgstr "" -#: cobc/cobc.c:3829 +#: cobc/cobc.c:4085 +msgid "-MT must be given to specify target file" +msgstr "" + +#: cobc/cobc.c:4091 msgid "all runtime checks are enabled" msgstr "" -#: cobc/cobc.c:4030 +#: cobc/cobc.c:4316 msgid "only one stdin input allowed" msgstr "" -#: cobc/cobc.c:4040 +#: cobc/cobc.c:4326 #, c-format msgid "invalid file name parameter (length > %d)" msgstr "" -#: cobc/cobc.c:4270 +#: cobc/cobc.c:4559 msgid "return status:" msgstr "" -#: cobc/cobc.c:4306 libcob/common.c:5711 +#: cobc/cobc.c:4595 libcob/common.c:6391 #, c-format msgid "external process \"%s\" ended with signal %s (%d)" msgstr "" -#: cobc/cobc.c:4364 +#: cobc/cobc.c:4654 msgid "nothing for -j to run" msgstr "" -#: cobc/cobc.c:4406 cobc/cobc.c:4420 +#: cobc/cobc.c:4697 cobc/cobc.c:4711 #, c-format msgid "%s is resolved by environment as: %s" msgstr "" -#: cobc/cobc.c:4882 +#: cobc/cobc.c:5175 msgid "preprocessing:" msgstr "" -#: cobc/cobc.c:4952 +#: cobc/cobc.c:5244 msgid "'cobxref' execution unsuccessful" msgstr "" -#: cobc/cobc.c:4955 +#: cobc/cobc.c:5247 #, c-format msgid "check that 'cobxref' is in %s" msgstr "" -#: cobc/cobc.c:4957 +#: cobc/cobc.c:5249 msgid "no listing produced" msgstr "" -#: cobc/cobc.c:5882 cobc/cobc.c:5921 +#: cobc/cobc.c:6234 cobc/cobc.c:6273 msgid "No fields defined." msgstr "" -#: cobc/cobc.c:5941 +#: cobc/cobc.c:6293 msgid "No labels defined." msgstr "" -#: cobc/cobc.c:5963 +#: cobc/cobc.c:6324 cobc/cobc.c:9292 +msgid "command line:" +msgstr "" + +#: cobc/cobc.c:6342 msgid "Error/Warning summary:" msgstr "" -#: cobc/cobc.c:6006 +#: cobc/cobc.c:6385 msgid "0 warnings in compilation group" msgstr "" -#: cobc/cobc.c:6010 +#: cobc/cobc.c:6389 msgid "1 warning in compilation group" msgstr "" -#: cobc/cobc.c:6014 +#: cobc/cobc.c:6393 #, c-format msgid "%d warnings in compilation group" msgstr "" -#: cobc/cobc.c:6020 +#: cobc/cobc.c:6399 msgid "0 errors in compilation group" msgstr "" -#: cobc/cobc.c:6024 +#: cobc/cobc.c:6403 msgid "1 error in compilation group" msgstr "" -#: cobc/cobc.c:6028 +#: cobc/cobc.c:6407 #, c-format msgid "%d errors in compilation group" msgstr "" -#: cobc/cobc.c:6034 +#: cobc/cobc.c:6413 #, c-format msgid "Too many errors in compilation group: %d maximum errors" msgstr "" -#: cobc/cobc.c:6632 +#: cobc/cobc.c:7028 #, c-format msgid "%s:%d: too many continuation lines" msgstr "" -#: cobc/cobc.c:7552 +#: cobc/cobc.c:7956 msgid "parsing:" msgstr "" -#: cobc/cobc.c:7612 +#: cobc/cobc.c:8017 msgid "translating:" msgstr "" -#: cobc/cobc.c:8786 +#: cobc/cobc.c:9217 msgid "no input files" msgstr "" -#: cobc/cobc.c:8816 +#: cobc/cobc.c:9248 #, c-format msgid "%s option invalid in this combination" msgstr "" -#: cobc/cobc.c:8857 -msgid "command line:" -msgstr "" - -#: cobc/codegen.c:1041 cobc/codegen.c:4463 cobc/codegen.c:11648 -#: cobc/codegen.c:12186 +#: cobc/codegen.c:1040 cobc/codegen.c:4506 cobc/codegen.c:11910 +#: cobc/codegen.c:12467 msgid "unexpected CONSTANT item" msgstr "" -#: cobc/codegen.c:2981 cobc/codegen.c:3261 cobc/codegen.c:8523 cobc/tree.c:1413 +#: cobc/codegen.c:2921 cobc/codegen.c:3207 cobc/codegen.c:8866 cobc/tree.c:1419 #, c-format msgid "unexpected cast type: %d" msgstr "" -#: cobc/codegen.c:3713 cobc/codegen.c:4413 +#: cobc/codegen.c:3690 cobc/codegen.c:4455 #, c-format msgid "internal statement stack depth exceeded: %d" msgstr "" -#: cobc/codegen.c:3785 +#: cobc/codegen.c:3763 #, c-format msgid "%s is not a field" msgstr "" -#: cobc/codegen.c:4186 cobc/codegen.c:4257 +#: cobc/codegen.c:4177 cobc/codegen.c:4279 #, c-format msgid "unexpected function: %s" msgstr "" -#: cobc/codegen.c:5204 +#: cobc/codegen.c:5256 #, c-format msgid "unexpected tree category: %d" msgstr "" -#: cobc/codegen.c:5971 +#: cobc/codegen.c:6108 #, c-format msgid "unexpected size: %d" msgstr "" -#: cobc/codegen.c:7595 +#: cobc/codegen.c:7894 #, c-format msgid "No ENTRY FOR GO TO '%s'" msgstr "" -#: cobc/codegen.c:7816 cobc/codegen.c:8163 +#: cobc/codegen.c:8283 cobc/codegen.c:8609 #, c-format msgid "unexpected handler type: %d" msgstr "" -#: cobc/codegen.c:8254 -msgid "unexpected error_node parameter" -msgstr "" - -#: cobc/codegen.c:8544 +#: cobc/codegen.c:8887 #, c-format msgid "unexpected tree type: %d" msgstr "" -#: cobc/codegen.c:9520 +#: cobc/codegen.c:9776 msgid "Nested OCCURS in report" msgstr "" -#: cobc/codeoptim.c:2777 +#: cobc/codeoptim.c:2856 #, c-format msgid "unexpected optimization value: %d" msgstr "" -#: cobc/config.c:164 libcob/common.c:7824 libcob/common.c:7838 -#: libcob/common.c:8315 +#: cobc/config.c:164 libcob/common.c:8639 libcob/common.c:8653 +#: libcob/common.c:9136 #, c-format msgid "invalid value '%s' for configuration tag '%s'" msgstr "" -#: cobc/config.c:167 libcob/common.c:7117 libcob/common.c:7234 +#: cobc/config.c:167 libcob/common.c:7915 libcob/common.c:7939 #, c-format msgid "should be one of the following values: %s" msgstr "" @@ -578,7 +586,7 @@ msgstr "" msgid "must be numeric" msgstr "" -#: cobc/config.c:171 libcob/common.c:7215 +#: cobc/config.c:171 libcob/common.c:8045 #, c-format msgid "maximum value: %lu" msgstr "" @@ -593,45 +601,45 @@ msgstr "" msgid "unsupported value '%s' for configuration tag '%s'" msgstr "" -#: cobc/config.c:318 cobc/pplex.l:1185 libcob/common.c:7739 +#: cobc/config.c:319 cobc/pplex.l:1264 libcob/common.c:8554 msgid "recursive inclusion" msgstr "" -#: cobc/config.c:393 libcob/common.c:7791 +#: cobc/config.c:394 libcob/common.c:8606 msgid "configuration file was included here" msgstr "" -#: cobc/config.c:422 +#: cobc/config.c:423 #, c-format msgid "The previous loaded configuration '%s' will be discarded." msgstr "" -#: cobc/config.c:458 +#: cobc/config.c:459 msgid "missing definitions:" msgstr "" -#: cobc/config.c:460 +#: cobc/config.c:461 #, c-format msgid "\tno definition of '%s'" msgstr "" -#: cobc/config.c:523 +#: cobc/config.c:524 #, c-format msgid "invalid configuration tag '%s'" msgstr "" -#: cobc/config.c:536 libcob/common.c:7545 libcob/common.c:7629 -#: libcob/common.c:7657 +#: cobc/config.c:537 libcob/common.c:8360 libcob/common.c:8444 +#: libcob/common.c:8472 #, c-format msgid "unknown configuration tag '%s'" msgstr "" -#: cobc/config.c:560 +#: cobc/config.c:561 #, c-format msgid "invalid configuration tag '%s' in word-list" msgstr "" -#: cobc/config.c:622 +#: cobc/config.c:623 #, c-format msgid "Could not access word list for '%s'" msgstr "" @@ -671,11 +679,11 @@ msgstr "" #: cobc/config.def:73 msgid "" "default initialization for fields without VALUE, may be one of\n" -" * character in quotes\n" -" * decimal 0..255 representing a character\n" -" * \"init\" to initialize to PICTURE/USAGE\n" -" * \"none\" to do no explicit initialization\n" -" * default: \"init\"" +" * character in quotes\n" +" * decimal 0..255 representing a character\n" +" * \"init\" to initialize to PICTURE/USAGE\n" +" * \"none\" to do no explicit initialization\n" +" * default: \"init\"" msgstr "" #: cobc/config.def:83 @@ -710,1085 +718,1099 @@ msgid "" "of: none, xml, json, all" msgstr "" -#: cobc/config.def:103 -msgid "resolve file names at run time using environment variables" +#: cobc/config.def:101 +msgid "" +"checking for subscript (only done with EC-BOUND-SUBSCRIPT active), may be " +"one of: full, max, record" msgstr "" #: cobc/config.def:106 -msgid "alternate formatting of numeric fields" +msgid "resolve file names at run time using environment variables" msgstr "" #: cobc/config.def:109 -msgid "numeric truncation according to ANSI" +msgid "alternate formatting of numeric fields" msgstr "" #: cobc/config.def:112 -msgid "allow complex OCCURS DEPENDING ON" +msgid "numeric truncation according to ANSI" msgstr "" #: cobc/config.def:115 -msgid "adjust items following OCCURS DEPENDING (implies complex-odo)" +msgid "allow non-standard OCCURS DEPENDING ON syntax" msgstr "" #: cobc/config.def:118 -msgid "allow REDEFINES to other than last equal level number" +msgid "adjust items following OCCURS DEPENDING (implies complex-odo)" msgstr "" #: cobc/config.def:121 -msgid "allow certain syntax variations (e.g. REDEFINES position)" +msgid "applies JUSTIFY with VALUE clause" msgstr "" #: cobc/config.def:124 +msgid "allow REDEFINES to other than last equal level number" +msgstr "" + +#: cobc/config.def:127 +msgid "allow certain syntax variations (e.g. REDEFINES position)" +msgstr "" + +#: cobc/config.def:130 msgid "" "allow zero length reference-modification (only changed with EC-BOUND-REF-MOD " "active)" msgstr "" -#: cobc/config.def:127 +#: cobc/config.def:133 msgid "allow non-matching level numbers" msgstr "" -#: cobc/config.def:130 +#: cobc/config.def:136 msgid "require ASSIGN USING items to be in WORKING-STORAGE" msgstr "" -#: cobc/config.def:133 +#: cobc/config.def:139 msgid "LOCAL-STORAGE SECTION implies RECURSIVE attribute" msgstr "" -#: cobc/config.def:136 +#: cobc/config.def:142 msgid "LINKAGE SECTION items remain allocated between invocations" msgstr "" -#: cobc/config.def:139 +#: cobc/config.def:145 msgid "MOVE operates as on IBM (left to right, byte by byte)" msgstr "" -#: cobc/config.def:142 +#: cobc/config.def:148 msgid "exit point of any currently executing perform is recognized if reached" msgstr "" -#: cobc/config.def:145 +#: cobc/config.def:151 msgid "" "limit precision in intermediate results to precision of final result (less " "accurate)" msgstr "" -#: cobc/config.def:148 +#: cobc/config.def:154 msgid "evaluate constant expressions at compile time" msgstr "" -#: cobc/config.def:151 +#: cobc/config.def:157 msgid "" "allow hexadecimal value 'F' for NUMERIC test of signed PACKED DECIMAL field" msgstr "" -#: cobc/config.def:154 +#: cobc/config.def:160 msgid "program names don't lead to a reserved identifier" msgstr "" -#: cobc/config.def:157 +#: cobc/config.def:163 msgid "" "set WITH UPDATE clause as default for ACCEPT dest-item, instead of WITH NO " "UPDATE" msgstr "" -#: cobc/config.def:160 +#: cobc/config.def:166 msgid "" "set WITH AUTO clause as default for ACCEPT dest-item, instead of WITH TAB" msgstr "" -#: cobc/config.def:163 +#: cobc/config.def:169 msgid "assume CONSOLE IS CRT if not set otherwise" msgstr "" -#: cobc/config.def:166 +#: cobc/config.def:172 msgid "NO-ECHO hides input with asterisks like SECURE" msgstr "" -#: cobc/config.def:169 +#: cobc/config.def:175 msgid "" "assume a field DISPLAY starts at LINE 0 COL 0 (i.e. at the cursor), not LINE " "1 COL 1" msgstr "" -#: cobc/config.def:172 +#: cobc/config.def:178 msgid "special behaviour of DISPLAY SPACE/ALL X'01'/ALL X'02'/ALL X'07'" msgstr "" -#: cobc/config.def:175 +#: cobc/config.def:181 msgid "COMP-1 is a 16-bit signed integer" msgstr "" -#: cobc/config.def:178 +#: cobc/config.def:184 msgid "POINTER is a 64-bit unsigned integer" msgstr "" -#: cobc/config.def:181 +#: cobc/config.def:187 msgid "imply zero in move of non-numeric literal to numeric items" msgstr "" -#: cobc/config.def:184 +#: cobc/config.def:190 msgid "" "implicitly define a variable if an ASSIGN DYNAMIC does not match any data " "item" msgstr "" -#: cobc/config.def:187 +#: cobc/config.def:193 msgid "specifying device by mnemonic" msgstr "" -#: cobc/config.def:193 +#: cobc/config.def:199 msgid "" "check contents of Area A (when reference format supports Area A " "enforcement),\n" -" enabled checks include:\n" -" * division, section, paragraph names, level " +" enabled checks include:\n" +" * division, section, paragraph names, level " "indicators (FD, SD, RD, and CD),\n" -" and toplevel numbers (01 and 77) must start in " +" and toplevel numbers (01 and 77) must start in " "Area A;\n" -" * statements must not start in Area A; and\n" -" * separator periods must not be within Area A." +" * statements must not start in Area A; and\n" +" * separator periods must not be within Area A" msgstr "" -#: cobc/config.def:203 +#: cobc/config.def:209 msgid "" "comment paragraphs in IDENTIFICATION DIVISION (AUTHOR, DATE-WRITTEN, ...)" msgstr "" -#: cobc/config.def:207 -msgid "CONTROL DIVISION" -msgstr "" - -#: cobc/config.def:211 cobc/ppparse.y:101 cobc/ppparse.y:104 -msgid "partial replacing with literal" +#: cobc/config.def:217 +msgid "" +"apply partial replacing with literal source operand even when it replaces " +"with spaces only;\n" +" * \"skip\" prevents such replacements" msgstr "" -#: cobc/config.def:214 +#: cobc/config.def:221 msgid "MEMORY-SIZE clause" msgstr "" -#: cobc/config.def:217 +#: cobc/config.def:224 msgid "MULTIPLE-FILE-TAPE clause" msgstr "" -#: cobc/config.def:220 +#: cobc/config.def:227 msgid "LABEL-RECORDS clause" msgstr "" -#: cobc/config.def:223 +#: cobc/config.def:230 msgid "VALUE-OF clause" msgstr "" -#: cobc/config.def:226 +#: cobc/config.def:233 msgid "DATA-RECORDS clause" msgstr "" -#: cobc/config.def:229 +#: cobc/config.def:236 msgid "OCCURS clause on top-level" msgstr "" -#: cobc/config.def:232 cobc/parser.y:7285 +#: cobc/config.def:239 cobc/parser.y:7566 msgid "SAME AS clause" msgstr "" -#: cobc/config.def:235 cobc/parser.y:7621 +#: cobc/config.def:242 cobc/parser.y:7904 msgid "TYPE TO clause" msgstr "" -#: cobc/config.def:238 cobc/parser.y:7644 +#: cobc/config.def:245 cobc/parser.y:7927 msgid "USAGE type-name" msgstr "" -#: cobc/config.def:241 cobc/parser.y:8190 +#: cobc/config.def:248 cobc/parser.y:8563 msgid "SYNCHRONIZED clause" msgstr "" -#: cobc/config.def:244 cobc/parser.y:8193 +#: cobc/config.def:251 cobc/parser.y:8566 msgid "LEFT/RIGHT phrases in SYNCHRONIZED clause" msgstr "" -#: cobc/config.def:247 +#: cobc/config.def:254 msgid "SPECIAL-NAMES clause" msgstr "" -#: cobc/config.def:250 -msgid "GOTO statement without name" +#: cobc/config.def:257 +msgid "GO TO statement without name" msgstr "" -#: cobc/config.def:253 +#: cobc/config.def:260 msgid "STOP-literal statement" msgstr "" -#: cobc/config.def:256 +#: cobc/config.def:263 msgid "STOP-identifier statement" msgstr "" -#: cobc/config.def:259 +#: cobc/config.def:266 msgid "STOP ERROR statement" msgstr "" -#: cobc/config.def:262 +#: cobc/config.def:269 msgid "DEBUGGING MODE and debugging indicator" msgstr "" -#: cobc/config.def:268 +#: cobc/config.def:275 msgid "PADDING CHARACTER clause" msgstr "" -#: cobc/config.def:271 +#: cobc/config.def:278 msgid "NEXT SENTENCE phrase" msgstr "" -#: cobc/config.def:274 +#: cobc/config.def:281 msgid "listing-directive statements EJECT, SKIP1, SKIP2, SKIP3" msgstr "" -#: cobc/config.def:277 +#: cobc/config.def:284 msgid "listing-directive statement TITLE" msgstr "" -#: cobc/config.def:280 +#: cobc/config.def:287 msgid "ENTRY statement" msgstr "" -#: cobc/config.def:283 +#: cobc/config.def:290 msgid "move noninteger to alphanumeric" msgstr "" -#: cobc/config.def:286 +#: cobc/config.def:293 msgid "move figurative constants to numeric" msgstr "" -#: cobc/config.def:289 +#: cobc/config.def:296 msgid "move figurative constant SPACE to numeric" msgstr "" -#: cobc/config.def:292 +#: cobc/config.def:299 msgid "move figurative constant QUOTE to numeric" msgstr "" -#: cobc/config.def:295 +#: cobc/config.def:302 msgid "OCCURS DEPENDING ON without to" msgstr "" -#: cobc/config.def:298 cobc/parser.y:11102 +#: cobc/config.def:305 cobc/parser.y:11443 msgid "section segments" msgstr "" -#: cobc/config.def:301 +#: cobc/config.def:308 msgid "ALTER statement" msgstr "" -#: cobc/config.def:304 +#: cobc/config.def:311 msgid "OVERFLOW clause for CALL" msgstr "" -#: cobc/config.def:307 +#: cobc/config.def:314 msgid "boolean literals (B'1010')" msgstr "" -#: cobc/config.def:310 +#: cobc/config.def:317 msgid "hexadecimal-boolean literals (BX'A')" msgstr "" -#: cobc/config.def:313 +#: cobc/config.def:320 msgid "national literals (N'UTF-16 string')" msgstr "" -#: cobc/config.def:316 +#: cobc/config.def:323 msgid "hexadecimal-national literals (NX'265E')" msgstr "" -#: cobc/config.def:319 +#: cobc/config.def:326 msgid "non-standard national literals (NC'UTF-16 string')" msgstr "" -#: cobc/config.def:322 +#: cobc/config.def:329 msgid "HP COBOL octal literals (%377)" msgstr "" -#: cobc/config.def:325 +#: cobc/config.def:332 msgid "ACUCOBOL-GT literals (#B #O #H #X)" msgstr "" -#: cobc/config.def:328 cobc/pplex.l:2199 +#: cobc/config.def:335 +msgid "" +"EBCDIC symbolic characters in literals (\" \"135,151,151\"bar\"195, 194\"Z\" " +"for \" foobarBAZ\")" +msgstr "" + +#: cobc/config.def:338 cobc/pplex.l:2428 msgid "continuation of COBOL words" msgstr "" -#: cobc/config.def:331 +#: cobc/config.def:341 msgid "NOT ON EXCEPTION before ON EXCEPTION" msgstr "" -#: cobc/config.def:334 +#: cobc/config.def:344 msgid "extensions to ACCEPT and DISPLAY" msgstr "" -#: cobc/config.def:337 cobc/field.c:3357 +#: cobc/config.def:347 cobc/field.c:3645 msgid "RENAMES of 01-, 66- and 77-level items" msgstr "" -#: cobc/config.def:341 +#: cobc/config.def:351 msgid "allow larger REDEFINES items" msgstr "" -#: cobc/config.def:344 +#: cobc/config.def:354 msgid "constants defined in SPECIAL-NAMES" msgstr "" -#: cobc/config.def:347 +#: cobc/config.def:357 msgid "" "constant with level 78 item (note: has left to right precedence in " "expressions)" msgstr "" -#: cobc/config.def:350 +#: cobc/config.def:360 msgid "constant with level 01 CONSTANT AS/FROM item" msgstr "" -#: cobc/config.def:353 +#: cobc/config.def:363 msgid "PERFORM VARYING without BY phrase (implies BY 1)" msgstr "" -#: cobc/config.def:356 +#: cobc/config.def:366 msgid "references to sections not in DECLARATIVES from within DECLARATIVES" msgstr "" -#: cobc/config.def:359 cobc/parser.y:12225 cobc/parser.y:12521 +#: cobc/config.def:369 cobc/parser.y:12614 cobc/parser.y:12913 msgid "CALL/CANCEL with program-prototype-name" msgstr "" -#: cobc/config.def:362 +#: cobc/config.def:372 msgid "specifying call-convention by mnemonic" msgstr "" -#: cobc/config.def:365 +#: cobc/config.def:375 msgid "specifying call-convention by WITH ... LINKAGE" msgstr "" -#: cobc/config.def:368 +#: cobc/config.def:378 +msgid "support for PROCEDURE DIVISION USING OPTIONAL" +msgstr "" + +#: cobc/config.def:381 msgid "numeric literals in VALUE clause of numeric-edited items" msgstr "" -#: cobc/config.def:371 +#: cobc/config.def:384 msgid "incorrect order of CONFIGURATION SECTION paragraphs" msgstr "" -#: cobc/config.def:374 +#: cobc/config.def:387 msgid "allow >> DEFINE CONSTANT var AS literal" msgstr "" -#: cobc/config.def:377 +#: cobc/config.def:390 msgid "REDEFINES clause not following entry-name in definition" msgstr "" -#: cobc/config.def:380 +#: cobc/config.def:393 msgid "record sizes does not match RECORD clause" msgstr "" -#: cobc/config.def:383 cobc/parser.y:5736 cobc/parser.y:5750 cobc/parser.y:5763 -#: cobc/parser.y:5774 +#: cobc/config.def:396 cobc/parser.y:5991 cobc/parser.y:6005 cobc/parser.y:6018 +#: cobc/parser.y:6029 msgid "RECORD DELIMITER clause" msgstr "" -#: cobc/config.def:386 +#: cobc/config.def:399 msgid "BINARY-SEQUENTIAL and LINE-SEQUENTIAL phrases in RECORD DELIMITER" msgstr "" -#: cobc/config.def:389 cobc/tree.c:4805 +#: cobc/config.def:402 cobc/tree.c:4873 msgid "RECORD DELIMITER clause on file with fixed-length records" msgstr "" -#: cobc/config.def:392 +#: cobc/config.def:405 msgid "missing statement (e.g. empty IF / PERFORM)" msgstr "" -#: cobc/config.def:395 +#: cobc/config.def:408 msgid "" "missing period in PROCEDURE DIVISION (when reference format supports Area A " "enforcement)" msgstr "" -#: cobc/config.def:398 +#: cobc/config.def:411 msgid "zero-length literals, e.g. '' and \"\"" msgstr "" -#: cobc/config.def:401 +#: cobc/config.def:414 msgid "XML GENERATE's phrases other than COUNT IN" msgstr "" -#: cobc/config.def:404 cobc/typeck.c:8565 +#: cobc/config.def:417 cobc/typeck.c:9017 msgid "AFTER phrase in CONTINUE statement" msgstr "" -#: cobc/config.def:407 -msgid "ENTRY FOR GOTO and GOTO ENTRY statements" +#: cobc/config.def:420 +msgid "ENTRY FOR GO TO and GO TO ENTRY statements" msgstr "" -#: cobc/config.def:410 +#: cobc/config.def:423 cobc/typeck.c:4642 msgid "ASSIGN [TO] variable in SELECT" msgstr "" -#: cobc/config.def:413 +#: cobc/config.def:426 msgid "ASSIGN USING/VARYING variable in SELECT" msgstr "" -#: cobc/config.def:416 +#: cobc/config.def:429 msgid "ASSIGN EXTERNAL/DYNAMIC in SELECT" msgstr "" -#: cobc/config.def:419 +#: cobc/config.def:432 msgid "ASSIGN DISK FROM variable in SELECT" msgstr "" -#: cobc/config.def:422 +#: cobc/config.def:435 msgid "VSAM status in FILE STATUS" msgstr "" -#: cobc/config.def:425 +#: cobc/config.def:438 msgid "CALL to own PROGRAM-ID implies RECURSIVE attribute" msgstr "" -#: cobc/config.def:428 +#: cobc/config.def:441 msgid "DEPENDING clause in RECORD CONTAINS" msgstr "" -#: cobc/config.def:431 cobc/tree.c:3584 +#: cobc/config.def:444 cobc/tree.c:3623 msgid "PICTURE string with 'L' character" msgstr "" -#: cobc/error.c:83 +#: cobc/error.c:141 libcob/common.c:1379 libcob/common.c:8715 +#: libcob/common.c:8766 +#, c-format +msgid "warning: " +msgstr "" + +#: cobc/error.c:142 libcob/common.c:8784 +msgid "note: " +msgstr "" + +#: cobc/error.c:162 #, c-format msgid "in section '%s':" msgstr "" -#: cobc/error.c:94 +#: cobc/error.c:173 #, c-format msgid "in paragraph '%s':" msgstr "" -#: cobc/error.c:129 cobc/error.c:133 cobc/error.c:136 +#: cobc/error.c:227 cobc/error.c:231 cobc/error.c:234 msgid "too many errors" msgstr "" -#: cobc/error.c:145 +#: cobc/error.c:243 #, c-format msgid "in file included from " msgstr "" -#: cobc/error.c:163 libcob/common.c:8325 +#: cobc/error.c:261 libcob/common.c:9146 msgid "configuration error:" msgstr "" -#: cobc/error.c:176 libcob/common.c:861 +#: cobc/error.c:274 libcob/common.c:920 #, c-format msgid "system error %d" msgstr "" -#: cobc/error.c:346 cobc/error.c:413 cobc/error.c:475 cobc/error.c:631 -#: cobc/error.c:675 cobc/error.c:785 libcob/common.c:1318 libcob/common.c:7900 -#: libcob/common.c:7951 -#, c-format -msgid "warning: " -msgstr "" - -#: cobc/error.c:518 cobc/error.c:534 cobc/error.c:868 cobc/error.c:889 +#: cobc/error.c:616 cobc/error.c:632 cobc/error.c:971 cobc/error.c:992 #, c-format msgid "%s used" msgstr "" -#: cobc/error.c:521 cobc/error.c:871 +#: cobc/error.c:619 cobc/error.c:974 #, c-format msgid "%s is archaic in %s" msgstr "" -#: cobc/error.c:525 cobc/error.c:875 +#: cobc/error.c:623 cobc/error.c:978 #, c-format msgid "%s is obsolete in %s" msgstr "" -#: cobc/error.c:531 cobc/error.c:881 cobc/parser.y:5738 +#: cobc/error.c:629 cobc/error.c:984 cobc/parser.y:5993 #, c-format msgid "%s ignored" msgstr "" -#: cobc/error.c:537 cobc/error.c:891 +#: cobc/error.c:635 cobc/error.c:994 #, c-format msgid "%s does not conform to %s" msgstr "" -#: cobc/error.c:553 +#: cobc/error.c:651 msgid "configuration warning:" msgstr "" -#: cobc/error.c:728 cobc/error.c:731 cobc/error.c:755 cobc/error.c:758 -#: libcob/common.c:7969 -msgid "note: " -msgstr "" - -#: cobc/error.c:933 cobc/error.c:962 +#: cobc/error.c:1040 cobc/error.c:1069 #, c-format msgid "redefinition of '%s'" msgstr "" -#: cobc/error.c:939 cobc/error.c:973 +#: cobc/error.c:1046 cobc/error.c:1080 #, c-format msgid "'%s' previously defined here" msgstr "" -#: cobc/error.c:1017 cobc/error.c:1023 +#: cobc/error.c:1124 cobc/error.c:1130 #, c-format msgid "'%s' is not defined" msgstr "" -#: cobc/error.c:1019 +#: cobc/error.c:1126 #, c-format msgid "'%s' cannot be used here" msgstr "" -#: cobc/error.c:1021 cobc/parser.y:7658 +#: cobc/error.c:1128 cobc/parser.y:7941 #, c-format msgid "'%s' is not defined, but is a reserved word in another dialect" msgstr "" -#: cobc/error.c:1060 +#: cobc/error.c:1167 #, c-format msgid "'%s' is ambiguous; needs qualification" msgstr "" -#: cobc/error.c:1090 +#: cobc/error.c:1197 #, c-format msgid "'%s' is a special register" msgstr "" -#: cobc/error.c:1093 +#: cobc/error.c:1200 #, c-format msgid "'%s' internally defined" msgstr "" -#: cobc/error.c:1097 cobc/parser.y:18176 cobc/parser.y:18181 cobc/typeck.c:5000 -#: cobc/typeck.c:5047 cobc/typeck.c:5048 +#: cobc/error.c:1204 cobc/parser.y:18772 cobc/parser.y:18777 cobc/typeck.c:5166 +#: cobc/typeck.c:5213 cobc/typeck.c:5214 #, c-format msgid "'%s' defined here" msgstr "" -#: cobc/error.c:1108 +#: cobc/error.c:1215 #, c-format msgid "fatal error: %s" msgstr "" -#: cobc/error.c:1117 +#: cobc/error.c:1224 #, c-format msgid "group item '%s' cannot have %s clause" msgstr "" -#: cobc/error.c:1132 +#: cobc/error.c:1239 #, c-format msgid "constant item '%s' requires a %s clause" msgstr "" -#: cobc/error.c:1136 +#: cobc/error.c:1243 #, c-format msgid "level %02d item '%s' requires a %s clause" msgstr "" -#: cobc/error.c:1151 +#: cobc/error.c:1258 #, c-format msgid "constant item '%s' can only have a %s clause" msgstr "" -#: cobc/error.c:1155 +#: cobc/error.c:1262 #, c-format msgid "level %02d item '%s' can only have a %s clause" msgstr "" -#: cobc/field.c:136 +#: cobc/field.c:139 msgid "constant expression has Divide by ZERO" msgstr "" -#: cobc/field.c:192 cobc/field.c:329 cobc/field.c:337 +#: cobc/field.c:195 cobc/field.c:332 cobc/field.c:340 msgid "missing right parenthesis" msgstr "" -#: cobc/field.c:221 +#: cobc/field.c:224 #, c-format msgid "expression stack overflow at %d entries for operation '%c'" msgstr "" -#: cobc/field.c:262 +#: cobc/field.c:265 #, c-format msgid "expression stack overflow at %d entries" msgstr "" -#: cobc/field.c:279 +#: cobc/field.c:282 msgid "missing left parenthesis" msgstr "" -#: cobc/field.c:320 +#: cobc/field.c:323 #, c-format msgid "invalid operator '%s' in expression" msgstr "" -#: cobc/field.c:339 +#: cobc/field.c:342 #, c-format msgid "'%c' operator misplaced" msgstr "" -#: cobc/field.c:400 +#: cobc/field.c:403 #, c-format msgid "invalid level number '%s'" msgstr "" -#: cobc/field.c:460 cobc/field.c:498 +#: cobc/field.c:463 cobc/field.c:502 msgid "level number must begin with 01 or 77" msgstr "" -#: cobc/field.c:558 cobc/field.c:562 +#: cobc/field.c:562 cobc/field.c:566 #, c-format msgid "no previous data item of level %02d" msgstr "" -#: cobc/field.c:620 +#: cobc/field.c:631 #, c-format msgid "'%s' cannot be qualified here" msgstr "" -#: cobc/field.c:626 +#: cobc/field.c:637 #, c-format msgid "'%s' cannot be subscripted here" msgstr "" -#: cobc/field.c:642 cobc/field.c:653 +#: cobc/field.c:653 cobc/field.c:664 #, c-format msgid "'%s' is not defined in '%s'" msgstr "" -#: cobc/field.c:660 +#: cobc/field.c:671 msgid "level number of REDEFINES entries must be identical" msgstr "" -#: cobc/field.c:665 +#: cobc/field.c:676 #, c-format msgid "'%s' is not the original definition" msgstr "" -#: cobc/field.c:826 cobc/parser.y:659 +#: cobc/field.c:720 cobc/parser.y:1051 +#, c-format +msgid "duplicate %s" +msgstr "" + +#: cobc/field.c:878 cobc/parser.y:733 #, c-format msgid "duplicate %s clause" msgstr "" -#: cobc/field.c:906 +#: cobc/field.c:988 #, c-format msgid "%s clause not compatible with PIC %s" msgstr "" -#: cobc/field.c:917 cobc/field.c:953 +#: cobc/field.c:999 cobc/field.c:1036 #, c-format msgid "%s clause not compatible with USAGE %s" msgstr "" -#: cobc/field.c:1053 cobc/field.c:1069 cobc/field.c:1131 cobc/field.c:1142 +#: cobc/field.c:1140 cobc/field.c:1159 cobc/field.c:1227 cobc/field.c:1238 #, c-format msgid "PICTURE clause required for '%s'" msgstr "" -#: cobc/field.c:1138 +#: cobc/field.c:1234 #, c-format msgid "a non-numeric literal is expected for '%s'" msgstr "" -#: cobc/field.c:1150 +#: cobc/field.c:1247 #, c-format msgid "defining implicit picture size %d for '%s'" msgstr "" -#: cobc/field.c:1171 +#: cobc/field.c:1271 #, c-format msgid "'%s' ANY LENGTH only allowed in LINKAGE" msgstr "" -#: cobc/field.c:1175 +#: cobc/field.c:1275 #, c-format msgid "'%s' ANY LENGTH must be 01 level" msgstr "" -#: cobc/field.c:1179 +#: cobc/field.c:1279 #, c-format msgid "'%s' ANY LENGTH cannot be BASED/EXTERNAL" msgstr "" -#: cobc/field.c:1184 cobc/field.c:1210 +#: cobc/field.c:1283 cobc/field.c:1313 #, c-format msgid "'%s' ANY LENGTH has invalid definition" msgstr "" -#: cobc/field.c:1192 +#: cobc/field.c:1295 #, c-format msgid "'%s' ANY NUMERIC must be PIC 9" msgstr "" -#: cobc/field.c:1198 +#: cobc/field.c:1301 #, c-format -msgid "'%s' ANY LENGTH must be PIC X, PIC N or PIC 1" +msgid "'%s' ANY LENGTH must be PIC X, PIC U, PIC N or PIC 1" msgstr "" -#: cobc/field.c:1208 +#: cobc/field.c:1311 #, c-format msgid "'%s' ANY NUMERIC has invalid definition" msgstr "" -#: cobc/field.c:1224 +#: cobc/field.c:1327 #, c-format msgid "'%s' EXTERNAL must be specified at 01/77 level" msgstr "" -#: cobc/field.c:1228 +#: cobc/field.c:1331 #, c-format msgid "'%s' EXTERNAL can only be specified in WORKING-STORAGE section" msgstr "" -#: cobc/field.c:1232 +#: cobc/field.c:1335 #, c-format msgid "'%s' EXTERNAL and BASED are mutually exclusive" msgstr "" -#: cobc/field.c:1235 +#: cobc/field.c:1338 #, c-format msgid "'%s' EXTERNAL not allowed with REDEFINES" msgstr "" -#: cobc/field.c:1247 +#: cobc/field.c:1350 #, c-format msgid "'%s' BASED not allowed here" msgstr "" -#: cobc/field.c:1250 +#: cobc/field.c:1353 #, c-format msgid "'%s' BASED not allowed with REDEFINES" msgstr "" -#: cobc/field.c:1253 +#: cobc/field.c:1356 #, c-format msgid "'%s' BASED only allowed at the 01 and 77 levels" msgstr "" -#: cobc/field.c:1279 +#: cobc/field.c:1383 #, c-format msgid "'%s' cannot have an OCCURS clause due to '%s'" msgstr "" -#: cobc/field.c:1298 +#: cobc/field.c:1402 #, c-format msgid "the original definition '%s' should not have an OCCURS clause" msgstr "" -#: cobc/field.c:1305 +#: cobc/field.c:1408 +#, c-format +msgid "the original definition '%s' should not have an ANY LENGTH clause" +msgstr "" + +#: cobc/field.c:1415 msgid "REDEFINES must follow the original definition" msgstr "" -#: cobc/field.c:1313 +#: cobc/field.c:1423 #, c-format msgid "'%s' cannot be variable length" msgstr "" -#: cobc/field.c:1316 +#: cobc/field.c:1426 #, c-format msgid "the original definition '%s' cannot be variable length" msgstr "" -#: cobc/field.c:1335 +#: cobc/field.c:1445 cobc/field.c:1708 #, c-format msgid "'%s' cannot have JUSTIFIED RIGHT clause" msgstr "" -#: cobc/field.c:1342 +#: cobc/field.c:1453 #, c-format msgid "'%s' cannot have BLANK WHEN ZERO clause" msgstr "" -#: cobc/field.c:1348 +#: cobc/field.c:1460 #, c-format msgid "SCREEN group item '%s' has invalid clause" msgstr "" -#: cobc/field.c:1436 +#: cobc/field.c:1548 #, c-format msgid "%s USAGE %s incompatible with %s USAGE %s" msgstr "" -#: cobc/field.c:1516 +#: cobc/field.c:1629 #, c-format msgid "'%s' cannot have PICTURE clause" msgstr "" -#: cobc/field.c:1533 -#, c-format -msgid "%s item '%s' should be USAGE DISPLAY" -msgstr "" - -#: cobc/field.c:1556 +#: cobc/field.c:1662 #, c-format msgid "'%s' COMP-6 with sign - changing to COMP-3" msgstr "" -#: cobc/field.c:1582 +#: cobc/field.c:1688 msgid "elementary items with SIGN clause must have S in PICTURE" msgstr "" -#: cobc/field.c:1585 +#: cobc/field.c:1691 msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/field.c:1602 -#, c-format -msgid "'%s' cannot have JUSTIFIED RIGHT" -msgstr "" - -#: cobc/field.c:1614 +#: cobc/field.c:1720 #, c-format msgid "'%s' cannot have S in PICTURE string and BLANK WHEN ZERO" msgstr "" -#: cobc/field.c:1619 +#: cobc/field.c:1725 #, c-format msgid "" "'%s' cannot have BLANK WHEN ZERO without being USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/field.c:1631 +#: cobc/field.c:1737 #, c-format msgid "'%s' cannot have * in PICTURE string and BLANK WHEN ZERO" msgstr "" -#: cobc/field.c:1638 +#: cobc/field.c:1744 #, c-format msgid "'%s' is not numeric, so cannot have BLANK WHEN ZERO" msgstr "" -#: cobc/field.c:1691 +#: cobc/field.c:1798 #, c-format msgid "elements in VALUE clause for '%s' (%d) exceed max amount (%d)" msgstr "" -#: cobc/field.c:1708 cobc/field.c:1712 +#: cobc/field.c:1822 +msgid "unexpected VALUES ARE for elementary item" +msgstr "" + +#: cobc/field.c:1836 cobc/field.c:1840 #, c-format msgid "initial VALUE clause ignored for %s item '%s'" msgstr "" -#: cobc/field.c:1725 +#: cobc/field.c:1853 msgid "FULL has no effect on numeric items; you may want REQUIRED or PIC Z" msgstr "" -#: cobc/field.c:1755 +#: cobc/field.c:1884 msgid "VALUE may not contain a figurative constant" msgstr "" -#: cobc/field.c:1763 -msgid "cannot specify both FULL and JUSTIFIED" +#: cobc/field.c:1893 cobc/field.c:1935 cobc/parser.y:750 cobc/parser.y:1823 +#: cobc/parser.y:1826 +#, c-format +msgid "cannot specify both %s and %s" msgstr "" -#: cobc/field.c:1775 +#: cobc/field.c:1905 #, c-format msgid "'%s' has FROM, TO or USING without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1792 +#: cobc/field.c:1922 #, c-format msgid "'%s' has numeric VALUE without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1805 -msgid "cannot specify both PIC and VALUE" -msgstr "" - -#: cobc/field.c:1813 +#: cobc/field.c:1943 msgid "cannot have PIC without FROM, TO or USING" msgstr "" -#: cobc/field.c:1822 +#: cobc/field.c:1952 msgid "cannot have numeric VALUE without PIC" msgstr "" -#: cobc/field.c:1831 +#: cobc/field.c:1961 msgid "cannot have FROM, TO or USING without PIC" msgstr "" -#: cobc/field.c:1841 +#: cobc/field.c:1971 msgid "VALUE item may not be numeric" msgstr "" -#: cobc/field.c:1856 +#: cobc/field.c:1986 #, c-format msgid "'%s' needs a PIC, COL, LINE, VALUE, BELL or BLANK clause" msgstr "" -#: cobc/field.c:1868 +#: cobc/field.c:1998 #, c-format msgid "'%s' cannot have PIC without FROM, TO, USING or numeric VALUE" msgstr "" -#: cobc/field.c:1876 +#: cobc/field.c:2006 #, c-format msgid "'%s' needs a PIC, FROM, TO, USING, VALUE, BELL, BLANK or ERASE clause" msgstr "" -#: cobc/field.c:1912 +#: cobc/field.c:2042 msgid "" "cannot use AUTO, FULL, PROMPT, REQUIRED or SECURE on elementary item without " "TO or USING" msgstr "" -#: cobc/field.c:1919 +#: cobc/field.c:2049 msgid "" "cannot use BLANK WHEN ZERO, JUSTIFIED, OCCURS or SIGN on item without FROM, " "TO or USING" msgstr "" -#: cobc/field.c:1938 +#: cobc/field.c:2068 msgid "" "cannot use AUTO, FULL, REQUIRED or SECURE on elementary item without FROM, " "TO or USING" msgstr "" -#: cobc/field.c:1943 +#: cobc/field.c:2073 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED or SIGN without FROM, TO or USING" msgstr "" -#: cobc/field.c:1960 +#: cobc/field.c:2090 msgid "cannot have BLANK WHEN ZERO without PIC" msgstr "" -#: cobc/field.c:1963 +#: cobc/field.c:2093 msgid "cannot have JUSTIFIED without PIC" msgstr "" -#: cobc/field.c:1983 +#: cobc/field.c:2113 msgid "cannot have AUTO without FROM, TO or USING" msgstr "" -#: cobc/field.c:1988 +#: cobc/field.c:2118 msgid "cannot use FULL or REQUIRED on item without TO or USING" msgstr "" -#: cobc/field.c:1995 +#: cobc/field.c:2125 msgid "SECURE can be used with TO only" msgstr "" -#: cobc/field.c:1997 +#: cobc/field.c:2127 msgid "SECURE must be used with TO" msgstr "" -#: cobc/field.c:2016 +#: cobc/field.c:2146 #, c-format msgid "'%s' does nothing" msgstr "" -#: cobc/field.c:2235 +#: cobc/field.c:2361 #, c-format msgid "'%s' 77 level is not allowed here" msgstr "" -#: cobc/field.c:2627 +#: cobc/field.c:2399 msgid "OCCURS and multi COLUMNs is not allowed" msgstr "" -#: cobc/field.c:2655 +#: cobc/field.c:2419 #, c-format msgid "duplicate LINE %d ignored" msgstr "" -#: cobc/field.c:2672 +#: cobc/field.c:2870 #, c-format msgid "ignoring SYNCHRONIZED for group item '%s'" msgstr "" -#: cobc/field.c:2686 cobc/field.c:2954 +#: cobc/field.c:2884 cobc/field.c:3219 msgid "larger REDEFINES" msgstr "" -#: cobc/field.c:2699 cobc/field.c:2957 cobc/field.c:2962 +#: cobc/field.c:2898 cobc/field.c:3222 cobc/field.c:3227 #, c-format msgid "size of '%s' larger than size of '%s'" msgstr "" -#: cobc/field.c:2812 cobc/field.c:2879 +#: cobc/field.c:3045 cobc/field.c:3129 cobc/parser.y:832 #, c-format msgid "'%s' cannot be larger than %d bytes" msgstr "" -#: cobc/field.c:2850 cobc/field.c:2858 +#: cobc/field.c:3086 cobc/field.c:3094 #, c-format msgid "'%s' binary field cannot be larger than %d digits" msgstr "" -#: cobc/field.c:2940 cobc/field.c:3522 -#, c-format -msgid "unexpected USAGE: %d" -msgstr "" - -#: cobc/field.c:3067 cobc/parser.y:710 cobc/parser.y:712 cobc/parser.y:6274 -#: cobc/parser.y:6284 cobc/parser.y:7344 cobc/parser.y:7347 cobc/parser.y:7349 -#: cobc/parser.y:7351 cobc/parser.y:7386 cobc/parser.y:8237 cobc/parser.y:8239 -#: cobc/parser.y:8241 cobc/parser.y:8243 cobc/parser.y:8558 cobc/parser.y:8567 -#: cobc/parser.y:10564 cobc/parser.y:12075 cobc/parser.y:13492 -#: cobc/parser.y:14902 cobc/typeck.c:5034 +#: cobc/field.c:3353 cobc/parser.y:791 cobc/parser.y:793 cobc/parser.y:6529 +#: cobc/parser.y:6539 cobc/parser.y:7625 cobc/parser.y:7628 cobc/parser.y:7630 +#: cobc/parser.y:7632 cobc/parser.y:7667 cobc/parser.y:8610 cobc/parser.y:8612 +#: cobc/parser.y:8614 cobc/parser.y:8616 cobc/parser.y:8958 cobc/parser.y:8967 +#: cobc/parser.y:10897 cobc/parser.y:12460 cobc/parser.y:13920 +#: cobc/parser.y:15390 cobc/typeck.c:5200 #, c-format msgid "%s and %s are mutually exclusive" msgstr "" -#: cobc/field.c:3068 cobc/parser.y:7529 cobc/parser.y:7566 +#: cobc/field.c:3354 cobc/parser.y:7810 cobc/parser.y:7847 msgid "variable-length PICTURE" msgstr "" -#: cobc/field.c:3187 +#: cobc/field.c:3475 msgid "literal type does not match numeric data type" msgstr "" -#: cobc/field.c:3261 +#: cobc/field.c:3549 #, c-format msgid "THRU item '%s' may not come before '%s'" msgstr "" -#: cobc/field.c:3284 +#: cobc/field.c:3572 #, c-format msgid "RENAMES cannot start/end at the OCCURS item '%s'" msgstr "" -#: cobc/field.c:3292 +#: cobc/field.c:3580 #, c-format msgid "cannot use RENAMES on part of the table '%s'" msgstr "" -#: cobc/field.c:3330 +#: cobc/field.c:3618 #, c-format msgid "RENAMES may not contain '%s' as it is a pointer or object reference" msgstr "" -#: cobc/field.c:3335 +#: cobc/field.c:3623 #, c-format msgid "RENAMES may not contain '%s' as it is an OCCURS DEPENDING table" msgstr "" -#: cobc/field.c:3359 +#: cobc/field.c:3647 msgid "RENAMES may not reference a level 88" msgstr "" -#: cobc/field.c:3383 +#: cobc/field.c:3671 #, c-format msgid "'%s' must immediately follow the record '%s'" msgstr "" -#: cobc/field.c:3391 +#: cobc/field.c:3679 #, c-format msgid "THRU item must be different to '%s'" msgstr "" -#: cobc/field.c:3397 +#: cobc/field.c:3685 #, c-format msgid "'%s' and '%s' must be in the same record" msgstr "" -#: cobc/field.c:3408 +#: cobc/field.c:3696 #, c-format msgid "THRU item '%s' may not be subordinate to '%s'" msgstr "" @@ -1836,271 +1858,302 @@ msgid "" " intrinsics to be used without FUNCTION keyword" msgstr "" -#: cobc/flag.def:78 -msgid "" -" -fec=<exception-name>\tenable code generation for <exception-name>,\n" -" sets -fsource-location" -msgstr "" - -#: cobc/flag.def:81 cobc/help.c:96 -msgid "" -" -fno-ec=<exception-name>\tdisable code generation for <exception-name>" -msgstr "" - -#: cobc/flag.def:84 +#: cobc/flag.def:85 msgid "" " -fdump=<scope> dump data fields on abort, <scope> may be\n" " a combination of: ALL, WS, LS, RD, FD, SC, LO" msgstr "" -#: cobc/flag.def:87 +#: cobc/flag.def:88 msgid "" " -fno-dump=<scope> exclude data fields from dumping on abort, <scope> " "may\n" -" be a combination of: ALL, WS, LS, RD, FD, SC, LO" +" be a combination of: ALL, WS, LS, RD, FD, SC, LO\n" +" default if no scope specified: ALL" msgstr "" -#: cobc/flag.def:92 +#: cobc/flag.def:94 msgid "" " -fcallfh=<name> specifies <name> to be used for I/O\n" " as external provided EXTFH interface module" msgstr "" -#: cobc/flag.def:96 +#: cobc/flag.def:98 +msgid "" +" -febcdic-table=<cconv-table>/<file>\tEBCDIC/ASCII translation table\n" +" * e.g. default, ebcdic500_latin1..." +msgstr "" + +#: cobc/flag.def:102 msgid "" -" -febcdic-table=[DEFAULT|RESTRICTED-GC|IBM|GCOS]\tdefine EBCDIC translation " -"table:\n" -" * default: translation to extended ASCII as per MF\n" -" * restricted-gc: translation from restricted ASCII " -"only\n" -" * ibm: translation to restricted ASCII as per IBM\n" -" * gcos: translation to extended ASCII as per GCOS7" +" -fdefault-colseq=[ASCII|EBCDIC|NATIVE]\tdefine default collating sequence\n" +" * default: NATIVE" msgstr "" -#: cobc/flag.def:107 +#: cobc/flag.def:110 msgid "" " -fwinmain generate WinMain instead of main when compiling\n" " as executable" msgstr "" -#: cobc/flag.def:111 +#: cobc/flag.def:114 msgid " -fcomputed-goto generate computed goto C statements" msgstr "" -#: cobc/flag.def:114 +#: cobc/flag.def:117 msgid " -fextra-brace generate extra braces in C source" msgstr "" -#: cobc/flag.def:117 +#: cobc/flag.def:120 msgid "" " -fcorrect-numeric attempt correction of invalid numeric display items" msgstr "" -#: cobc/flag.def:120 +#: cobc/flag.def:123 msgid " -fstack-on-heap PERFORM stack allocated on heap" msgstr "" -#: cobc/flag.def:123 +#: cobc/flag.def:126 msgid "" " -fstack-extended store origin of entrypoints and PERFORM\n" -" * turned on by -debug/-dump" +" * turned on by --debug/-fdump" msgstr "" -#: cobc/flag.def:128 +#: cobc/flag.def:130 +msgid " -fno-fast-compare disables inline comparisions" +msgstr "" + +#: cobc/flag.def:135 msgid "" " -fno-remove-unreachable\tdisable remove of unreachable code\n" " * turned off by -g" msgstr "" -#: cobc/flag.def:132 +#: cobc/flag.def:139 msgid "" " -ftrace generate trace code\n" " * scope: executed SECTION/PARAGRAPH" msgstr "" -#: cobc/flag.def:136 +#: cobc/flag.def:143 msgid "" " -ftraceall generate trace code\n" " * scope: executed SECTION/PARAGRAPH/STATEMENTS" msgstr "" -#: cobc/flag.def:140 +#: cobc/flag.def:147 msgid "" " -fsyntax-only syntax error checking only; don't emit any output" msgstr "" -#: cobc/flag.def:143 +#: cobc/flag.def:150 msgid "" " -fdebugging-line enable debugging lines\n" " * 'D' in indicator column or floating >>D" msgstr "" -#: cobc/flag.def:147 +#: cobc/flag.def:154 msgid "" " -fsource-location generate source location code\n" -" * turned on by -debug/-ftraceall/-fec/-dump" +" * turned on by --debug/-ftraceall/-fec/-fdump" msgstr "" -#: cobc/flag.def:151 +#: cobc/flag.def:158 msgid "" " -fimplicit-init automatic initialization of the COBOL runtime system" msgstr "" -#: cobc/flag.def:154 +#: cobc/flag.def:161 msgid "" " -fno-recursive-check disable check of recursive program call;\n" " effectively compiling as RECURSIVE program" msgstr "" -#: cobc/flag.def:158 +#: cobc/flag.def:165 msgid "" " -fstack-check PERFORM stack checking\n" -" * turned on by -debug/-g" +" * turned on by --debug/-g" +msgstr "" + +#: cobc/flag.def:169 +msgid "" +" -fmemory-check=<scope> checks for invalid writes to internal storage,\n" +" <scope> may be one of: all, pointer, using, none\n" +" * default: none, set to all by --debug" msgstr "" -#: cobc/flag.def:162 +#: cobc/flag.def:174 msgid "" " -fsection-exit-check check that code execution does not leave the scope " "of SECTIONs" msgstr "" -#: cobc/flag.def:165 +#: cobc/flag.def:177 msgid "" " -fimplicit-goback-check\tcheck that code execution does not end implicit " "at end of PROCEDURE DIVISION" msgstr "" -#: cobc/flag.def:168 +#: cobc/flag.def:180 msgid "" " -fwrite-after use AFTER 1 for WRITE of LINE SEQUENTIAL\n" " * default: BEFORE 1" msgstr "" -#: cobc/flag.def:172 +#: cobc/flag.def:184 msgid "" -" -fmfcomment '*' or '/' in column 1 treated as comment\n" -" * FIXED format only" +" -fmfcomment '*' in column 1 treated as comment with listing " +"suppression\n" +" * FIXED/COBOL85/VARIABLE format only" msgstr "" -#: cobc/flag.def:176 +#: cobc/flag.def:188 msgid "" " -facucomment '$' in indicator area treated as '*',\n" " '|' treated as floating comment" msgstr "" -#: cobc/flag.def:181 +#: cobc/flag.def:193 msgid "" " -fno-trunc allow numeric field overflow\n" " * non-ANSI behaviour" msgstr "" -#: cobc/flag.def:185 +#: cobc/flag.def:197 msgid "" " -fsingle-quote use a single quote (apostrophe) for QUOTE\n" " * default: double quote" msgstr "" -#: cobc/flag.def:195 +#: cobc/flag.def:207 msgid "" " -foptional-file treat all files as OPTIONAL\n" " * unless NOT OPTIONAL specified" msgstr "" -#: cobc/flag.def:199 +#: cobc/flag.def:211 msgid "" " -fstatic-call output static function calls for the CALL statement" msgstr "" -#: cobc/flag.def:202 +#: cobc/flag.def:214 msgid "" " -fno-gen-c-decl-static-call\tdisable generation of C function " "declarations\n" " for subroutines with static CALL" msgstr "" -#: cobc/flag.def:206 +#: cobc/flag.def:218 msgid "" " -fgen-c-line-directives\tgenerate source location directives in C code;\n" -" * turned on by -g" +" * turned on by -g/--coverage" msgstr "" -#: cobc/flag.def:210 +#: cobc/flag.def:222 msgid "" " -fgen-c-labels generate extra labels in C sources;\n" " * turned on by -g" msgstr "" -#: cobc/flag.def:214 +#: cobc/flag.def:226 msgid "" -" -fno-theaders suppress all headers and output of compilation\n" -" options from listing while keeping page breaks" +" -fno-theaders suppress all headers from listing while keeping\n" +" page breaks" msgstr "" -#: cobc/flag.def:218 +#: cobc/flag.def:230 msgid " -fno-tsource suppress source from listing" msgstr "" -#: cobc/flag.def:221 +#: cobc/flag.def:233 msgid " -fno-tmessages suppress warning and error summary from listing" msgstr "" -#: cobc/flag.def:224 +#: cobc/flag.def:236 msgid " -ftsymbols specify symbols in listing" msgstr "" -#: cobc/flag.def:227 +#: cobc/flag.def:239 +msgid " -ftcmd specify command line in listing" +msgstr "" + +#: cobc/flag.def:242 +msgid " -fno-ttimestamp suppress timestamp in listing headers" +msgstr "" + +#: cobc/flag.def:245 +msgid "" +" -fttitle=<title> set listing title with '_' replaced by spaces;\n" +" defaults to package name and version" +msgstr "" + +#: cobc/flag.def:249 msgid "" " -fno-diagnostics-show-option\tsuppress output of option that directly\n" " controls the diagnostic" msgstr "" -#: cobc/help.c:32 +#: cobc/flag.def:253 +msgid "" +" -fno-diagnostics-show-caret\tdo not display source context on warning/" +"error diagnostic" +msgstr "" + +#: cobc/flag.def:256 +msgid "" +" -fno-diagnostics-show-line-numbers\tsuppress display of line numbers in " +"diagnostics" +msgstr "" + +#: cobc/help.c:33 msgid "GnuCOBOL compiler for most COBOL dialects with lots of extensions" msgstr "" -#: cobc/help.c:34 +#: cobc/help.c:35 #, c-format msgid "Usage: %s [options]... file..." msgstr "" -#: cobc/help.c:47 bin/cobcrun.c:143 +#: cobc/help.c:48 bin/cobcrun.c:143 #, c-format msgid "" "Report bugs to: %s\n" "or (preferably) use the issue tracker via the home page." msgstr "" -#: cobc/help.c:51 -msgid "GnuCOBOL home page: <https://www.gnu.org/software/gnucobol/>" +#: cobc/help.c:52 bin/cobcrun.c:146 +#, c-format +msgid "GnuCOBOL home page: <%s>" msgstr "" -#: cobc/help.c:52 -msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" +#: cobc/help.c:54 bin/cobcrun.c:148 +#, c-format +msgid "General help using GNU software: <%s>" msgstr "" -#: cobc/help.c:58 bin/cobcrun.c:125 +#: cobc/help.c:61 bin/cobcrun.c:125 msgid "Options:" msgstr "" -#: cobc/help.c:59 +#: cobc/help.c:62 msgid " -h, --help display this help and exit" msgstr "" -#: cobc/help.c:60 +#: cobc/help.c:63 msgid " -V, --version display compiler version information and exit" msgstr "" -#: cobc/help.c:61 +#: cobc/help.c:64 msgid " -dumpversion display compiler version and exit" msgstr "" -#: cobc/help.c:62 +#: cobc/help.c:65 msgid "" " -i, --info display compiler information (build/environment)\n" " and exit" msgstr "" -#: cobc/help.c:64 +#: cobc/help.c:67 msgid "" " -v, --verbose verbose mode, display additional information;\n" " multiple -v options increase the verbosity,\n" @@ -2111,27 +2164,27 @@ msgid "" " (3) pass verbose option to linker" msgstr "" -#: cobc/help.c:71 +#: cobc/help.c:74 msgid " -q, --brief reduced displays, commands invoked not shown" msgstr "" -#: cobc/help.c:72 +#: cobc/help.c:75 msgid " -### like -v but commands not executed" msgstr "" -#: cobc/help.c:73 +#: cobc/help.c:76 msgid " -x build an executable program" msgstr "" -#: cobc/help.c:74 +#: cobc/help.c:77 msgid " -m build a dynamically loadable module (default)" msgstr "" -#: cobc/help.c:75 +#: cobc/help.c:78 msgid " -j [<args>], --job[=<args>]\trun program after build, passing <args>" msgstr "" -#: cobc/help.c:76 +#: cobc/help.c:79 msgid "" " -std=<dialect> warnings/features for a specific dialect\n" " <dialect> can be one of:\n" @@ -2143,119 +2196,115 @@ msgid "" " see configuration files in directory config" msgstr "" -#: cobc/help.c:84 +#: cobc/help.c:87 msgid "" " -F, --free use free source format (alias for -fformat=free)" msgstr "" -#: cobc/help.c:85 +#: cobc/help.c:88 msgid "" " --fixed use fixed source format (default; alias for\n" " -fformat=fixed)" msgstr "" -#: cobc/help.c:87 +#: cobc/help.c:90 msgid " -O, -O2, -O3, -Os enable optimization" msgstr "" -#: cobc/help.c:88 +#: cobc/help.c:91 msgid " -O0 disable optimization" msgstr "" -#: cobc/help.c:89 +#: cobc/help.c:92 msgid " -g enable C compiler debug and stack check" msgstr "" -#: cobc/help.c:90 +#: cobc/help.c:93 msgid "" " -d, --debug enable all run-time error checking,\n" " equal to -fstack-check -fec=EC-ALL" msgstr "" -#: cobc/help.c:93 +#: cobc/help.c:97 msgid "" " -fec=<exception-name>\tenable code generation for <exception-name>,\n" " see --list-exceptions for the possible values,\n" " sets -fsource-location" msgstr "" -#: cobc/help.c:97 +#: cobc/help.c:100 +msgid "" +" -fno-ec=<exception-name>\tdisable code generation for <exception-name>" +msgstr "" + +#: cobc/help.c:101 msgid " -o <file> place the output into <file>" msgstr "" -#: cobc/help.c:98 +#: cobc/help.c:102 msgid "" " -b combine all input files into a single\n" " dynamically loadable module" msgstr "" -#: cobc/help.c:100 +#: cobc/help.c:104 msgid " -E preprocess only; do not compile or link" msgstr "" -#: cobc/help.c:101 +#: cobc/help.c:105 msgid " -C translation only; convert COBOL to C" msgstr "" -#: cobc/help.c:102 +#: cobc/help.c:106 msgid " -S compile only; output assembly file" msgstr "" -#: cobc/help.c:103 +#: cobc/help.c:107 msgid " -c compile and assemble, but do not link" msgstr "" -#: cobc/help.c:104 +#: cobc/help.c:108 msgid "" " -T <file> generate and place a wide program listing into <file>" msgstr "" -#: cobc/help.c:105 +#: cobc/help.c:109 msgid "" " -t <file> generate and place a program listing into <file>" msgstr "" -#: cobc/help.c:106 +#: cobc/help.c:110 msgid " --tlines=<lines> specify lines per page in listing, default = 55" msgstr "" -#: cobc/help.c:108 -msgid "" -" --tsymbols specify symbols in listing, use -ftsymbols instead" -msgstr "" - -#: cobc/help.c:110 +#: cobc/help.c:111 msgid " -P[=<dir or file>] generate preprocessed program listing (.lst)" msgstr "" -#: cobc/help.c:112 +#: cobc/help.c:113 msgid "" " -X, --Xref generate cross reference through 'cobxref'\n" " (V. Coen's 'cobxref' must be in path)" msgstr "" -#: cobc/help.c:115 +#: cobc/help.c:116 msgid " -X, --Xref specify cross reference in listing" msgstr "" -#: cobc/help.c:117 -msgid " -I <directory> add <directory> to copy/include search path" -msgstr "" - #: cobc/help.c:118 -msgid " -L <directory> add <directory> to library search path" +msgid " -I <directory> add <directory> to copy/include search path" msgstr "" #: cobc/help.c:119 -msgid " -l <lib> link the library <lib>" +msgid " -L <directory> add <directory> to library search path" msgstr "" #: cobc/help.c:120 -msgid " -A <options> add <options> to the C compile phase" +msgid " -l <lib> link the library <lib>" msgstr "" #: cobc/help.c:121 -msgid " -Q <options> add <options> to the C link phase" +msgid " -K <entry> generate CALL to <entry> as static" msgstr "" #: cobc/help.c:122 @@ -2263,3708 +2312,3772 @@ msgid " -D <define> define <define> for COBOL compilation" msgstr "" #: cobc/help.c:123 -msgid " -K <entry> generate CALL to <entry> as static" +msgid " -A <options> add <options> to the C compile phase" msgstr "" #: cobc/help.c:124 -msgid " --conf=<file> user-defined dialect configuration; see -std" +msgid " -Q <options> add <options> to the C link phase" msgstr "" #: cobc/help.c:125 -msgid " --list-reserved display reserved words" +msgid " --coverage instrument generated binaries for coverage" msgstr "" #: cobc/help.c:126 -msgid " --list-intrinsics display intrinsic functions" +msgid " --conf=<file> user-defined dialect configuration; see -std" msgstr "" #: cobc/help.c:127 -msgid " --list-mnemonics display mnemonic names" +msgid " --list-reserved display reserved words" msgstr "" #: cobc/help.c:128 -msgid " --list-exceptions display exception names" +msgid " --list-intrinsics display intrinsic functions" msgstr "" #: cobc/help.c:129 -msgid " --list-system display system routines" +msgid " --list-mnemonics display mnemonic names" msgstr "" #: cobc/help.c:130 +msgid " --list-exceptions display exception names" +msgstr "" + +#: cobc/help.c:131 +msgid " --list-system display system routines" +msgstr "" + +#: cobc/help.c:132 msgid "" " --save-temps[=<dir>] save intermediate files\n" " * default: current directory" msgstr "" -#: cobc/help.c:132 +#: cobc/help.c:134 +msgid " -MT <target> set/add target file used in dependency list" +msgstr "" + +#: cobc/help.c:135 +msgid " -MF <file> place dependency list into <file>" +msgstr "" + +#: cobc/help.c:136 msgid " -ext <extension> add file extension for resolving COPY" msgstr "" -#: cobc/help.c:139 +#: cobc/help.c:143 msgid "Warning options:" msgstr "" -#: cobc/help.c:140 +#: cobc/help.c:144 msgid "" " -Wall enable most warnings (all except as noted below)" msgstr "" -#: cobc/help.c:141 +#: cobc/help.c:145 msgid " -Wextra like -Wall but enable some extra warning flags" msgstr "" -#: cobc/help.c:142 +#: cobc/help.c:146 msgid " -w disable all warnings" msgstr "" -#: cobc/help.c:143 +#: cobc/help.c:147 msgid "" " -Wno-<warning> disable warning enabled by default, -Wall or -Wextra" msgstr "" #. TRANSLATORS: This msgid is appended to msgid for -Wno-pending and others -#: cobc/help.c:149 +#: cobc/help.c:153 msgid " * ALWAYS active" msgstr "" #. TRANSLATORS: This msgid is appended to msgid for -Wpossible-truncate and others -#: cobc/help.c:153 +#: cobc/help.c:157 msgid " * NOT set with -Wall" msgstr "" -#: cobc/help.c:161 +#: cobc/help.c:165 +msgid "" +" -fdiagnostics-plain-output\tmake diagnostic output as plain as possible" +msgstr "" + +#: cobc/help.c:166 msgid " -Werror treat all warnings as errors" msgstr "" -#: cobc/help.c:162 +#: cobc/help.c:167 msgid " -Wno-error don't treat warnings as errors" msgstr "" -#: cobc/help.c:163 +#: cobc/help.c:168 msgid " -Werror=<warning> treat specified <warning> as error" msgstr "" -#: cobc/help.c:164 +#: cobc/help.c:169 msgid " -Wno-error=<warning> don't treat specified <warning> as error" msgstr "" -#: cobc/help.c:180 +#: cobc/help.c:185 msgid "Compiler options:" msgstr "" -#: cobc/help.c:198 +#: cobc/help.c:203 msgid "" " -fibmcomp sets -fbinary-size=2-4-8 -fsynchronized-clause=ok\n" " -fno-ibmcomp sets -fbinary-size=1--8 -fsynchronized-clause=ignore" msgstr "" -#: cobc/help.c:201 +#: cobc/help.c:206 msgid "" " -falternate-ebcdic use restricted ASCII to EBCDIC translate\n" " -fno-alternate-ebcdic use extended ASCII to EBCDIC translate" msgstr "" -#: cobc/help.c:230 +#: cobc/help.c:235 msgid "Compiler dialect configuration options:" msgstr "" -#: cobc/help.c:232 cobc/help.c:238 +#: cobc/help.c:237 cobc/help.c:243 msgid "<value>" msgstr "" -#: cobc/help.c:242 +#: cobc/help.c:247 msgid "<support>" msgstr "" -#: cobc/help.c:251 +#: cobc/help.c:256 msgid "where <support> is one of the following:" msgstr "" #. TRANSLATORS: This msgid is used when a variable name #. or label is referenced in a compiler message. -#: cobc/help.c:254 cobc/help.c:257 cobc/help.c:260 cobc/help.c:263 -#: cobc/help.c:266 cobc/help.c:269 cobc/help.c:272 cobc/help.c:275 -#: cobc/typeck.c:2361 +#: cobc/help.c:259 cobc/help.c:262 cobc/help.c:265 cobc/help.c:268 +#: cobc/help.c:271 cobc/help.c:274 cobc/help.c:277 cobc/help.c:280 +#: cobc/typeck.c:2378 #, c-format msgid "'%s'" msgstr "" -#: cobc/help.c:277 +#: cobc/help.c:282 msgid "word to be taken out of the reserved words list" msgstr "" -#: cobc/help.c:277 cobc/help.c:278 cobc/help.c:280 +#: cobc/help.c:282 cobc/help.c:283 cobc/help.c:285 msgid "<word>" msgstr "" -#: cobc/help.c:278 +#: cobc/help.c:283 msgid "word to be added to reserved words list" msgstr "" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "word to be added to reserved words list as alias" msgstr "" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "<word>:<alias>" msgstr "" -#: cobc/help.c:280 +#: cobc/help.c:285 msgid "special register to disable" msgstr "" -#: cobc/help.c:281 +#: cobc/help.c:286 msgid "special register to enable" msgstr "" -#: cobc/help.c:282 +#: cobc/help.c:287 msgid "" "<word> or <word>:<definition>, where definition uses backslash escaped spaces" msgstr "" -#: cobc/parser.y:315 cobc/parser.y:323 +#: cobc/parser.y:307 #, c-format msgid "'%s' should start in Area A" msgstr "" -#: cobc/parser.y:331 cobc/parser.y:333 +#: cobc/parser.y:315 +#, c-format +msgid "%s should start in Area A" +msgstr "" + +#: cobc/parser.y:322 +#, c-format +msgid "%s should not start in Area A" +msgstr "" + +#: cobc/parser.y:330 cobc/parser.y:332 msgid "start of statement in Area A" msgstr "" -#: cobc/parser.y:344 cobc/parser.y:379 +#: cobc/parser.y:428 #, c-format msgid "unreachable statement '%s'" msgstr "" -#: cobc/parser.y:470 +#: cobc/parser.y:542 #, c-format msgid "ENTRY '%s' duplicated" msgstr "" -#: cobc/parser.y:520 +#: cobc/parser.y:594 #, c-format msgid "ENTRY FOR GO TO '%s' duplicated" msgstr "" -#: cobc/parser.y:536 +#: cobc/parser.y:610 #, c-format msgid "maximum nested program depth exceeded (%d)" msgstr "" -#: cobc/parser.y:562 cobc/parser.y:589 +#: cobc/parser.y:636 cobc/parser.y:663 #, c-format msgid "%s statement not terminated by %s" msgstr "" -#: cobc/parser.y:592 +#: cobc/parser.y:666 #, c-format msgid "%s statement not terminated" msgstr "" -#: cobc/parser.y:634 -msgid "USE statement invalid for SORT file" +#: cobc/parser.y:708 +msgid "USE statement invalid for SD file" msgstr "" -#: cobc/parser.y:676 cobc/parser.y:1670 cobc/parser.y:1673 -#, c-format -msgid "cannot specify both %s and %s" -msgstr "" - -#: cobc/parser.y:677 +#: cobc/parser.y:751 #, c-format msgid "%s is ignored" msgstr "" -#: cobc/parser.y:686 +#: cobc/parser.y:760 #, c-format -msgid "Cannot specify %s without number of lines on page" +msgid "cannot specify %s without number of lines on page" msgstr "" -#: cobc/parser.y:696 +#: cobc/parser.y:770 #, c-format msgid "maximum OCCURS depth exceeded (%d)" msgstr "" -#: cobc/parser.y:704 cobc/typeck.c:3037 +#: cobc/parser.y:785 cobc/typeck.c:3127 #, c-format msgid "'%s' is not in LINKAGE SECTION" msgstr "" -#: cobc/parser.y:725 +#: cobc/parser.y:806 msgid "TO phrase without DEPENDING phrase" msgstr "" -#: cobc/parser.y:727 +#: cobc/parser.y:808 msgid "maximum number of occurrences assumed to be exact number" msgstr "" -#: cobc/parser.y:732 cobc/parser.y:8032 +#: cobc/parser.y:813 cobc/parser.y:8398 msgid "OCCURS TO must be greater than OCCURS FROM" msgstr "" -#: cobc/parser.y:741 +#: cobc/parser.y:823 msgid "OCCURS DEPENDING ON without TO phrase" msgstr "" -#: cobc/parser.y:806 +#: cobc/parser.y:899 #, c-format msgid "%s header missing" msgstr "" -#: cobc/parser.y:807 +#: cobc/parser.y:900 #, c-format -msgid "%s header assumed" -msgstr "" - -#: cobc/parser.y:939 -#, c-format -msgid "duplicate %s" +msgid "%s header assumed" msgstr "" -#: cobc/parser.y:941 +#: cobc/parser.y:1053 #, c-format msgid "%s incorrectly after %s" msgstr "" -#: cobc/parser.y:1078 +#: cobc/parser.y:1208 #, c-format msgid "redefinition of program name '%s'" msgstr "" -#: cobc/parser.y:1083 +#: cobc/parser.y:1213 #, c-format msgid "redefinition of program ID '%s'" msgstr "" -#: cobc/parser.y:1117 +#: cobc/parser.y:1247 #, c-format msgid "FUNCTION '%s' has no PROCEDURE DIVISION" msgstr "" -#: cobc/parser.y:1228 +#: cobc/parser.y:1372 msgid "functions may not be defined within a program/function" msgstr "" -#: cobc/parser.y:1278 +#: cobc/parser.y:1426 #, c-format msgid "END FUNCTION '%s' is different from FUNCTION-ID '%s'" msgstr "" -#: cobc/parser.y:1292 +#: cobc/parser.y:1440 #, c-format msgid "END PROGRAM '%s' is different from PROGRAM-ID '%s'" msgstr "" -#: cobc/parser.y:1341 +#: cobc/parser.y:1489 msgid "currency symbol must be one character long" msgstr "" -#: cobc/parser.y:1398 +#: cobc/parser.y:1546 #, c-format msgid "invalid character '%c' in currency symbol" msgstr "" -#: cobc/parser.y:1414 +#: cobc/parser.y:1562 msgid "prototype has same name as current function and will be ignored" msgstr "" -#: cobc/parser.y:1441 +#: cobc/parser.y:1589 #, c-format msgid "duplicate REPOSITORY entries for '%s' do not match" msgstr "" -#: cobc/parser.y:1445 +#: cobc/parser.y:1593 #, c-format msgid "duplicate REPOSITORY entry for '%s'" msgstr "" -#: cobc/parser.y:1510 +#: cobc/parser.y:1658 #, c-format msgid "ORGANIZATION %s is incompatible with RECORD DELIMITER" msgstr "" -#: cobc/parser.y:1548 cobc/parser.y:1939 cobc/typeck.c:829 +#: cobc/parser.y:1694 cobc/parser.y:2142 cobc/typeck.c:835 #, c-format msgid "condition-name not allowed here: '%s'" msgstr "" -#: cobc/parser.y:1554 cobc/parser.y:2127 +#: cobc/parser.y:1700 cobc/parser.y:2345 msgid "SCREEN item cannot be used here" msgstr "" -#: cobc/parser.y:1557 +#: cobc/parser.y:1703 msgid "REPORT item cannot be used here" msgstr "" -#: cobc/parser.y:1563 +#: cobc/parser.y:1709 msgid "TYPEDEF item cannot be used here" msgstr "" -#: cobc/parser.y:1572 +#: cobc/parser.y:1718 msgid "elementary item expected" msgstr "" -#: cobc/parser.y:1579 +#: cobc/parser.y:1725 msgid "item may not reference itself" msgstr "" -#: cobc/parser.y:1586 +#: cobc/parser.y:1733 msgid "item may not be subordinate to any item with USAGE clause" msgstr "" -#: cobc/parser.y:1588 +#: cobc/parser.y:1735 msgid "item may not be subordinate to any item with SIGN clause" msgstr "" -#: cobc/parser.y:1631 +#: cobc/parser.y:1780 #, c-format msgid "illegal combination of %s with other clauses" msgstr "" -#: cobc/parser.y:1641 +#: cobc/parser.y:1794 #, c-format msgid "entry following %s may not be subordinate to it" msgstr "" -#: cobc/parser.y:1859 +#: cobc/parser.y:2042 +msgid "INITIAL specified on non-input field" +msgstr "" + +#: cobc/parser.y:2054 +msgid "relative LINE/COLUMN clause required with OCCURS" +msgstr "" + +#: cobc/parser.y:2072 msgid "FOR phrase cannot immediately follow ALL/LEADING/TRAILING" msgstr "" -#: cobc/parser.y:1861 +#: cobc/parser.y:2074 msgid "missing CHARACTERS/ALL/LEADING/TRAILING phrase after FOR phrase" msgstr "" -#: cobc/parser.y:1868 +#: cobc/parser.y:2081 msgid "missing value between ALL/LEADING/TRAILING words" msgstr "" -#: cobc/parser.y:1873 +#: cobc/parser.y:2086 msgid "missing FOR phrase before CHARACTERS/ALL/LEADING/TRAILING phrase" msgstr "" -#: cobc/parser.y:1880 +#: cobc/parser.y:2093 msgid "missing ALL/LEADING/TRAILING before value" msgstr "" -#: cobc/parser.y:1935 +#: cobc/parser.y:2138 msgid "use of condition-name in place of data-name" msgstr "" -#: cobc/parser.y:1966 +#: cobc/parser.y:2169 msgid "cannot specify NO ADVANCING in screen DISPLAY" msgstr "" -#: cobc/parser.y:2029 cobc/parser.y:2046 +#: cobc/parser.y:2232 cobc/parser.y:2249 msgid "non-standard DISPLAY" msgstr "" -#: cobc/parser.y:2033 +#: cobc/parser.y:2236 msgid "screens may only be displayed on CRT" msgstr "" -#: cobc/parser.y:2038 cobc/parser.y:2081 +#: cobc/parser.y:2241 cobc/parser.y:2284 msgid "cannot mix screens and fields in the same DISPLAY statement" msgstr "" -#: cobc/parser.y:2042 +#: cobc/parser.y:2245 msgid "screen clauses may only be used for DISPLAY on CRT" msgstr "" -#: cobc/parser.y:2087 +#: cobc/parser.y:2290 msgid "ambiguous DISPLAY; put items to display on device in separate DISPLAY" msgstr "" -#: cobc/parser.y:2103 +#: cobc/parser.y:2301 #, c-format msgid "%s is not an alphanumeric literal" msgstr "" -#: cobc/parser.y:2105 +#: cobc/parser.y:2305 #, c-format msgid "'%s' is not USAGE DISPLAY" msgstr "" -#: cobc/parser.y:2120 cobc/typeck.c:9790 +#: cobc/parser.y:2322 cobc/parser.y:19534 +#, c-format +msgid "'%s' is not a field" +msgstr "" + +#: cobc/parser.y:2338 cobc/typeck.c:10231 #, c-format msgid "invalid target for %s" msgstr "" -#: cobc/parser.y:2129 +#: cobc/parser.y:2347 msgid "RENAMES item may not be used here" msgstr "" -#: cobc/parser.y:2131 cobc/typeck.c:2737 cobc/typeck.c:2828 +#: cobc/parser.y:2349 cobc/typeck.c:2822 cobc/typeck.c:2913 msgid "ANY LENGTH item not allowed here" msgstr "" -#: cobc/parser.y:2135 +#: cobc/parser.y:2353 #, c-format msgid "item '%s' has wrong class for VALIDATE" msgstr "" -#: cobc/parser.y:2144 +#: cobc/parser.y:2362 msgid "WHEN clause must follow EVERY clause" msgstr "" -#: cobc/parser.y:2229 cobc/parser.y:18631 +#: cobc/parser.y:2447 cobc/parser.y:19251 msgid "non-zero value expected" msgstr "" -#: cobc/parser.y:2235 cobc/tree.c:4735 +#: cobc/parser.y:2453 cobc/tree.c:4803 #, c-format msgid "RECORD size (IDX) exceeds maximum allowed (%d)" msgstr "" -#: cobc/parser.y:2239 cobc/tree.c:4739 +#: cobc/parser.y:2457 cobc/tree.c:4807 #, c-format msgid "RECORD size exceeds maximum allowed (%d)" msgstr "" -#: cobc/parser.y:2244 +#: cobc/parser.y:2462 msgid "RECORD clause invalid" msgstr "" -#: cobc/parser.y:3368 +#: cobc/parser.y:3595 msgid "multiple PROGRAM-ID's without matching END PROGRAM" msgstr "" -#: cobc/parser.y:3371 +#: cobc/parser.y:3598 msgid "executable requested but no program found" msgstr "" -#: cobc/parser.y:3488 +#: cobc/parser.y:3717 msgid "prototypes must be come before any program/function definitions" msgstr "" -#: cobc/parser.y:3691 +#: cobc/parser.y:3930 msgid "COMMON may only be used in a contained program" msgstr "" -#: cobc/parser.y:3778 +#: cobc/parser.y:4017 msgid "CALL prototypes" msgstr "" -#: cobc/parser.y:3953 cobc/parser.y:4235 cobc/parser.y:4281 cobc/parser.y:4394 -#: cobc/parser.y:4608 cobc/parser.y:4705 cobc/parser.y:4744 cobc/parser.y:4803 -#: cobc/parser.y:4824 cobc/parser.y:4867 cobc/parser.y:4946 cobc/parser.y:4965 -#: cobc/parser.y:4981 cobc/parser.y:4999 cobc/parser.y:5017 cobc/parser.y:5034 -#: cobc/parser.y:5052 cobc/parser.y:7404 cobc/parser.y:8628 +#: cobc/parser.y:4192 cobc/parser.y:4471 cobc/parser.y:4517 cobc/parser.y:4632 +#: cobc/parser.y:4846 cobc/parser.y:4943 cobc/parser.y:4982 cobc/parser.y:5041 +#: cobc/parser.y:5062 cobc/parser.y:5105 cobc/parser.y:5184 cobc/parser.y:5203 +#: cobc/parser.y:5219 cobc/parser.y:5237 cobc/parser.y:5255 cobc/parser.y:5272 +#: cobc/parser.y:5290 cobc/parser.y:7685 cobc/parser.y:9028 #, c-format msgid "%s not allowed in nested programs" msgstr "" -#: cobc/parser.y:4109 +#: cobc/parser.y:4345 msgid "segment-number must be in range of values 1 to 49" msgstr "" -#: cobc/parser.y:4121 +#: cobc/parser.y:4357 msgid "duplicate CLASSIFICATION clause" msgstr "" -#: cobc/parser.y:4200 +#: cobc/parser.y:4436 msgid "PROGRAM phrase" msgstr "" -#: cobc/parser.y:4302 cobc/parser.y:4313 cobc/parser.y:4657 +#: cobc/parser.y:4538 cobc/parser.y:4549 cobc/parser.y:4895 #, c-format msgid "invalid %s clause" msgstr "" -#: cobc/parser.y:4616 cobc/parser.y:4754 +#: cobc/parser.y:4854 cobc/parser.y:4992 msgid "type does not match alphabet" msgstr "" -#: cobc/parser.y:4760 +#: cobc/parser.y:4998 msgid "CLASS IS integer IN alphabet-name" msgstr "" -#: cobc/parser.y:4780 cobc/parser.y:4784 +#: cobc/parser.y:5018 cobc/parser.y:5022 msgid "CLASS literal with THRU must have size 1" msgstr "" -#: cobc/parser.y:4879 +#: cobc/parser.y:5117 msgid "separate currency symbol and currency string" msgstr "" -#: cobc/parser.y:4912 +#: cobc/parser.y:5150 #, c-format msgid "invalid CURRENCY SIGN '%s'" msgstr "" -#: cobc/parser.y:5139 +#: cobc/parser.y:5377 msgid "cannot use RELATIVE KEY clause on INDEXED files" msgstr "" -#: cobc/parser.y:5143 +#: cobc/parser.y:5381 msgid "cannot use RECORD KEY clause on RELATIVE files" msgstr "" -#: cobc/parser.y:5215 +#: cobc/parser.y:5453 msgid "EXTERNAL/DYNAMIC cannot be used with literals" msgstr "" -#: cobc/parser.y:5235 +#: cobc/parser.y:5473 msgid "EXTERNAL/DYNAMIC cannot be used with USING/VARYING" msgstr "" -#: cobc/parser.y:5246 +#: cobc/parser.y:5484 msgid "EXTERNAL/DYNAMIC cannot be used with DISK FROM" msgstr "" -#: cobc/parser.y:5248 -msgid "ASSIGN DISK FROM" -msgstr "" - -#: cobc/parser.y:5370 +#: cobc/parser.y:5608 msgid "ASSIGN EXTERNAL/DYNAMIC" msgstr "" -#: cobc/parser.y:5486 cobc/parser.y:5666 +#: cobc/parser.y:5724 cobc/parser.y:5921 #, c-format msgid "%s only valid with ORGANIZATION %s" msgstr "" -#: cobc/parser.y:5583 +#: cobc/parser.y:5818 cobc/typeck.c:3818 #, c-format msgid "'%s' is not an alphabet-name" msgstr "" -#: cobc/parser.y:5599 +#: cobc/parser.y:5854 msgid "VSAM status" msgstr "" -#: cobc/parser.y:5733 cobc/parser.y:5758 +#: cobc/parser.y:5988 cobc/parser.y:6013 #, c-format msgid "RECORD DELIMITER %s only allowed with SEQUENTIAL files" msgstr "" -#: cobc/parser.y:5745 +#: cobc/parser.y:6000 #, c-format msgid "RECORD DELIMITER %s only allowed with (LINE) SEQUENTIAL files" msgstr "" -#: cobc/parser.y:5751 +#: cobc/parser.y:6006 msgid "LINE-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5764 +#: cobc/parser.y:6019 msgid "BINARY-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5772 +#: cobc/parser.y:6027 msgid "RECORD DELIMITER clause only allowed with (LINE) SEQUENTIAL files" msgstr "" -#: cobc/parser.y:5776 +#: cobc/parser.y:6031 #, c-format msgid "RECORD DELIMITER %s not recognized; will be ignored" msgstr "" -#: cobc/parser.y:5814 +#: cobc/parser.y:6069 msgid "DUPLICATES for primary keys" msgstr "" -#: cobc/parser.y:6058 +#: cobc/parser.y:6313 msgid "DOS/VS APPLY phrase" msgstr "" -#: cobc/parser.y:6212 +#: cobc/parser.y:6467 msgid "RECORD description missing or invalid" msgstr "" -#: cobc/parser.y:6239 +#: cobc/parser.y:6494 #, c-format msgid "duplicate file description for %s" msgstr "" -#: cobc/parser.y:6288 cobc/parser.y:6893 cobc/parser.y:7389 cobc/parser.y:13485 -#: cobc/parser.y:16686 +#: cobc/parser.y:6543 cobc/parser.y:7170 cobc/parser.y:7670 cobc/parser.y:13913 +#: cobc/parser.y:17210 #, c-format msgid "%s is invalid in a user FUNCTION" msgstr "" -#: cobc/parser.y:6326 cobc/parser.y:6336 +#: cobc/parser.y:6581 cobc/parser.y:6591 msgid "RECORD clause ignored for LINE SEQUENTIAL" msgstr "" -#: cobc/parser.y:6433 +#: cobc/parser.y:6688 msgid "LINAGE clause with wrong file type" msgstr "" -#: cobc/parser.y:6495 +#: cobc/parser.y:6750 msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgstr "" -#: cobc/parser.y:6532 +#: cobc/parser.y:6787 #, c-format msgid "ignoring CODE-SET '%s'" msgstr "" -#: cobc/parser.y:6541 +#: cobc/parser.y:6796 msgid "CODE-SET clause invalid for file type" msgstr "" -#: cobc/parser.y:6562 +#: cobc/parser.y:6817 msgid "REPORT clause with wrong file type" msgstr "" -#: cobc/parser.y:6641 +#: cobc/parser.y:6899 msgid "CD record missing" msgstr "" -#: cobc/parser.y:7091 +#: cobc/parser.y:7372 msgid "CONSTANT item not at 01 level" msgstr "" -#: cobc/parser.y:7236 +#: cobc/parser.y:7517 msgid "REDEFINES clause not following entry-name" msgstr "" -#: cobc/parser.y:7309 cobc/parser.y:7339 cobc/parser.y:7381 cobc/parser.y:7470 -#: cobc/parser.y:8233 +#: cobc/parser.y:7590 cobc/parser.y:7620 cobc/parser.y:7662 cobc/parser.y:7751 +#: cobc/parser.y:8606 #, c-format msgid "%s only allowed at 01/77 level" msgstr "" -#: cobc/parser.y:7312 cobc/parser.y:7341 cobc/parser.y:7383 cobc/parser.y:8235 -#: cobc/parser.y:8587 cobc/parser.y:8609 +#: cobc/parser.y:7593 cobc/parser.y:7622 cobc/parser.y:7664 cobc/parser.y:8608 +#: cobc/parser.y:8987 cobc/parser.y:9009 #, c-format msgid "%s requires a data name" msgstr "" -#: cobc/parser.y:7316 cobc/parser.y:7565 +#: cobc/parser.y:7597 cobc/parser.y:7846 #, c-format msgid "%s not allowed in %s" msgstr "" -#: cobc/parser.y:7337 cobc/parser.y:7391 cobc/parser.y:8231 cobc/parser.y:8583 -#: cobc/parser.y:8607 +#: cobc/parser.y:7618 cobc/parser.y:7672 cobc/parser.y:8604 cobc/parser.y:8983 +#: cobc/parser.y:9007 #, c-format msgid "%s not allowed here" msgstr "" -#: cobc/parser.y:7528 +#: cobc/parser.y:7809 #, c-format msgid "%s requires DEPENDING clause" msgstr "" -#: cobc/parser.y:7544 +#: cobc/parser.y:7825 msgid "" "a locale-format PICTURE string must only consist of '9', '.', '+', 'Z' and " "the currency-sign" msgstr "" -#: cobc/parser.y:7554 +#: cobc/parser.y:7835 msgid "" "DEPENDING clause needs either an OCCURS clause or a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7560 +#: cobc/parser.y:7841 msgid "only USAGE DISPLAY may specify a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7610 cobc/typeck.c:4752 +#: cobc/parser.y:7893 cobc/typeck.c:4916 #, c-format msgid "'%s' is not a locale-name" msgstr "" -#: cobc/parser.y:7656 +#: cobc/parser.y:7939 #, c-format msgid "'%s' is not a valid USAGE" msgstr "" -#: cobc/parser.y:7661 +#: cobc/parser.y:7944 #, c-format msgid "unknown USAGE: %s" msgstr "" -#: cobc/parser.y:7808 +#: cobc/parser.y:8139 #, c-format msgid "unknown HANDLE type: %s" msgstr "" -#: cobc/parser.y:8082 +#: cobc/parser.y:8347 +#, c-format +msgid "'%s' is not USAGE UTF-8" +msgstr "" + +#: cobc/parser.y:8448 msgid "INDEXED should follow ASCENDING/DESCENDING" msgstr "" -#: cobc/parser.y:8317 +#: cobc/parser.y:8658 cobc/parser.y:8660 +#, c-format +msgid "unexpected %s" +msgstr "" + +#: cobc/parser.y:8709 msgid "amount of entries in FROM and TO must match" msgstr "" -#: cobc/parser.y:8326 +#: cobc/parser.y:8718 #, c-format msgid "entry in FROM (%d) must be <= entry in TO (%d)" msgstr "" -#: cobc/parser.y:8585 +#: cobc/parser.y:8985 #, c-format msgid "%s only allowed at 01 level" msgstr "" -#: cobc/parser.y:8589 cobc/parser.y:8611 +#: cobc/parser.y:8989 cobc/parser.y:9011 #, c-format msgid "%s and %s combination not allowed" msgstr "" -#: cobc/parser.y:8723 +#: cobc/parser.y:9127 msgid "GLOBAL is not allowed with RD" msgstr "" -#: cobc/parser.y:9247 +#: cobc/parser.y:9650 #, c-format msgid "%s is not valid for VARYING" msgstr "" -#: cobc/parser.y:9283 +#: cobc/parser.y:9686 msgid "LINE with OCCURS is not supported" msgstr "" -#: cobc/parser.y:9323 +#: cobc/parser.y:9726 msgid "PLUS is not recommended with LEFT, RIGHT or CENTER" msgstr "" -#: cobc/parser.y:9325 +#: cobc/parser.y:9728 msgid "PLUS is not allowed with LEFT, RIGHT or CENTER" msgstr "" -#: cobc/parser.y:9363 +#: cobc/parser.y:9766 msgid "PLUS is ignored on first field of line" msgstr "" -#: cobc/parser.y:9394 +#: cobc/parser.y:9797 msgid "invalid COLUMN integer; must be > 0" msgstr "" -#: cobc/parser.y:9396 +#: cobc/parser.y:9799 msgid "COLUMN numbers should increase" msgstr "" -#: cobc/parser.y:9492 cobc/parser.y:9547 -msgid "INITIAL specified on non-input field" -msgstr "" - -#: cobc/parser.y:9504 cobc/parser.y:9559 -msgid "relative LINE/COLUMN clause required with OCCURS" -msgstr "" - -#: cobc/parser.y:9661 cobc/parser.y:9665 +#: cobc/parser.y:9990 cobc/parser.y:9994 msgid "screen positions from data-item" msgstr "" -#: cobc/parser.y:9821 +#: cobc/parser.y:10153 #, c-format msgid "missing %s" msgstr "" -#: cobc/parser.y:10508 +#: cobc/parser.y:10840 msgid "OCCURS screen items" msgstr "" -#: cobc/parser.y:10520 +#: cobc/parser.y:10852 msgid "GLOBAL screen items" msgstr "" -#: cobc/parser.y:10571 +#: cobc/parser.y:10904 msgid "overriding convention specified in ENTRY-CONVENTION" msgstr "" -#: cobc/parser.y:10586 +#: cobc/parser.y:10917 msgid "executable program requested but PROCEDURE/ENTRY has USING clause" msgstr "" -#: cobc/parser.y:10654 cobc/parser.y:10671 cobc/parser.y:12278 +#: cobc/parser.y:10987 cobc/parser.y:11004 cobc/parser.y:12667 #, c-format msgid "number of arguments exceeds maximum %d" msgstr "" -#: cobc/parser.y:10663 +#: cobc/parser.y:10996 msgid "CHAINING invalid in user FUNCTION" msgstr "" -#: cobc/parser.y:10699 +#: cobc/parser.y:11032 msgid "ANY LENGTH items may only be BY REFERENCE formal parameters" msgstr "" -#: cobc/parser.y:10716 cobc/parser.y:12337 cobc/parser.y:12350 +#: cobc/parser.y:11049 cobc/parser.y:12728 cobc/parser.y:12741 #, c-format msgid "%s not allowed in CHAINED programs" msgstr "" -#: cobc/parser.y:10718 +#: cobc/parser.y:11051 msgid "parameters passed BY VALUE" msgstr "" -#: cobc/parser.y:10733 cobc/parser.y:10742 cobc/parser.y:10750 -#: cobc/parser.y:10771 +#: cobc/parser.y:11066 cobc/parser.y:11075 cobc/parser.y:11083 +#: cobc/parser.y:11104 msgid "SIZE only allowed for BY VALUE items" msgstr "" -#: cobc/parser.y:10773 cobc/parser.y:10798 +#: cobc/parser.y:11106 cobc/parser.y:11131 msgid "invalid value for SIZE" msgstr "" -#: cobc/parser.y:10813 +#: cobc/parser.y:11146 msgid "MEMORY SIZE phrase in CALL statement" msgstr "" -#: cobc/parser.y:10825 +#: cobc/parser.y:11162 msgid "OPTIONAL only allowed for BY REFERENCE items" msgstr "" -#: cobc/parser.y:10837 +#: cobc/parser.y:11177 msgid "RETURNING clause is required for a FUNCTION" msgstr "" -#: cobc/parser.y:10843 +#: cobc/parser.y:11183 msgid "RETURNING clause cannot be OMITTED for main program" msgstr "" -#: cobc/parser.y:10846 +#: cobc/parser.y:11186 msgid "RETURNING clause cannot be OMITTED for a FUNCTION" msgstr "" -#: cobc/parser.y:10859 +#: cobc/parser.y:11199 msgid "RETURNING item is not defined in LINKAGE SECTION" msgstr "" -#: cobc/parser.y:10861 +#: cobc/parser.y:11201 msgid "RETURNING item must have level 01" msgstr "" -#: cobc/parser.y:10863 +#: cobc/parser.y:11203 msgid "RETURNING item should not have OCCURS" msgstr "" -#: cobc/parser.y:10867 +#: cobc/parser.y:11207 msgid "function RETURNING item may not be ANY LENGTH" msgstr "" -#: cobc/parser.y:11080 +#: cobc/parser.y:11421 #, c-format msgid "'%s' is not a statement" msgstr "" -#: cobc/parser.y:11083 +#: cobc/parser.y:11424 #, c-format msgid "unknown statement '%s'; it may exist in another dialect" msgstr "" -#: cobc/parser.y:11087 +#: cobc/parser.y:11428 #, c-format msgid "unknown statement '%s'" msgstr "" -#: cobc/parser.y:11105 +#: cobc/parser.y:11446 msgid "SECTION segment-number must be less than or equal to 99" msgstr "" -#: cobc/parser.y:11108 +#: cobc/parser.y:11449 msgid "SECTION segment-number in DECLARATIVES must be less than 50" msgstr "" -#: cobc/parser.y:11116 +#: cobc/parser.y:11457 msgid "SECTION segment within DECLARATIVES" msgstr "" -#: cobc/parser.y:11313 cobc/parser.y:11448 +#: cobc/parser.y:11667 cobc/parser.y:11806 msgid "non-standard ACCEPT" msgstr "" -#: cobc/parser.y:11325 +#: cobc/parser.y:11679 msgid "PROMPT clause" msgstr "" -#: cobc/parser.y:11329 +#: cobc/parser.y:11683 msgid "SIZE IS clause" msgstr "" -#: cobc/parser.y:11549 cobc/parser.y:11842 +#: cobc/parser.y:11907 cobc/parser.y:12226 msgid "TIME-OUT or BEFORE TIME clauses" msgstr "" -#: cobc/parser.y:11575 cobc/parser.y:11591 cobc/parser.y:11606 +#: cobc/parser.y:11937 cobc/parser.y:11960 cobc/parser.y:11978 msgid "AT screen-location" msgstr "" -#: cobc/parser.y:11607 +#: cobc/parser.y:11979 msgid "LINE or COLUMN" msgstr "" -#: cobc/parser.y:11972 +#: cobc/parser.y:12358 msgid "ALLOCATE CHARACTERS requires RETURNING clause" msgstr "" -#: cobc/parser.y:11987 cobc/parser.y:13289 +#: cobc/parser.y:12373 #, c-format msgid "ignoring %s phrase" msgstr "" -#: cobc/parser.y:11989 +#: cobc/parser.y:12375 msgid "addressing mode should be either 24 or 31 bit" msgstr "" -#: cobc/parser.y:12061 +#: cobc/parser.y:12446 msgid "CALL to own PROGRAM-ID" msgstr "" -#: cobc/parser.y:12062 +#: cobc/parser.y:12447 msgid "assuming RECURSIVE attribute" msgstr "" -#: cobc/parser.y:12082 +#: cobc/parser.y:12467 msgid "STATIC CALL convention ignored because of ON EXCEPTION" msgstr "" -#: cobc/parser.y:12091 +#: cobc/parser.y:12476 msgid "ON EXCEPTION ignored because of STATIC CALL" msgstr "" -#: cobc/parser.y:12205 cobc/typeck.c:13644 +#: cobc/parser.y:12594 cobc/typeck.c:14450 msgid "invalid mnemonic name" msgstr "" -#: cobc/parser.y:12229 +#: cobc/parser.y:12618 msgid "id/literal ignored, using prototype name" msgstr "" -#: cobc/parser.y:12235 +#: cobc/parser.y:12624 msgid "NESTED phrase is only valid with literal" msgstr "" -#: cobc/parser.y:12296 +#: cobc/parser.y:12685 #, c-format msgid "%s only allowed when arguments are passed %s" msgstr "" -#: cobc/parser.y:12385 +#: cobc/parser.y:12776 msgid "RETURNING item must have level 01 or 77" msgstr "" -#: cobc/parser.y:12389 +#: cobc/parser.y:12780 msgid "RETURNING item must be a LINKAGE SECTION item or have BASED clause" msgstr "" -#: cobc/parser.y:12423 cobc/parser.y:17409 cobc/parser.y:17464 +#: cobc/parser.y:12814 cobc/parser.y:17937 cobc/parser.y:18000 msgid "NOT EXCEPTION before EXCEPTION" msgstr "" -#: cobc/parser.y:13162 +#: cobc/parser.y:13572 #, c-format msgid "HANDLE must be a %s HANDLE" msgstr "" -#: cobc/parser.y:13174 +#: cobc/parser.y:13584 msgid "HANDLE must be a generic HANDLE" msgstr "" -#: cobc/parser.y:13251 +#: cobc/parser.y:13661 #, c-format msgid "HANDLE clause invalid for %s" msgstr "" -#: cobc/parser.y:13483 cobc/parser.y:16876 +#: cobc/parser.y:13911 cobc/parser.y:17400 #, c-format msgid "%s is invalid in nested program" msgstr "" -#: cobc/parser.y:13521 cobc/parser.y:13564 cobc/parser.y:13575 -#: cobc/parser.y:13586 +#: cobc/parser.y:13940 cobc/parser.y:13983 cobc/parser.y:13994 +#: cobc/parser.y:14005 #, c-format msgid "maximum evaluate depth exceeded (%d)" msgstr "" -#: cobc/parser.y:13627 cobc/parser.y:13637 +#: cobc/parser.y:14048 cobc/parser.y:14089 cobc/parser.y:14633 +#: cobc/parser.y:14644 cobc/parser.y:14653 cobc/parser.y:17959 +#: cobc/parser.y:17981 cobc/parser.y:18022 cobc/parser.y:18038 +#: cobc/parser.y:18078 cobc/parser.y:18095 cobc/parser.y:18132 +#: cobc/parser.y:18149 cobc/parser.y:18199 cobc/parser.y:18216 +#: cobc/parser.y:18252 cobc/parser.y:18269 cobc/parser.y:18310 +#: cobc/parser.y:18327 +#, c-format +msgid "%s without imperative statement" +msgstr "" + +#: cobc/parser.y:14056 cobc/parser.y:14066 msgid "WHEN without imperative statement" msgstr "" -#: cobc/parser.y:13655 cobc/parser.y:13665 +#: cobc/parser.y:14097 cobc/parser.y:14107 msgid "WHEN OTHER without imperative statement" msgstr "" -#: cobc/parser.y:13745 +#: cobc/parser.y:14191 msgid "invalid THROUGH usage" msgstr "" -#: cobc/parser.y:13909 +#: cobc/parser.y:14372 msgid "EXIT PROGRAM is not allowed within a USE GLOBAL procedure" msgstr "" -#: cobc/parser.y:13913 +#: cobc/parser.y:14376 msgid "EXIT PROGRAM not allowed within a FUNCTION" msgstr "" -#: cobc/parser.y:13927 +#: cobc/parser.y:14390 msgid "EXIT FUNCTION is not allowed within a USE GLOBAL procedure" msgstr "" -#: cobc/parser.y:13931 +#: cobc/parser.y:14394 msgid "EXIT FUNCTION only allowed within a FUNCTION" msgstr "" -#: cobc/parser.y:13945 cobc/parser.y:13968 +#: cobc/parser.y:14408 cobc/parser.y:14431 msgid "EXIT PERFORM is only valid with inline PERFORM" msgstr "" -#: cobc/parser.y:13990 +#: cobc/parser.y:14453 msgid "EXIT SECTION is only valid with an active SECTION" msgstr "" -#: cobc/parser.y:14011 +#: cobc/parser.y:14474 msgid "EXIT PARAGRAPH is only valid with an active PARAGRAPH" msgstr "" -#: cobc/parser.y:14034 +#: cobc/parser.y:14497 msgid "RETURNING/GIVING not allowed for non-returning runtime elements" msgstr "" -#: cobc/parser.y:14166 +#: cobc/parser.y:14640 msgid "IF without imperative statement" msgstr "" -#: cobc/parser.y:14497 cobc/parser.y:14506 +#: cobc/parser.y:14983 cobc/parser.y:14992 msgid "single-character literal or data item expected" msgstr "" -#: cobc/parser.y:14524 +#: cobc/parser.y:15010 msgid "TALLYING clause is incomplete" msgstr "" -#: cobc/parser.y:14640 +#: cobc/parser.y:15126 msgid "INSPECT missing ALL/FIRST/LEADING/TRAILING" msgstr "" -#: cobc/parser.y:14902 +#: cobc/parser.y:15390 msgid "LOCK clauses" msgstr "" -#: cobc/parser.y:15059 +#: cobc/parser.y:15547 msgid "inline PERFORM without imperative statement" msgstr "" -#: cobc/parser.y:15180 cobc/parser.y:15188 cobc/parser.y:15196 +#: cobc/parser.y:15670 cobc/parser.y:15678 cobc/parser.y:15686 #, c-format msgid "PERFORM VARYING '%s' (line %d of %s) is not a numeric field" msgstr "" -#: cobc/parser.y:15212 +#: cobc/parser.y:15702 msgid "PERFORM VARYING without BY phrase" msgstr "" -#: cobc/parser.y:15252 +#: cobc/parser.y:15742 #, c-format msgid "'%s' is not an object-reference" msgstr "" -#: cobc/parser.y:15292 cobc/typeck.c:12295 cobc/typeck.c:13552 +#: cobc/parser.y:15782 cobc/typeck.c:13066 cobc/typeck.c:14358 msgid "LOCK clause invalid with file LOCK AUTOMATIC" msgstr "" -#: cobc/parser.y:15297 +#: cobc/parser.y:15787 msgid "KEY clause invalid with this file type" msgstr "" -#: cobc/parser.y:15302 cobc/typeck.c:12291 cobc/typeck.c:13548 +#: cobc/parser.y:15792 cobc/typeck.c:13062 cobc/typeck.c:14354 msgid "INVALID KEY clause invalid with this file type" msgstr "" -#: cobc/parser.y:15986 -msgid "file sort requires KEY phrase" +#: cobc/parser.y:16494 +msgid "MERGE requires KEY phrase" msgstr "" -#: cobc/parser.y:16010 +#: cobc/parser.y:16498 +msgid "file SORT requires KEY phrase" +msgstr "" + +#: cobc/parser.y:16522 msgid "table SORT requires KEY phrase" msgstr "" -#: cobc/parser.y:16072 -msgid "file sort requires USING or INPUT PROCEDURE" +#: cobc/parser.y:16527 +msgid "must be an SD filename" +msgstr "" + +#: cobc/parser.y:16585 +msgid "MERGE requires USING files" msgstr "" -#: cobc/parser.y:16079 +#: cobc/parser.y:16587 +msgid "file SORT requires USING or INPUT PROCEDURE" +msgstr "" + +#: cobc/parser.y:16595 msgid "USING invalid with table SORT" msgstr "" -#: cobc/parser.y:16089 +#: cobc/parser.y:16605 msgid "INPUT PROCEDURE invalid with table SORT" msgstr "" -#: cobc/parser.y:16091 +#: cobc/parser.y:16607 msgid "INPUT PROCEDURE invalid with MERGE" msgstr "" -#: cobc/parser.y:16104 -msgid "file sort requires GIVING or OUTPUT PROCEDURE" +#: cobc/parser.y:16621 +msgid "MERGE requires GIVING or OUTPUT PROCEDURE" +msgstr "" + +#: cobc/parser.y:16623 +msgid "file SORT requires GIVING or OUTPUT PROCEDURE" msgstr "" -#: cobc/parser.y:16111 +#: cobc/parser.y:16631 msgid "GIVING invalid with table SORT" msgstr "" -#: cobc/parser.y:16121 +#: cobc/parser.y:16641 msgid "OUTPUT PROCEDURE invalid with table SORT" msgstr "" -#: cobc/parser.y:16148 +#: cobc/parser.y:16668 msgid "SIZE/LENGTH invalid here" msgstr "" -#: cobc/parser.y:16197 +#: cobc/parser.y:16717 msgid "NOT EQUAL condition not allowed on START statement" msgstr "" -#: cobc/parser.y:16255 +#: cobc/parser.y:16776 #, c-format msgid "%s is replaced by %s" msgstr "" -#: cobc/parser.y:16304 +#: cobc/parser.y:16825 msgid "STOP literal" msgstr "" -#: cobc/parser.y:16308 +#: cobc/parser.y:16829 msgid "STOP identifier" msgstr "" -#: cobc/parser.y:16446 +#: cobc/parser.y:16969 msgid "SUPPRESS statement must be within DECLARATIVES" msgstr "" -#: cobc/parser.y:16520 -msgid "UNLOCK invalid for SORT files" +#: cobc/parser.y:17043 +msgid "UNLOCK invalid for SD files" msgstr "" -#: cobc/parser.y:16656 cobc/parser.y:16736 +#: cobc/parser.y:17180 cobc/parser.y:17260 msgid "USE statement must be within DECLARATIVES" msgstr "" -#: cobc/parser.y:16658 +#: cobc/parser.y:17182 msgid "SECTION header missing before USE statement" msgstr "" -#: cobc/parser.y:16738 +#: cobc/parser.y:17262 msgid "USE DEBUGGING not supported in contained program" msgstr "" -#: cobc/parser.y:16786 cobc/parser.y:16795 cobc/parser.y:16813 -#: cobc/parser.y:16849 cobc/typeck.c:4886 +#: cobc/parser.y:17310 cobc/parser.y:17319 cobc/parser.y:17337 +#: cobc/parser.y:17373 cobc/typeck.c:5050 #, c-format msgid "duplicate DEBUGGING target: '%s'" msgstr "" -#: cobc/parser.y:16811 +#: cobc/parser.y:17335 msgid "constant item cannot be used here" msgstr "" -#: cobc/parser.y:16837 +#: cobc/parser.y:17361 msgid "duplicate USE DEBUGGING ON ALL PROCEDURES" msgstr "" -#: cobc/parser.y:17089 +#: cobc/parser.y:17614 msgid "ENCODING clause must come before XML-DECLARATION" msgstr "" -#: cobc/parser.y:17091 +#: cobc/parser.y:17616 msgid "ENCODING clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17094 +#: cobc/parser.y:17619 msgid "XML GENERATE ENCODING clause" msgstr "" -#: cobc/parser.y:17101 +#: cobc/parser.y:17626 msgid "XML-DECLARATION clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17104 +#: cobc/parser.y:17629 msgid "XML GENERATE XML-DECLARATION clause" msgstr "" -#: cobc/parser.y:17110 +#: cobc/parser.y:17635 msgid "XML GENERATE WITH ATTRIBUTES clause" msgstr "" -#: cobc/parser.y:17123 +#: cobc/parser.y:17648 msgid "XML GENERATE NAMESPACE clause" msgstr "" -#: cobc/parser.y:17147 +#: cobc/parser.y:17672 msgid "XML GENERATE NAME OF clause" msgstr "" -#: cobc/parser.y:17211 +#: cobc/parser.y:17736 msgid "XML GENERATE TYPE OF clause" msgstr "" -#: cobc/parser.y:17252 +#: cobc/parser.y:17777 msgid "XML GENERATE SUPPRESS clause" msgstr "" -#: cobc/parser.y:17392 +#: cobc/parser.y:17920 #, c-format msgid "'%s' is not a schema name" msgstr "" -#: cobc/parser.y:17510 +#: cobc/parser.y:18055 msgid "NOT SIZE ERROR before SIZE ERROR" msgstr "" -#: cobc/parser.y:17556 +#: cobc/parser.y:18109 msgid "NOT OVERFLOW before OVERFLOW" msgstr "" -#: cobc/parser.y:17655 +#: cobc/parser.y:18161 cobc/parser.y:18176 +msgid "NOT AT END before AT END" +msgstr "" + +#: cobc/parser.y:18229 msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" msgstr "" -#: cobc/parser.y:17705 +#: cobc/parser.y:18287 msgid "NOT INVALID KEY before INVALID KEY" msgstr "" -#: cobc/parser.y:18048 +#: cobc/parser.y:18644 msgid "LINAGE-COUNTER must be qualified here" msgstr "" -#: cobc/parser.y:18051 +#: cobc/parser.y:18647 msgid "invalid LINAGE-COUNTER usage" msgstr "" -#: cobc/parser.y:18062 cobc/parser.y:18158 cobc/parser.y:18247 +#: cobc/parser.y:18658 cobc/parser.y:18754 cobc/parser.y:18843 #, c-format msgid "'%s' is not a file name" msgstr "" -#: cobc/parser.y:18072 +#: cobc/parser.y:18668 msgid "LINE-COUNTER must be qualified here" msgstr "" -#: cobc/parser.y:18076 +#: cobc/parser.y:18672 msgid "invalid LINE-COUNTER usage" msgstr "" -#: cobc/parser.y:18087 cobc/parser.y:18112 +#: cobc/parser.y:18683 cobc/parser.y:18708 #, c-format msgid "'%s' is not a report name" msgstr "" -#: cobc/parser.y:18097 +#: cobc/parser.y:18693 msgid "PAGE-COUNTER must be qualified here" msgstr "" -#: cobc/parser.y:18101 +#: cobc/parser.y:18697 msgid "invalid PAGE-COUNTER usage" msgstr "" -#: cobc/parser.y:18148 cobc/typeck.c:12256 cobc/typeck.c:12339 -#: cobc/typeck.c:13516 +#: cobc/parser.y:18744 cobc/typeck.c:13027 cobc/typeck.c:13110 +#: cobc/typeck.c:14322 #, c-format msgid "%s requires a record name as subject" msgstr "" -#: cobc/parser.y:18175 +#: cobc/parser.y:18771 #, c-format msgid "'%s' not indexed" msgstr "" -#: cobc/parser.y:18180 +#: cobc/parser.y:18776 msgid "SEARCH ALL requires KEY phrase" msgstr "" -#: cobc/parser.y:18204 cobc/parser.y:18229 +#: cobc/parser.y:18800 cobc/parser.y:18825 #, c-format msgid "multiple reference to '%s' " msgstr "" -#: cobc/parser.y:18259 +#: cobc/parser.y:18855 #, c-format msgid "'%s' is not a CD name" msgstr "" -#: cobc/parser.y:18273 +#: cobc/parser.y:18869 #, c-format msgid "'%s' is not a valid report name" msgstr "" -#: cobc/parser.y:18526 +#: cobc/parser.y:19134 msgid "invalid mnemonic identifier" msgstr "" -#: cobc/parser.y:18606 +#: cobc/parser.y:19214 +msgid "an alphanumeric literal is expected here" +msgstr "" + +#: cobc/parser.y:19226 msgid "a numeric literal is expected here" msgstr "" -#: cobc/parser.y:18618 cobc/parser.y:19366 +#: cobc/parser.y:19238 cobc/parser.y:19979 msgid "a non-numeric literal is expected here" msgstr "" -#: cobc/parser.y:18784 cobc/typeck.c:7302 cobc/typeck.c:7309 +#: cobc/parser.y:19404 cobc/typeck.c:993 cobc/typeck.c:4825 cobc/typeck.c:7679 +#: cobc/typeck.c:7686 #, c-format msgid "'%s' is not numeric" msgstr "" -#: cobc/parser.y:18800 +#: cobc/parser.y:19420 #, c-format msgid "'%s' is not a field or file" msgstr "" -#: cobc/parser.y:18820 cobc/parser.y:18859 cobc/parser.y:18935 -#, c-format -msgid "'%s' is not a field" -msgstr "" - -#: cobc/parser.y:18841 +#: cobc/parser.y:19446 #, c-format msgid "'%s' is not a type-name" msgstr "" -#: cobc/parser.y:18927 cobc/typeck.c:2328 cobc/typeck.c:2407 +#: cobc/parser.y:19526 cobc/typeck.c:2345 cobc/typeck.c:2401 cobc/typeck.c:2550 #, c-format msgid "'%s' cannot be reference modified" msgstr "" -#: cobc/parser.y:19015 +#: cobc/parser.y:19627 #, c-format msgid "'%s' is not a field or alphabet" msgstr "" -#: cobc/parser.y:19041 +#: cobc/parser.y:19653 msgid "a subscripted data-item cannot be used here" msgstr "" -#: cobc/parser.y:19089 +#: cobc/parser.y:19701 msgid "unsigned integer value expected" msgstr "" -#: cobc/parser.y:19101 cobc/parser.y:19105 cobc/parser.y:19155 +#: cobc/parser.y:19713 cobc/parser.y:19717 cobc/parser.y:19767 msgid "integer value expected" msgstr "" -#: cobc/parser.y:19110 +#: cobc/parser.y:19722 msgid "invalid symbolic integer" msgstr "" -#: cobc/parser.y:19126 cobc/parser.y:19130 +#: cobc/parser.y:19738 cobc/parser.y:19742 msgid "unsigned positive integer value expected" msgstr "" -#: cobc/parser.y:19159 -msgid "invalid CLASS value" +#: cobc/parser.y:19772 +#, c-format +msgid "CLASS value %d outside of range for the used character set" msgstr "" -#: cobc/parser.y:19246 +#: cobc/parser.y:19859 msgid "PHYSICAL argument for LENGTH functions" msgstr "" -#: cobc/parser.y:19418 cobc/parser.y:19435 +#: cobc/parser.y:20031 cobc/parser.y:20048 msgid "cannot specify offset and SYSTEM-OFFSET at the same time" msgstr "" -#: cobc/parser.y:19702 cobc/parser.y:19711 cobc/parser.y:19721 -#: cobc/parser.y:19731 cobc/parser.y:19751 cobc/parser.y:19771 -#: cobc/parser.y:19777 +#: cobc/parser.y:20228 +msgid "terminator" +msgstr "" + +#: cobc/parser.y:20317 cobc/parser.y:20327 cobc/parser.y:20338 +#: cobc/parser.y:20348 cobc/parser.y:20369 cobc/parser.y:20389 +#: cobc/parser.y:20396 msgid "optional period" msgstr "" -#: cobc/pplex.l:257 cobc/pplex.l:2219 cobc/pplex.l:2233 +#: cobc/pplex.l:261 cobc/pplex.l:2448 cobc/pplex.l:2462 msgid "debugging indicator" msgstr "" -#: cobc/pplex.l:334 +#: cobc/pplex.l:348 msgid "ignoring empty directive" msgstr "" -#: cobc/pplex.l:344 cobc/pplex.l:411 +#: cobc/pplex.l:358 cobc/pplex.l:431 #, c-format msgid "ignoring invalid directive: '%s'" msgstr "" -#: cobc/pplex.l:351 +#: cobc/pplex.l:365 msgid "ignoring invalid directive" msgstr "" -#: cobc/pplex.l:358 +#: cobc/pplex.l:372 msgid "VCS directive" msgstr "" -#: cobc/pplex.l:420 cobc/pplex.l:441 +#: cobc/pplex.l:440 cobc/pplex.l:461 #, c-format msgid "ignoring unknown directive: '%s'" msgstr "" -#: cobc/pplex.l:1065 +#: cobc/pplex.l:1164 msgid "IF/ELIF/ELSE directive without matching END-IF" msgstr "" -#: cobc/pplex.l:1409 +#: cobc/pplex.l:1332 +msgid "free format detected" +msgstr "" + +#: cobc/pplex.l:1608 #, c-format msgid "copybook not found in library '%s', library-name ignored" msgstr "" -#: cobc/pplex.l:1469 +#: cobc/pplex.l:1667 #, c-format msgid "ignoring %s directive because of %s" msgstr "" -#: cobc/pplex.l:1645 +#: cobc/pplex.l:1854 #, c-format msgid "directive nest depth exceeded: %d" msgstr "" -#: cobc/pplex.l:1663 +#: cobc/pplex.l:1872 msgid "ELSE directive without matching IF/ELIF" msgstr "" -#: cobc/pplex.l:1679 +#: cobc/pplex.l:1888 msgid "END-IF directive without matching IF/ELIF/ELSE" msgstr "" -#: cobc/pplex.l:1695 +#: cobc/pplex.l:1904 msgid "ELIF directive without matching IF/ELIF" msgstr "" -#: cobc/pplex.l:1717 +#: cobc/pplex.l:1926 #, c-format msgid "invalid internal case: %u" msgstr "" -#: cobc/pplex.l:1914 +#: cobc/pplex.l:2139 msgid "buffer overrun - too many continuation lines" msgstr "" -#: cobc/pplex.l:2009 cobc/pplex.l:2019 +#: cobc/pplex.l:2236 cobc/pplex.l:2246 msgid "line not terminated by a newline" msgstr "" -#: cobc/pplex.l:2013 cobc/pplex.l:2023 +#: cobc/pplex.l:2240 cobc/pplex.l:2250 #, c-format msgid "source text exceeds %d bytes, will be truncated" msgstr "" -#: cobc/pplex.l:2042 +#: cobc/pplex.l:2269 msgid "version control conflict marker in file" msgstr "" -#: cobc/pplex.l:2194 +#: cobc/pplex.l:2423 msgid "invalid continuation in comment entry" msgstr "" -#: cobc/pplex.l:2241 +#: cobc/pplex.l:2470 #, c-format msgid "invalid indicator '\\' at column %d" msgstr "" -#: cobc/pplex.l:2253 +#: cobc/pplex.l:2482 #, c-format msgid "invalid indicator '%c' at column %d" msgstr "" -#: cobc/pplex.l:2312 cobc/pplex.l:2323 +#: cobc/pplex.l:2541 cobc/pplex.l:2552 msgid "invalid line continuation" msgstr "" -#: cobc/pplex.l:2331 +#: cobc/pplex.l:2560 msgid "continuation character expected" msgstr "" -#: cobc/pplex.l:2399 +#: cobc/pplex.l:2628 #, c-format msgid "source text after program-text area (column %d)" msgstr "" -#: cobc/ppparse.y:107 +#: cobc/ppparse.y:102 cobc/ppparse.y:106 +msgid "partial replacing with literal" +msgstr "" + +#: cobc/ppparse.y:109 msgid "unexpected COBOL word in partial replacement phrase" msgstr "" -#: cobc/ppparse.y:256 +#: cobc/ppparse.y:176 +msgid "invalid partial replacing operand" +msgstr "" + +#: cobc/ppparse.y:291 msgid "directive comparison on different types" msgstr "" -#: cobc/ppparse.y:324 +#: cobc/ppparse.y:359 #, c-format msgid "duplicate DEFINE directive '%s'" msgstr "" -#: cobc/ppparse.y:331 cobc/ppparse.y:341 +#: cobc/ppparse.y:366 cobc/ppparse.y:376 #, c-format msgid "invalid constant %s in DEFINE directive" msgstr "" -#: cobc/ppparse.y:439 +#: cobc/ppparse.y:474 #, c-format msgid "compiler flag '%s' unknown" msgstr "" -#: cobc/ppparse.y:486 +#: cobc/ppparse.y:521 #, c-format msgid "invalid %s directive option '%s'" msgstr "" -#: cobc/ppparse.y:488 +#: cobc/ppparse.y:523 #, c-format msgid "invalid %s directive option" msgstr "" -#: cobc/ppparse.y:839 cobc/ppparse.y:848 cobc/ppparse.y:1258 +#: cobc/ppparse.y:875 cobc/ppparse.y:884 cobc/ppparse.y:1294 #, c-format msgid "invalid %s directive" msgstr "" -#: cobc/ppparse.y:1330 +#: cobc/ppparse.y:1366 msgid "LEAP-SECOND ON directive" msgstr "" -#: cobc/ppparse.y:1439 cobc/ppparse.y:1471 +#: cobc/ppparse.y:1475 cobc/ppparse.y:1507 msgid "invalid constant" msgstr "" -#: cobc/reserved.c:4012 +#: cobc/reserved.c:4029 msgid "device name" msgstr "" -#: cobc/reserved.c:4015 +#: cobc/reserved.c:4032 msgid "switch name" msgstr "" -#: cobc/reserved.c:4018 +#: cobc/reserved.c:4035 msgid "feature name" msgstr "" -#: cobc/reserved.c:4129 +#: cobc/reserved.c:4146 #, c-format msgid "reserved word (%s) must have less than %d characters" msgstr "" -#: cobc/reserved.c:4149 +#: cobc/reserved.c:4166 #, c-format msgid "reserved word (%s) may not contain '%c'" msgstr "" -#: cobc/reserved.c:4166 +#: cobc/reserved.c:4183 msgid "ignored asterisk at end of alias target" msgstr "" -#: cobc/reserved.c:4229 +#: cobc/reserved.c:4248 #, c-format msgid "alias target '%s' is not a default reserved word" msgstr "" -#: cobc/reserved.c:4719 +#: cobc/reserved.c:4738 #, c-format msgid "invalid system-name '%s'" msgstr "" -#: cobc/reserved.c:4883 +#: cobc/reserved.c:4902 #, c-format msgid "'%s' is a reserved word, but isn't supported" msgstr "" -#: cobc/reserved.c:4988 +#: cobc/reserved.c:5005 #, c-format msgid "intrinsic function %s is unknown" msgstr "" -#: cobc/reserved.c:5016 +#: cobc/reserved.c:5033 msgid "Intrinsic Function" msgstr "" -#: cobc/reserved.c:5016 cobc/reserved.c:5249 cobc/reserved.c:5386 +#: cobc/reserved.c:5033 cobc/reserved.c:5266 cobc/reserved.c:5403 msgid "Implemented" msgstr "" -#: cobc/reserved.c:5016 cobc/typeck.c:1163 +#: cobc/reserved.c:5033 cobc/typeck.c:1178 msgid "Parameters" msgstr "" -#: cobc/reserved.c:5020 cobc/reserved.c:5253 cobc/reserved.c:5400 -#: cobc/reserved.c:5406 +#: cobc/reserved.c:5037 cobc/reserved.c:5270 cobc/reserved.c:5417 +#: cobc/reserved.c:5423 msgid "Yes" msgstr "" -#: cobc/reserved.c:5023 cobc/reserved.c:5256 cobc/reserved.c:5410 +#: cobc/reserved.c:5040 cobc/reserved.c:5273 cobc/reserved.c:5427 msgid "No" msgstr "" -#: cobc/reserved.c:5029 +#: cobc/reserved.c:5046 msgid "Unlimited" msgstr "" -#: cobc/reserved.c:5046 +#: cobc/reserved.c:5063 msgid "Exception Name" msgstr "" -#: cobc/reserved.c:5148 +#: cobc/reserved.c:5165 #, c-format msgid "special register '%s' is unknown, needs a definition" msgstr "" -#: cobc/reserved.c:5155 +#: cobc/reserved.c:5172 #, c-format msgid "special register '%s' has a bad definition: %s" msgstr "" -#: cobc/reserved.c:5159 +#: cobc/reserved.c:5176 #, c-format msgid "special register '%s' is unknown" msgstr "" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Internal registers" msgstr "" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Definition" msgstr "" -#: cobc/reserved.c:5337 +#: cobc/reserved.c:5354 #, c-format msgid "unknown system-name '%s'" msgstr "" -#: cobc/reserved.c:5363 +#: cobc/reserved.c:5380 msgid "System names" msgstr "" -#: cobc/reserved.c:5386 +#: cobc/reserved.c:5403 msgid "Reserved Words" msgstr "" -#: cobc/reserved.c:5398 +#: cobc/reserved.c:5415 msgid "Yes (Context sensitive)" msgstr "" -#: cobc/reserved.c:5408 +#: cobc/reserved.c:5425 msgid "No (Context sensitive)" msgstr "" -#: cobc/scanner.l:272 +#: cobc/scanner.l:281 #, c-format msgid "'%s' is not a reserved word, so cannot be removed" msgstr "" -#: cobc/scanner.l:320 +#: cobc/scanner.l:329 msgid "separator period in Area A" msgstr "" -#: cobc/scanner.l:1067 +#: cobc/scanner.l:1096 #, c-format msgid "a constant may not be used here - '%s'" msgstr "" -#: cobc/scanner.l:1137 +#: cobc/scanner.l:1170 msgid "ignoring redundant ." msgstr "" -#: cobc/scanner.l:1195 +#: cobc/scanner.l:1249 #, c-format msgid "invalid symbol '%s' - skipping word" msgstr "" -#: cobc/scanner.l:1289 +#: cobc/scanner.l:1323 msgid "invalid national literal" msgstr "" -#: cobc/scanner.l:1293 cobc/tree.c:2800 +#: cobc/scanner.l:1327 cobc/tree.c:2822 #, c-format msgid "invalid literal: '%s'" msgstr "" -#: cobc/scanner.l:1295 +#: cobc/scanner.l:1329 #, c-format msgid "invalid hexadecimal literal: '%s'" msgstr "" -#: cobc/scanner.l:1297 cobc/tree.c:1779 +#: cobc/scanner.l:1331 cobc/tree.c:1803 #, c-format msgid "invalid numeric literal: '%s'" msgstr "" -#: cobc/scanner.l:1299 +#: cobc/scanner.l:1333 #, c-format msgid "invalid floating-point literal: '%s'" msgstr "" -#: cobc/scanner.l:1301 +#: cobc/scanner.l:1335 cobc/scanner.l:1337 #, c-format msgid "invalid %s literal: '%s'" msgstr "" -#: cobc/scanner.l:1350 +#: cobc/scanner.l:1365 +#, c-format +msgid "character code %s out of encoding range %s" +msgstr "" + +#: cobc/scanner.l:1422 +msgid "extraneous separator ',' at end of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1435 +msgid "extraneous character ',' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1440 +#, c-format +msgid "invalid character '%c' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1470 #, c-format msgid "literal length exceeds %u characters" msgstr "" -#: cobc/scanner.l:1365 +#: cobc/scanner.l:1485 #, c-format msgid "missing terminating %c character" msgstr "" -#: cobc/scanner.l:1382 cobc/scanner.l:1444 cobc/scanner.l:1729 +#: cobc/scanner.l:1502 cobc/scanner.l:1569 cobc/scanner.l:1868 msgid "zero-length literal" msgstr "" -#: cobc/scanner.l:1385 +#: cobc/scanner.l:1505 msgid "national literal has zero length; a SPACE will be assumed" msgstr "" -#: cobc/scanner.l:1386 +#: cobc/scanner.l:1506 msgid "alphanumeric literal has zero length; a SPACE will be assumed" msgstr "" -#: cobc/scanner.l:1412 cobc/scanner.l:1413 cobc/scanner.l:1417 -#: cobc/scanner.l:1494 +#: cobc/scanner.l:1519 +msgid "UTF-8 literal" +msgstr "" + +#: cobc/scanner.l:1536 cobc/scanner.l:1537 cobc/scanner.l:1541 +#: cobc/scanner.l:1624 msgid "national literal" msgstr "" -#: cobc/scanner.l:1416 +#: cobc/scanner.l:1540 msgid "national-character literal" msgstr "" -#: cobc/scanner.l:1447 +#: cobc/scanner.l:1571 msgid "hexadecimal literal has zero length; X'00' will be assumed" msgstr "" -#: cobc/scanner.l:1472 +#: cobc/scanner.l:1575 cobc/scanner.l:1601 msgid "hexadecimal-boolean literal" msgstr "" -#: cobc/scanner.l:1480 cobc/scanner.l:1499 cobc/scanner.l:1608 -#: cobc/scanner.l:1659 cobc/scanner.l:1754 cobc/scanner.l:1824 -#, c-format -msgid "literal length %lu exceeds %u characters" +#: cobc/scanner.l:1579 cobc/scanner.l:1619 +msgid "hexadecimal-national literal" msgstr "" -#: cobc/scanner.l:1490 -msgid "hexadecimal-national literal" +#: cobc/scanner.l:1609 cobc/scanner.l:1629 cobc/scanner.l:1744 +#: cobc/scanner.l:1798 cobc/scanner.l:1893 cobc/scanner.l:1963 +#, c-format +msgid "literal length %lu exceeds %u characters" msgstr "" -#: cobc/scanner.l:1521 cobc/scanner.l:1551 cobc/scanner.l:1674 -#: cobc/scanner.l:1771 cobc/scanner.l:1835 +#: cobc/scanner.l:1651 cobc/scanner.l:1680 cobc/scanner.l:1813 +#: cobc/scanner.l:1910 cobc/scanner.l:1974 #, c-format msgid "literal contains invalid character '%c'" msgstr "" -#: cobc/scanner.l:1573 +#: cobc/scanner.l:1704 #, c-format msgid "literal does not have an even number of digits" msgstr "" -#: cobc/scanner.l:1599 +#: cobc/scanner.l:1735 cobc/scanner.l:1788 #, c-format msgid "%s literals must contain at least one character" msgstr "" -#: cobc/scanner.l:1639 cobc/scanner.l:1739 cobc/scanner.l:1813 +#: cobc/scanner.l:1775 cobc/scanner.l:1878 cobc/scanner.l:1952 msgid "ACUCOBOL numeric literal" msgstr "" -#: cobc/scanner.l:1651 -msgid "H literals must contain at least one character" -msgstr "" - -#: cobc/scanner.l:1690 cobc/scanner.l:1783 cobc/scanner.l:1846 +#: cobc/scanner.l:1829 cobc/scanner.l:1922 cobc/scanner.l:1985 #, c-format msgid "literal exceeds limit %u" msgstr "" -#: cobc/scanner.l:1724 +#: cobc/scanner.l:1863 msgid "numeric boolean literal" msgstr "" -#: cobc/scanner.l:1731 -msgid "Boolean literal has zero length; B'0' will be assumed" +#: cobc/scanner.l:1870 +msgid "boolean literal has zero length; B'0' will be assumed" msgstr "" -#: cobc/scanner.l:1807 +#: cobc/scanner.l:1946 msgid "HP COBOL octal literal" msgstr "" -#: cobc/scanner.l:1921 +#: cobc/scanner.l:2059 #, c-format msgid "literal length %lu exceeds maximum of %u digits" msgstr "" -#: cobc/scanner.l:1927 +#: cobc/scanner.l:2065 #, c-format msgid "literal length %lu exceeds %u digits" msgstr "" -#: cobc/scanner.l:2039 cobc/tree.c:3845 +#: cobc/scanner.l:2177 cobc/tree.c:3888 #, c-format msgid "significand has more than %d digits" msgstr "" -#: cobc/scanner.l:2044 +#: cobc/scanner.l:2182 #, c-format msgid "exponent has decimal point" msgstr "" -#: cobc/scanner.l:2050 cobc/tree.c:3853 +#: cobc/scanner.l:2188 cobc/tree.c:3896 #, c-format msgid "exponent has more than 4 digits" msgstr "" -#: cobc/scanner.l:2080 +#: cobc/scanner.l:2218 #, c-format msgid "exponent not between -6143 and 6144" msgstr "" -#: cobc/scanner.l:2089 +#: cobc/scanner.l:2227 #, c-format msgid "significand of 0 must be positive" msgstr "" -#: cobc/scanner.l:2094 +#: cobc/scanner.l:2232 #, c-format msgid "exponent of 0 must be 0" msgstr "" -#: cobc/scanner.l:2099 +#: cobc/scanner.l:2237 #, c-format msgid "exponent of 0 must be positive" msgstr "" -#: cobc/scanner.l:2261 +#: cobc/scanner.l:2399 #, c-format msgid "invalid CONSTANT: %s" msgstr "" -#: cobc/scanner.l:2271 +#: cobc/scanner.l:2409 #, c-format msgid "invalid alphanumeric CONSTANT: %s" msgstr "" -#: cobc/scanner.l:2275 +#: cobc/scanner.l:2413 #, c-format msgid "empty alphanumeric CONSTANT: %s" msgstr "" -#: cobc/scanner.l:2292 cobc/scanner.l:2300 cobc/scanner.l:2305 +#: cobc/scanner.l:2430 cobc/scanner.l:2438 cobc/scanner.l:2443 #, c-format msgid "invalid numeric CONSTANT: %s" msgstr "" -#: cobc/scanner.l:2384 cobc/scanner.l:2411 +#: cobc/scanner.l:2522 cobc/scanner.l:2549 #, c-format msgid "'%s' is not a default reserved word, so cannot be aliased" msgstr "" -#: cobc/scanner.l:2387 +#: cobc/scanner.l:2525 #, c-format msgid "'%s' is already reserved" msgstr "" -#: cobc/scanner.l:2389 +#: cobc/scanner.l:2527 msgid "you may want MAKESYN instead" msgstr "" -#: cobc/scanner.l:2414 +#: cobc/scanner.l:2552 #, c-format msgid "'%s' is not a reserved word" msgstr "" -#: cobc/scanner.l:2415 +#: cobc/scanner.l:2553 msgid "you may want ADDSYN or OVERRIDE instead" msgstr "" -#: cobc/tree.c:391 +#: cobc/tree.c:392 #, c-format msgid "%s clause is required for file '%s'" msgstr "" -#: cobc/tree.c:395 +#: cobc/tree.c:396 #, c-format msgid "%s clause is invalid for file '%s' (file type)" msgstr "" -#: cobc/tree.c:399 +#: cobc/tree.c:400 #, c-format msgid "%s clause is invalid for file '%s'" msgstr "" -#: cobc/tree.c:426 +#: cobc/tree.c:427 #, c-format msgid "FOR item '%s' is a record" msgstr "" -#: cobc/tree.c:435 +#: cobc/tree.c:436 #, c-format msgid "FOR item '%s' is in different record to '%s'" msgstr "" -#: cobc/tree.c:444 +#: cobc/tree.c:445 #, c-format msgid "FOR item '%s' is not in a record associated with '%s'" msgstr "" -#: cobc/tree.c:558 +#: cobc/tree.c:559 msgid "internal error node" msgstr "" -#: cobc/tree.c:560 +#: cobc/tree.c:561 msgid "unknown constant" msgstr "" -#: cobc/tree.c:571 +#: cobc/tree.c:572 #, c-format msgid "literal \"%s\"" msgstr "" -#: cobc/tree.c:842 -#, c-format -msgid "FUNCTION %s has invalid/not supported arguments - tag %d" -msgstr "" - -#: cobc/tree.c:963 +#: cobc/tree.c:969 #, c-format msgid "invalid date/time function: '%d'" msgstr "" -#: cobc/tree.c:995 +#: cobc/tree.c:1001 #, c-format msgid "FUNCTION '%s' has invalid date/time format" msgstr "" -#: cobc/tree.c:1002 +#: cobc/tree.c:1008 #, c-format msgid "FUNCTION '%s' has format in variable" msgstr "" -#: cobc/tree.c:1482 +#: cobc/tree.c:1488 #, c-format msgid "unknown tree tag: %d, category: %d" msgstr "" -#: cobc/tree.c:1577 +#: cobc/tree.c:1590 #, c-format msgid "unexpected numeric USAGE: %d" msgstr "" -#: cobc/tree.c:1591 +#: cobc/tree.c:1604 #, c-format msgid "unexpected category: %d" msgstr "" -#: cobc/tree.c:1790 +#: cobc/tree.c:1814 #, c-format msgid "literal length %d exceeds maximum of %d digits" msgstr "" -#: cobc/tree.c:1795 +#: cobc/tree.c:1819 #, c-format msgid "literal length %d exceeds %d digits" msgstr "" -#: cobc/tree.c:1844 cobc/tree.c:1856 cobc/tree.c:1913 cobc/tree.c:1963 +#: cobc/tree.c:1868 cobc/tree.c:1880 cobc/tree.c:1937 cobc/tree.c:1987 #, c-format msgid "numeric literal '%s' exceeds limit '%s'" msgstr "" -#: cobc/tree.c:2655 +#: cobc/tree.c:2676 msgid "invalid LOCALE literal" msgstr "" -#: cobc/tree.c:2782 +#: cobc/tree.c:2803 msgid "only literals with the same category can be concatenated" msgstr "" -#: cobc/tree.c:2789 -msgid "only alphanumeric, national or boolean literals may be concatenated" +#: cobc/tree.c:2811 +msgid "" +"only alphanumeric, utf-8, national or boolean literals may be concatenated" msgstr "" -#: cobc/tree.c:2801 +#: cobc/tree.c:2823 #, c-format msgid "literal length %d exceeds %d characters" msgstr "" -#: cobc/tree.c:3078 +#: cobc/tree.c:3103 msgid "B, 0 or /" msgstr "" -#: cobc/tree.c:3092 +#: cobc/tree.c:3117 msgid "the sign of the floating-point exponent" msgstr "" -#: cobc/tree.c:3094 +#: cobc/tree.c:3119 msgid "a leading +/- sign" msgstr "" -#: cobc/tree.c:3096 +#: cobc/tree.c:3121 msgid "a trailing +/- sign" msgstr "" -#: cobc/tree.c:3098 +#: cobc/tree.c:3123 msgid "CR or DB" msgstr "" -#: cobc/tree.c:3100 +#: cobc/tree.c:3125 msgid "a leading currency symbol" msgstr "" -#: cobc/tree.c:3102 +#: cobc/tree.c:3127 msgid "a trailing currency symbol" msgstr "" -#: cobc/tree.c:3104 +#: cobc/tree.c:3129 msgid "a Z or * which is before the decimal point" msgstr "" -#: cobc/tree.c:3106 +#: cobc/tree.c:3131 msgid "a Z or * which is after the decimal point" msgstr "" -#: cobc/tree.c:3108 +#: cobc/tree.c:3133 msgid "a floating +/- string which is before the decimal point" msgstr "" -#: cobc/tree.c:3110 +#: cobc/tree.c:3135 msgid "a floating +/- string which is after the decimal point" msgstr "" -#: cobc/tree.c:3112 +#: cobc/tree.c:3137 msgid "a floating currency symbol string which is before the decimal point" msgstr "" -#: cobc/tree.c:3114 +#: cobc/tree.c:3139 msgid "a floating currency symbol string which is after the decimal point" msgstr "" -#: cobc/tree.c:3118 +#: cobc/tree.c:3143 msgid "A or X" msgstr "" -#: cobc/tree.c:3126 +#: cobc/tree.c:3151 msgid "a P which is before the decimal point" msgstr "" -#: cobc/tree.c:3128 +#: cobc/tree.c:3153 msgid "a P which is after the decimal point" msgstr "" -#: cobc/tree.c:3149 cobc/tree.c:3599 +#: cobc/tree.c:3176 cobc/tree.c:3638 #, c-format msgid "%s may only occur once in a PICTURE string" msgstr "" -#: cobc/tree.c:3151 cobc/tree.c:3541 +#: cobc/tree.c:3178 cobc/tree.c:3570 #, c-format msgid "%s cannot follow %s" msgstr "" -#: cobc/tree.c:3154 +#: cobc/tree.c:3181 msgid "invalid PICTURE string detected" msgstr "" -#: cobc/tree.c:3271 +#: cobc/tree.c:3299 msgid "number or constant in parentheses is not an unsigned integer" msgstr "" -#: cobc/tree.c:3280 +#: cobc/tree.c:3308 #, c-format msgid "only up to %d significant digits are permitted within parentheses" msgstr "" -#: cobc/tree.c:3288 +#: cobc/tree.c:3316 msgid "number or constant in parentheses must be greater than zero" msgstr "" -#: cobc/tree.c:3299 +#: cobc/tree.c:3327 msgid "parentheses must be preceded by a picture symbol" msgstr "" -#: cobc/tree.c:3329 +#: cobc/tree.c:3353 msgid "unbalanced parentheses" msgstr "" -#: cobc/tree.c:3337 +#: cobc/tree.c:3361 msgid "parentheses must contain an unsigned integer" msgstr "" -#: cobc/tree.c:3375 +#: cobc/tree.c:3409 #, c-format msgid "'%s' is not a constant-name" msgstr "" -#: cobc/tree.c:3382 -#, c-format -msgid "'%s' is not a numeric literal" -msgstr "" - -#: cobc/tree.c:3386 -#, c-format -msgid "'%s' is not an integer" -msgstr "" - -#: cobc/tree.c:3390 +#: cobc/tree.c:3422 #, c-format -msgid "'%s' is not unsigned" +msgid "'%s' is not an unsigned positive integer" msgstr "" -#: cobc/tree.c:3450 +#: cobc/tree.c:3479 msgid "missing PICTURE string" msgstr "" -#: cobc/tree.c:3479 +#: cobc/tree.c:3508 msgid "C must be followed by R" msgstr "" -#: cobc/tree.c:3482 +#: cobc/tree.c:3511 msgid "D must be followed by B" msgstr "" -#: cobc/tree.c:3497 cobc/tree.c:3596 cobc/tree.c:3622 cobc/tree.c:3733 +#: cobc/tree.c:3526 cobc/tree.c:3635 cobc/tree.c:3661 cobc/tree.c:3773 msgid "uncommon parentheses" msgstr "" -#: cobc/tree.c:3541 +#: cobc/tree.c:3570 msgid "exponent" msgstr "" -#: cobc/tree.c:3586 +#: cobc/tree.c:3625 msgid "L must be at start of PICTURE string" msgstr "" -#: cobc/tree.c:3604 +#: cobc/tree.c:3643 msgid "S must be at start of PICTURE string" msgstr "" -#: cobc/tree.c:3660 +#: cobc/tree.c:3699 msgid "P must be at start or end of PICTURE string" msgstr "" -#: cobc/tree.c:3690 +#: cobc/tree.c:3730 msgid "cannot have both Z and * in PICTURE string" msgstr "" -#: cobc/tree.c:3768 +#: cobc/tree.c:3808 #, c-format msgid "invalid PICTURE character '%c'" msgstr "" -#: cobc/tree.c:3798 +#: cobc/tree.c:3841 #, c-format msgid "" "PICTURE string may not contain more than %d characters; contains %d " "characters" msgstr "" -#: cobc/tree.c:3803 +#: cobc/tree.c:3846 msgid "" -"PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; " -"or at least two of the set +, - and the currency symbol" +"PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and " +"*; or at least two of the set +, - and the currency symbol" msgstr "" -#: cobc/tree.c:3830 +#: cobc/tree.c:3873 #, c-format msgid "numeric field cannot be larger than %d digits" msgstr "" -#: cobc/tree.c:4267 +#: cobc/tree.c:4333 #, c-format msgid "needs PICTURE clause for SUM %s" msgstr "" -#: cobc/tree.c:4274 +#: cobc/tree.c:4340 #, c-format msgid "non-numeric PICTURE clause for SUM %s" msgstr "" -#: cobc/tree.c:4346 cobc/tree.c:4359 +#: cobc/tree.c:4412 cobc/tree.c:4425 #, c-format msgid "no DETAIL line defined in report %s" msgstr "" -#: cobc/tree.c:4361 +#: cobc/tree.c:4427 msgid "PAGE LIMIT FIRST DETAIL should be >= HEADING" msgstr "" -#: cobc/tree.c:4364 +#: cobc/tree.c:4430 msgid "PAGE LIMIT FOOTING should be >= HEADING" msgstr "" -#: cobc/tree.c:4366 +#: cobc/tree.c:4432 msgid "PAGE LIMIT LAST DETAIL should be >= FIRST DETAIL" msgstr "" -#: cobc/tree.c:4368 +#: cobc/tree.c:4434 msgid "PAGE LIMIT FOOTING should be >= LAST DETAIL" msgstr "" -#: cobc/tree.c:4370 +#: cobc/tree.c:4436 msgid "PAGE LIMIT LINES should be >= FOOTING" msgstr "" -#: cobc/tree.c:4563 libcob/fileio.c:8999 +#: cobc/tree.c:4631 libcob/fileio.c:9358 #, c-format msgid "maximum keys (%d/%d) exceeded for file '%s'" msgstr "" -#: cobc/tree.c:4627 cobc/tree.c:4650 +#: cobc/tree.c:4695 cobc/tree.c:4718 #, c-format msgid "invalid KEY item '%s', not in file '%s'" msgstr "" -#: cobc/tree.c:4661 +#: cobc/tree.c:4729 #, c-format msgid "" "minimal record length %d can not hold the key item '%s'; needs to be at " "least %d" msgstr "" -#: cobc/tree.c:4696 +#: cobc/tree.c:4764 #, c-format msgid "missing file description for %s" msgstr "" -#: cobc/tree.c:4745 +#: cobc/tree.c:4813 #, c-format msgid "size of record '%s' (%d) smaller than minimum of file '%s' (%d)" msgstr "" -#: cobc/tree.c:4748 cobc/tree.c:4765 +#: cobc/tree.c:4816 cobc/tree.c:4833 msgid "file size adjusted" msgstr "" -#: cobc/tree.c:4760 +#: cobc/tree.c:4828 #, c-format msgid "size of record '%s' (%d) larger than maximum of file '%s' (%d)" msgstr "" -#: cobc/tree.c:4793 +#: cobc/tree.c:4861 msgid "RECORD VARYING specified without limits, but implied limits are equal" msgstr "" -#: cobc/tree.c:4795 +#: cobc/tree.c:4863 #, c-format msgid "%s clause ignored" msgstr "" -#: cobc/tree.c:4890 cobc/typeck.c:7695 cobc/typeck.c:14389 cobc/typeck.c:14441 -#: cobc/typeck.c:14477 libcob/fileio.c:4598 libcob/screenio.c:3720 -#: libcob/screenio.c:3750 +#: cobc/tree.c:4958 cobc/typeck.c:8128 cobc/typeck.c:15186 cobc/typeck.c:15238 +#: cobc/typeck.c:15275 libcob/fileio.c:4724 libcob/screenio.c:4613 +#: libcob/screenio.c:4639 #, c-format msgid "runtime is not configured to support %s" msgstr "" -#: cobc/tree.c:5395 +#: cobc/tree.c:5474 #, c-format msgid "literal '%.38s' is longer than '%s'" msgstr "" -#: cobc/tree.c:5399 +#: cobc/tree.c:5478 #, c-format msgid "literal '%.38s' is longer than reference-modification of '%s'" msgstr "" -#: cobc/tree.c:5424 +#: cobc/tree.c:5508 #, c-format msgid "literal '%s' is alphanumeric but '%s' is numeric" msgstr "" -#: cobc/tree.c:5466 +#: cobc/tree.c:5550 #, c-format msgid "literal '%s' has more decimals than '%s'" msgstr "" -#: cobc/tree.c:5508 +#: cobc/tree.c:5598 #, c-format msgid "literal '%s' has more digits than '%s'" msgstr "" -#: cobc/tree.c:5548 cobc/tree.c:5572 +#: cobc/tree.c:5646 cobc/tree.c:5676 #, c-format msgid "unsigned '%s' may not be %s %s" msgstr "" -#: cobc/tree.c:5558 cobc/tree.c:5581 +#: cobc/tree.c:5658 cobc/tree.c:5689 #, c-format msgid "unsigned '%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5614 cobc/tree.c:5639 +#: cobc/tree.c:5726 cobc/tree.c:5756 #, c-format msgid "'%s' may not be %s %s" msgstr "" -#: cobc/tree.c:5625 cobc/tree.c:5650 +#: cobc/tree.c:5738 cobc/tree.c:5768 #, c-format msgid "'%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5795 +#: cobc/tree.c:5917 msgid "divide by constant ZERO" msgstr "" -#: cobc/tree.c:5879 cobc/tree.c:5886 +#: cobc/tree.c:6001 cobc/tree.c:6008 #, c-format msgid "%s should be COMP-X/COMP-5 for logical operator" msgstr "" -#: cobc/tree.c:5927 cobc/tree.c:5932 cobc/tree.c:6151 cobc/typeck.c:5675 -#: cobc/typeck.c:5684 cobc/typeck.c:5691 cobc/typeck.c:6772 cobc/typeck.c:6913 -msgid "invalid expression" -msgstr "" - -#: cobc/tree.c:6148 +#: cobc/tree.c:6283 #, c-format msgid "invalid expression: %s %s %s" msgstr "" -#: cobc/tree.c:6195 +#: cobc/tree.c:6286 +msgid "invalid expression: boolean expected with logical operator" +msgstr "" + +#: cobc/tree.c:6330 #, c-format msgid "unexpected operator: %d" msgstr "" -#: cobc/tree.c:6206 +#: cobc/tree.c:6341 #, c-format msgid "expression '%.38s' %s '%.38s' is always TRUE" msgstr "" -#: cobc/tree.c:6212 +#: cobc/tree.c:6347 msgid "expression is always TRUE" msgstr "" -#: cobc/tree.c:6225 +#: cobc/tree.c:6360 #, c-format msgid "expression '%.38s' %s '%.38s' is always FALSE" msgstr "" -#: cobc/tree.c:6231 +#: cobc/tree.c:6366 msgid "expression is always FALSE" msgstr "" -#: cobc/tree.c:6443 +#: cobc/tree.c:6588 msgid "invalid file name reference" msgstr "" -#: cobc/tree.c:6451 +#: cobc/tree.c:6596 #, c-format msgid "BY CONTENT assumed for alphanumeric item '%s'" msgstr "" -#: cobc/tree.c:6456 +#: cobc/tree.c:6601 #, c-format msgid "BY CONTENT assumed for national item '%s'" msgstr "" -#: cobc/tree.c:6595 +#: cobc/tree.c:6740 msgid "PERFORM FOREVER since UNTIL is always FALSE" msgstr "" -#: cobc/tree.c:6599 +#: cobc/tree.c:6744 msgid "PERFORM ONCE since UNTIL is always TRUE" msgstr "" -#: cobc/tree.c:6602 +#: cobc/tree.c:6747 msgid "PERFORM NEVER since UNTIL is always TRUE" msgstr "" -#: cobc/tree.c:6726 +#: cobc/tree.c:6871 #, c-format msgid "no definition/prototype seen for FUNCTION '%s'" msgstr "" -#: cobc/tree.c:6728 +#: cobc/tree.c:6873 #, c-format msgid "no definition/prototype seen for PROGRAM '%s'" msgstr "" -#: cobc/tree.c:6737 +#: cobc/tree.c:6882 #, c-format msgid "no definition/prototype seen for FUNCTION with external name '%s'" msgstr "" -#: cobc/tree.c:6739 +#: cobc/tree.c:6884 #, c-format msgid "no definition/prototype seen for PROGRAM with external name '%s'" msgstr "" -#: cobc/tree.c:6831 +#: cobc/tree.c:6976 cobc/tree.c:7158 cobc/tree.c:7233 cobc/tree.c:7239 +#: cobc/tree.c:7247 cobc/tree.c:7255 cobc/tree.c:7277 cobc/tree.c:7287 +#: cobc/tree.c:7292 #, c-format -msgid "FUNCTION %s has invalid argument" +msgid "FUNCTION '%s' has invalid argument" msgstr "" -#: cobc/tree.c:6833 +#: cobc/tree.c:6978 #, c-format -msgid "either all arguments or none should be if type %s" +msgid "either all arguments or none should be of type %s" msgstr "" -#: cobc/tree.c:6863 cobc/tree.c:6869 cobc/tree.c:6911 cobc/tree.c:6916 +#: cobc/tree.c:7010 cobc/tree.c:7016 cobc/tree.c:7057 cobc/tree.c:7063 #, c-format msgid "FUNCTION '%s' has invalid reference modification" msgstr "" -#: cobc/tree.c:6880 cobc/tree.c:7194 +#: cobc/tree.c:7027 cobc/tree.c:7344 #, c-format msgid "FUNCTION '%s' unknown" msgstr "" -#: cobc/tree.c:6884 +#: cobc/tree.c:7031 #, c-format msgid "FUNCTION '%s' is not implemented" msgstr "" -#: cobc/tree.c:6891 cobc/tree.c:6898 cobc/tree.c:7179 +#: cobc/tree.c:7037 cobc/tree.c:7044 cobc/tree.c:7329 #, c-format msgid "FUNCTION '%s' has wrong number of arguments" msgstr "" -#: cobc/tree.c:6905 +#: cobc/tree.c:7051 #, c-format msgid "FUNCTION '%s' cannot have reference modification" msgstr "" -#: cobc/tree.c:7008 cobc/tree.c:7083 cobc/tree.c:7089 cobc/tree.c:7097 -#: cobc/tree.c:7105 cobc/tree.c:7127 cobc/tree.c:7137 cobc/tree.c:7142 -#, c-format -msgid "FUNCTION '%s' has invalid argument" -msgstr "" - -#: cobc/tree.c:7185 +#: cobc/tree.c:7335 #, c-format msgid "FUNCTION '%s' has invalid first argument" msgstr "" -#: cobc/typeck.c:584 +#: cobc/typeck.c:590 #, c-format msgid "%s should be COMP-5/COMP-X for logical operator" msgstr "" -#: cobc/typeck.c:850 +#: cobc/typeck.c:856 #, c-format msgid "%s item not allowed here: '%s'" msgstr "" -#: cobc/typeck.c:892 +#: cobc/typeck.c:898 #, c-format msgid "'%s' is not a group name" msgstr "" -#: cobc/typeck.c:911 +#: cobc/typeck.c:921 #, c-format msgid "'%s' is not a numeric name" msgstr "" -#: cobc/typeck.c:934 +#: cobc/typeck.c:944 #, c-format msgid "'%s' is not a numeric or numeric-edited name" msgstr "" -#: cobc/typeck.c:974 -#, c-format -msgid "'%s' is Alpha, instead of a numeric value" -msgstr "" - -#: cobc/typeck.c:977 -#, c-format -msgid "'%s' is Alpha Edited, instead of a numeric value" -msgstr "" - -#: cobc/typeck.c:990 -#, c-format -msgid "'%s' is not a numeric value" -msgstr "" - -#: cobc/typeck.c:1040 +#: cobc/typeck.c:1043 #, c-format -msgid "'%s' is not an integer value" +msgid "'%s' is not an integer" msgstr "" -#: cobc/typeck.c:1044 +#: cobc/typeck.c:1047 msgid "positive numeric integer is required here" msgstr "" -#: cobc/typeck.c:1163 +#: cobc/typeck.c:1178 msgid "System routine" msgstr "" -#: cobc/typeck.c:2054 libcob/call.c:1180 +#: cobc/typeck.c:2037 libcob/call.c:1172 #, c-format msgid "'%s' literal includes leading spaces which are omitted" msgstr "" -#: cobc/typeck.c:2058 +#: cobc/typeck.c:2041 #, c-format msgid "'%s' literal includes trailing spaces which are omitted" msgstr "" -#: cobc/typeck.c:2125 +#: cobc/typeck.c:2108 msgid "ON/OFF usage requires a SWITCH name" msgstr "" -#: cobc/typeck.c:2143 +#: cobc/typeck.c:2126 #, c-format msgid "word length exceeds maximum of %d characters: '%s'" msgstr "" -#: cobc/typeck.c:2146 +#: cobc/typeck.c:2129 #, c-format msgid "word length exceeds %d characters: '%s'" msgstr "" -#: cobc/typeck.c:2223 +#: cobc/typeck.c:2206 #, c-format msgid "ASSIGN %s interpreted as '%s'" msgstr "" -#: cobc/typeck.c:2315 cobc/typeck.c:2487 +#: cobc/typeck.c:2332 cobc/typeck.c:2631 #, c-format msgid "subscript missing for '%s' - defaulting to 1" msgstr "" -#: cobc/typeck.c:2338 cobc/typeck.c:2403 cobc/typeck.c:2659 +#: cobc/typeck.c:2355 cobc/typeck.c:2546 cobc/typeck.c:2746 #, c-format msgid "'%s' cannot be subscripted" msgstr "" -#: cobc/typeck.c:2342 cobc/typeck.c:2663 +#: cobc/typeck.c:2359 cobc/typeck.c:2750 #, c-format msgid "'%s' requires one subscript" msgstr "" -#: cobc/typeck.c:2345 cobc/typeck.c:2666 +#: cobc/typeck.c:2362 cobc/typeck.c:2753 #, c-format msgid "'%s' requires %d subscripts" msgstr "" -#: cobc/typeck.c:2363 +#: cobc/typeck.c:2380 #, c-format msgid "'%s' (accessed by '%s')" msgstr "" -#: cobc/typeck.c:2471 +#: cobc/typeck.c:2399 cobc/typeck.c:4987 #, c-format -msgid "'%s' has no OCCURS clause" +msgid "%s may not be reference modified" msgstr "" -#: cobc/typeck.c:2537 libcob/common.c:3941 libcob/common.c:3952 +#: cobc/typeck.c:2437 cobc/typeck.c:2442 cobc/typeck.c:2466 +#: libcob/common.c:4477 libcob/common.c:4521 #, c-format -msgid "subscript of '%s' out of bounds: %d" +msgid "length of '%s' out of bounds: %d" msgstr "" -#: cobc/typeck.c:2587 cobc/typeck.c:2598 libcob/common.c:3976 -#: libcob/common.c:4027 +#: cobc/typeck.c:2453 cobc/typeck.c:2462 libcob/common.c:4462 +#: libcob/common.c:4513 #, c-format msgid "offset of '%s' out of bounds: %d" msgstr "" -#: cobc/typeck.c:2592 cobc/typeck.c:2603 cobc/typeck.c:2612 -#: libcob/common.c:3991 libcob/common.c:4035 +#: cobc/typeck.c:2458 +msgid "suspicious reference-modification: always using max. position" +msgstr "" + +#: cobc/typeck.c:2475 +msgid "suspicious reference-modification: always using max. length" +msgstr "" + +#: cobc/typeck.c:2615 #, c-format -msgid "length of '%s' out of bounds: %d" +msgid "'%s' has no OCCURS clause" +msgstr "" + +#: cobc/typeck.c:2694 libcob/common.c:4427 libcob/common.c:4438 +#, c-format +msgid "subscript of '%s' out of bounds: %d" msgstr "" -#: cobc/typeck.c:2727 cobc/typeck.c:2806 +#: cobc/typeck.c:2812 cobc/typeck.c:2891 msgid "reference modification not allowed here" msgstr "" -#: cobc/typeck.c:2741 cobc/typeck.c:2832 +#: cobc/typeck.c:2826 cobc/typeck.c:2917 msgid "88 level item not allowed here" msgstr "" -#: cobc/typeck.c:2745 cobc/typeck.c:2836 cobc/typeck.c:2844 cobc/typeck.c:2906 +#: cobc/typeck.c:2830 cobc/typeck.c:2921 cobc/typeck.c:2929 cobc/typeck.c:2991 msgid "variable length item not allowed here" msgstr "" -#: cobc/typeck.c:2774 +#: cobc/typeck.c:2859 #, c-format msgid "'%s' has not been DEFINEd" msgstr "" -#: cobc/typeck.c:2810 +#: cobc/typeck.c:2895 msgid "only field names allowed here" msgstr "" -#: cobc/typeck.c:2821 +#: cobc/typeck.c:2906 #, c-format msgid "VALUE of '%s': %s target '%s' is invalid" msgstr "" -#: cobc/typeck.c:2823 cobc/typeck.c:2889 +#: cobc/typeck.c:2908 cobc/typeck.c:2974 msgid "" "target must be in FILE SECTION or LINKAGE SECTION or have the EXTERNAL clause" msgstr "" -#: cobc/typeck.c:2879 cobc/typeck.c:2888 +#: cobc/typeck.c:2964 cobc/typeck.c:2973 #, c-format msgid "VALUE of '%s': %s target is invalid" msgstr "" -#: cobc/typeck.c:2881 +#: cobc/typeck.c:2966 msgid "no previous data-item found" msgstr "" -#: cobc/typeck.c:3040 cobc/typeck.c:4799 +#: cobc/typeck.c:3130 cobc/typeck.c:4963 #, c-format msgid "'%s' cannot be BASED/EXTERNAL" msgstr "" -#: cobc/typeck.c:3045 +#: cobc/typeck.c:3135 #, c-format msgid "'%s' is not in WORKING-STORAGE SECTION" msgstr "" -#: cobc/typeck.c:3052 cobc/typeck.c:4796 +#: cobc/typeck.c:3142 cobc/typeck.c:4960 #, c-format msgid "'%s' not level 01 or 77" msgstr "" -#: cobc/typeck.c:3055 cobc/typeck.c:3090 cobc/typeck.c:4802 +#: cobc/typeck.c:3145 cobc/typeck.c:3180 cobc/typeck.c:4966 #, c-format msgid "'%s' REDEFINES field not allowed here" msgstr "" -#: cobc/typeck.c:3075 cobc/typeck.c:8423 +#: cobc/typeck.c:3165 cobc/typeck.c:8876 #, c-format msgid "duplicate USING BY REFERENCE item '%s'" msgstr "" -#: cobc/typeck.c:3103 +#: cobc/typeck.c:3193 #, c-format msgid "'%s' USING item duplicates RETURNING item" msgstr "" -#: cobc/typeck.c:3177 +#: cobc/typeck.c:3268 #, c-format msgid "prototype and definition of '%s' do not match" msgstr "" -#: cobc/typeck.c:3256 +#: cobc/typeck.c:3389 cobc/typeck.c:3486 #, c-format msgid "" "parameters #%d ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3259 +#: cobc/typeck.c:3393 #, c-format msgid "" "returning items ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3295 +#: cobc/typeck.c:3429 msgid "definition is a program but the prototype is a function" msgstr "" -#: cobc/typeck.c:3299 +#: cobc/typeck.c:3433 msgid "definition is a function but the prototype is a program" msgstr "" -#: cobc/typeck.c:3306 -msgid "DECIMAL-POINT IS COMMA clauses differ" -msgstr "" - -#: cobc/typeck.c:3312 -msgid "CURRENCY clauses differ" -msgstr "" - -#: cobc/typeck.c:3348 +#: cobc/typeck.c:3496 msgid "number of parameters differ" msgstr "" -#: cobc/typeck.c:3358 +#: cobc/typeck.c:3506 msgid "definition has a RETURNING item but prototype does not" msgstr "" -#: cobc/typeck.c:3362 +#: cobc/typeck.c:3510 msgid "definition does not have a RETURNING item but prototype does" msgstr "" -#: cobc/typeck.c:3411 +#: cobc/typeck.c:3560 #, c-format msgid "unexpected tree tag: %d" msgstr "" -#: cobc/typeck.c:3433 +#: cobc/typeck.c:3584 #, c-format msgid "expected argument #%d, %s, to be passed BY VALUE" msgstr "" -#: cobc/typeck.c:3437 +#: cobc/typeck.c:3589 #, c-format msgid "expected argument #%d, %s, to be passed BY REFERENCE/CONTENT" msgstr "" -#: cobc/typeck.c:3455 cobc/typeck.c:3580 cobc/typeck.c:3583 +#: cobc/typeck.c:3608 cobc/typeck.c:3733 cobc/typeck.c:3736 #, c-format msgid "argument #%d is not optional" msgstr "" -#: cobc/typeck.c:3468 +#: cobc/typeck.c:3622 #, c-format msgid "argument #%d must be at least %d bytes long" msgstr "" -#: cobc/typeck.c:3483 +#: cobc/typeck.c:3637 #, c-format msgid "argument #%d is a different type of pointer than the parameter" msgstr "" -#: cobc/typeck.c:3490 +#: cobc/typeck.c:3644 #, c-format msgid "argument #%d is ANY LENGTH, but expecting a fixed size item" msgstr "" -#: cobc/typeck.c:3518 +#: cobc/typeck.c:3672 #, c-format msgid "argument #%d, %s, does not conform to the parameter definition" msgstr "" -#: cobc/typeck.c:3566 +#: cobc/typeck.c:3719 #, c-format msgid "expecting up to %d arguments, but found %d" msgstr "" -#: cobc/typeck.c:3598 +#: cobc/typeck.c:3752 msgid "the RETURNING item is of a fixed size, not ANY LENGTH" msgstr "" -#: cobc/typeck.c:3603 +#: cobc/typeck.c:3758 #, c-format msgid "RETURNING item %s is not a valid type" msgstr "" -#: cobc/typeck.c:3609 +#: cobc/typeck.c:3764 msgid "unexpected RETURNING item" msgstr "" -#: cobc/typeck.c:3612 +#: cobc/typeck.c:3767 msgid "expecting a RETURNING item, but none provided" msgstr "" -#: cobc/typeck.c:3663 -#, c-format -msgid "'%s' is not an alphabet name" -msgstr "" - -#: cobc/typeck.c:3939 +#: cobc/typeck.c:4091 #, c-format msgid "duplicate character values in alphabet '%s': %s" msgstr "" -#: cobc/typeck.c:3944 +#: cobc/typeck.c:4096 #, c-format msgid "invalid character values in alphabet '%s', starting at position %d" msgstr "" -#: cobc/typeck.c:4045 +#: cobc/typeck.c:4198 #, c-format msgid "duplicate character values in class '%s'" msgstr "" -#: cobc/typeck.c:4074 +#: cobc/typeck.c:4227 msgid "invalid ALPHABET name" msgstr "" -#: cobc/typeck.c:4103 +#: cobc/typeck.c:4256 #, c-format msgid "'%s' is not a locale name" msgstr "" -#: cobc/typeck.c:4257 +#: cobc/typeck.c:4410 msgid "invalid RECORD DEPENDING item" msgstr "" -#: cobc/typeck.c:4262 +#: cobc/typeck.c:4415 msgid "RECORD DEPENDING must reference a data-item" msgstr "" -#: cobc/typeck.c:4285 +#: cobc/typeck.c:4438 #, c-format msgid "" "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-" "STORAGE or LINKAGE SECTION" msgstr "" -#: cobc/typeck.c:4298 +#: cobc/typeck.c:4451 #, c-format msgid "file %s: RELATIVE KEY %s is not numeric" msgstr "" -#: cobc/typeck.c:4307 +#: cobc/typeck.c:4460 #, c-format msgid "file %s: RELATIVE KEY %s must be integer" msgstr "" -#: cobc/typeck.c:4312 +#: cobc/typeck.c:4465 #, c-format msgid "file %s: RELATIVE KEY %s must be unsigned" msgstr "" -#: cobc/typeck.c:4319 +#: cobc/typeck.c:4472 #, c-format msgid "file %s: RELATIVE KEY %s cannot have OCCURS" msgstr "" -#: cobc/typeck.c:4325 +#: cobc/typeck.c:4478 #, c-format msgid "RELATIVE KEY %s cannot be in file record belonging to %s" msgstr "" -#: cobc/typeck.c:4334 +#: cobc/typeck.c:4487 #, c-format msgid "file %s: RELATIVE KEY %s declared outside WORKING-STORAGE" msgstr "" -#: cobc/typeck.c:4356 cobc/typeck.c:8396 +#: cobc/typeck.c:4509 cobc/typeck.c:8833 #, c-format msgid "'%s' is not a valid data name" msgstr "" -#: cobc/typeck.c:4363 +#: cobc/typeck.c:4516 #, c-format msgid "" "CRT STATUS item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "" -#: cobc/typeck.c:4369 +#: cobc/typeck.c:4522 #, c-format msgid "'%s' numeric CRT STATUS must have at least 4 digits" msgstr "" -#: cobc/typeck.c:4375 +#: cobc/typeck.c:4528 #, c-format msgid "'%s' CRT STATUS must be 3 or 4 characters long" msgstr "" -#: cobc/typeck.c:4397 +#: cobc/typeck.c:4550 #, c-format msgid "FILE STATUS '%s' is not a field" msgstr "" -#: cobc/typeck.c:4409 +#: cobc/typeck.c:4562 #, c-format msgid "FILE STATUS '%s' may not be a decimal or have a PIC with a P" msgstr "" -#: cobc/typeck.c:4414 +#: cobc/typeck.c:4567 #, c-format msgid "" "FILE STATUS '%s' is a numeric field, but I-O status codes are not numeric in " "general" msgstr "" -#: cobc/typeck.c:4418 +#: cobc/typeck.c:4571 #, c-format msgid "FILE STATUS '%s' must be an alphanumeric or numeric field" msgstr "" -#: cobc/typeck.c:4425 +#: cobc/typeck.c:4578 #, c-format msgid "FILE STATUS '%s' must be USAGE DISPLAY" msgstr "" -#: cobc/typeck.c:4432 +#: cobc/typeck.c:4585 #, c-format msgid "FILE STATUS '%s' must be 2 characters long" msgstr "" -#: cobc/typeck.c:4440 +#: cobc/typeck.c:4593 #, c-format msgid "FILE STATUS '%s' must be in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE" msgstr "" -#: cobc/typeck.c:4446 +#: cobc/typeck.c:4599 #, c-format msgid "FILE STATUS '%s' may not be located after an OCCURS DEPENDING field" msgstr "" -#: cobc/typeck.c:4460 +#: cobc/typeck.c:4613 #, c-format msgid "variable '%s' will be implicitly defined" msgstr "" -#: cobc/typeck.c:4489 cobc/typeck.c:4550 +#: cobc/typeck.c:4703 msgid "ASSIGN variable" msgstr "" -#: cobc/typeck.c:4555 +#: cobc/typeck.c:4708 #, c-format msgid "ASSIGN data item '%s' is invalid" msgstr "" -#: cobc/typeck.c:4619 +#: cobc/typeck.c:4773 #, c-format msgid "'%s' CURSOR must be 4 or 6 characters long" msgstr "" -#: cobc/typeck.c:4680 +#: cobc/typeck.c:4844 #, c-format msgid "'%s' cannot have nested OCCURS DEPENDING" msgstr "" -#: cobc/typeck.c:4694 +#: cobc/typeck.c:4858 #, c-format msgid "'%s' OCCURS DEPENDING ON field item invalid here" msgstr "" -#: cobc/typeck.c:4704 +#: cobc/typeck.c:4868 #, c-format msgid "'%s' cannot have OCCURS DEPENDING because of '%s'" msgstr "" -#: cobc/typeck.c:4716 +#: cobc/typeck.c:4880 #, c-format msgid "'%s' OCCURS DEPENDING ON item must have GLOBAL attribute" msgstr "" -#: cobc/typeck.c:4730 +#: cobc/typeck.c:4894 #, c-format msgid "PASSWORD '%s' for EXTERNAL file '%s' must have EXTERNAL attribute" msgstr "" -#: cobc/typeck.c:4768 +#: cobc/typeck.c:4932 #, c-format msgid "duplicate APPLY COMMIT target: '%s'" msgstr "" -#: cobc/typeck.c:4782 +#: cobc/typeck.c:4946 msgid "APPLY COMMIT statement invalid for SORT file" msgstr "" -#: cobc/typeck.c:4785 +#: cobc/typeck.c:4949 msgid "APPLY COMMIT statement invalid for REPORT file" msgstr "" -#: cobc/typeck.c:4792 +#: cobc/typeck.c:4956 #, c-format msgid "" "APPLY COMMIT item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "" -#: cobc/typeck.c:4806 +#: cobc/typeck.c:4970 #, c-format msgid "item not allowed here: '%s'" msgstr "" -#: cobc/typeck.c:4819 +#: cobc/typeck.c:4983 #, c-format msgid "%s may not be subscripted" msgstr "" -#: cobc/typeck.c:4823 -#, c-format -msgid "%s may not be reference modified" -msgstr "" - -#: cobc/typeck.c:4883 +#: cobc/typeck.c:5047 #, c-format msgid "DEBUGGING target invalid: '%s'" msgstr "" -#: cobc/typeck.c:4889 +#: cobc/typeck.c:5053 #, c-format msgid "DEBUGGING target already specified with ALL PROCEDURES: '%s'" msgstr "" -#: cobc/typeck.c:4909 +#: cobc/typeck.c:5073 msgid "DEBUGGING target" msgstr "" -#: cobc/typeck.c:4916 +#: cobc/typeck.c:5080 #, c-format msgid "'%s' is not a valid DEBUGGING target" msgstr "" -#: cobc/typeck.c:4962 cobc/typeck.c:4970 +#: cobc/typeck.c:5126 cobc/typeck.c:5134 #, c-format msgid "'%s' is not in DECLARATIVES" msgstr "" -#: cobc/typeck.c:4984 +#: cobc/typeck.c:5148 #, c-format msgid "invalid reference to '%s' (in DECLARATIVES)" msgstr "" -#: cobc/typeck.c:4996 +#: cobc/typeck.c:5162 #, c-format msgid "GO TO paragraph '%s' which is defined in another SECTION" msgstr "" -#: cobc/typeck.c:5006 +#: cobc/typeck.c:5172 #, c-format msgid "'%s' is not a procedure name" msgstr "" -#: cobc/typeck.c:5041 +#: cobc/typeck.c:5207 #, c-format msgid "%s and %s are not in the same SECTION" msgstr "" -#: cobc/typeck.c:5046 +#: cobc/typeck.c:5212 #, c-format msgid "%s is defined before %s" msgstr "" -#: cobc/typeck.c:5088 +#: cobc/typeck.c:5254 #, c-format msgid "'%s' ANY LENGTH item must be a formal parameter" msgstr "" -#: cobc/typeck.c:5136 +#: cobc/typeck.c:5302 #, c-format msgid "LINKAGE item '%s' is not a PROCEDURE USING parameter" msgstr "" -#: cobc/typeck.c:5192 +#: cobc/typeck.c:5358 #, c-format msgid "'%s' is not an alterable paragraph" msgstr "" -#: cobc/typeck.c:5802 cobc/typeck.c:5806 +#: cobc/typeck.c:5852 +msgid "invalid expression: unfinished expression" +msgstr "" + +#: cobc/typeck.c:5858 cobc/typeck.c:5865 +msgid "invalid expression" +msgstr "" + +#: cobc/typeck.c:5990 cobc/typeck.c:5994 #, c-format msgid "suggest parentheses around %s within %s" msgstr "" -#: cobc/typeck.c:5815 +#: cobc/typeck.c:6003 msgid "invalid conditional expression" msgstr "" -#: cobc/typeck.c:5932 +#: cobc/typeck.c:6120 #, c-format msgid "internal decimal structure size exceeded: %d" msgstr "" -#: cobc/typeck.c:5935 +#: cobc/typeck.c:6123 msgid "" "Try to minimize the number of parentheses or split into multiple " "computations." msgstr "" -#: cobc/typeck.c:5959 +#: cobc/typeck.c:6147 #, c-format msgid "more than %d nested expressions" msgstr "" -#: cobc/typeck.c:6000 +#: cobc/typeck.c:6188 msgid "precision of result may change with arithmetic-osvs" msgstr "" -#: cobc/typeck.c:6080 +#: cobc/typeck.c:6268 #, c-format msgid "unexpected operation: %c (%d)" msgstr "" -#: cobc/typeck.c:6085 +#: cobc/typeck.c:6273 #, c-format msgid "%s operator may be misplaced" msgstr "" -#: cobc/typeck.c:6160 +#: cobc/typeck.c:6349 msgid "unexpected constant expansion" msgstr "" -#: cobc/typeck.c:6882 cobc/typeck.c:11024 +#: cobc/typeck.c:7106 cobc/typeck.c:11656 cobc/typeck.c:11661 msgid "alphanumeric value is expected" msgstr "" -#: cobc/typeck.c:6884 cobc/typeck.c:11019 +#: cobc/typeck.c:7109 cobc/typeck.c:11651 msgid "numeric value is expected" msgstr "" -#: cobc/typeck.c:6954 +#: cobc/typeck.c:7203 +msgid "invalid expression: condition expected" +msgstr "" + +#: cobc/typeck.c:7271 +msgid "incomplete expression" +msgstr "" + +#: cobc/typeck.c:7312 #, c-format msgid "more than %d nested conditions" msgstr "" -#: cobc/typeck.c:7290 cobc/typeck.c:7371 +#: cobc/typeck.c:7667 cobc/typeck.c:7748 msgid "no CORRESPONDING items found" msgstr "" -#: cobc/typeck.c:7443 +#: cobc/typeck.c:7820 msgid "no items to ACCEPT found" msgstr "" -#: cobc/typeck.c:7493 +#: cobc/typeck.c:7870 msgid "no items to DISPLAY found" msgstr "" -#: cobc/typeck.c:7605 +#: cobc/typeck.c:7981 msgid "cannot specify figurative constant ZERO in AT clause" msgstr "" -#: cobc/typeck.c:7609 +#: cobc/typeck.c:7985 msgid "value in AT clause is not numeric" msgstr "" -#: cobc/typeck.c:7615 +#: cobc/typeck.c:7991 msgid "value in AT clause must have 4 or 6 digits" msgstr "" -#: cobc/typeck.c:7737 +#: cobc/typeck.c:8168 msgid "invalid PROMPT literal" msgstr "" -#: cobc/typeck.c:7742 +#: cobc/typeck.c:8173 msgid "invalid PROMPT identifier" msgstr "" -#: cobc/typeck.c:8032 +#: cobc/typeck.c:8465 #, c-format msgid "'%s' is not an input device" msgstr "" -#: cobc/typeck.c:8059 cobc/typeck.c:9242 +#: cobc/typeck.c:8492 cobc/typeck.c:9708 #, c-format msgid "'%s' is not defined in SPECIAL-NAMES" msgstr "" -#: cobc/typeck.c:8064 +#: cobc/typeck.c:8497 #, c-format msgid "invalid input device '%s'" msgstr "" -#: cobc/typeck.c:8069 cobc/typeck.c:9246 +#: cobc/typeck.c:8502 cobc/typeck.c:9712 #, c-format msgid "unknown device '%s'; it may exist in another dialect" msgstr "" -#: cobc/typeck.c:8072 cobc/typeck.c:9249 +#: cobc/typeck.c:8505 cobc/typeck.c:9715 #, c-format msgid "unknown device '%s'; not defined in SPECIAL-NAMES" msgstr "" -#: cobc/typeck.c:8088 +#: cobc/typeck.c:8524 msgid "target of RETURNING is not a data pointer" msgstr "" -#: cobc/typeck.c:8115 cobc/typeck.c:12634 cobc/typeck.c:12700 -#: cobc/typeck.c:12768 +#: cobc/typeck.c:8551 cobc/typeck.c:13410 cobc/typeck.c:13479 +#: cobc/typeck.c:13547 #, c-format msgid "cannot change address of '%s', which is not BASED or a LINKAGE item" msgstr "" -#: cobc/typeck.c:8121 +#: cobc/typeck.c:8557 msgid "target of ALLOCATE must have BASED clause" msgstr "" -#: cobc/typeck.c:8155 cobc/typeck.c:8571 +#: cobc/typeck.c:8591 cobc/typeck.c:9023 msgid "amount must be specified as a numeric expression" msgstr "" -#: cobc/typeck.c:8161 +#: cobc/typeck.c:8597 msgid "INITIALIZED TO item is not alphanumeric" msgstr "" -#: cobc/typeck.c:8232 +#: cobc/typeck.c:8667 msgid "only alphanumeric FUNCTION types are allowed here" msgstr "" -#: cobc/typeck.c:8240 +#: cobc/typeck.c:8675 msgid "invalid RETURNING field" msgstr "" -#: cobc/typeck.c:8259 +#: cobc/typeck.c:8694 msgid "STDCALL not available on this platform" msgstr "" -#: cobc/typeck.c:8263 +#: cobc/typeck.c:8698 msgid "STDCALL used on 64-bit Windows platform" msgstr "" -#: cobc/typeck.c:8268 +#: cobc/typeck.c:8703 msgid "STATIC CALL convention requires a literal program name" msgstr "" -#: cobc/typeck.c:8273 cobc/typeck.c:11975 cobc/typeck.c:12900 -#: cobc/typeck.c:13271 +#: cobc/typeck.c:8708 cobc/typeck.c:12746 cobc/typeck.c:13681 +#: cobc/typeck.c:14077 msgid "HANDLE must be either a generic or a THREAD HANDLE" msgstr "" -#: cobc/typeck.c:8291 +#: cobc/typeck.c:8726 msgid "numeric literal is negative" msgstr "" -#: cobc/typeck.c:8370 +#: cobc/typeck.c:8805 msgid "numeric literal exceeds size limits" msgstr "" -#: cobc/typeck.c:8385 +#: cobc/typeck.c:8820 #, c-format msgid "figurative constant %s invalid here" msgstr "" -#: cobc/typeck.c:8403 +#: cobc/typeck.c:8840 #, c-format msgid "'%s' is not a 01 or 77 level item" msgstr "" -#: cobc/typeck.c:8407 +#: cobc/typeck.c:8856 #, c-format msgid "'%s' ANY LENGTH item not passed BY REFERENCE" msgstr "" -#: cobc/typeck.c:8457 cobc/typeck.c:8462 +#: cobc/typeck.c:8909 cobc/typeck.c:8914 #, c-format msgid "wrong number of CALL parameters for '%s', %d given, %d expected" msgstr "" -#: cobc/typeck.c:8529 cobc/typeck.c:8603 cobc/typeck.c:8607 cobc/typeck.c:8637 -#: cobc/typeck.c:11932 cobc/typeck.c:12092 cobc/typeck.c:12281 -#: cobc/typeck.c:12285 cobc/typeck.c:13206 cobc/typeck.c:13539 -#: cobc/typeck.c:13542 +#: cobc/typeck.c:8981 cobc/typeck.c:9055 cobc/typeck.c:9059 cobc/typeck.c:9095 +#: cobc/typeck.c:12703 cobc/typeck.c:12863 cobc/typeck.c:13052 +#: cobc/typeck.c:13056 cobc/typeck.c:14012 cobc/typeck.c:14345 +#: cobc/typeck.c:14348 #, c-format msgid "%s not allowed on %s files" msgstr "" -#: cobc/typeck.c:8704 +#: cobc/typeck.c:9172 msgid "positions cannot be specified for main windows" msgstr "" -#: cobc/typeck.c:8714 cobc/typeck.c:8718 cobc/typeck.c:8740 +#: cobc/typeck.c:9183 cobc/typeck.c:9187 cobc/typeck.c:9211 msgid "HANDLE must be either a generic or a WINDOW HANDLE or X(10)" msgstr "" -#: cobc/typeck.c:8849 +#: cobc/typeck.c:9324 #, c-format msgid "'%s' is an invalid type for DISPLAY operand" msgstr "" -#: cobc/typeck.c:8854 +#: cobc/typeck.c:9329 msgid "invalid type for DISPLAY operand" msgstr "" -#: cobc/typeck.c:9202 cobc/typeck.c:9235 +#: cobc/typeck.c:9668 cobc/typeck.c:9701 #, c-format msgid "'%s' is not an output device" msgstr "" -#: cobc/typeck.c:9335 +#: cobc/typeck.c:9800 msgid "invalid use of 88 level in WHEN expression" msgstr "" -#: cobc/typeck.c:9396 +#: cobc/typeck.c:9861 msgid "wrong number of WHEN parameters" msgstr "" -#: cobc/typeck.c:9518 cobc/typeck.c:9530 +#: cobc/typeck.c:9983 cobc/typeck.c:9995 #, c-format msgid "target %d of FREE is not a BASED data item" msgstr "" -#: cobc/typeck.c:9536 +#: cobc/typeck.c:10001 #, c-format msgid "target %d of FREE must be a data pointer" msgstr "" -#: cobc/typeck.c:9550 +#: cobc/typeck.c:10015 msgid "GO TO without procedure-name" msgstr "" -#: cobc/typeck.c:9560 +#: cobc/typeck.c:10023 msgid "GO TO with multiple procedure-names" msgstr "" -#: cobc/typeck.c:9582 -msgid "GO TO ENTRY with multiple entry-names" -msgstr "" - -#: cobc/typeck.c:9646 +#: cobc/typeck.c:10088 msgid "invalid INITIALIZE statement" msgstr "" -#: cobc/typeck.c:9752 cobc/typeck.c:9755 +#: cobc/typeck.c:10193 cobc/typeck.c:10196 #, c-format msgid "%s operands differ in size" msgstr "" -#: cobc/typeck.c:9785 +#: cobc/typeck.c:10226 #, c-format msgid "unexpected clause %d" msgstr "" -#: cobc/typeck.c:9860 cobc/typeck.c:9871 cobc/typeck.c:9882 cobc/typeck.c:9893 +#: cobc/typeck.c:10301 cobc/typeck.c:10312 cobc/typeck.c:10323 +#: cobc/typeck.c:10334 #, c-format msgid "data name expected before %s" msgstr "" -#: cobc/typeck.c:9903 +#: cobc/typeck.c:10344 #, c-format msgid "ALL, LEADING or TRAILING expected before '%s'" msgstr "" -#: cobc/typeck.c:9913 +#: cobc/typeck.c:10354 msgid "operand has wrong size" msgstr "" -#: cobc/typeck.c:10007 +#: cobc/typeck.c:10448 #, c-format msgid "'%s' defined here as PIC %s" msgstr "" -#: cobc/typeck.c:10011 +#: cobc/typeck.c:10452 #, c-format msgid "'%s' defined here as a group of length %d" msgstr "" -#: cobc/typeck.c:10017 +#: cobc/typeck.c:10458 #, c-format msgid "internal register '%s' defined as USAGE %s" msgstr "" -#: cobc/typeck.c:10020 +#: cobc/typeck.c:10461 #, c-format msgid "'%s' defined here as USAGE %s" msgstr "" -#: cobc/typeck.c:10045 cobc/typeck.c:10063 +#: cobc/typeck.c:10486 cobc/typeck.c:10504 #, c-format msgid "value size is %d" msgstr "" -#: cobc/typeck.c:10059 +#: cobc/typeck.c:10500 #, c-format msgid "value is %s" msgstr "" -#: cobc/typeck.c:10338 -msgid "invalid destination for MOVE" -msgstr "" - -#: cobc/typeck.c:10380 +#: cobc/typeck.c:10824 msgid "MOVE of figurative constant SPACE to numeric item" msgstr "" -#: cobc/typeck.c:10395 +#: cobc/typeck.c:10839 msgid "MOVE of figurative constant QUOTE to numeric item" msgstr "" -#: cobc/typeck.c:10400 cobc/typeck.c:10411 +#: cobc/typeck.c:10844 cobc/typeck.c:10855 msgid "MOVE of figurative constant to numeric item" msgstr "" -#: cobc/typeck.c:10469 +#: cobc/typeck.c:10936 msgid "numeric literal in VALUE clause of numeric-edited item" msgstr "" -#: cobc/typeck.c:10494 +#: cobc/typeck.c:10966 msgid "numeric move to ALPHABETIC" msgstr "" -#: cobc/typeck.c:10506 +#: cobc/typeck.c:10978 msgid "data item not signed" msgstr "" -#: cobc/typeck.c:10509 +#: cobc/typeck.c:10981 msgid "ignoring sign" msgstr "" -#: cobc/typeck.c:10821 +#: cobc/typeck.c:11381 msgid "overlapping MOVE may occur and produce unpredictable results" msgstr "" -#: cobc/typeck.c:10828 +#: cobc/typeck.c:11388 msgid "overlapping MOVE may produce unpredictable results" msgstr "" -#: cobc/typeck.c:10961 +#: cobc/typeck.c:11593 msgid "invalid source for MOVE" msgstr "" -#: cobc/typeck.c:10982 +#: cobc/typeck.c:11614 msgid "source is non-numeric - substituting zero" msgstr "" -#: cobc/typeck.c:10988 cobc/typeck.c:10999 +#: cobc/typeck.c:11620 cobc/typeck.c:11631 msgid "invalid VALUE clause" msgstr "" -#: cobc/typeck.c:10991 cobc/typeck.c:12841 cobc/typeck.c:12846 -#: cobc/typeck.c:12873 cobc/typeck.c:12878 +#: cobc/typeck.c:11623 cobc/typeck.c:13622 cobc/typeck.c:13627 +#: cobc/typeck.c:13654 cobc/typeck.c:13659 msgid "invalid SET statement" msgstr "" -#: cobc/typeck.c:10993 +#: cobc/typeck.c:11625 msgid "invalid MOVE statement" msgstr "" -#: cobc/typeck.c:11000 +#: cobc/typeck.c:11632 msgid "literal exceeds data size" msgstr "" -#: cobc/typeck.c:11004 +#: cobc/typeck.c:11636 msgid "numeric literal exceeds data size" msgstr "" -#: cobc/typeck.c:11013 +#: cobc/typeck.c:11645 msgid "MOVE of non-integer to alphanumeric" msgstr "" -#: cobc/typeck.c:11029 +#: cobc/typeck.c:11666 cobc/typeck.c:11671 +msgid "national value is expected" +msgstr "" + +#: cobc/typeck.c:11676 msgid "value does not fit the picture string" msgstr "" -#: cobc/typeck.c:11035 +#: cobc/typeck.c:11682 msgid "value size exceeds data size" msgstr "" -#: cobc/typeck.c:11040 +#: cobc/typeck.c:11687 msgid "sending field larger than receiving field" msgstr "" -#: cobc/typeck.c:11045 +#: cobc/typeck.c:11692 msgid "some digits may be truncated" msgstr "" -#: cobc/typeck.c:11798 cobc/typeck.c:11848 +#: cobc/typeck.c:12566 cobc/typeck.c:12619 #, c-format msgid "invalid MOVE target: %s" msgstr "" -#: cobc/typeck.c:12105 +#: cobc/typeck.c:12876 msgid "READ PREVIOUS not allowed for this file type" msgstr "" -#: cobc/typeck.c:12113 +#: cobc/typeck.c:12884 msgid "KEY ignored with sequential READ" msgstr "" -#: cobc/typeck.c:12209 +#: cobc/typeck.c:12980 msgid "figurative constants not allowed in FROM clause" msgstr "" -#: cobc/typeck.c:12216 -msgid "literal in FROM clause must be alphanumeric, national or boolean" +#: cobc/typeck.c:12987 +msgid "literal in FROM clause must be alphanumeric, utf-8, national or boolean" msgstr "" -#: cobc/typeck.c:12239 cobc/typeck.c:13499 +#: cobc/typeck.c:13010 cobc/typeck.c:14305 #, c-format msgid "%s FILE requires a FROM clause" msgstr "" -#: cobc/typeck.c:12261 cobc/typeck.c:12345 cobc/typeck.c:13521 +#: cobc/typeck.c:13032 cobc/typeck.c:13116 cobc/typeck.c:14327 #, c-format msgid "%s subject does not refer to a record name" msgstr "" -#: cobc/typeck.c:12351 +#: cobc/typeck.c:13122 msgid "RELEASE not allowed on this record item" msgstr "" -#: cobc/typeck.c:12433 cobc/typeck.c:12454 cobc/typeck.c:12461 +#: cobc/typeck.c:13183 cobc/typeck.c:13209 cobc/typeck.c:13237 msgid "invalid SEARCH ALL condition" msgstr "" -#: cobc/typeck.c:12578 cobc/typeck.c:12585 +#: cobc/typeck.c:13231 +msgid "SEARCH ALL requires comparision of KEY field" +msgstr "" + +#: cobc/typeck.c:13354 cobc/typeck.c:13361 msgid "SET targets must be PROGRAM-POINTER" msgstr "" -#: cobc/typeck.c:12610 +#: cobc/typeck.c:13386 #, c-format msgid "SET target '%s' is not numeric, an INDEX or a POINTER" msgstr "" -#: cobc/typeck.c:12627 cobc/typeck.c:12696 cobc/typeck.c:12764 +#: cobc/typeck.c:13403 cobc/typeck.c:13475 cobc/typeck.c:13543 #, c-format msgid "cannot change address of '%s', which is not level 1 or 77" msgstr "" -#: cobc/typeck.c:12721 +#: cobc/typeck.c:13500 #, c-format msgid "SET target '%s' is not a POINTER for FCD" msgstr "" -#: cobc/typeck.c:12789 +#: cobc/typeck.c:13569 #, c-format msgid "SET target '%s' is not a POINTER for FCD-KEYDEF" msgstr "" -#: cobc/typeck.c:12882 +#: cobc/typeck.c:13663 msgid "field does not have a FALSE clause" msgstr "" -#: cobc/typeck.c:12913 +#: cobc/typeck.c:13694 msgid "THREAD-priority must be between 1 and 32767" msgstr "" -#: cobc/typeck.c:12933 +#: cobc/typeck.c:13714 msgid "SET ATTRIBUTE requires a screen item as subject" msgstr "" -#: cobc/typeck.c:12939 +#: cobc/typeck.c:13720 msgid "SET ATTRIBUTE subject does not refer to a screen item" msgstr "" -#: cobc/typeck.c:12990 -msgid "invalid SORT filename" -msgstr "" - -#: cobc/typeck.c:13051 -msgid "invalid SORT USING parameter" -msgstr "" - -#: cobc/typeck.c:13080 -msgid "invalid SORT GIVING parameter" +#: cobc/typeck.c:13835 cobc/typeck.c:13875 +#, c-format +msgid "invalid %s parameter" msgstr "" -#: cobc/typeck.c:13134 cobc/typeck.c:13161 cobc/typeck.c:13181 +#: cobc/typeck.c:13940 cobc/typeck.c:13967 cobc/typeck.c:13987 msgid "invalid key item" msgstr "" -#: cobc/typeck.c:13211 +#: cobc/typeck.c:14017 msgid "LENGTH/SIZE clause only allowed on INDEXED files" msgstr "" -#: cobc/typeck.c:13216 +#: cobc/typeck.c:14022 msgid "START not allowed with ACCESS MODE RANDOM" msgstr "" -#: cobc/typeck.c:13305 -#, c-format -msgid "%s item '%s' must be numeric and an integer" -msgstr "" - -#: cobc/typeck.c:13311 +#: cobc/typeck.c:14111 cobc/typeck.c:14117 #, c-format msgid "%s item '%s' must be an integer" msgstr "" -#: cobc/typeck.c:13315 +#: cobc/typeck.c:14121 #, c-format msgid "%s item '%s' may not have PICTURE with P in it" msgstr "" -#: cobc/typeck.c:13331 +#: cobc/typeck.c:14137 #, c-format msgid "'%s' is not an elementary item" msgstr "" -#: cobc/typeck.c:13407 +#: cobc/typeck.c:14213 msgid "STRING items must be all NATIONAL or none" msgstr "" -#: cobc/typeck.c:13555 +#: cobc/typeck.c:14361 msgid "LOCK clause invalid here" msgstr "" -#: cobc/typeck.c:13800 +#: cobc/typeck.c:14606 msgid "data item is not part of a report" msgstr "" -#: cobc/typeck.c:13820 +#: cobc/typeck.c:14626 msgid "improper use of SUPPRESS PRINTING" msgstr "" -#: cobc/typeck.c:13835 +#: cobc/typeck.c:14642 #, c-format msgid "%s must be alphanumeric or national" msgstr "" -#: cobc/typeck.c:13846 +#: cobc/typeck.c:14652 #, c-format msgid "%s may not be a figurative constant" msgstr "" -#: cobc/typeck.c:13885 +#: cobc/typeck.c:14690 #, c-format msgid "%s must be a child of the input record" msgstr "" -#: cobc/typeck.c:13911 +#: cobc/typeck.c:14715 #, c-format msgid "%s may not be an ignored item in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:13922 +#: cobc/typeck.c:14725 #, c-format msgid "%s must be elementary" msgstr "" -#: cobc/typeck.c:13935 +#: cobc/typeck.c:14737 #, c-format msgid "STRING item '%s' must be USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/typeck.c:13947 +#: cobc/typeck.c:14749 #, c-format msgid "%s must be USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/typeck.c:13961 +#: cobc/typeck.c:14761 #, c-format msgid "%s must be an integer" msgstr "" -#: cobc/typeck.c:13977 cobc/typeck.c:13983 +#: cobc/typeck.c:14776 cobc/typeck.c:14782 msgid "JSON/XML GENERATE receiving item" msgstr "" -#: cobc/typeck.c:13980 +#: cobc/typeck.c:14779 msgid "JSON/XML GENERATE receiving item may not have JUSTIFIED clause" msgstr "" -#: cobc/typeck.c:14068 +#: cobc/typeck.c:14867 msgid "JSON/XML GENERATE input record may not be reference modified" msgstr "" -#: cobc/typeck.c:14074 +#: cobc/typeck.c:14873 msgid "JSON/XML GENERATE input record may not have RENAMES clause" msgstr "" -#: cobc/typeck.c:14079 +#: cobc/typeck.c:14878 #, c-format msgid "all the children of '%s' are ignored in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14086 +#: cobc/typeck.c:14885 msgid "JSON/XML GENERATE input record has subrecords with non-unique names" msgstr "" -#: cobc/typeck.c:14091 +#: cobc/typeck.c:14890 msgid "floating-point items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14095 +#: cobc/typeck.c:14894 msgid "OCCURS items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14142 +#: cobc/typeck.c:14941 msgid "NAMESPACE must be a valid URI" msgstr "" -#: cobc/typeck.c:14186 +#: cobc/typeck.c:14985 msgid "NAMESPACE-PREFIX must be a valid XML name" msgstr "" -#: cobc/typeck.c:14215 cobc/typeck.c:14223 +#: cobc/typeck.c:15014 cobc/typeck.c:15022 msgid "NAME OF item" msgstr "" -#: cobc/typeck.c:14220 +#: cobc/typeck.c:15019 msgid "NAME OF item must be the input record or a child of it" msgstr "" -#: cobc/typeck.c:14230 +#: cobc/typeck.c:15029 msgid "NAME OF ... OMITTED only valid for source identifier" msgstr "" -#: cobc/typeck.c:14238 +#: cobc/typeck.c:15037 #, c-format msgid "NAME OF literal must be a valid %s identifier" msgstr "" -#: cobc/typeck.c:14265 cobc/typeck.c:14266 cobc/typeck.c:14269 -#: cobc/typeck.c:14273 +#: cobc/typeck.c:15062 cobc/typeck.c:15063 cobc/typeck.c:15066 +#: cobc/typeck.c:15070 msgid "TYPE OF item" msgstr "" -#: cobc/typeck.c:14291 +#: cobc/typeck.c:15088 msgid "SUPPRESS WHEN SPACE item" msgstr "" -#: cobc/typeck.c:14294 +#: cobc/typeck.c:15091 msgid "SUPPRESS WHEN LOW-VALUE item" msgstr "" -#: cobc/typeck.c:14296 +#: cobc/typeck.c:15093 msgid "SUPPRESS WHEN HIGH-VALUE item" msgstr "" -#: cobc/typeck.c:14325 cobc/typeck.c:14333 cobc/typeck.c:14337 +#: cobc/typeck.c:15122 cobc/typeck.c:15130 cobc/typeck.c:15134 msgid "SUPPRESS item" msgstr "" -#: cobc/typeck.c:14329 +#: cobc/typeck.c:15126 msgid "SUPPRESS item with WHEN clause" msgstr "" -#: cobc/typeck.c:14407 +#: cobc/typeck.c:15204 msgid "WITH ATTRIBUTES specified, but no attributes can be generated" msgstr "" @@ -6029,185 +6142,201 @@ msgid "" msgstr "" #: cobc/warning.def:70 -msgid " -Wstrict-typing warn strictly about type mismatch" +msgid "" +" -Wstrict-typing warn strictly about type mismatch, even when same " +"size" msgstr "" #: cobc/warning.def:73 -msgid " -Wimplicit-define warn whenever data items are implicitly defined" +msgid " -Wtyping warn about type mismatch" msgstr "" #: cobc/warning.def:76 +msgid " -Wimplicit-define warn whenever data items are implicitly defined" +msgstr "" + +#: cobc/warning.def:79 msgid "" " -Wno-corresponding do not warn about CORRESPONDING with no matching " "items" msgstr "" -#: cobc/warning.def:79 +#: cobc/warning.def:82 msgid " -Winitial-value warn if initial VALUE clause is ignored" msgstr "" -#: cobc/warning.def:82 +#: cobc/warning.def:85 msgid "" " -Wprototypes warn about missing FUNCTION prototypes/definitions" msgstr "" -#: cobc/warning.def:85 +#: cobc/warning.def:88 msgid "" " -Warithmetic-osvs warn if arithmetic expression precision has changed" msgstr "" -#: cobc/warning.def:88 +#: cobc/warning.def:91 msgid " -Wcall-params warn about non 01/77 items for CALL parameters" msgstr "" -#: cobc/warning.def:91 +#: cobc/warning.def:94 msgid "" " -Wconstant-expression warn about expressions that always resolve to true/" "false" msgstr "" -#: cobc/warning.def:94 +#: cobc/warning.def:97 msgid "" " -Wconstant-numlit-expression\twarn about numeric expressions that always " "resolve to true/false" msgstr "" -#: cobc/warning.def:97 +#: cobc/warning.def:100 msgid "" " -Wlarger-01-redefines warn about larger redefines allowed by COBOL " "standards" msgstr "" -#: cobc/warning.def:100 +#: cobc/warning.def:103 msgid "" " -Wcolumn-overflow warn about text after program-text area, FIXED format" msgstr "" -#: cobc/warning.def:103 +#: cobc/warning.def:106 msgid " -Wterminator warn about lack of scope terminator END-XXX" msgstr "" -#: cobc/warning.def:106 +#: cobc/warning.def:109 msgid " -Wlinkage warn about dangling LINKAGE items" msgstr "" -#: cobc/warning.def:109 +#: cobc/warning.def:112 msgid " -Wunreachable warn about likely unreachable statements" msgstr "" -#: cobc/warning.def:112 +#: cobc/warning.def:115 msgid " -Wno-dialect do not warn about dialect specific issues" msgstr "" -#: cobc/warning.def:115 +#: cobc/warning.def:118 msgid " -Wno-goto-section do not warn about GO TO section-name" msgstr "" -#: cobc/warning.def:118 +#: cobc/warning.def:121 msgid "" " -Wgoto-different-section\twarn about GO TO a praragraph defined in a " "different section" msgstr "" -#: cobc/warning.def:121 +#: cobc/warning.def:124 msgid "" " -Wsuspicious-perform-thru\twarn if PERFORM THRU references procedures not " "in ascending order or multiple sections" msgstr "" -#: cobc/warning.def:124 +#: cobc/warning.def:127 msgid " -Wdangling-text warn about source text after program-area" msgstr "" -#: cobc/warning.def:127 +#: cobc/warning.def:130 msgid " -Wno-missing-newline do not warn about missing newlines" msgstr "" -#: cobc/warning.def:130 +#: cobc/warning.def:133 msgid " -Wno-others do not warn about different issues" msgstr "" -#: cobc/warning.def:133 +#: cobc/warning.def:136 msgid "" " -Wno-unsupported do not warn if runtime does not support a feature " "used" msgstr "" -#: libcob/call.c:94 +#: libcob/call.c:98 #, c-format msgid "LoadLibrary/GetProcAddress error %d" msgstr "" -#: libcob/call.c:841 +#: libcob/call.c:626 +#, c-format +msgid "preloading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:817 #, c-format msgid "%s: PROGRAM name exceeds %d characters" msgstr "" -#: libcob/call.c:842 +#: libcob/call.c:818 #, c-format msgid "%s: FUNCTION name exceeds %d characters" msgstr "" -#: libcob/call.c:1067 +#: libcob/call.c:945 libcob/call.c:978 +#, c-format +msgid "loading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:1049 msgid "indeterminable error in resolve of COBOL CALL" msgstr "" -#: libcob/call.c:1149 +#: libcob/call.c:1145 #, c-format msgid "user-defined FUNCTION '%s' not found" msgstr "" -#: libcob/call.c:1239 libcob/call.c:1325 libcob/call.c:1445 libcob/call.c:1472 +#: libcob/call.c:1247 libcob/call.c:1328 libcob/call.c:1448 libcob/call.c:1475 #, c-format msgid "NULL parameter passed to '%s'" msgstr "" -#: libcob/call.c:1329 +#: libcob/call.c:1332 #, c-format msgid "invalid number of arguments passed to '%s'" msgstr "" -#: libcob/call.c:1449 +#: libcob/call.c:1452 msgid "multiple call to 'cob_setjmp'" msgstr "" -#: libcob/call.c:1476 +#: libcob/call.c:1479 msgid "call to 'cob_longjmp' with no prior 'cob_setjmp'" msgstr "" -#: libcob/call.c:1703 libcob/call.c:1730 libcob/common.c:8144 +#: libcob/call.c:1608 +#, c-format +msgid "preloading of '%s' failed" +msgstr "" + +#: libcob/call.c:1706 libcob/call.c:1733 libcob/common.c:8965 msgid "cob_init() has not been called" msgstr "" -#: libcob/call.c:1709 +#: libcob/call.c:1712 #, c-format msgid "parameter %d is not within range of %d" msgstr "" -#: libcob/call.c:1715 +#: libcob/call.c:1718 #, c-format msgid "parameter %d is NULL" msgstr "" -#: libcob/call.c:2042 +#: libcob/call.c:2045 msgid "NULL field" msgstr "" -#: libcob/call.c:2050 +#: libcob/call.c:2053 msgid "field not allocated" msgstr "" -#: libcob/call.c:2116 +#: libcob/call.c:2119 #, c-format msgid "attempt to over-write constant field with '%s'" msgstr "" -#: libcob/call.c:2156 libcob/call.c:2212 -#, c-format -msgid "attempt to over-write constant parameter %d with " -msgstr "" - -#: libcob/call.c:2263 +#: libcob/call.c:2161 libcob/call.c:2219 libcob/call.c:2270 #, c-format msgid "attempt to over-write constant parameter %d with '%s'" msgstr "" @@ -6247,656 +6376,679 @@ msgstr "" msgid "%s: option requires an argument -- '%c'" msgstr "" -#: libcob/common.c:1242 +#: libcob/common.c:1074 +#, c-format +msgid "requested coredump creation failed with status %d" +msgstr "" + +#: libcob/common.c:1303 msgid "fatal arithmetic error" msgstr "" -#: libcob/common.c:1245 +#: libcob/common.c:1306 msgid "interrupt from keyboard" msgstr "" -#: libcob/common.c:1249 +#: libcob/common.c:1310 msgid "hangup" msgstr "" -#: libcob/common.c:1253 +#: libcob/common.c:1314 msgid "quit" msgstr "" -#: libcob/common.c:1257 +#: libcob/common.c:1318 msgid "termination" msgstr "" -#: libcob/common.c:1261 +#: libcob/common.c:1322 msgid "emt termination" msgstr "" -#: libcob/common.c:1265 +#: libcob/common.c:1326 msgid "broken pipe" msgstr "" -#: libcob/common.c:1269 +#: libcob/common.c:1330 msgid "I/O signal" msgstr "" -#: libcob/common.c:1273 +#: libcob/common.c:1334 msgid "attempt to reference invalid memory address" msgstr "" -#: libcob/common.c:1277 +#: libcob/common.c:1338 msgid "bus error" msgstr "" -#: libcob/common.c:1281 +#: libcob/common.c:1342 msgid "illegal instruction" msgstr "" -#: libcob/common.c:1285 +#: libcob/common.c:1346 msgid "abort" msgstr "" -#: libcob/common.c:1289 +#: libcob/common.c:1350 msgid "process killed" msgstr "" -#: libcob/common.c:1293 +#: libcob/common.c:1354 msgid "alarm signal" msgstr "" -#: libcob/common.c:1297 +#: libcob/common.c:1358 msgid "stop process" msgstr "" -#: libcob/common.c:1301 libcob/common.c:1305 +#: libcob/common.c:1362 libcob/common.c:1366 msgid "child process stopped" msgstr "" #. TRANSLATORS: This msgid is used for an OS signal like SIGABRT. -#: libcob/common.c:1312 +#: libcob/common.c:1373 msgid "signal" msgstr "" #. TRANSLATORS: This msgid is shown for a requested but not complete stack trace. -#: libcob/common.c:1314 +#: libcob/common.c:1375 msgid "(more COBOL runtime elements follow...)" msgstr "" -#: libcob/common.c:1316 libcob/common.c:8101 +#: libcob/common.c:1377 libcob/common.c:8922 #, c-format msgid "abnormal termination - file contents may be incorrect" msgstr "" -#: libcob/common.c:3145 libcob/common.c:8581 libcob/common.c:8595 +#: libcob/common.c:3441 libcob/common.c:9398 libcob/common.c:9412 msgid "version mismatch" msgstr "" -#: libcob/common.c:3146 libcob/common.c:3148 libcob/common.c:8582 -#: libcob/common.c:8584 +#: libcob/common.c:3442 libcob/common.c:3444 libcob/common.c:9399 +#: libcob/common.c:9401 #, c-format msgid "%s has version %s.%d" msgstr "" -#: libcob/common.c:3158 +#: libcob/common.c:3454 #, c-format msgid "CALL to %s requires %d arguments" msgstr "" -#: libcob/common.c:3779 +#: libcob/common.c:4141 #, c-format msgid "code execution leaving %s" msgstr "" -#: libcob/common.c:3789 +#: libcob/common.c:4151 #, c-format msgid "BASED/LINKAGE item %s has NULL address" msgstr "" -#: libcob/common.c:3802 libcob/common.c:3806 +#: libcob/common.c:4168 +#, c-format +msgid "memory violation detected for '%s' after %s" +msgstr "" + +#: libcob/common.c:4171 +#, c-format +msgid "memory violation detected after %s" +msgstr "" + +#: libcob/common.c:4229 libcob/common.c:4244 libcob/common.c:4283 +#: libcob/common.c:4287 #, c-format msgid "LINKAGE item %s not passed by caller" msgstr "" -#: libcob/common.c:3892 +#: libcob/common.c:4253 +#, c-format +msgid "LINKAGE item %s (size %lu) too small in the caller (size %lu)" +msgstr "" + +#: libcob/common.c:4378 #, c-format msgid "'%s' (Type: %s) not numeric: '%s'" msgstr "" -#: libcob/common.c:3917 +#: libcob/common.c:4403 #, c-format msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgstr "" -#: libcob/common.c:3920 libcob/common.c:3958 +#: libcob/common.c:4406 libcob/common.c:4444 #, c-format msgid "maximum subscript for '%s': %d" msgstr "" -#: libcob/common.c:3922 +#: libcob/common.c:4408 #, c-format msgid "minimum subscript for '%s': %d" msgstr "" -#: libcob/common.c:3955 +#: libcob/common.c:4441 #, c-format msgid "current maximum subscript for '%s': %d" msgstr "" -#: libcob/common.c:3979 +#: libcob/common.c:4465 #, c-format msgid "offset of '%s' out of bounds: %d, maximum: %d" msgstr "" -#: libcob/common.c:3994 +#: libcob/common.c:4480 #, c-format msgid "length of '%s' out of bounds: %d, maximum: %d" msgstr "" -#: libcob/common.c:4005 +#: libcob/common.c:4491 #, c-format msgid "length of '%s' out of bounds: %d, starting at: %d, maximum: %d" msgstr "" -#: libcob/common.c:4093 libcob/common.c:4098 +#: libcob/common.c:4579 libcob/common.c:4584 #, c-format msgid "" "EXTERNAL item '%s' previously allocated with size %d, requested size is %d" msgstr "" -#: libcob/common.c:4593 +#: libcob/common.c:4961 libcob/common.c:5201 #, c-format msgid "COB_CURRENT_DATE '%s' is invalid" msgstr "" -#: libcob/common.c:5641 libcob/common.c:5644 +#: libcob/common.c:6321 libcob/common.c:6324 msgid "Program abandoned at user request" msgstr "" -#: libcob/common.c:5668 +#: libcob/common.c:6348 #, c-format msgid "parameter to SYSTEM call is larger than %d characters" msgstr "" -#: libcob/common.c:6202 +#: libcob/common.c:6998 #, c-format msgid "error '%s' during CBL_GC_FORK" msgstr "" -#: libcob/common.c:6207 libcob/common.c:6304 +#: libcob/common.c:7003 libcob/common.c:7100 #, c-format msgid "'%s' is not supported on this platform" msgstr "" -#: libcob/common.c:6233 +#: libcob/common.c:7029 #, c-format msgid "error '%s' for P%d during CBL_GC_WAITPID" msgstr "" -#: libcob/common.c:6424 -msgid "Call to CBL_GC_GETOPT with wrong longoption size." +#: libcob/common.c:7220 +msgid "call to CBL_GC_GETOPT with wrong longoption size" msgstr "" -#: libcob/common.c:6429 -msgid "Call to CBL_GC_GETOPT with missing longind." +#: libcob/common.c:7225 +msgid "call to CBL_GC_GETOPT with missing longind" msgstr "" -#: libcob/common.c:6856 libcob/common.c:6877 libcob/common.c:6890 -#: libcob/common.c:9107 libcob/common.c:9111 +#: libcob/common.c:7654 libcob/common.c:7675 libcob/common.c:7688 +#: libcob/common.c:9924 libcob/common.c:9928 #, c-format msgid "(default)" msgstr "" -#: libcob/common.c:7143 libcob/common.c:7162 +#: libcob/common.c:7973 libcob/common.c:7992 msgid "should be unsigned" msgstr "" -#: libcob/common.c:7151 libcob/common.c:7200 +#: libcob/common.c:7981 libcob/common.c:8030 msgid "should be numeric" msgstr "" -#: libcob/common.c:7209 +#: libcob/common.c:8039 #, c-format msgid "minimum value: %lu" msgstr "" -#: libcob/common.c:7261 libcob/common.c:7825 libcob/common.c:7839 +#: libcob/common.c:8069 libcob/common.c:8640 libcob/common.c:8654 +#: bin/cobcrun.c:206 #, c-format msgid "should not contain '%c'" msgstr "" -#: libcob/common.c:7342 libcob/common.c:7390 libcob/common.c:7418 -#: libcob/common.c:7427 libcob/common.c:7435 libcob/common.c:7460 +#: libcob/common.c:8150 libcob/common.c:8169 libcob/common.c:8231 +#: libcob/common.c:8240 libcob/common.c:8248 libcob/common.c:8273 #, c-format msgid "not set" msgstr "" -#: libcob/common.c:7410 libcob/common.c:7413 libcob/common.c:7416 +#: libcob/common.c:8223 libcob/common.c:8226 libcob/common.c:8229 #, c-format msgid "set by %s" msgstr "" -#: libcob/common.c:7552 +#: libcob/common.c:8367 #, c-format msgid "WARNING - '%s' without a value - ignored!" msgstr "" -#: libcob/common.c:7555 +#: libcob/common.c:8370 #, c-format msgid "'%s' without a value!" msgstr "" -#: libcob/common.c:7582 +#: libcob/common.c:8397 #, c-format msgid "WARNING - '%s %s' without a value - ignored!" msgstr "" -#: libcob/common.c:8085 +#: libcob/common.c:8906 msgid "error" msgstr "" -#: libcob/common.c:8127 +#: libcob/common.c:8948 msgid "attempt to CANCEL active program" msgstr "" -#: libcob/common.c:8154 +#: libcob/common.c:8975 msgid "CALL of program with CHAINING clause" msgstr "" -#: libcob/common.c:8158 +#: libcob/common.c:8979 msgid "stack overflow, possible PERFORM depth exceeded" msgstr "" -#: libcob/common.c:8163 +#: libcob/common.c:8984 msgid "invalid entry/exit in GLOBAL USE procedure" msgstr "" -#: libcob/common.c:8167 +#: libcob/common.c:8988 msgid "unable to allocate memory" msgstr "" -#: libcob/common.c:8172 +#: libcob/common.c:8993 msgid "invalid entry into module" msgstr "" -#: libcob/common.c:8179 +#: libcob/common.c:9000 #, c-format msgid "recursive CALL from '%s' to '%s' which is NOT RECURSIVE" msgstr "" -#: libcob/common.c:8184 +#: libcob/common.c:9005 #, c-format msgid "invalid recursive COBOL CALL to '%s'" msgstr "" -#: libcob/common.c:8199 +#: libcob/common.c:9020 msgid "end of file" msgstr "" -#: libcob/common.c:8202 +#: libcob/common.c:9023 msgid "key out of range" msgstr "" -#: libcob/common.c:8205 +#: libcob/common.c:9026 msgid "key order not ascending" msgstr "" -#: libcob/common.c:8208 +#: libcob/common.c:9029 msgid "record key already exists" msgstr "" -#: libcob/common.c:8211 +#: libcob/common.c:9032 msgid "record key does not exist" msgstr "" -#: libcob/common.c:8214 +#: libcob/common.c:9035 msgid "permanent file error" msgstr "" -#: libcob/common.c:8217 +#: libcob/common.c:9038 msgid "inconsistent file name" msgstr "" -#: libcob/common.c:8220 +#: libcob/common.c:9041 msgid "file does not exist" msgstr "" -#: libcob/common.c:8223 +#: libcob/common.c:9044 msgid "permission denied" msgstr "" -#: libcob/common.c:8226 +#: libcob/common.c:9047 msgid "mismatch of fixed file attributes" msgstr "" -#: libcob/common.c:8229 +#: libcob/common.c:9050 msgid "file already open" msgstr "" -#: libcob/common.c:8232 +#: libcob/common.c:9053 msgid "file not open" msgstr "" -#: libcob/common.c:8235 +#: libcob/common.c:9056 msgid "READ must be executed first" msgstr "" -#: libcob/common.c:8238 +#: libcob/common.c:9059 msgid "record overflow" msgstr "" -#: libcob/common.c:8241 +#: libcob/common.c:9062 msgid "READ after unsuccessful READ/START" msgstr "" -#: libcob/common.c:8244 +#: libcob/common.c:9065 msgid "READ/START not allowed, file not open for input" msgstr "" -#: libcob/common.c:8247 +#: libcob/common.c:9068 msgid "WRITE not allowed, file not open for output" msgstr "" -#: libcob/common.c:8250 +#: libcob/common.c:9071 msgid "DELETE/REWRITE not allowed, file not open for I-O" msgstr "" -#: libcob/common.c:8253 +#: libcob/common.c:9074 msgid "record locked by another file connector" msgstr "" -#: libcob/common.c:8256 +#: libcob/common.c:9077 msgid "LINAGE values invalid" msgstr "" -#: libcob/common.c:8259 +#: libcob/common.c:9080 msgid "file sharing conflict" msgstr "" -#: libcob/common.c:8262 +#: libcob/common.c:9083 msgid "invalid data in LINE SEQUENTIAL file" msgstr "" -#: libcob/common.c:8266 +#: libcob/common.c:9087 msgid "runtime library is not configured for this operation" msgstr "" -#: libcob/common.c:8271 +#: libcob/common.c:9092 msgid "unknown file error" msgstr "" -#: libcob/common.c:8278 +#: libcob/common.c:9099 #, c-format msgid "%s (status = %02d) for file %s" msgstr "" -#: libcob/common.c:8281 +#: libcob/common.c:9102 #, c-format msgid "%s (status = %02d) for file %s on %s" msgstr "" -#: libcob/common.c:8288 +#: libcob/common.c:9109 msgid "attempt to use non-implemented function" msgstr "" -#: libcob/common.c:8291 +#: libcob/common.c:9112 msgid "attempt to use non-implemented XML I/O" msgstr "" -#: libcob/common.c:8294 +#: libcob/common.c:9115 msgid "attempt to use non-implemented JSON I/O" msgstr "" -#: libcob/common.c:8341 +#: libcob/common.c:9162 msgid "environment variables" msgstr "" -#: libcob/common.c:8466 libcob/common.c:8539 libcob/common.c:8554 -#: libcob/common.c:8859 libcob/common.c:8893 libcob/common.c:8910 -#: libcob/common.c:8925 +#: libcob/common.c:9283 libcob/common.c:9356 libcob/common.c:9371 +#: libcob/common.c:9676 libcob/common.c:9710 libcob/common.c:9727 +#: libcob/common.c:9742 #, c-format msgid "%s, version %d.%d.%d" msgstr "" -#: libcob/common.c:8468 libcob/common.c:8541 libcob/common.c:8558 -#: libcob/common.c:8862 libcob/common.c:8913 libcob/common.c:8928 +#: libcob/common.c:9285 libcob/common.c:9358 libcob/common.c:9375 +#: libcob/common.c:9679 libcob/common.c:9730 libcob/common.c:9745 #, c-format msgid "%s, version %d.%d.%d (compiled with %d.%d)" msgstr "" -#: libcob/common.c:8471 +#: libcob/common.c:9288 #, c-format msgid "%s, version %s" msgstr "" -#: libcob/common.c:8739 +#: libcob/common.c:9556 #, c-format msgid "License LGPLv3+: GNU LGPL version 3 or later <%s>" msgstr "" -#: libcob/common.c:8803 libcob/common.c:8805 +#: libcob/common.c:9620 libcob/common.c:9622 msgid "dynamic loading" msgstr "" -#: libcob/common.c:8938 +#: libcob/common.c:9755 msgid "mouse support" msgstr "" -#: libcob/common.c:8955 +#: libcob/common.c:9772 msgid "CALL configuration" msgstr "" -#: libcob/common.c:8956 +#: libcob/common.c:9773 msgid "File I/O configuration" msgstr "" -#: libcob/common.c:8957 +#: libcob/common.c:9774 msgid "Screen I/O configuration" msgstr "" -#: libcob/common.c:8958 +#: libcob/common.c:9775 msgid "Miscellaneous" msgstr "" -#: libcob/common.c:8959 +#: libcob/common.c:9776 msgid "System configuration" msgstr "" -#: libcob/common.c:8963 +#: libcob/common.c:9780 msgid "runtime configuration" msgstr "" -#: libcob/common.c:8965 +#: libcob/common.c:9782 msgid "via" msgstr "" -#: libcob/common.c:9040 libcob/common.c:9068 +#: libcob/common.c:9857 libcob/common.c:9885 msgid "... removed from environment" msgstr "" -#: libcob/common.c:9094 libcob/common.c:9096 +#: libcob/common.c:9911 libcob/common.c:9913 #, c-format msgid "(set by %s)" msgstr "" -#: libcob/common.c:9104 +#: libcob/common.c:9921 #, c-format msgid "(reset)" msgstr "" -#: libcob/common.c:9334 +#: libcob/common.c:10151 msgid "compiler was not built with --enable-debug-log; COB_DEBUG_LOG ignored" msgstr "" -#: libcob/common.c:9524 libcob/common.c:9550 +#: libcob/common.c:10338 libcob/common.c:10364 #, c-format msgid "%s called with unknown option: %d" msgstr "" #. TRANSLATORS: This msgid is shown for a requested but empty stack trace. -#: libcob/common.c:9597 +#: libcob/common.c:10411 msgid "No COBOL runtime elements on stack." msgstr "" -#: libcob/common.c:9915 +#: libcob/common.c:10734 #, c-format msgid "Module dump due to %s" msgstr "" -#: libcob/common.c:9943 +#: libcob/common.c:10762 #, c-format msgid "Dump Program-Id %s from %s compiled %s" msgstr "" -#: libcob/common.c:9969 +#: libcob/common.c:10788 #, c-format msgid "dump written to %s" msgstr "" -#: libcob/fileio.c:816 libcob/fileio.c:1628 libcob/fileio.c:1882 -#: libcob/fileio.c:3812 libcob/fileio.c:4396 libcob/fileio.c:9658 -#: libcob/fileio.c:9686 libcob/numeric.c:1583 +#: libcob/fileio.c:784 libcob/fileio.c:1664 libcob/fileio.c:1926 +#: libcob/fileio.c:3938 libcob/fileio.c:4522 libcob/fileio.c:10049 +#: libcob/fileio.c:10077 libcob/numeric.c:1915 #, c-format msgid "invalid internal call of %s" msgstr "" -#: libcob/fileio.c:3359 +#: libcob/fileio.c:3486 #, c-format msgid "BDB error: %s" msgstr "" -#: libcob/fileio.c:3369 +#: libcob/fileio.c:3496 #, c-format msgid "BDB error: %s %s" msgstr "" -#: libcob/fileio.c:3383 libcob/fileio.c:3403 +#: libcob/fileio.c:3510 libcob/fileio.c:3530 #, c-format msgid "cannot join BDB environment (%s), error: %d %s" msgstr "" -#: libcob/fileio.c:3458 libcob/fileio.c:3483 libcob/fileio.c:3509 -#: libcob/fileio.c:3528 +#: libcob/fileio.c:3585 libcob/fileio.c:3610 libcob/fileio.c:3636 +#: libcob/fileio.c:3655 #, c-format msgid "BDB (%s), error: %d %s" msgstr "" -#: libcob/fileio.c:6071 +#: libcob/fileio.c:6199 #, c-format msgid "ERROR FILE %s has ASSIGN field is NULL" msgstr "" -#: libcob/fileio.c:6862 +#: libcob/fileio.c:7050 #, c-format msgid "call to CBL_OPEN_FILE with wrong access mode: %d" msgstr "" -#: libcob/fileio.c:6946 +#: libcob/fileio.c:7135 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_lock: %d" msgstr "" -#: libcob/fileio.c:6949 +#: libcob/fileio.c:7138 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_dev: %d" msgstr "" -#: libcob/fileio.c:7174 libcob/fileio.c:7457 +#: libcob/fileio.c:7362 libcob/fileio.c:7645 #, c-format msgid "'%s' - File detail area is too short" msgstr "" -#: libcob/fileio.c:7686 +#: libcob/fileio.c:7871 msgid "SORT is unable to acquire temporary file" msgstr "" #. TRANSLATORS: This msgid is concatenated with a filename; -#. setup translation to allow this to be followed on the right side. -#: libcob/fileio.c:8432 +#. setup translation to allow this to be followed on the right side, +#. if necessary use a colon or hyphen +#: libcob/fileio.c:8777 msgid "implicit CLOSE of " msgstr "" -#: libcob/fileio.c:9617 libcob/fileio.c:9752 +#: libcob/fileio.c:10008 libcob/fileio.c:10193 #, c-format msgid "ERROR: EXTFH called with FCD version %d" msgstr "" -#: libcob/fileio.c:9886 +#: libcob/fileio.c:10310 #, c-format msgid "ERROR: EXTFH called with wrong file organization %d" msgstr "" -#: libcob/fileio.c:9893 +#: libcob/fileio.c:10317 #, c-format msgid "ERROR: EXTFH called with no %s pointer" msgstr "" -#: libcob/fileio.c:10029 +#: libcob/fileio.c:10461 #, c-format msgid "ERROR: EXTFH called with no %s pointer; Function %d" msgstr "" -#: libcob/fileio.c:10208 +#: libcob/fileio.c:10683 #, c-format msgid "ERROR: EXTFH called with unknown Function %d" msgstr "" -#: libcob/reportio.c:630 +#: libcob/reportio.c:629 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT %d" msgstr "" -#: libcob/reportio.c:637 libcob/reportio.c:652 +#: libcob/reportio.c:636 libcob/reportio.c:651 #, c-format msgid "INITIATE %s NEXT GROUP %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:645 +#: libcob/reportio.c:644 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:1327 +#: libcob/reportio.c:1336 #, c-format msgid "INITIATE %s was already done" msgstr "" -#: libcob/reportio.c:1343 +#: libcob/reportio.c:1352 #, c-format msgid "INITIATE %s PAGE LIMIT problem" msgstr "" -#: libcob/reportio.c:1420 +#: libcob/reportio.c:1429 #, c-format msgid "TERMINATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1565 +#: libcob/reportio.c:1574 #, c-format msgid "GENERATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1917 +#: libcob/reportio.c:1926 #, c-format msgid "could not find line to SUPPRESS in report %s" msgstr "" -#: libcob/screenio.c:568 +#: libcob/screenio.c:1055 msgid "failed to initialize curses" msgstr "" -#: libcob/screenio.c:4081 +#: libcob/screenio.c:5034 msgid "end of program, please press a key to exit" msgstr "" -#: libcob/termio.c:78 libcob/termio.c:117 +#: libcob/termio.c:76 libcob/termio.c:136 msgid "(Not representable)" msgstr "" -#: libcob/termio.c:354 +#: libcob/termio.c:406 #, c-format msgid "cannot open %s (=%s)" msgstr "" -#: libcob/termio.c:369 +#: libcob/termio.c:421 msgid "COB_DISPLAY_PUNCH_FILE is invalid, output to SYSPUNCH skipped" msgstr "" @@ -6964,31 +7116,21 @@ msgid "" " (COB_LIBRARY_PATH and/or COB_PRELOAD)" msgstr "" -#: bin/cobcrun.c:146 -#, c-format -msgid "GnuCOBOL home page: <%s>" -msgstr "" - -#: bin/cobcrun.c:148 -#, c-format -msgid "General help using GNU software: <%s>" -msgstr "" - -#: bin/cobcrun.c:288 +#: bin/cobcrun.c:286 msgid "invalid configuration file name" msgstr "" -#: bin/cobcrun.c:355 +#: bin/cobcrun.c:353 #, c-format msgid "invalid module argument '%s'" msgstr "" -#: bin/cobcrun.c:410 +#: bin/cobcrun.c:408 #, c-format msgid "%s: missing PROGRAM name" msgstr "" -#: bin/cobcrun.c:412 +#: bin/cobcrun.c:410 #, c-format msgid "Try '%s --help' for more information." msgstr "" diff --git a/po/it.po b/po/it.po index 1d009b308..d9fd16ed0 100644 --- a/po/it.po +++ b/po/it.po @@ -1,4 +1,4 @@ -# Italian translations for GnuCOBOL package +# Italian translations for GNU Cobol package # Copyright (C) 2017 Free Software Foundation, Inc. # This file is distributed under the same license as the gnucobol package. # Sebastiano Pistore <sebastianopistore.info@protonmail.ch>, 2017. @@ -7,7 +7,7 @@ msgid "" msgstr "" "Project-Id-Version: gnucobol 2.2-rc1\n" "Report-Msgid-Bugs-To: gnucobol-messages@gnu.org\n" -"POT-Creation-Date: 2022-10-23 03:06+0200\n" +"POT-Creation-Date: 2023-07-28 19:20+0200\n" "PO-Revision-Date: 2017-07-28 09:43+0200\n" "Last-Translator: Sebastiano Pistore <sebastianopistore.info@protonmail.ch>\n" "Language-Team: Italian <tp@lists.linux.it>\n" @@ -19,567 +19,577 @@ msgstr "" "X-Generator: Poedit 2.0.2\n" "Plural-Forms: nplurals=2; plural=(n != 1);\n" -#: cobc/cobc.c:98 +#: cobc/cobc.c:116 cobc/codegen.c:2655 cobc/scanner.l:1375 #, c-format msgid "invalid parameter: %s" msgstr "parametro non valido: %s" -#: cobc/cobc.c:153 cobc/cobc.c:2233 cobc/cobc.c:2236 cobc/parser.y:802 -#: cobc/reserved.c:4022 libcob/common.c:226 libcob/common.c:1308 -#: libcob/common.c:2384 libcob/common.c:2388 libcob/common.c:2426 -#: libcob/common.c:2464 libcob/common.c:2654 libcob/common.c:7351 -#: libcob/common.c:8370 libcob/common.c:9391 libcob/common.c:9470 -#: libcob/common.c:9912 +#: cobc/cobc.c:171 cobc/cobc.c:2392 cobc/cobc.c:2395 cobc/parser.y:895 +#: cobc/reserved.c:4039 libcob/common.c:235 libcob/common.c:1369 +#: libcob/common.c:2698 libcob/common.c:2702 libcob/common.c:2740 +#: libcob/common.c:2778 libcob/common.c:2939 libcob/common.c:8159 +#: libcob/common.c:9191 libcob/common.c:10209 libcob/common.c:10284 +#: libcob/common.c:10731 msgid "unknown" msgstr "sconosciuto" -#: cobc/cobc.c:855 +#: cobc/cobc.c:905 #, fuzzy #| msgid "%s: %d: internal compiler error" msgid "internal compiler error" msgstr "%s: %d: errore interno del compilatore" -#: cobc/cobc.c:921 cobc/cobc.c:1008 cobc/cobc.c:1070 cobc/cobc.c:1146 -#: cobc/cobc.c:1186 cobc/cobc.c:1262 +#: cobc/cobc.c:971 cobc/cobc.c:1058 cobc/cobc.c:1120 cobc/cobc.c:1196 +#: cobc/cobc.c:1236 cobc/cobc.c:1312 #, c-format msgid "cannot allocate %d bytes of memory" msgstr "non può riallocare %d byte di memoria" -#: cobc/cobc.c:934 cobc/cobc.c:950 cobc/cobc.c:970 cobc/cobc.c:1029 -#: cobc/cobc.c:1048 cobc/cobc.c:1166 cobc/cobc.c:1281 cobc/cobc.c:1323 -#: cobc/field.c:2216 libcob/common.c:8191 +#: cobc/cobc.c:984 cobc/cobc.c:1000 cobc/cobc.c:1020 cobc/cobc.c:1079 +#: cobc/cobc.c:1098 cobc/cobc.c:1216 cobc/cobc.c:1331 cobc/cobc.c:1415 +#: cobc/field.c:2346 libcob/common.c:9012 #, c-format msgid "call to %s with NULL pointer" msgstr "chiamata a %s con puntatore NULL" -#: cobc/cobc.c:991 +#: cobc/cobc.c:1041 #, c-format msgid "cannot reallocate %d bytes of memory" msgstr "non può riallocare %d byte di memoria" -#: cobc/cobc.c:1087 cobc/cobc.c:1203 +#: cobc/cobc.c:1137 cobc/cobc.c:1253 msgid "attempt to reallocate non-allocated memory" msgstr "" -#: cobc/cobc.c:1120 cobc/cobc.c:1236 +#: cobc/cobc.c:1170 cobc/cobc.c:1286 #, c-format msgid "call to %s with invalid pointer, as it is missing in list" msgstr "" -#: cobc/cobc.c:1448 +#: cobc/cobc.c:1540 #, c-format msgid "assuming literal for unquoted '%s'" msgstr "" -#: cobc/cobc.c:1495 +#: cobc/cobc.c:1587 msgid " - length exceeds maximum" msgstr "" -#: cobc/cobc.c:1499 +#: cobc/cobc.c:1591 msgid " - name cannot be empty" msgstr "" -#: cobc/cobc.c:1502 -msgid " - name cannot begin with space or underscore" +#: cobc/cobc.c:1594 +#, fuzzy +#| msgid " - name cannot begin with space or underscore" +msgid " - name cannot begin with space or hyphen" msgstr " - il nome non può iniziare con spazio o underscore" -#: cobc/cobc.c:1505 +#: cobc/cobc.c:1597 msgid " - name cannot begin with 'cob_' or 'COB_'" msgstr " - il nome non può iniziare con 'cob_' oppure 'COB_'" -#: cobc/cobc.c:1508 +#: cobc/cobc.c:1600 msgid " - name duplicates a 'C' keyword" msgstr " - il nome duplica una parola chiave del 'C'" -#: cobc/cobc.c:1511 +#: cobc/cobc.c:1603 msgid " - name cannot contain a directory separator" msgstr " - il nome non può contenere separatori di directory" -#: cobc/cobc.c:1520 +#: cobc/cobc.c:1612 #, c-format msgid "invalid file base name '%s'%s" msgstr "" -#: cobc/cobc.c:1524 +#: cobc/cobc.c:1616 #, c-format msgid "invalid ENTRY '%s'%s" msgstr "" -#: cobc/cobc.c:1527 +#: cobc/cobc.c:1619 #, c-format msgid "invalid PROGRAM-ID '%s'%s" msgstr "PROGRAM-ID non valido '%s'%s" -#: cobc/cobc.c:1659 +#: cobc/cobc.c:1751 #, fuzzy, c-format #| msgid "'%s' is not numeric" msgid "file '%s' does not exist" msgstr "'%s' non è un numero" -#: cobc/cobc.c:1685 +#: cobc/cobc.c:1777 #, c-format msgid "duplicate exception '%s'" msgstr "" -#: cobc/cobc.c:1733 +#: cobc/cobc.c:1825 #, fuzzy, c-format #| msgid "invalid parameter: %s" msgid "invalid exception-name: %s" msgstr "parametro non valido: %s" -#: cobc/cobc.c:1870 cobc/cobc.c:8780 +#: cobc/cobc.c:1998 cobc/cobc.c:9211 msgid "please check environment variables as noted above" msgstr "" -#: cobc/cobc.c:1882 cobc/error.c:348 cobc/error.c:382 cobc/error.c:408 -#: cobc/error.c:411 cobc/error.c:477 cobc/error.c:631 cobc/error.c:675 -#: cobc/error.c:779 cobc/error.c:782 +#: cobc/cobc.c:2010 cobc/error.c:140 msgid "error: " msgstr "errore: " -#: cobc/cobc.c:1905 +#: cobc/cobc.c:2033 #, c-format msgid "duplicate DEFINE '%s' - ignored" msgstr "" -#: cobc/cobc.c:1958 +#: cobc/cobc.c:2086 #, c-format msgid "environment variable '%s' is '%s'; should not contain '%c'" msgstr "" -#: cobc/cobc.c:1988 +#: cobc/cobc.c:2116 msgid "parameter buffer size exceeded" msgstr "" -#: cobc/cobc.c:2028 +#: cobc/cobc.c:2156 #, c-format msgid "warning: could not move temporary file to %s" msgstr "" -#: cobc/cobc.c:2239 +#: cobc/cobc.c:2329 +#, c-format +msgid "environment variable '%s' has invalid content" +msgstr "" + +#: cobc/cobc.c:2398 #, c-format msgid "aborting compile of %s at line %d (%s: %s)" msgstr "" -#: cobc/cobc.c:2243 +#: cobc/cobc.c:2402 #, c-format msgid "aborting codegen for %s, last statement at line %d (%s: %s)" msgstr "" -#: cobc/cobc.c:2246 +#: cobc/cobc.c:2405 #, c-format msgid "aborting codegen for %s (%s: %s)" msgstr "" -#: cobc/cobc.c:2251 +#: cobc/cobc.c:2410 msgid "aborting" msgstr "annullamento" -#: cobc/cobc.c:2329 libcob/common.c:2823 libcob/common.c:8149 bin/cobcrun.c:375 +#: cobc/cobc.c:2488 libcob/common.c:3107 libcob/common.c:8970 bin/cobcrun.c:373 #, c-format msgid "Please report this!" msgstr "Per cortesia segnalare questo comportamento del software!" -#: cobc/cobc.c:2346 bin/cobcrun.c:100 +#: cobc/cobc.c:2505 bin/cobcrun.c:100 #, fuzzy, c-format #| msgid "License LGPLv3+: GNU LGPL version 3 or later <http://gnu.org/licenses/lgpl.html>" msgid "License GPLv3+: GNU GPL version 3 or later <%s>" msgstr "Licenza GPLv3+: GNU GPL versione 3 o successive <http://gnu.org/licenses/lgpl.html>" -#: cobc/cobc.c:2348 libcob/common.c:8741 bin/cobcrun.c:102 +#: cobc/cobc.c:2507 libcob/common.c:9558 bin/cobcrun.c:102 msgid "" "This is free software; see the source for copying conditions. There is NO\n" "warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." msgstr "" -#: cobc/cobc.c:2350 libcob/common.c:8743 bin/cobcrun.c:104 +#: cobc/cobc.c:2509 libcob/common.c:9560 bin/cobcrun.c:104 #, fuzzy, c-format #| msgid "Written by %s\n" msgid "Written by %s" msgstr "Scritto da %s\n" #. TRANSLATORS: This msgid is intended as the "Packaged" msgid, %s expands to date and time -#: cobc/cobc.c:2352 cobc/cobc.c:2365 libcob/common.c:8747 bin/cobcrun.c:106 +#: cobc/cobc.c:2511 cobc/cobc.c:2524 libcob/common.c:9564 bin/cobcrun.c:106 #, c-format msgid "Built %s" msgstr "" #. TRANSLATORS: This msgid is intended as the "Built" msgid, %s expands to date and time -#: cobc/cobc.c:2354 cobc/cobc.c:2367 libcob/common.c:8750 bin/cobcrun.c:108 +#: cobc/cobc.c:2513 cobc/cobc.c:2526 libcob/common.c:9567 bin/cobcrun.c:108 #, c-format msgid "Packaged %s" msgstr "" -#: cobc/cobc.c:2356 cobc/cobc.c:2369 cobc/cobc.c:2478 libcob/common.c:8787 +#: cobc/cobc.c:2515 cobc/cobc.c:2528 cobc/cobc.c:2637 libcob/common.c:9604 #, fuzzy #| msgid "C version %s%s" msgid "C version" msgstr "La versione di C è %s%s" -#: cobc/cobc.c:2382 +#: cobc/cobc.c:2541 libcob/common.c:1075 msgid "executing:" msgstr "esecuzione:" -#: cobc/cobc.c:2384 +#: cobc/cobc.c:2543 msgid "to be executed:" msgstr "" -#: cobc/cobc.c:2422 cobc/cobc.c:2423 libcob/common.c:6834 libcob/common.c:6835 -#: libcob/common.c:6866 libcob/common.c:6867 +#: cobc/cobc.c:2581 cobc/cobc.c:2582 libcob/common.c:7632 libcob/common.c:7633 +#: libcob/common.c:7664 libcob/common.c:7665 msgid "env" msgstr "env" -#: cobc/cobc.c:2474 libcob/common.c:8783 +#: cobc/cobc.c:2633 libcob/common.c:9600 msgid "build information" msgstr "informazioni sulla compilazione" -#: cobc/cobc.c:2475 libcob/common.c:8784 +#: cobc/cobc.c:2634 libcob/common.c:9601 msgid "build environment" msgstr "ambiente di compilazione" -#: cobc/cobc.c:2484 libcob/common.c:8794 +#: cobc/cobc.c:2643 libcob/common.c:9611 msgid "GnuCOBOL information" msgstr "Informazioni su GnuCOBOL" -#: cobc/cobc.c:2492 cobc/cobc.c:2575 cobc/cobc.c:2591 libcob/common.c:8410 -#: libcob/common.c:8777 libcob/common.c:8778 libcob/common.c:8812 -#: libcob/common.c:8878 libcob/common.c:8900 libcob/common.c:8934 +#: cobc/cobc.c:2651 cobc/cobc.c:2739 cobc/cobc.c:2755 libcob/common.c:9233 +#: libcob/common.c:9594 libcob/common.c:9595 libcob/common.c:9629 +#: libcob/common.c:9695 libcob/common.c:9717 libcob/common.c:9751 msgid "disabled" msgstr "disattivato" -#: cobc/cobc.c:2523 cobc/cobc.c:2541 libcob/common.c:7397 libcob/common.c:8400 -#: libcob/common.c:8407 libcob/common.c:8816 libcob/common.c:8834 +#: cobc/cobc.c:2687 cobc/cobc.c:2705 libcob/common.c:8179 libcob/common.c:9221 +#: libcob/common.c:9230 libcob/common.c:9633 libcob/common.c:9651 msgid "yes" msgstr "sì" -#: cobc/cobc.c:2525 cobc/cobc.c:2543 libcob/common.c:7399 libcob/common.c:8402 -#: libcob/common.c:8818 libcob/common.c:8836 +#: cobc/cobc.c:2689 cobc/cobc.c:2707 libcob/common.c:8181 libcob/common.c:9223 +#: libcob/common.c:9635 libcob/common.c:9653 msgid "no" msgstr "no" -#: cobc/cobc.c:2529 libcob/common.c:8822 +#: cobc/cobc.c:2693 libcob/common.c:9639 msgid "8 bytes" msgstr "8 byte" -#: cobc/cobc.c:2531 libcob/common.c:8824 +#: cobc/cobc.c:2695 libcob/common.c:9641 msgid "4 bytes" msgstr "4 byte" -#: cobc/cobc.c:2535 cobc/cobc.c:2537 libcob/common.c:8828 libcob/common.c:8830 +#: cobc/cobc.c:2699 cobc/cobc.c:2701 libcob/common.c:9645 libcob/common.c:9647 msgid "endianness" msgstr "" -#: cobc/cobc.c:2535 libcob/common.c:8828 +#: cobc/cobc.c:2699 libcob/common.c:9645 msgid "big-endian" msgstr "" -#: cobc/cobc.c:2537 libcob/common.c:8830 +#: cobc/cobc.c:2701 libcob/common.c:9647 msgid "little-endian" msgstr "" -#: cobc/cobc.c:2541 cobc/cobc.c:2543 libcob/common.c:8834 libcob/common.c:8836 +#: cobc/cobc.c:2705 cobc/cobc.c:2707 libcob/common.c:9651 libcob/common.c:9653 msgid "native EBCDIC" msgstr "" -#: cobc/cobc.c:2546 libcob/common.c:8937 +#: cobc/cobc.c:2710 libcob/common.c:9754 msgid "extended screen I/O" msgstr "" -#: cobc/cobc.c:2549 libcob/common.c:8840 +#: cobc/cobc.c:2713 libcob/common.c:9657 #, fuzzy #| msgid "variable format" msgid "variable file format" msgstr "formato variabile" -#: cobc/cobc.c:2555 cobc/cobc.c:2557 libcob/common.c:8846 libcob/common.c:8848 +#: cobc/cobc.c:2719 cobc/cobc.c:2721 libcob/common.c:9663 libcob/common.c:9665 msgid "sequential file handler" msgstr "" -#: cobc/cobc.c:2557 libcob/common.c:8848 +#: cobc/cobc.c:2721 libcob/common.c:9665 msgid "built-in" msgstr "" -#: cobc/cobc.c:2561 cobc/cobc.c:2563 cobc/cobc.c:2565 cobc/cobc.c:2567 -#: cobc/cobc.c:2570 cobc/cobc.c:2572 cobc/cobc.c:2575 libcob/common.c:8852 -#: libcob/common.c:8866 libcob/common.c:8868 libcob/common.c:8870 -#: libcob/common.c:8873 libcob/common.c:8875 libcob/common.c:8878 +#: cobc/cobc.c:2725 cobc/cobc.c:2727 cobc/cobc.c:2729 cobc/cobc.c:2731 +#: cobc/cobc.c:2734 cobc/cobc.c:2736 cobc/cobc.c:2739 libcob/common.c:9669 +#: libcob/common.c:9683 libcob/common.c:9685 libcob/common.c:9687 +#: libcob/common.c:9690 libcob/common.c:9692 libcob/common.c:9695 msgid "indexed file handler" msgstr "" -#: cobc/cobc.c:2580 cobc/cobc.c:2582 cobc/cobc.c:2585 libcob/common.c:8884 +#: cobc/cobc.c:2744 cobc/cobc.c:2746 cobc/cobc.c:2749 libcob/common.c:9701 msgid "mathematical library" msgstr "libreria matematica" -#: cobc/cobc.c:2589 cobc/cobc.c:2591 libcob/common.c:8895 libcob/common.c:8900 +#: cobc/cobc.c:2753 cobc/cobc.c:2755 libcob/common.c:9712 libcob/common.c:9717 msgid "XML library" msgstr "" -#: cobc/cobc.c:2594 libcob/common.c:8917 libcob/common.c:8932 -#: libcob/common.c:8934 +#: cobc/cobc.c:2758 libcob/common.c:9734 libcob/common.c:9749 +#: libcob/common.c:9751 msgid "JSON library" msgstr "" -#: cobc/cobc.c:2597 libcob/common.c:8810 libcob/common.c:8941 +#: cobc/cobc.c:2761 libcob/common.c:9627 libcob/common.c:9758 msgid "enabled" msgstr "abilitato" -#: cobc/cobc.c:2604 +#: cobc/cobc.c:2768 msgid "only one of options 'E', 'S', 'C', 'c' may be specified" msgstr "" -#: cobc/cobc.c:2610 +#: cobc/cobc.c:2774 msgid "only one of options 'm', 'x', 'b' may be specified" msgstr "" -#: cobc/cobc.c:2652 +#: cobc/cobc.c:2816 #, c-format msgid "option requires one of 'ALL', 'FD', 'WS', 'LS', 'RD', 'FD', 'SC', 'LO' - not '%s'" msgstr "" -#: cobc/cobc.c:2682 +#: cobc/cobc.c:2846 #, c-format msgid "'%s' is not an intrinsic function" msgstr "" -#: cobc/cobc.c:2726 cobc/cobc.c:8094 cobc/cobc.c:8213 cobc/codegen.c:3783 -#: cobc/codegen.c:3884 cobc/codegen.c:5571 cobc/codegen.c:5700 -#: cobc/codegen.c:13034 cobc/tree.c:1391 cobc/tree.c:4497 cobc/tree.c:5067 -#: cobc/tree.c:5316 cobc/typeck.c:4344 cobc/typeck.c:9044 cobc/typeck.c:9079 -#: cobc/typeck.c:9977 cobc/typeck.c:12619 cobc/typeck.c:12690 -#: cobc/typeck.c:12758 cobc/typeck.c:13043 cobc/typeck.c:13086 -#: libcob/fileio.c:9703 libcob/fileio.c:9714 +#: cobc/cobc.c:2889 cobc/cobc.c:8507 cobc/cobc.c:8626 cobc/codegen.c:3761 +#: cobc/codegen.c:3864 cobc/codegen.c:5671 cobc/codegen.c:5816 +#: cobc/codegen.c:13429 cobc/parser.y:391 cobc/tree.c:1397 cobc/tree.c:4565 +#: cobc/tree.c:5135 cobc/tree.c:5392 cobc/typeck.c:4497 cobc/typeck.c:9504 +#: cobc/typeck.c:9541 cobc/typeck.c:10418 cobc/typeck.c:13395 +#: cobc/typeck.c:13469 cobc/typeck.c:13537 cobc/typeck.c:13825 +#: cobc/typeck.c:13887 libcob/fileio.c:10094 libcob/fileio.c:10105 #, c-format msgid "call to '%s' with invalid parameter '%s'" msgstr "" -#: cobc/cobc.c:3136 +#: cobc/cobc.c:3300 msgid "loading standard configuration file 'default.conf'" msgstr "" -#: cobc/cobc.c:3217 +#: cobc/cobc.c:3387 msgid "the used C compiler is known to not be able to generate assembler code" msgstr "" -#: cobc/cobc.c:3299 +#: cobc/cobc.c:3469 msgid "invalid output file name" msgstr "" -#: cobc/cobc.c:3361 +#: cobc/cobc.c:3531 #, c-format msgid "warning: '%s' is not a directory, defaulting to current directory" msgstr "" -#: cobc/cobc.c:3388 +#: cobc/cobc.c:3558 #, c-format msgid "warning: %d lines per listing page specified, using %d" msgstr "" -#: cobc/cobc.c:3438 +#: cobc/cobc.c:3615 #, c-format msgid "warning: assuming '%s' is a DEFINE - did you intend to use -debug?" msgstr "" -#: cobc/cobc.c:3699 cobc/cobc.c:3724 cobc/cobc.c:3752 +#: cobc/cobc.c:3661 cobc/cobc.c:3702 cobc/cobc.c:4281 +#, c-format +msgid "ignoring nonexistent directory \"%s\"" +msgstr "" + +#: cobc/cobc.c:3943 cobc/cobc.c:3968 cobc/cobc.c:3996 #, c-format msgid "unknown warning option '%s'" msgstr "" -#: cobc/cobc.c:3813 +#: cobc/cobc.c:4063 #, c-format msgid "%s option requires a listing file" msgstr "" -#: cobc/cobc.c:3820 +#: cobc/cobc.c:4070 msgid "output to stdout only valid for preprocess" msgstr "" -#: cobc/cobc.c:3829 +#: cobc/cobc.c:4085 +msgid "-MT must be given to specify target file" +msgstr "" + +#: cobc/cobc.c:4091 msgid "all runtime checks are enabled" msgstr "" -#: cobc/cobc.c:4030 +#: cobc/cobc.c:4316 msgid "only one stdin input allowed" msgstr "" -#: cobc/cobc.c:4040 +#: cobc/cobc.c:4326 #, c-format msgid "invalid file name parameter (length > %d)" msgstr "" -#: cobc/cobc.c:4270 +#: cobc/cobc.c:4559 msgid "return status:" msgstr "" -#: cobc/cobc.c:4306 libcob/common.c:5711 +#: cobc/cobc.c:4595 libcob/common.c:6391 #, c-format msgid "external process \"%s\" ended with signal %s (%d)" msgstr "" -#: cobc/cobc.c:4364 +#: cobc/cobc.c:4654 msgid "nothing for -j to run" msgstr "" -#: cobc/cobc.c:4406 cobc/cobc.c:4420 +#: cobc/cobc.c:4697 cobc/cobc.c:4711 #, c-format msgid "%s is resolved by environment as: %s" msgstr "" -#: cobc/cobc.c:4882 +#: cobc/cobc.c:5175 msgid "preprocessing:" msgstr "preprocessing:" -#: cobc/cobc.c:4952 +#: cobc/cobc.c:5244 msgid "'cobxref' execution unsuccessful" msgstr "" -#: cobc/cobc.c:4955 +#: cobc/cobc.c:5247 #, c-format msgid "check that 'cobxref' is in %s" msgstr "" -#: cobc/cobc.c:4957 +#: cobc/cobc.c:5249 msgid "no listing produced" msgstr "" -#: cobc/cobc.c:5882 cobc/cobc.c:5921 +#: cobc/cobc.c:6234 cobc/cobc.c:6273 msgid "No fields defined." msgstr "" -#: cobc/cobc.c:5941 +#: cobc/cobc.c:6293 msgid "No labels defined." msgstr "" -#: cobc/cobc.c:5963 +#: cobc/cobc.c:6324 cobc/cobc.c:9292 +msgid "command line:" +msgstr "linea di comando:" + +#: cobc/cobc.c:6342 msgid "Error/Warning summary:" msgstr "" -#: cobc/cobc.c:6006 +#: cobc/cobc.c:6385 msgid "0 warnings in compilation group" msgstr "" -#: cobc/cobc.c:6010 +#: cobc/cobc.c:6389 msgid "1 warning in compilation group" msgstr "" -#: cobc/cobc.c:6014 +#: cobc/cobc.c:6393 #, c-format msgid "%d warnings in compilation group" msgstr "" -#: cobc/cobc.c:6020 +#: cobc/cobc.c:6399 msgid "0 errors in compilation group" msgstr "" -#: cobc/cobc.c:6024 +#: cobc/cobc.c:6403 msgid "1 error in compilation group" msgstr "" -#: cobc/cobc.c:6028 +#: cobc/cobc.c:6407 #, c-format msgid "%d errors in compilation group" msgstr "" -#: cobc/cobc.c:6034 +#: cobc/cobc.c:6413 #, c-format msgid "Too many errors in compilation group: %d maximum errors" msgstr "" -#: cobc/cobc.c:6632 +#: cobc/cobc.c:7028 #, c-format msgid "%s:%d: too many continuation lines" msgstr "" -#: cobc/cobc.c:7552 +#: cobc/cobc.c:7956 msgid "parsing:" msgstr "" -#: cobc/cobc.c:7612 +#: cobc/cobc.c:8017 msgid "translating:" msgstr "" -#: cobc/cobc.c:8786 +#: cobc/cobc.c:9217 msgid "no input files" msgstr "" -#: cobc/cobc.c:8816 +#: cobc/cobc.c:9248 #, c-format msgid "%s option invalid in this combination" msgstr "" -#: cobc/cobc.c:8857 -msgid "command line:" -msgstr "linea di comando:" - -#: cobc/codegen.c:1041 cobc/codegen.c:4463 cobc/codegen.c:11648 -#: cobc/codegen.c:12186 +#: cobc/codegen.c:1040 cobc/codegen.c:4506 cobc/codegen.c:11910 +#: cobc/codegen.c:12467 msgid "unexpected CONSTANT item" msgstr "" -#: cobc/codegen.c:2981 cobc/codegen.c:3261 cobc/codegen.c:8523 cobc/tree.c:1413 +#: cobc/codegen.c:2921 cobc/codegen.c:3207 cobc/codegen.c:8866 cobc/tree.c:1419 #, c-format msgid "unexpected cast type: %d" msgstr "" -#: cobc/codegen.c:3713 cobc/codegen.c:4413 +#: cobc/codegen.c:3690 cobc/codegen.c:4455 #, c-format msgid "internal statement stack depth exceeded: %d" msgstr "" -#: cobc/codegen.c:3785 +#: cobc/codegen.c:3763 #, c-format msgid "%s is not a field" msgstr "" -#: cobc/codegen.c:4186 cobc/codegen.c:4257 +#: cobc/codegen.c:4177 cobc/codegen.c:4279 #, c-format msgid "unexpected function: %s" msgstr "" -#: cobc/codegen.c:5204 +#: cobc/codegen.c:5256 #, c-format msgid "unexpected tree category: %d" msgstr "" -#: cobc/codegen.c:5971 +#: cobc/codegen.c:6108 #, c-format msgid "unexpected size: %d" msgstr "" -#: cobc/codegen.c:7595 +#: cobc/codegen.c:7894 #, c-format msgid "No ENTRY FOR GO TO '%s'" msgstr "" -#: cobc/codegen.c:7816 cobc/codegen.c:8163 +#: cobc/codegen.c:8283 cobc/codegen.c:8609 #, c-format msgid "unexpected handler type: %d" msgstr "" -#: cobc/codegen.c:8254 -msgid "unexpected error_node parameter" -msgstr "" - -#: cobc/codegen.c:8544 +#: cobc/codegen.c:8887 #, c-format msgid "unexpected tree type: %d" msgstr "" -#: cobc/codegen.c:9520 +#: cobc/codegen.c:9776 msgid "Nested OCCURS in report" msgstr "" -#: cobc/codeoptim.c:2777 +#: cobc/codeoptim.c:2856 #, c-format msgid "unexpected optimization value: %d" msgstr "" -#: cobc/config.c:164 libcob/common.c:7824 libcob/common.c:7838 -#: libcob/common.c:8315 +#: cobc/config.c:164 libcob/common.c:8639 libcob/common.c:8653 +#: libcob/common.c:9136 #, c-format msgid "invalid value '%s' for configuration tag '%s'" msgstr "" -#: cobc/config.c:167 libcob/common.c:7117 libcob/common.c:7234 +#: cobc/config.c:167 libcob/common.c:7915 libcob/common.c:7939 #, c-format msgid "should be one of the following values: %s" msgstr "" @@ -588,7 +598,7 @@ msgstr "" msgid "must be numeric" msgstr "deve essere un numero" -#: cobc/config.c:171 libcob/common.c:7215 +#: cobc/config.c:171 libcob/common.c:8045 #, c-format msgid "maximum value: %lu" msgstr "" @@ -603,45 +613,45 @@ msgstr "" msgid "unsupported value '%s' for configuration tag '%s'" msgstr "" -#: cobc/config.c:318 cobc/pplex.l:1185 libcob/common.c:7739 +#: cobc/config.c:319 cobc/pplex.l:1264 libcob/common.c:8554 msgid "recursive inclusion" msgstr "" -#: cobc/config.c:393 libcob/common.c:7791 +#: cobc/config.c:394 libcob/common.c:8606 msgid "configuration file was included here" msgstr "" -#: cobc/config.c:422 +#: cobc/config.c:423 #, c-format msgid "The previous loaded configuration '%s' will be discarded." msgstr "" -#: cobc/config.c:458 +#: cobc/config.c:459 msgid "missing definitions:" msgstr "definizioni mancanti:" -#: cobc/config.c:460 +#: cobc/config.c:461 #, c-format msgid "\tno definition of '%s'" msgstr "" -#: cobc/config.c:523 +#: cobc/config.c:524 #, c-format msgid "invalid configuration tag '%s'" msgstr "" -#: cobc/config.c:536 libcob/common.c:7545 libcob/common.c:7629 -#: libcob/common.c:7657 +#: cobc/config.c:537 libcob/common.c:8360 libcob/common.c:8444 +#: libcob/common.c:8472 #, c-format msgid "unknown configuration tag '%s'" msgstr "" -#: cobc/config.c:560 +#: cobc/config.c:561 #, c-format msgid "invalid configuration tag '%s' in word-list" msgstr "" -#: cobc/config.c:622 +#: cobc/config.c:623 #, c-format msgid "Could not access word list for '%s'" msgstr "" @@ -681,11 +691,11 @@ msgstr "" #: cobc/config.def:73 msgid "" "default initialization for fields without VALUE, may be one of\n" -" * character in quotes\n" -" * decimal 0..255 representing a character\n" -" * \"init\" to initialize to PICTURE/USAGE\n" -" * \"none\" to do no explicit initialization\n" -" * default: \"init\"" +" * character in quotes\n" +" * decimal 0..255 representing a character\n" +" * \"init\" to initialize to PICTURE/USAGE\n" +" * \"none\" to do no explicit initialization\n" +" * default: \"init\"" msgstr "" #: cobc/config.def:83 @@ -712,1060 +722,1069 @@ msgstr "" msgid "whether DECIMAL-POINT IS COMMA has effect in XML/JSON GENERATE, may be one of: none, xml, json, all" msgstr "" -#: cobc/config.def:103 -msgid "resolve file names at run time using environment variables" +#: cobc/config.def:101 +msgid "checking for subscript (only done with EC-BOUND-SUBSCRIPT active), may be one of: full, max, record" msgstr "" #: cobc/config.def:106 -msgid "alternate formatting of numeric fields" +msgid "resolve file names at run time using environment variables" msgstr "" #: cobc/config.def:109 -msgid "numeric truncation according to ANSI" +msgid "alternate formatting of numeric fields" msgstr "" #: cobc/config.def:112 -msgid "allow complex OCCURS DEPENDING ON" +msgid "numeric truncation according to ANSI" msgstr "" #: cobc/config.def:115 -msgid "adjust items following OCCURS DEPENDING (implies complex-odo)" +msgid "allow non-standard OCCURS DEPENDING ON syntax" msgstr "" #: cobc/config.def:118 -msgid "allow REDEFINES to other than last equal level number" +msgid "adjust items following OCCURS DEPENDING (implies complex-odo)" msgstr "" #: cobc/config.def:121 -msgid "allow certain syntax variations (e.g. REDEFINES position)" +msgid "applies JUSTIFY with VALUE clause" msgstr "" #: cobc/config.def:124 -msgid "allow zero length reference-modification (only changed with EC-BOUND-REF-MOD active)" +msgid "allow REDEFINES to other than last equal level number" msgstr "" #: cobc/config.def:127 -msgid "allow non-matching level numbers" +msgid "allow certain syntax variations (e.g. REDEFINES position)" msgstr "" #: cobc/config.def:130 -msgid "require ASSIGN USING items to be in WORKING-STORAGE" +msgid "allow zero length reference-modification (only changed with EC-BOUND-REF-MOD active)" msgstr "" #: cobc/config.def:133 -msgid "LOCAL-STORAGE SECTION implies RECURSIVE attribute" +msgid "allow non-matching level numbers" msgstr "" #: cobc/config.def:136 -msgid "LINKAGE SECTION items remain allocated between invocations" +msgid "require ASSIGN USING items to be in WORKING-STORAGE" msgstr "" #: cobc/config.def:139 -msgid "MOVE operates as on IBM (left to right, byte by byte)" +msgid "LOCAL-STORAGE SECTION implies RECURSIVE attribute" msgstr "" #: cobc/config.def:142 -msgid "exit point of any currently executing perform is recognized if reached" +msgid "LINKAGE SECTION items remain allocated between invocations" msgstr "" #: cobc/config.def:145 -msgid "limit precision in intermediate results to precision of final result (less accurate)" +msgid "MOVE operates as on IBM (left to right, byte by byte)" msgstr "" #: cobc/config.def:148 -msgid "evaluate constant expressions at compile time" +msgid "exit point of any currently executing perform is recognized if reached" msgstr "" #: cobc/config.def:151 -msgid "allow hexadecimal value 'F' for NUMERIC test of signed PACKED DECIMAL field" +msgid "limit precision in intermediate results to precision of final result (less accurate)" msgstr "" #: cobc/config.def:154 -msgid "program names don't lead to a reserved identifier" +msgid "evaluate constant expressions at compile time" msgstr "" #: cobc/config.def:157 -msgid "set WITH UPDATE clause as default for ACCEPT dest-item, instead of WITH NO UPDATE" +msgid "allow hexadecimal value 'F' for NUMERIC test of signed PACKED DECIMAL field" msgstr "" #: cobc/config.def:160 -msgid "set WITH AUTO clause as default for ACCEPT dest-item, instead of WITH TAB" +msgid "program names don't lead to a reserved identifier" msgstr "" #: cobc/config.def:163 -msgid "assume CONSOLE IS CRT if not set otherwise" +msgid "set WITH UPDATE clause as default for ACCEPT dest-item, instead of WITH NO UPDATE" msgstr "" #: cobc/config.def:166 -msgid "NO-ECHO hides input with asterisks like SECURE" +msgid "set WITH AUTO clause as default for ACCEPT dest-item, instead of WITH TAB" msgstr "" #: cobc/config.def:169 -msgid "assume a field DISPLAY starts at LINE 0 COL 0 (i.e. at the cursor), not LINE 1 COL 1" +msgid "assume CONSOLE IS CRT if not set otherwise" msgstr "" #: cobc/config.def:172 -msgid "special behaviour of DISPLAY SPACE/ALL X'01'/ALL X'02'/ALL X'07'" +msgid "NO-ECHO hides input with asterisks like SECURE" msgstr "" #: cobc/config.def:175 -msgid "COMP-1 is a 16-bit signed integer" +msgid "assume a field DISPLAY starts at LINE 0 COL 0 (i.e. at the cursor), not LINE 1 COL 1" msgstr "" #: cobc/config.def:178 -msgid "POINTER is a 64-bit unsigned integer" +msgid "special behaviour of DISPLAY SPACE/ALL X'01'/ALL X'02'/ALL X'07'" msgstr "" #: cobc/config.def:181 -msgid "imply zero in move of non-numeric literal to numeric items" +msgid "COMP-1 is a 16-bit signed integer" msgstr "" #: cobc/config.def:184 -msgid "implicitly define a variable if an ASSIGN DYNAMIC does not match any data item" +msgid "POINTER is a 64-bit unsigned integer" msgstr "" #: cobc/config.def:187 -msgid "specifying device by mnemonic" +msgid "imply zero in move of non-numeric literal to numeric items" +msgstr "" + +#: cobc/config.def:190 +msgid "implicitly define a variable if an ASSIGN DYNAMIC does not match any data item" msgstr "" #: cobc/config.def:193 +msgid "specifying device by mnemonic" +msgstr "" + +#: cobc/config.def:199 msgid "" "check contents of Area A (when reference format supports Area A enforcement),\n" -" enabled checks include:\n" -" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" -" and toplevel numbers (01 and 77) must start in Area A;\n" -" * statements must not start in Area A; and\n" -" * separator periods must not be within Area A." +" enabled checks include:\n" +" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" +" and toplevel numbers (01 and 77) must start in Area A;\n" +" * statements must not start in Area A; and\n" +" * separator periods must not be within Area A" msgstr "" -#: cobc/config.def:203 +#: cobc/config.def:209 msgid "comment paragraphs in IDENTIFICATION DIVISION (AUTHOR, DATE-WRITTEN, ...)" msgstr "" -#: cobc/config.def:207 -msgid "CONTROL DIVISION" -msgstr "" - -#: cobc/config.def:211 cobc/ppparse.y:101 cobc/ppparse.y:104 -msgid "partial replacing with literal" +#: cobc/config.def:217 +msgid "" +"apply partial replacing with literal source operand even when it replaces with spaces only;\n" +" * \"skip\" prevents such replacements" msgstr "" -#: cobc/config.def:214 +#: cobc/config.def:221 msgid "MEMORY-SIZE clause" msgstr "" -#: cobc/config.def:217 +#: cobc/config.def:224 msgid "MULTIPLE-FILE-TAPE clause" msgstr "" -#: cobc/config.def:220 +#: cobc/config.def:227 msgid "LABEL-RECORDS clause" msgstr "" -#: cobc/config.def:223 +#: cobc/config.def:230 msgid "VALUE-OF clause" msgstr "" -#: cobc/config.def:226 +#: cobc/config.def:233 msgid "DATA-RECORDS clause" msgstr "" -#: cobc/config.def:229 +#: cobc/config.def:236 msgid "OCCURS clause on top-level" msgstr "" -#: cobc/config.def:232 cobc/parser.y:7285 +#: cobc/config.def:239 cobc/parser.y:7566 msgid "SAME AS clause" msgstr "" -#: cobc/config.def:235 cobc/parser.y:7621 +#: cobc/config.def:242 cobc/parser.y:7904 msgid "TYPE TO clause" msgstr "" -#: cobc/config.def:238 cobc/parser.y:7644 +#: cobc/config.def:245 cobc/parser.y:7927 msgid "USAGE type-name" msgstr "" -#: cobc/config.def:241 cobc/parser.y:8190 +#: cobc/config.def:248 cobc/parser.y:8563 msgid "SYNCHRONIZED clause" msgstr "" -#: cobc/config.def:244 cobc/parser.y:8193 +#: cobc/config.def:251 cobc/parser.y:8566 msgid "LEFT/RIGHT phrases in SYNCHRONIZED clause" msgstr "" -#: cobc/config.def:247 +#: cobc/config.def:254 msgid "SPECIAL-NAMES clause" msgstr "" -#: cobc/config.def:250 -msgid "GOTO statement without name" +#: cobc/config.def:257 +msgid "GO TO statement without name" msgstr "" -#: cobc/config.def:253 +#: cobc/config.def:260 msgid "STOP-literal statement" msgstr "" -#: cobc/config.def:256 +#: cobc/config.def:263 msgid "STOP-identifier statement" msgstr "" -#: cobc/config.def:259 +#: cobc/config.def:266 msgid "STOP ERROR statement" msgstr "" -#: cobc/config.def:262 +#: cobc/config.def:269 msgid "DEBUGGING MODE and debugging indicator" msgstr "" -#: cobc/config.def:268 +#: cobc/config.def:275 msgid "PADDING CHARACTER clause" msgstr "" -#: cobc/config.def:271 +#: cobc/config.def:278 msgid "NEXT SENTENCE phrase" msgstr "" -#: cobc/config.def:274 +#: cobc/config.def:281 msgid "listing-directive statements EJECT, SKIP1, SKIP2, SKIP3" msgstr "" -#: cobc/config.def:277 +#: cobc/config.def:284 msgid "listing-directive statement TITLE" msgstr "" -#: cobc/config.def:280 +#: cobc/config.def:287 msgid "ENTRY statement" msgstr "" -#: cobc/config.def:283 +#: cobc/config.def:290 msgid "move noninteger to alphanumeric" msgstr "" -#: cobc/config.def:286 +#: cobc/config.def:293 msgid "move figurative constants to numeric" msgstr "" -#: cobc/config.def:289 +#: cobc/config.def:296 msgid "move figurative constant SPACE to numeric" msgstr "" -#: cobc/config.def:292 +#: cobc/config.def:299 msgid "move figurative constant QUOTE to numeric" msgstr "" -#: cobc/config.def:295 +#: cobc/config.def:302 msgid "OCCURS DEPENDING ON without to" msgstr "" -#: cobc/config.def:298 cobc/parser.y:11102 +#: cobc/config.def:305 cobc/parser.y:11443 msgid "section segments" msgstr "" -#: cobc/config.def:301 +#: cobc/config.def:308 msgid "ALTER statement" msgstr "" -#: cobc/config.def:304 +#: cobc/config.def:311 msgid "OVERFLOW clause for CALL" msgstr "" -#: cobc/config.def:307 +#: cobc/config.def:314 msgid "boolean literals (B'1010')" msgstr "" -#: cobc/config.def:310 +#: cobc/config.def:317 msgid "hexadecimal-boolean literals (BX'A')" msgstr "" -#: cobc/config.def:313 +#: cobc/config.def:320 msgid "national literals (N'UTF-16 string')" msgstr "" -#: cobc/config.def:316 +#: cobc/config.def:323 msgid "hexadecimal-national literals (NX'265E')" msgstr "" -#: cobc/config.def:319 +#: cobc/config.def:326 msgid "non-standard national literals (NC'UTF-16 string')" msgstr "" -#: cobc/config.def:322 +#: cobc/config.def:329 msgid "HP COBOL octal literals (%377)" msgstr "" -#: cobc/config.def:325 +#: cobc/config.def:332 msgid "ACUCOBOL-GT literals (#B #O #H #X)" msgstr "" -#: cobc/config.def:328 cobc/pplex.l:2199 +#: cobc/config.def:335 +msgid "EBCDIC symbolic characters in literals (\" \"135,151,151\"bar\"195, 194\"Z\" for \" foobarBAZ\")" +msgstr "" + +#: cobc/config.def:338 cobc/pplex.l:2428 msgid "continuation of COBOL words" msgstr "" -#: cobc/config.def:331 +#: cobc/config.def:341 msgid "NOT ON EXCEPTION before ON EXCEPTION" msgstr "" -#: cobc/config.def:334 +#: cobc/config.def:344 msgid "extensions to ACCEPT and DISPLAY" msgstr "" -#: cobc/config.def:337 cobc/field.c:3357 +#: cobc/config.def:347 cobc/field.c:3645 msgid "RENAMES of 01-, 66- and 77-level items" msgstr "" -#: cobc/config.def:341 +#: cobc/config.def:351 msgid "allow larger REDEFINES items" msgstr "" -#: cobc/config.def:344 +#: cobc/config.def:354 msgid "constants defined in SPECIAL-NAMES" msgstr "" -#: cobc/config.def:347 +#: cobc/config.def:357 msgid "constant with level 78 item (note: has left to right precedence in expressions)" msgstr "" -#: cobc/config.def:350 +#: cobc/config.def:360 msgid "constant with level 01 CONSTANT AS/FROM item" msgstr "" -#: cobc/config.def:353 +#: cobc/config.def:363 msgid "PERFORM VARYING without BY phrase (implies BY 1)" msgstr "" -#: cobc/config.def:356 +#: cobc/config.def:366 msgid "references to sections not in DECLARATIVES from within DECLARATIVES" msgstr "" -#: cobc/config.def:359 cobc/parser.y:12225 cobc/parser.y:12521 +#: cobc/config.def:369 cobc/parser.y:12614 cobc/parser.y:12913 msgid "CALL/CANCEL with program-prototype-name" msgstr "" -#: cobc/config.def:362 +#: cobc/config.def:372 msgid "specifying call-convention by mnemonic" msgstr "" -#: cobc/config.def:365 +#: cobc/config.def:375 msgid "specifying call-convention by WITH ... LINKAGE" msgstr "" -#: cobc/config.def:368 +#: cobc/config.def:378 +msgid "support for PROCEDURE DIVISION USING OPTIONAL" +msgstr "" + +#: cobc/config.def:381 msgid "numeric literals in VALUE clause of numeric-edited items" msgstr "" -#: cobc/config.def:371 +#: cobc/config.def:384 msgid "incorrect order of CONFIGURATION SECTION paragraphs" msgstr "" -#: cobc/config.def:374 +#: cobc/config.def:387 msgid "allow >> DEFINE CONSTANT var AS literal" msgstr "" -#: cobc/config.def:377 +#: cobc/config.def:390 msgid "REDEFINES clause not following entry-name in definition" msgstr "" -#: cobc/config.def:380 +#: cobc/config.def:393 msgid "record sizes does not match RECORD clause" msgstr "" -#: cobc/config.def:383 cobc/parser.y:5736 cobc/parser.y:5750 cobc/parser.y:5763 -#: cobc/parser.y:5774 +#: cobc/config.def:396 cobc/parser.y:5991 cobc/parser.y:6005 cobc/parser.y:6018 +#: cobc/parser.y:6029 msgid "RECORD DELIMITER clause" msgstr "" -#: cobc/config.def:386 +#: cobc/config.def:399 msgid "BINARY-SEQUENTIAL and LINE-SEQUENTIAL phrases in RECORD DELIMITER" msgstr "" -#: cobc/config.def:389 cobc/tree.c:4805 +#: cobc/config.def:402 cobc/tree.c:4873 msgid "RECORD DELIMITER clause on file with fixed-length records" msgstr "" -#: cobc/config.def:392 +#: cobc/config.def:405 msgid "missing statement (e.g. empty IF / PERFORM)" msgstr "" -#: cobc/config.def:395 +#: cobc/config.def:408 msgid "missing period in PROCEDURE DIVISION (when reference format supports Area A enforcement)" msgstr "" -#: cobc/config.def:398 +#: cobc/config.def:411 msgid "zero-length literals, e.g. '' and \"\"" msgstr "" -#: cobc/config.def:401 +#: cobc/config.def:414 msgid "XML GENERATE's phrases other than COUNT IN" msgstr "" -#: cobc/config.def:404 cobc/typeck.c:8565 +#: cobc/config.def:417 cobc/typeck.c:9017 msgid "AFTER phrase in CONTINUE statement" msgstr "" -#: cobc/config.def:407 -msgid "ENTRY FOR GOTO and GOTO ENTRY statements" +#: cobc/config.def:420 +msgid "ENTRY FOR GO TO and GO TO ENTRY statements" msgstr "" -#: cobc/config.def:410 +#: cobc/config.def:423 cobc/typeck.c:4642 msgid "ASSIGN [TO] variable in SELECT" msgstr "" -#: cobc/config.def:413 +#: cobc/config.def:426 msgid "ASSIGN USING/VARYING variable in SELECT" msgstr "" -#: cobc/config.def:416 +#: cobc/config.def:429 msgid "ASSIGN EXTERNAL/DYNAMIC in SELECT" msgstr "" -#: cobc/config.def:419 +#: cobc/config.def:432 msgid "ASSIGN DISK FROM variable in SELECT" msgstr "" -#: cobc/config.def:422 +#: cobc/config.def:435 msgid "VSAM status in FILE STATUS" msgstr "" -#: cobc/config.def:425 +#: cobc/config.def:438 msgid "CALL to own PROGRAM-ID implies RECURSIVE attribute" msgstr "" -#: cobc/config.def:428 +#: cobc/config.def:441 msgid "DEPENDING clause in RECORD CONTAINS" msgstr "" -#: cobc/config.def:431 cobc/tree.c:3584 +#: cobc/config.def:444 cobc/tree.c:3623 msgid "PICTURE string with 'L' character" msgstr "" -#: cobc/error.c:83 +#: cobc/error.c:141 libcob/common.c:1379 libcob/common.c:8715 +#: libcob/common.c:8766 +#, c-format +msgid "warning: " +msgstr "warning: " + +#: cobc/error.c:142 libcob/common.c:8784 +msgid "note: " +msgstr "" + +#: cobc/error.c:162 #, c-format msgid "in section '%s':" msgstr "" -#: cobc/error.c:94 +#: cobc/error.c:173 #, c-format msgid "in paragraph '%s':" msgstr "" -#: cobc/error.c:129 cobc/error.c:133 cobc/error.c:136 +#: cobc/error.c:227 cobc/error.c:231 cobc/error.c:234 msgid "too many errors" msgstr "troppi errori" -#: cobc/error.c:145 +#: cobc/error.c:243 #, c-format msgid "in file included from " msgstr "" -#: cobc/error.c:163 libcob/common.c:8325 +#: cobc/error.c:261 libcob/common.c:9146 msgid "configuration error:" msgstr "" -#: cobc/error.c:176 libcob/common.c:861 +#: cobc/error.c:274 libcob/common.c:920 #, c-format msgid "system error %d" msgstr "" -#: cobc/error.c:346 cobc/error.c:413 cobc/error.c:475 cobc/error.c:631 -#: cobc/error.c:675 cobc/error.c:785 libcob/common.c:1318 libcob/common.c:7900 -#: libcob/common.c:7951 -#, c-format -msgid "warning: " -msgstr "warning: " - -#: cobc/error.c:518 cobc/error.c:534 cobc/error.c:868 cobc/error.c:889 +#: cobc/error.c:616 cobc/error.c:632 cobc/error.c:971 cobc/error.c:992 #, c-format msgid "%s used" msgstr "" -#: cobc/error.c:521 cobc/error.c:871 +#: cobc/error.c:619 cobc/error.c:974 #, c-format msgid "%s is archaic in %s" msgstr "" -#: cobc/error.c:525 cobc/error.c:875 +#: cobc/error.c:623 cobc/error.c:978 #, c-format msgid "%s is obsolete in %s" msgstr "%s è obsoleto in %s" -#: cobc/error.c:531 cobc/error.c:881 cobc/parser.y:5738 +#: cobc/error.c:629 cobc/error.c:984 cobc/parser.y:5993 #, c-format msgid "%s ignored" msgstr "" -#: cobc/error.c:537 cobc/error.c:891 +#: cobc/error.c:635 cobc/error.c:994 #, c-format msgid "%s does not conform to %s" msgstr "" -#: cobc/error.c:553 +#: cobc/error.c:651 msgid "configuration warning:" msgstr "" -#: cobc/error.c:728 cobc/error.c:731 cobc/error.c:755 cobc/error.c:758 -#: libcob/common.c:7969 -msgid "note: " -msgstr "" - -#: cobc/error.c:933 cobc/error.c:962 +#: cobc/error.c:1040 cobc/error.c:1069 #, c-format msgid "redefinition of '%s'" msgstr "" -#: cobc/error.c:939 cobc/error.c:973 +#: cobc/error.c:1046 cobc/error.c:1080 #, c-format msgid "'%s' previously defined here" msgstr "" -#: cobc/error.c:1017 cobc/error.c:1023 +#: cobc/error.c:1124 cobc/error.c:1130 #, c-format msgid "'%s' is not defined" msgstr "" -#: cobc/error.c:1019 +#: cobc/error.c:1126 #, c-format msgid "'%s' cannot be used here" msgstr "" -#: cobc/error.c:1021 cobc/parser.y:7658 +#: cobc/error.c:1128 cobc/parser.y:7941 #, c-format msgid "'%s' is not defined, but is a reserved word in another dialect" msgstr "" -#: cobc/error.c:1060 +#: cobc/error.c:1167 #, c-format msgid "'%s' is ambiguous; needs qualification" msgstr "" -#: cobc/error.c:1090 +#: cobc/error.c:1197 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "'%s' is a special register" msgstr "'%s' non è un integer" -#: cobc/error.c:1093 +#: cobc/error.c:1200 #, c-format msgid "'%s' internally defined" msgstr "" -#: cobc/error.c:1097 cobc/parser.y:18176 cobc/parser.y:18181 cobc/typeck.c:5000 -#: cobc/typeck.c:5047 cobc/typeck.c:5048 +#: cobc/error.c:1204 cobc/parser.y:18772 cobc/parser.y:18777 cobc/typeck.c:5166 +#: cobc/typeck.c:5213 cobc/typeck.c:5214 #, c-format msgid "'%s' defined here" msgstr "" -#: cobc/error.c:1108 +#: cobc/error.c:1215 #, c-format msgid "fatal error: %s" msgstr "errore irreversibile: %s" -#: cobc/error.c:1117 +#: cobc/error.c:1224 #, c-format msgid "group item '%s' cannot have %s clause" msgstr "" -#: cobc/error.c:1132 +#: cobc/error.c:1239 #, c-format msgid "constant item '%s' requires a %s clause" msgstr "" -#: cobc/error.c:1136 +#: cobc/error.c:1243 #, c-format msgid "level %02d item '%s' requires a %s clause" msgstr "" -#: cobc/error.c:1151 +#: cobc/error.c:1258 #, c-format msgid "constant item '%s' can only have a %s clause" msgstr "" -#: cobc/error.c:1155 +#: cobc/error.c:1262 #, c-format msgid "level %02d item '%s' can only have a %s clause" msgstr "" -#: cobc/field.c:136 +#: cobc/field.c:139 msgid "constant expression has Divide by ZERO" msgstr "" -#: cobc/field.c:192 cobc/field.c:329 cobc/field.c:337 +#: cobc/field.c:195 cobc/field.c:332 cobc/field.c:340 msgid "missing right parenthesis" msgstr "parentesi destra mancante" -#: cobc/field.c:221 +#: cobc/field.c:224 #, c-format msgid "expression stack overflow at %d entries for operation '%c'" msgstr "" -#: cobc/field.c:262 +#: cobc/field.c:265 #, c-format msgid "expression stack overflow at %d entries" msgstr "" -#: cobc/field.c:279 +#: cobc/field.c:282 msgid "missing left parenthesis" msgstr "parentesi sinistra mancante" -#: cobc/field.c:320 +#: cobc/field.c:323 #, c-format msgid "invalid operator '%s' in expression" msgstr "" -#: cobc/field.c:339 +#: cobc/field.c:342 #, c-format msgid "'%c' operator misplaced" msgstr "" -#: cobc/field.c:400 +#: cobc/field.c:403 #, c-format msgid "invalid level number '%s'" msgstr "" -#: cobc/field.c:460 cobc/field.c:498 +#: cobc/field.c:463 cobc/field.c:502 msgid "level number must begin with 01 or 77" msgstr "" -#: cobc/field.c:558 cobc/field.c:562 +#: cobc/field.c:562 cobc/field.c:566 #, c-format msgid "no previous data item of level %02d" msgstr "" -#: cobc/field.c:620 +#: cobc/field.c:631 #, c-format msgid "'%s' cannot be qualified here" msgstr "" -#: cobc/field.c:626 +#: cobc/field.c:637 #, c-format msgid "'%s' cannot be subscripted here" msgstr "" -#: cobc/field.c:642 cobc/field.c:653 +#: cobc/field.c:653 cobc/field.c:664 #, c-format msgid "'%s' is not defined in '%s'" msgstr "" -#: cobc/field.c:660 +#: cobc/field.c:671 msgid "level number of REDEFINES entries must be identical" msgstr "" -#: cobc/field.c:665 +#: cobc/field.c:676 #, c-format msgid "'%s' is not the original definition" msgstr "" -#: cobc/field.c:826 cobc/parser.y:659 +#: cobc/field.c:720 cobc/parser.y:1051 +#, c-format +msgid "duplicate %s" +msgstr "" + +#: cobc/field.c:878 cobc/parser.y:733 #, c-format msgid "duplicate %s clause" msgstr "" -#: cobc/field.c:906 +#: cobc/field.c:988 #, c-format msgid "%s clause not compatible with PIC %s" msgstr "" -#: cobc/field.c:917 cobc/field.c:953 +#: cobc/field.c:999 cobc/field.c:1036 #, c-format msgid "%s clause not compatible with USAGE %s" msgstr "" -#: cobc/field.c:1053 cobc/field.c:1069 cobc/field.c:1131 cobc/field.c:1142 +#: cobc/field.c:1140 cobc/field.c:1159 cobc/field.c:1227 cobc/field.c:1238 #, c-format msgid "PICTURE clause required for '%s'" msgstr "" -#: cobc/field.c:1138 +#: cobc/field.c:1234 #, c-format msgid "a non-numeric literal is expected for '%s'" msgstr "" -#: cobc/field.c:1150 +#: cobc/field.c:1247 #, c-format msgid "defining implicit picture size %d for '%s'" msgstr "" -#: cobc/field.c:1171 +#: cobc/field.c:1271 #, c-format msgid "'%s' ANY LENGTH only allowed in LINKAGE" msgstr "" -#: cobc/field.c:1175 +#: cobc/field.c:1275 #, c-format msgid "'%s' ANY LENGTH must be 01 level" msgstr "" -#: cobc/field.c:1179 +#: cobc/field.c:1279 #, c-format msgid "'%s' ANY LENGTH cannot be BASED/EXTERNAL" msgstr "" -#: cobc/field.c:1184 cobc/field.c:1210 +#: cobc/field.c:1283 cobc/field.c:1313 #, c-format msgid "'%s' ANY LENGTH has invalid definition" msgstr "" -#: cobc/field.c:1192 +#: cobc/field.c:1295 #, c-format msgid "'%s' ANY NUMERIC must be PIC 9" msgstr "" -#: cobc/field.c:1198 +#: cobc/field.c:1301 #, c-format -msgid "'%s' ANY LENGTH must be PIC X, PIC N or PIC 1" +msgid "'%s' ANY LENGTH must be PIC X, PIC U, PIC N or PIC 1" msgstr "" -#: cobc/field.c:1208 +#: cobc/field.c:1311 #, c-format msgid "'%s' ANY NUMERIC has invalid definition" msgstr "" -#: cobc/field.c:1224 +#: cobc/field.c:1327 #, c-format msgid "'%s' EXTERNAL must be specified at 01/77 level" msgstr "" -#: cobc/field.c:1228 +#: cobc/field.c:1331 #, c-format msgid "'%s' EXTERNAL can only be specified in WORKING-STORAGE section" msgstr "" -#: cobc/field.c:1232 +#: cobc/field.c:1335 #, c-format msgid "'%s' EXTERNAL and BASED are mutually exclusive" msgstr "" -#: cobc/field.c:1235 +#: cobc/field.c:1338 #, c-format msgid "'%s' EXTERNAL not allowed with REDEFINES" msgstr "" -#: cobc/field.c:1247 +#: cobc/field.c:1350 #, c-format msgid "'%s' BASED not allowed here" msgstr "" -#: cobc/field.c:1250 +#: cobc/field.c:1353 #, c-format msgid "'%s' BASED not allowed with REDEFINES" msgstr "" -#: cobc/field.c:1253 +#: cobc/field.c:1356 #, c-format msgid "'%s' BASED only allowed at the 01 and 77 levels" msgstr "" -#: cobc/field.c:1279 +#: cobc/field.c:1383 #, c-format msgid "'%s' cannot have an OCCURS clause due to '%s'" msgstr "" -#: cobc/field.c:1298 +#: cobc/field.c:1402 #, c-format msgid "the original definition '%s' should not have an OCCURS clause" msgstr "" -#: cobc/field.c:1305 +#: cobc/field.c:1408 +#, c-format +msgid "the original definition '%s' should not have an ANY LENGTH clause" +msgstr "" + +#: cobc/field.c:1415 msgid "REDEFINES must follow the original definition" msgstr "" -#: cobc/field.c:1313 +#: cobc/field.c:1423 #, c-format msgid "'%s' cannot be variable length" msgstr "" -#: cobc/field.c:1316 +#: cobc/field.c:1426 #, c-format msgid "the original definition '%s' cannot be variable length" msgstr "" -#: cobc/field.c:1335 +#: cobc/field.c:1445 cobc/field.c:1708 #, c-format msgid "'%s' cannot have JUSTIFIED RIGHT clause" msgstr "" -#: cobc/field.c:1342 +#: cobc/field.c:1453 #, c-format msgid "'%s' cannot have BLANK WHEN ZERO clause" msgstr "" -#: cobc/field.c:1348 +#: cobc/field.c:1460 #, c-format msgid "SCREEN group item '%s' has invalid clause" msgstr "" -#: cobc/field.c:1436 +#: cobc/field.c:1548 #, c-format msgid "%s USAGE %s incompatible with %s USAGE %s" msgstr "" -#: cobc/field.c:1516 +#: cobc/field.c:1629 #, c-format msgid "'%s' cannot have PICTURE clause" msgstr "" -#: cobc/field.c:1533 -#, c-format -msgid "%s item '%s' should be USAGE DISPLAY" -msgstr "" - -#: cobc/field.c:1556 +#: cobc/field.c:1662 #, c-format msgid "'%s' COMP-6 with sign - changing to COMP-3" msgstr "" -#: cobc/field.c:1582 +#: cobc/field.c:1688 msgid "elementary items with SIGN clause must have S in PICTURE" msgstr "" -#: cobc/field.c:1585 +#: cobc/field.c:1691 msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/field.c:1602 -#, c-format -msgid "'%s' cannot have JUSTIFIED RIGHT" -msgstr "" - -#: cobc/field.c:1614 +#: cobc/field.c:1720 #, c-format msgid "'%s' cannot have S in PICTURE string and BLANK WHEN ZERO" msgstr "" -#: cobc/field.c:1619 +#: cobc/field.c:1725 #, c-format msgid "'%s' cannot have BLANK WHEN ZERO without being USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/field.c:1631 +#: cobc/field.c:1737 #, c-format msgid "'%s' cannot have * in PICTURE string and BLANK WHEN ZERO" msgstr "" -#: cobc/field.c:1638 +#: cobc/field.c:1744 #, c-format msgid "'%s' is not numeric, so cannot have BLANK WHEN ZERO" msgstr "" -#: cobc/field.c:1691 +#: cobc/field.c:1798 #, c-format msgid "elements in VALUE clause for '%s' (%d) exceed max amount (%d)" msgstr "" -#: cobc/field.c:1708 cobc/field.c:1712 +#: cobc/field.c:1822 +msgid "unexpected VALUES ARE for elementary item" +msgstr "" + +#: cobc/field.c:1836 cobc/field.c:1840 #, c-format msgid "initial VALUE clause ignored for %s item '%s'" msgstr "" -#: cobc/field.c:1725 +#: cobc/field.c:1853 msgid "FULL has no effect on numeric items; you may want REQUIRED or PIC Z" msgstr "" -#: cobc/field.c:1755 +#: cobc/field.c:1884 msgid "VALUE may not contain a figurative constant" msgstr "" -#: cobc/field.c:1763 -msgid "cannot specify both FULL and JUSTIFIED" +#: cobc/field.c:1893 cobc/field.c:1935 cobc/parser.y:750 cobc/parser.y:1823 +#: cobc/parser.y:1826 +#, c-format +msgid "cannot specify both %s and %s" msgstr "" -#: cobc/field.c:1775 +#: cobc/field.c:1905 #, c-format msgid "'%s' has FROM, TO or USING without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1792 +#: cobc/field.c:1922 #, c-format msgid "'%s' has numeric VALUE without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1805 -msgid "cannot specify both PIC and VALUE" -msgstr "" - -#: cobc/field.c:1813 +#: cobc/field.c:1943 msgid "cannot have PIC without FROM, TO or USING" msgstr "" -#: cobc/field.c:1822 +#: cobc/field.c:1952 msgid "cannot have numeric VALUE without PIC" msgstr "" -#: cobc/field.c:1831 +#: cobc/field.c:1961 msgid "cannot have FROM, TO or USING without PIC" msgstr "" -#: cobc/field.c:1841 +#: cobc/field.c:1971 msgid "VALUE item may not be numeric" msgstr "" -#: cobc/field.c:1856 +#: cobc/field.c:1986 #, c-format msgid "'%s' needs a PIC, COL, LINE, VALUE, BELL or BLANK clause" msgstr "" -#: cobc/field.c:1868 +#: cobc/field.c:1998 #, c-format msgid "'%s' cannot have PIC without FROM, TO, USING or numeric VALUE" msgstr "" -#: cobc/field.c:1876 +#: cobc/field.c:2006 #, c-format msgid "'%s' needs a PIC, FROM, TO, USING, VALUE, BELL, BLANK or ERASE clause" msgstr "" -#: cobc/field.c:1912 +#: cobc/field.c:2042 msgid "cannot use AUTO, FULL, PROMPT, REQUIRED or SECURE on elementary item without TO or USING" msgstr "" -#: cobc/field.c:1919 +#: cobc/field.c:2049 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED, OCCURS or SIGN on item without FROM, TO or USING" msgstr "" -#: cobc/field.c:1938 +#: cobc/field.c:2068 msgid "cannot use AUTO, FULL, REQUIRED or SECURE on elementary item without FROM, TO or USING" msgstr "" -#: cobc/field.c:1943 +#: cobc/field.c:2073 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED or SIGN without FROM, TO or USING" msgstr "" -#: cobc/field.c:1960 +#: cobc/field.c:2090 msgid "cannot have BLANK WHEN ZERO without PIC" msgstr "" -#: cobc/field.c:1963 +#: cobc/field.c:2093 msgid "cannot have JUSTIFIED without PIC" msgstr "" -#: cobc/field.c:1983 +#: cobc/field.c:2113 msgid "cannot have AUTO without FROM, TO or USING" msgstr "" -#: cobc/field.c:1988 +#: cobc/field.c:2118 msgid "cannot use FULL or REQUIRED on item without TO or USING" msgstr "" -#: cobc/field.c:1995 +#: cobc/field.c:2125 msgid "SECURE can be used with TO only" msgstr "" -#: cobc/field.c:1997 +#: cobc/field.c:2127 msgid "SECURE must be used with TO" msgstr "" -#: cobc/field.c:2016 +#: cobc/field.c:2146 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "'%s' does nothing" msgstr "'%s' non è un integer" -#: cobc/field.c:2235 +#: cobc/field.c:2361 #, c-format msgid "'%s' 77 level is not allowed here" msgstr "" -#: cobc/field.c:2627 +#: cobc/field.c:2399 msgid "OCCURS and multi COLUMNs is not allowed" msgstr "" -#: cobc/field.c:2655 +#: cobc/field.c:2419 #, c-format msgid "duplicate LINE %d ignored" msgstr "" -#: cobc/field.c:2672 +#: cobc/field.c:2870 #, c-format msgid "ignoring SYNCHRONIZED for group item '%s'" msgstr "" -#: cobc/field.c:2686 cobc/field.c:2954 +#: cobc/field.c:2884 cobc/field.c:3219 msgid "larger REDEFINES" msgstr "" -#: cobc/field.c:2699 cobc/field.c:2957 cobc/field.c:2962 +#: cobc/field.c:2898 cobc/field.c:3222 cobc/field.c:3227 #, c-format msgid "size of '%s' larger than size of '%s'" msgstr "" -#: cobc/field.c:2812 cobc/field.c:2879 +#: cobc/field.c:3045 cobc/field.c:3129 cobc/parser.y:832 #, c-format msgid "'%s' cannot be larger than %d bytes" msgstr "" -#: cobc/field.c:2850 cobc/field.c:2858 +#: cobc/field.c:3086 cobc/field.c:3094 #, c-format msgid "'%s' binary field cannot be larger than %d digits" msgstr "" -#: cobc/field.c:2940 cobc/field.c:3522 -#, c-format -msgid "unexpected USAGE: %d" -msgstr "" - -#: cobc/field.c:3067 cobc/parser.y:710 cobc/parser.y:712 cobc/parser.y:6274 -#: cobc/parser.y:6284 cobc/parser.y:7344 cobc/parser.y:7347 cobc/parser.y:7349 -#: cobc/parser.y:7351 cobc/parser.y:7386 cobc/parser.y:8237 cobc/parser.y:8239 -#: cobc/parser.y:8241 cobc/parser.y:8243 cobc/parser.y:8558 cobc/parser.y:8567 -#: cobc/parser.y:10564 cobc/parser.y:12075 cobc/parser.y:13492 -#: cobc/parser.y:14902 cobc/typeck.c:5034 +#: cobc/field.c:3353 cobc/parser.y:791 cobc/parser.y:793 cobc/parser.y:6529 +#: cobc/parser.y:6539 cobc/parser.y:7625 cobc/parser.y:7628 cobc/parser.y:7630 +#: cobc/parser.y:7632 cobc/parser.y:7667 cobc/parser.y:8610 cobc/parser.y:8612 +#: cobc/parser.y:8614 cobc/parser.y:8616 cobc/parser.y:8958 cobc/parser.y:8967 +#: cobc/parser.y:10897 cobc/parser.y:12460 cobc/parser.y:13920 +#: cobc/parser.y:15390 cobc/typeck.c:5200 #, c-format msgid "%s and %s are mutually exclusive" msgstr "" -#: cobc/field.c:3068 cobc/parser.y:7529 cobc/parser.y:7566 +#: cobc/field.c:3354 cobc/parser.y:7810 cobc/parser.y:7847 msgid "variable-length PICTURE" msgstr "" -#: cobc/field.c:3187 +#: cobc/field.c:3475 msgid "literal type does not match numeric data type" msgstr "" -#: cobc/field.c:3261 +#: cobc/field.c:3549 #, c-format msgid "THRU item '%s' may not come before '%s'" msgstr "" -#: cobc/field.c:3284 +#: cobc/field.c:3572 #, c-format msgid "RENAMES cannot start/end at the OCCURS item '%s'" msgstr "" -#: cobc/field.c:3292 +#: cobc/field.c:3580 #, c-format msgid "cannot use RENAMES on part of the table '%s'" msgstr "" -#: cobc/field.c:3330 +#: cobc/field.c:3618 #, c-format msgid "RENAMES may not contain '%s' as it is a pointer or object reference" msgstr "" -#: cobc/field.c:3335 +#: cobc/field.c:3623 #, c-format msgid "RENAMES may not contain '%s' as it is an OCCURS DEPENDING table" msgstr "" -#: cobc/field.c:3359 +#: cobc/field.c:3647 msgid "RENAMES may not reference a level 88" msgstr "" -#: cobc/field.c:3383 +#: cobc/field.c:3671 #, c-format msgid "'%s' must immediately follow the record '%s'" msgstr "" -#: cobc/field.c:3391 +#: cobc/field.c:3679 #, c-format msgid "THRU item must be different to '%s'" msgstr "" -#: cobc/field.c:3397 +#: cobc/field.c:3685 #, c-format msgid "'%s' and '%s' must be in the same record" msgstr "" -#: cobc/field.c:3408 +#: cobc/field.c:3696 #, c-format msgid "THRU item '%s' may not be subordinate to '%s'" msgstr "" @@ -1813,266 +1832,295 @@ msgid "" " intrinsics to be used without FUNCTION keyword" msgstr "" -#: cobc/flag.def:78 -msgid "" -" -fec=<exception-name>\tenable code generation for <exception-name>,\n" -" sets -fsource-location" -msgstr "" - -#: cobc/flag.def:81 cobc/help.c:96 -msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" -msgstr "" - -#: cobc/flag.def:84 +#: cobc/flag.def:85 msgid "" " -fdump=<scope> dump data fields on abort, <scope> may be\n" " a combination of: ALL, WS, LS, RD, FD, SC, LO" msgstr "" -#: cobc/flag.def:87 +#: cobc/flag.def:88 msgid "" " -fno-dump=<scope> exclude data fields from dumping on abort, <scope> may\n" -" be a combination of: ALL, WS, LS, RD, FD, SC, LO" +" be a combination of: ALL, WS, LS, RD, FD, SC, LO\n" +" default if no scope specified: ALL" msgstr "" -#: cobc/flag.def:92 +#: cobc/flag.def:94 msgid "" " -fcallfh=<name> specifies <name> to be used for I/O\n" " as external provided EXTFH interface module" msgstr "" -#: cobc/flag.def:96 +#: cobc/flag.def:98 msgid "" -" -febcdic-table=[DEFAULT|RESTRICTED-GC|IBM|GCOS]\tdefine EBCDIC translation table:\n" -" * default: translation to extended ASCII as per MF\n" -" * restricted-gc: translation from restricted ASCII only\n" -" * ibm: translation to restricted ASCII as per IBM\n" -" * gcos: translation to extended ASCII as per GCOS7" +" -febcdic-table=<cconv-table>/<file>\tEBCDIC/ASCII translation table\n" +" * e.g. default, ebcdic500_latin1..." msgstr "" -#: cobc/flag.def:107 +#: cobc/flag.def:102 +msgid "" +" -fdefault-colseq=[ASCII|EBCDIC|NATIVE]\tdefine default collating sequence\n" +" * default: NATIVE" +msgstr "" + +#: cobc/flag.def:110 msgid "" " -fwinmain generate WinMain instead of main when compiling\n" " as executable" msgstr "" -#: cobc/flag.def:111 +#: cobc/flag.def:114 msgid " -fcomputed-goto generate computed goto C statements" msgstr "" -#: cobc/flag.def:114 +#: cobc/flag.def:117 msgid " -fextra-brace generate extra braces in C source" msgstr "" -#: cobc/flag.def:117 +#: cobc/flag.def:120 msgid " -fcorrect-numeric attempt correction of invalid numeric display items" msgstr "" -#: cobc/flag.def:120 +#: cobc/flag.def:123 msgid " -fstack-on-heap PERFORM stack allocated on heap" msgstr "" -#: cobc/flag.def:123 +#: cobc/flag.def:126 msgid "" " -fstack-extended store origin of entrypoints and PERFORM\n" -" * turned on by -debug/-dump" +" * turned on by --debug/-fdump" +msgstr "" + +#: cobc/flag.def:130 +msgid " -fno-fast-compare disables inline comparisions" msgstr "" -#: cobc/flag.def:128 +#: cobc/flag.def:135 msgid "" " -fno-remove-unreachable\tdisable remove of unreachable code\n" " * turned off by -g" msgstr "" -#: cobc/flag.def:132 +#: cobc/flag.def:139 msgid "" " -ftrace generate trace code\n" " * scope: executed SECTION/PARAGRAPH" msgstr "" -#: cobc/flag.def:136 +#: cobc/flag.def:143 msgid "" " -ftraceall generate trace code\n" " * scope: executed SECTION/PARAGRAPH/STATEMENTS" msgstr "" -#: cobc/flag.def:140 +#: cobc/flag.def:147 msgid " -fsyntax-only syntax error checking only; don't emit any output" msgstr "" -#: cobc/flag.def:143 +#: cobc/flag.def:150 msgid "" " -fdebugging-line enable debugging lines\n" " * 'D' in indicator column or floating >>D" msgstr "" -#: cobc/flag.def:147 +#: cobc/flag.def:154 msgid "" " -fsource-location generate source location code\n" -" * turned on by -debug/-ftraceall/-fec/-dump" +" * turned on by --debug/-ftraceall/-fec/-fdump" msgstr "" -#: cobc/flag.def:151 +#: cobc/flag.def:158 msgid " -fimplicit-init automatic initialization of the COBOL runtime system" msgstr "" -#: cobc/flag.def:154 +#: cobc/flag.def:161 msgid "" " -fno-recursive-check disable check of recursive program call;\n" " effectively compiling as RECURSIVE program" msgstr "" -#: cobc/flag.def:158 +#: cobc/flag.def:165 msgid "" " -fstack-check PERFORM stack checking\n" -" * turned on by -debug/-g" +" * turned on by --debug/-g" +msgstr "" + +#: cobc/flag.def:169 +msgid "" +" -fmemory-check=<scope> checks for invalid writes to internal storage,\n" +" <scope> may be one of: all, pointer, using, none\n" +" * default: none, set to all by --debug" msgstr "" -#: cobc/flag.def:162 +#: cobc/flag.def:174 msgid " -fsection-exit-check check that code execution does not leave the scope of SECTIONs" msgstr "" -#: cobc/flag.def:165 +#: cobc/flag.def:177 msgid " -fimplicit-goback-check\tcheck that code execution does not end implicit at end of PROCEDURE DIVISION" msgstr "" -#: cobc/flag.def:168 +#: cobc/flag.def:180 msgid "" " -fwrite-after use AFTER 1 for WRITE of LINE SEQUENTIAL\n" " * default: BEFORE 1" msgstr "" -#: cobc/flag.def:172 +#: cobc/flag.def:184 msgid "" -" -fmfcomment '*' or '/' in column 1 treated as comment\n" -" * FIXED format only" +" -fmfcomment '*' in column 1 treated as comment with listing suppression\n" +" * FIXED/COBOL85/VARIABLE format only" msgstr "" -#: cobc/flag.def:176 +#: cobc/flag.def:188 msgid "" " -facucomment '$' in indicator area treated as '*',\n" " '|' treated as floating comment" msgstr "" -#: cobc/flag.def:181 +#: cobc/flag.def:193 msgid "" " -fno-trunc allow numeric field overflow\n" " * non-ANSI behaviour" msgstr "" -#: cobc/flag.def:185 +#: cobc/flag.def:197 msgid "" " -fsingle-quote use a single quote (apostrophe) for QUOTE\n" " * default: double quote" msgstr "" -#: cobc/flag.def:195 +#: cobc/flag.def:207 msgid "" " -foptional-file treat all files as OPTIONAL\n" " * unless NOT OPTIONAL specified" msgstr "" -#: cobc/flag.def:199 +#: cobc/flag.def:211 msgid " -fstatic-call output static function calls for the CALL statement" msgstr "" -#: cobc/flag.def:202 +#: cobc/flag.def:214 msgid "" " -fno-gen-c-decl-static-call\tdisable generation of C function declarations\n" " for subroutines with static CALL" msgstr "" -#: cobc/flag.def:206 +#: cobc/flag.def:218 msgid "" " -fgen-c-line-directives\tgenerate source location directives in C code;\n" -" * turned on by -g" +" * turned on by -g/--coverage" msgstr "" -#: cobc/flag.def:210 +#: cobc/flag.def:222 msgid "" " -fgen-c-labels generate extra labels in C sources;\n" " * turned on by -g" msgstr "" -#: cobc/flag.def:214 +#: cobc/flag.def:226 msgid "" -" -fno-theaders suppress all headers and output of compilation\n" -" options from listing while keeping page breaks" +" -fno-theaders suppress all headers from listing while keeping\n" +" page breaks" msgstr "" -#: cobc/flag.def:218 +#: cobc/flag.def:230 msgid " -fno-tsource suppress source from listing" msgstr "" -#: cobc/flag.def:221 +#: cobc/flag.def:233 msgid " -fno-tmessages suppress warning and error summary from listing" msgstr "" -#: cobc/flag.def:224 +#: cobc/flag.def:236 msgid " -ftsymbols specify symbols in listing" msgstr "" -#: cobc/flag.def:227 +#: cobc/flag.def:239 +#, fuzzy +#| msgid " -c compile and assemble, but do not link" +msgid " -ftcmd specify command line in listing" +msgstr " -c compilare ed assemblare, ma non fare il linking" + +#: cobc/flag.def:242 +msgid " -fno-ttimestamp suppress timestamp in listing headers" +msgstr "" + +#: cobc/flag.def:245 +msgid "" +" -fttitle=<title> set listing title with '_' replaced by spaces;\n" +" defaults to package name and version" +msgstr "" + +#: cobc/flag.def:249 msgid "" " -fno-diagnostics-show-option\tsuppress output of option that directly\n" " controls the diagnostic" msgstr "" -#: cobc/help.c:32 +#: cobc/flag.def:253 +msgid " -fno-diagnostics-show-caret\tdo not display source context on warning/error diagnostic" +msgstr "" + +#: cobc/flag.def:256 +msgid " -fno-diagnostics-show-line-numbers\tsuppress display of line numbers in diagnostics" +msgstr "" + +#: cobc/help.c:33 msgid "GnuCOBOL compiler for most COBOL dialects with lots of extensions" msgstr "" -#: cobc/help.c:34 +#: cobc/help.c:35 #, c-format msgid "Usage: %s [options]... file..." msgstr "" -#: cobc/help.c:47 bin/cobcrun.c:143 +#: cobc/help.c:48 bin/cobcrun.c:143 #, c-format msgid "" "Report bugs to: %s\n" "or (preferably) use the issue tracker via the home page." msgstr "" -#: cobc/help.c:51 -#, fuzzy -#| msgid "GnuCOBOL home page: <http://www.gnu.org/software/gnucobol/>" -msgid "GnuCOBOL home page: <https://www.gnu.org/software/gnucobol/>" -msgstr "Homepage di GnuCOBOL: <http://www.gnu.org/software/gnucobol/>" +#: cobc/help.c:52 bin/cobcrun.c:146 +#, c-format +msgid "GnuCOBOL home page: <%s>" +msgstr "" -#: cobc/help.c:52 -msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" +#: cobc/help.c:54 bin/cobcrun.c:148 +#, c-format +msgid "General help using GNU software: <%s>" msgstr "" -#: cobc/help.c:58 bin/cobcrun.c:125 +#: cobc/help.c:61 bin/cobcrun.c:125 msgid "Options:" msgstr "Opzioni:" -#: cobc/help.c:59 +#: cobc/help.c:62 #, fuzzy #| msgid " -V, -version display compiler version and exit" msgid " -h, --help display this help and exit" msgstr " -V, -version visualizza la versione del compilatore e poi esce" -#: cobc/help.c:60 +#: cobc/help.c:63 #, fuzzy #| msgid " -V, -version display compiler version and exit" msgid " -V, --version display compiler version information and exit" msgstr " -V, -version visualizza la versione del compilatore e poi esce" -#: cobc/help.c:61 +#: cobc/help.c:64 #, fuzzy #| msgid " -V, -version display compiler version and exit" msgid " -dumpversion display compiler version and exit" msgstr " -V, -version visualizza la versione del compilatore e poi esce" -#: cobc/help.c:62 +#: cobc/help.c:65 msgid "" " -i, --info display compiler information (build/environment)\n" " and exit" msgstr "" -#: cobc/help.c:64 +#: cobc/help.c:67 msgid "" " -v, --verbose verbose mode, display additional information;\n" " multiple -v options increase the verbosity,\n" @@ -2083,27 +2131,27 @@ msgid "" " (3) pass verbose option to linker" msgstr "" -#: cobc/help.c:71 +#: cobc/help.c:74 msgid " -q, --brief reduced displays, commands invoked not shown" msgstr "" -#: cobc/help.c:72 +#: cobc/help.c:75 msgid " -### like -v but commands not executed" msgstr "" -#: cobc/help.c:73 +#: cobc/help.c:76 msgid " -x build an executable program" msgstr "" -#: cobc/help.c:74 +#: cobc/help.c:77 msgid " -m build a dynamically loadable module (default)" msgstr "" -#: cobc/help.c:75 +#: cobc/help.c:78 msgid " -j [<args>], --job[=<args>]\trun program after build, passing <args>" msgstr "" -#: cobc/help.c:76 +#: cobc/help.c:79 msgid "" " -std=<dialect> warnings/features for a specific dialect\n" " <dialect> can be one of:\n" @@ -2115,119 +2163,115 @@ msgid "" " see configuration files in directory config" msgstr "" -#: cobc/help.c:84 +#: cobc/help.c:87 msgid " -F, --free use free source format (alias for -fformat=free)" msgstr "" -#: cobc/help.c:85 +#: cobc/help.c:88 msgid "" " --fixed use fixed source format (default; alias for\n" " -fformat=fixed)" msgstr "" -#: cobc/help.c:87 +#: cobc/help.c:90 msgid " -O, -O2, -O3, -Os enable optimization" msgstr " -O, -O2, -O3, -Os abilita ottimizzazione" -#: cobc/help.c:88 +#: cobc/help.c:91 #, fuzzy #| msgid " -W enable all warnings" msgid " -O0 disable optimization" msgstr " -W attiva tutti i warning" -#: cobc/help.c:89 +#: cobc/help.c:92 #, fuzzy #| msgid " -c compile and assemble, but do not link" msgid " -g enable C compiler debug and stack check" msgstr " -c compilare ed assemblare, ma non fare il linking" -#: cobc/help.c:90 +#: cobc/help.c:93 msgid "" " -d, --debug enable all run-time error checking,\n" " equal to -fstack-check -fec=EC-ALL" msgstr "" -#: cobc/help.c:93 +#: cobc/help.c:97 msgid "" " -fec=<exception-name>\tenable code generation for <exception-name>,\n" " see --list-exceptions for the possible values,\n" " sets -fsource-location" msgstr "" -#: cobc/help.c:97 +#: cobc/help.c:100 +msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" +msgstr "" + +#: cobc/help.c:101 msgid " -o <file> place the output into <file>" msgstr "" -#: cobc/help.c:98 +#: cobc/help.c:102 msgid "" " -b combine all input files into a single\n" " dynamically loadable module" msgstr "" -#: cobc/help.c:100 +#: cobc/help.c:104 msgid " -E preprocess only; do not compile or link" msgstr "" -#: cobc/help.c:101 +#: cobc/help.c:105 msgid " -C translation only; convert COBOL to C" msgstr " -C solo traduzione; conversione da COBOL in C" -#: cobc/help.c:102 +#: cobc/help.c:106 msgid " -S compile only; output assembly file" msgstr " -S solo compilazione; in output un file assembly" -#: cobc/help.c:103 +#: cobc/help.c:107 msgid " -c compile and assemble, but do not link" msgstr " -c compilare ed assemblare, ma non fare il linking" -#: cobc/help.c:104 +#: cobc/help.c:108 msgid " -T <file> generate and place a wide program listing into <file>" msgstr "" -#: cobc/help.c:105 +#: cobc/help.c:109 msgid " -t <file> generate and place a program listing into <file>" msgstr "" -#: cobc/help.c:106 +#: cobc/help.c:110 msgid " --tlines=<lines> specify lines per page in listing, default = 55" msgstr "" -#: cobc/help.c:108 -msgid " --tsymbols specify symbols in listing, use -ftsymbols instead" -msgstr "" - -#: cobc/help.c:110 +#: cobc/help.c:111 msgid " -P[=<dir or file>] generate preprocessed program listing (.lst)" msgstr "" -#: cobc/help.c:112 +#: cobc/help.c:113 msgid "" " -X, --Xref generate cross reference through 'cobxref'\n" " (V. Coen's 'cobxref' must be in path)" msgstr "" -#: cobc/help.c:115 +#: cobc/help.c:116 msgid " -X, --Xref specify cross reference in listing" msgstr "" -#: cobc/help.c:117 -msgid " -I <directory> add <directory> to copy/include search path" -msgstr "" - #: cobc/help.c:118 -msgid " -L <directory> add <directory> to library search path" +msgid " -I <directory> add <directory> to copy/include search path" msgstr "" #: cobc/help.c:119 -msgid " -l <lib> link the library <lib>" +msgid " -L <directory> add <directory> to library search path" msgstr "" #: cobc/help.c:120 -msgid " -A <options> add <options> to the C compile phase" +msgid " -l <lib> link the library <lib>" msgstr "" #: cobc/help.c:121 -msgid " -Q <options> add <options> to the C link phase" +msgid " -K <entry> generate CALL to <entry> as static" msgstr "" #: cobc/help.c:122 @@ -2235,3725 +2279,3794 @@ msgid " -D <define> define <define> for COBOL compilation" msgstr "" #: cobc/help.c:123 -msgid " -K <entry> generate CALL to <entry> as static" +msgid " -A <options> add <options> to the C compile phase" msgstr "" #: cobc/help.c:124 -msgid " --conf=<file> user-defined dialect configuration; see -std" +msgid " -Q <options> add <options> to the C link phase" msgstr "" #: cobc/help.c:125 +msgid " --coverage instrument generated binaries for coverage" +msgstr "" + +#: cobc/help.c:126 +msgid " --conf=<file> user-defined dialect configuration; see -std" +msgstr "" + +#: cobc/help.c:127 #, fuzzy #| msgid " -list-reserved display reserved words" msgid " --list-reserved display reserved words" msgstr " -list-reserved mostra le keyword riservate" -#: cobc/help.c:126 +#: cobc/help.c:128 msgid " --list-intrinsics display intrinsic functions" msgstr "" -#: cobc/help.c:127 +#: cobc/help.c:129 msgid " --list-mnemonics display mnemonic names" msgstr "" -#: cobc/help.c:128 +#: cobc/help.c:130 msgid " --list-exceptions display exception names" msgstr "" -#: cobc/help.c:129 +#: cobc/help.c:131 #, fuzzy #| msgid " -list-reserved display reserved words" msgid " --list-system display system routines" msgstr " -list-reserved mostra le keyword riservate" -#: cobc/help.c:130 +#: cobc/help.c:132 msgid "" " --save-temps[=<dir>] save intermediate files\n" " * default: current directory" msgstr "" -#: cobc/help.c:132 +#: cobc/help.c:134 +msgid " -MT <target> set/add target file used in dependency list" +msgstr "" + +#: cobc/help.c:135 +msgid " -MF <file> place dependency list into <file>" +msgstr "" + +#: cobc/help.c:136 msgid " -ext <extension> add file extension for resolving COPY" msgstr "" -#: cobc/help.c:139 +#: cobc/help.c:143 msgid "Warning options:" msgstr "" -#: cobc/help.c:140 +#: cobc/help.c:144 msgid " -Wall enable most warnings (all except as noted below)" msgstr "" -#: cobc/help.c:141 +#: cobc/help.c:145 #, fuzzy #| msgid " -W enable all warnings" msgid " -Wextra like -Wall but enable some extra warning flags" msgstr " -W attiva tutti i warning" -#: cobc/help.c:142 +#: cobc/help.c:146 #, fuzzy #| msgid " -W enable all warnings" msgid " -w disable all warnings" msgstr " -W attiva tutti i warning" -#: cobc/help.c:143 +#: cobc/help.c:147 msgid " -Wno-<warning> disable warning enabled by default, -Wall or -Wextra" msgstr "" #. TRANSLATORS: This msgid is appended to msgid for -Wno-pending and others -#: cobc/help.c:149 +#: cobc/help.c:153 #, fuzzy #| msgid " -W enable all warnings" msgid " * ALWAYS active" msgstr " -W attiva tutti i warning" #. TRANSLATORS: This msgid is appended to msgid for -Wpossible-truncate and others -#: cobc/help.c:153 +#: cobc/help.c:157 #, fuzzy #| msgid " -W enable all warnings" msgid " * NOT set with -Wall" msgstr " -W attiva tutti i warning" -#: cobc/help.c:161 +#: cobc/help.c:165 +msgid " -fdiagnostics-plain-output\tmake diagnostic output as plain as possible" +msgstr "" + +#: cobc/help.c:166 msgid " -Werror treat all warnings as errors" msgstr " -Werror tratta i warning come se fossero errori" -#: cobc/help.c:162 +#: cobc/help.c:167 #, fuzzy #| msgid " -Werror treat all warnings as errors" msgid " -Wno-error don't treat warnings as errors" msgstr " -Werror tratta i warning come se fossero errori" -#: cobc/help.c:163 +#: cobc/help.c:168 msgid " -Werror=<warning> treat specified <warning> as error" msgstr "" -#: cobc/help.c:164 +#: cobc/help.c:169 #, fuzzy #| msgid " -Werror treat all warnings as errors" msgid " -Wno-error=<warning> don't treat specified <warning> as error" msgstr " -Werror tratta i warning come se fossero errori" -#: cobc/help.c:180 +#: cobc/help.c:185 msgid "Compiler options:" msgstr "" -#: cobc/help.c:198 +#: cobc/help.c:203 msgid "" " -fibmcomp sets -fbinary-size=2-4-8 -fsynchronized-clause=ok\n" " -fno-ibmcomp sets -fbinary-size=1--8 -fsynchronized-clause=ignore" msgstr "" -#: cobc/help.c:201 +#: cobc/help.c:206 msgid "" " -falternate-ebcdic use restricted ASCII to EBCDIC translate\n" " -fno-alternate-ebcdic use extended ASCII to EBCDIC translate" msgstr "" -#: cobc/help.c:230 +#: cobc/help.c:235 msgid "Compiler dialect configuration options:" msgstr "" -#: cobc/help.c:232 cobc/help.c:238 +#: cobc/help.c:237 cobc/help.c:243 msgid "<value>" msgstr "<value>" -#: cobc/help.c:242 +#: cobc/help.c:247 msgid "<support>" msgstr "<support>" -#: cobc/help.c:251 +#: cobc/help.c:256 msgid "where <support> is one of the following:" msgstr "" #. TRANSLATORS: This msgid is used when a variable name #. or label is referenced in a compiler message. -#: cobc/help.c:254 cobc/help.c:257 cobc/help.c:260 cobc/help.c:263 -#: cobc/help.c:266 cobc/help.c:269 cobc/help.c:272 cobc/help.c:275 -#: cobc/typeck.c:2361 +#: cobc/help.c:259 cobc/help.c:262 cobc/help.c:265 cobc/help.c:268 +#: cobc/help.c:271 cobc/help.c:274 cobc/help.c:277 cobc/help.c:280 +#: cobc/typeck.c:2378 #, c-format msgid "'%s'" msgstr "" -#: cobc/help.c:277 +#: cobc/help.c:282 msgid "word to be taken out of the reserved words list" msgstr "" -#: cobc/help.c:277 cobc/help.c:278 cobc/help.c:280 +#: cobc/help.c:282 cobc/help.c:283 cobc/help.c:285 msgid "<word>" msgstr "<word>" -#: cobc/help.c:278 +#: cobc/help.c:283 msgid "word to be added to reserved words list" msgstr "" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "word to be added to reserved words list as alias" msgstr "" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "<word>:<alias>" msgstr "<word>:<alias>" -#: cobc/help.c:280 +#: cobc/help.c:285 msgid "special register to disable" msgstr "" -#: cobc/help.c:281 +#: cobc/help.c:286 msgid "special register to enable" msgstr "" -#: cobc/help.c:282 +#: cobc/help.c:287 msgid "<word> or <word>:<definition>, where definition uses backslash escaped spaces" msgstr "" -#: cobc/parser.y:315 cobc/parser.y:323 +#: cobc/parser.y:307 #, c-format msgid "'%s' should start in Area A" msgstr "" -#: cobc/parser.y:331 cobc/parser.y:333 +#: cobc/parser.y:315 +#, c-format +msgid "%s should start in Area A" +msgstr "" + +#: cobc/parser.y:322 +#, c-format +msgid "%s should not start in Area A" +msgstr "" + +#: cobc/parser.y:330 cobc/parser.y:332 msgid "start of statement in Area A" msgstr "" -#: cobc/parser.y:344 cobc/parser.y:379 +#: cobc/parser.y:428 #, c-format msgid "unreachable statement '%s'" msgstr "" -#: cobc/parser.y:470 +#: cobc/parser.y:542 #, c-format msgid "ENTRY '%s' duplicated" msgstr "" -#: cobc/parser.y:520 +#: cobc/parser.y:594 #, c-format msgid "ENTRY FOR GO TO '%s' duplicated" msgstr "" -#: cobc/parser.y:536 +#: cobc/parser.y:610 #, c-format msgid "maximum nested program depth exceeded (%d)" msgstr "" -#: cobc/parser.y:562 cobc/parser.y:589 +#: cobc/parser.y:636 cobc/parser.y:663 #, c-format msgid "%s statement not terminated by %s" msgstr "" -#: cobc/parser.y:592 +#: cobc/parser.y:666 #, c-format msgid "%s statement not terminated" msgstr "" -#: cobc/parser.y:634 -msgid "USE statement invalid for SORT file" -msgstr "" - -#: cobc/parser.y:676 cobc/parser.y:1670 cobc/parser.y:1673 -#, c-format -msgid "cannot specify both %s and %s" +#: cobc/parser.y:708 +msgid "USE statement invalid for SD file" msgstr "" -#: cobc/parser.y:677 +#: cobc/parser.y:751 #, c-format msgid "%s is ignored" msgstr "" -#: cobc/parser.y:686 +#: cobc/parser.y:760 #, c-format -msgid "Cannot specify %s without number of lines on page" +msgid "cannot specify %s without number of lines on page" msgstr "" -#: cobc/parser.y:696 +#: cobc/parser.y:770 #, c-format msgid "maximum OCCURS depth exceeded (%d)" msgstr "" -#: cobc/parser.y:704 cobc/typeck.c:3037 +#: cobc/parser.y:785 cobc/typeck.c:3127 #, c-format msgid "'%s' is not in LINKAGE SECTION" msgstr "" -#: cobc/parser.y:725 +#: cobc/parser.y:806 msgid "TO phrase without DEPENDING phrase" msgstr "" -#: cobc/parser.y:727 +#: cobc/parser.y:808 msgid "maximum number of occurrences assumed to be exact number" msgstr "" -#: cobc/parser.y:732 cobc/parser.y:8032 +#: cobc/parser.y:813 cobc/parser.y:8398 msgid "OCCURS TO must be greater than OCCURS FROM" msgstr "" -#: cobc/parser.y:741 +#: cobc/parser.y:823 msgid "OCCURS DEPENDING ON without TO phrase" msgstr "" -#: cobc/parser.y:806 +#: cobc/parser.y:899 #, c-format msgid "%s header missing" msgstr "" -#: cobc/parser.y:807 +#: cobc/parser.y:900 #, c-format msgid "%s header assumed" msgstr "" -#: cobc/parser.y:939 -#, c-format -msgid "duplicate %s" -msgstr "" - -#: cobc/parser.y:941 +#: cobc/parser.y:1053 #, c-format msgid "%s incorrectly after %s" msgstr "" -#: cobc/parser.y:1078 +#: cobc/parser.y:1208 #, c-format msgid "redefinition of program name '%s'" msgstr "" -#: cobc/parser.y:1083 +#: cobc/parser.y:1213 #, c-format msgid "redefinition of program ID '%s'" msgstr "" -#: cobc/parser.y:1117 +#: cobc/parser.y:1247 #, c-format msgid "FUNCTION '%s' has no PROCEDURE DIVISION" msgstr "" -#: cobc/parser.y:1228 +#: cobc/parser.y:1372 msgid "functions may not be defined within a program/function" msgstr "" -#: cobc/parser.y:1278 +#: cobc/parser.y:1426 #, c-format msgid "END FUNCTION '%s' is different from FUNCTION-ID '%s'" msgstr "" -#: cobc/parser.y:1292 +#: cobc/parser.y:1440 #, c-format msgid "END PROGRAM '%s' is different from PROGRAM-ID '%s'" msgstr "" -#: cobc/parser.y:1341 +#: cobc/parser.y:1489 msgid "currency symbol must be one character long" msgstr "" -#: cobc/parser.y:1398 +#: cobc/parser.y:1546 #, c-format msgid "invalid character '%c' in currency symbol" msgstr "" -#: cobc/parser.y:1414 +#: cobc/parser.y:1562 msgid "prototype has same name as current function and will be ignored" msgstr "" -#: cobc/parser.y:1441 +#: cobc/parser.y:1589 #, c-format msgid "duplicate REPOSITORY entries for '%s' do not match" msgstr "" -#: cobc/parser.y:1445 +#: cobc/parser.y:1593 #, c-format msgid "duplicate REPOSITORY entry for '%s'" msgstr "" -#: cobc/parser.y:1510 +#: cobc/parser.y:1658 #, c-format msgid "ORGANIZATION %s is incompatible with RECORD DELIMITER" msgstr "" -#: cobc/parser.y:1548 cobc/parser.y:1939 cobc/typeck.c:829 +#: cobc/parser.y:1694 cobc/parser.y:2142 cobc/typeck.c:835 #, c-format msgid "condition-name not allowed here: '%s'" msgstr "" -#: cobc/parser.y:1554 cobc/parser.y:2127 +#: cobc/parser.y:1700 cobc/parser.y:2345 msgid "SCREEN item cannot be used here" msgstr "" -#: cobc/parser.y:1557 +#: cobc/parser.y:1703 msgid "REPORT item cannot be used here" msgstr "" -#: cobc/parser.y:1563 +#: cobc/parser.y:1709 msgid "TYPEDEF item cannot be used here" msgstr "" -#: cobc/parser.y:1572 +#: cobc/parser.y:1718 msgid "elementary item expected" msgstr "" -#: cobc/parser.y:1579 +#: cobc/parser.y:1725 msgid "item may not reference itself" msgstr "" -#: cobc/parser.y:1586 +#: cobc/parser.y:1733 msgid "item may not be subordinate to any item with USAGE clause" msgstr "" -#: cobc/parser.y:1588 +#: cobc/parser.y:1735 msgid "item may not be subordinate to any item with SIGN clause" msgstr "" -#: cobc/parser.y:1631 +#: cobc/parser.y:1780 #, c-format msgid "illegal combination of %s with other clauses" msgstr "" -#: cobc/parser.y:1641 +#: cobc/parser.y:1794 #, c-format msgid "entry following %s may not be subordinate to it" msgstr "" -#: cobc/parser.y:1859 +#: cobc/parser.y:2042 +msgid "INITIAL specified on non-input field" +msgstr "" + +#: cobc/parser.y:2054 +msgid "relative LINE/COLUMN clause required with OCCURS" +msgstr "" + +#: cobc/parser.y:2072 msgid "FOR phrase cannot immediately follow ALL/LEADING/TRAILING" msgstr "" -#: cobc/parser.y:1861 +#: cobc/parser.y:2074 msgid "missing CHARACTERS/ALL/LEADING/TRAILING phrase after FOR phrase" msgstr "" -#: cobc/parser.y:1868 +#: cobc/parser.y:2081 msgid "missing value between ALL/LEADING/TRAILING words" msgstr "" -#: cobc/parser.y:1873 +#: cobc/parser.y:2086 msgid "missing FOR phrase before CHARACTERS/ALL/LEADING/TRAILING phrase" msgstr "" -#: cobc/parser.y:1880 +#: cobc/parser.y:2093 msgid "missing ALL/LEADING/TRAILING before value" msgstr "" -#: cobc/parser.y:1935 +#: cobc/parser.y:2138 msgid "use of condition-name in place of data-name" msgstr "" -#: cobc/parser.y:1966 +#: cobc/parser.y:2169 msgid "cannot specify NO ADVANCING in screen DISPLAY" msgstr "" -#: cobc/parser.y:2029 cobc/parser.y:2046 +#: cobc/parser.y:2232 cobc/parser.y:2249 msgid "non-standard DISPLAY" msgstr "" -#: cobc/parser.y:2033 +#: cobc/parser.y:2236 msgid "screens may only be displayed on CRT" msgstr "" -#: cobc/parser.y:2038 cobc/parser.y:2081 +#: cobc/parser.y:2241 cobc/parser.y:2284 msgid "cannot mix screens and fields in the same DISPLAY statement" msgstr "" -#: cobc/parser.y:2042 +#: cobc/parser.y:2245 msgid "screen clauses may only be used for DISPLAY on CRT" msgstr "" -#: cobc/parser.y:2087 +#: cobc/parser.y:2290 msgid "ambiguous DISPLAY; put items to display on device in separate DISPLAY" msgstr "" -#: cobc/parser.y:2103 +#: cobc/parser.y:2301 #, c-format msgid "%s is not an alphanumeric literal" msgstr "" -#: cobc/parser.y:2105 +#: cobc/parser.y:2305 #, c-format msgid "'%s' is not USAGE DISPLAY" msgstr "" -#: cobc/parser.y:2120 cobc/typeck.c:9790 +#: cobc/parser.y:2322 cobc/parser.y:19534 +#, c-format +msgid "'%s' is not a field" +msgstr "" + +#: cobc/parser.y:2338 cobc/typeck.c:10231 #, c-format msgid "invalid target for %s" msgstr "" -#: cobc/parser.y:2129 +#: cobc/parser.y:2347 msgid "RENAMES item may not be used here" msgstr "" -#: cobc/parser.y:2131 cobc/typeck.c:2737 cobc/typeck.c:2828 +#: cobc/parser.y:2349 cobc/typeck.c:2822 cobc/typeck.c:2913 msgid "ANY LENGTH item not allowed here" msgstr "" -#: cobc/parser.y:2135 +#: cobc/parser.y:2353 #, c-format msgid "item '%s' has wrong class for VALIDATE" msgstr "" -#: cobc/parser.y:2144 +#: cobc/parser.y:2362 msgid "WHEN clause must follow EVERY clause" msgstr "" -#: cobc/parser.y:2229 cobc/parser.y:18631 +#: cobc/parser.y:2447 cobc/parser.y:19251 msgid "non-zero value expected" msgstr "" -#: cobc/parser.y:2235 cobc/tree.c:4735 +#: cobc/parser.y:2453 cobc/tree.c:4803 #, c-format msgid "RECORD size (IDX) exceeds maximum allowed (%d)" msgstr "" -#: cobc/parser.y:2239 cobc/tree.c:4739 +#: cobc/parser.y:2457 cobc/tree.c:4807 #, c-format msgid "RECORD size exceeds maximum allowed (%d)" msgstr "" -#: cobc/parser.y:2244 +#: cobc/parser.y:2462 msgid "RECORD clause invalid" msgstr "" -#: cobc/parser.y:3368 +#: cobc/parser.y:3595 msgid "multiple PROGRAM-ID's without matching END PROGRAM" msgstr "" -#: cobc/parser.y:3371 +#: cobc/parser.y:3598 msgid "executable requested but no program found" msgstr "" -#: cobc/parser.y:3488 +#: cobc/parser.y:3717 msgid "prototypes must be come before any program/function definitions" msgstr "" -#: cobc/parser.y:3691 +#: cobc/parser.y:3930 msgid "COMMON may only be used in a contained program" msgstr "" -#: cobc/parser.y:3778 +#: cobc/parser.y:4017 msgid "CALL prototypes" msgstr "" -#: cobc/parser.y:3953 cobc/parser.y:4235 cobc/parser.y:4281 cobc/parser.y:4394 -#: cobc/parser.y:4608 cobc/parser.y:4705 cobc/parser.y:4744 cobc/parser.y:4803 -#: cobc/parser.y:4824 cobc/parser.y:4867 cobc/parser.y:4946 cobc/parser.y:4965 -#: cobc/parser.y:4981 cobc/parser.y:4999 cobc/parser.y:5017 cobc/parser.y:5034 -#: cobc/parser.y:5052 cobc/parser.y:7404 cobc/parser.y:8628 +#: cobc/parser.y:4192 cobc/parser.y:4471 cobc/parser.y:4517 cobc/parser.y:4632 +#: cobc/parser.y:4846 cobc/parser.y:4943 cobc/parser.y:4982 cobc/parser.y:5041 +#: cobc/parser.y:5062 cobc/parser.y:5105 cobc/parser.y:5184 cobc/parser.y:5203 +#: cobc/parser.y:5219 cobc/parser.y:5237 cobc/parser.y:5255 cobc/parser.y:5272 +#: cobc/parser.y:5290 cobc/parser.y:7685 cobc/parser.y:9028 #, c-format msgid "%s not allowed in nested programs" msgstr "" -#: cobc/parser.y:4109 +#: cobc/parser.y:4345 msgid "segment-number must be in range of values 1 to 49" msgstr "" -#: cobc/parser.y:4121 +#: cobc/parser.y:4357 msgid "duplicate CLASSIFICATION clause" msgstr "" -#: cobc/parser.y:4200 +#: cobc/parser.y:4436 msgid "PROGRAM phrase" msgstr "" -#: cobc/parser.y:4302 cobc/parser.y:4313 cobc/parser.y:4657 +#: cobc/parser.y:4538 cobc/parser.y:4549 cobc/parser.y:4895 #, c-format msgid "invalid %s clause" msgstr "clausola %s non valida" -#: cobc/parser.y:4616 cobc/parser.y:4754 +#: cobc/parser.y:4854 cobc/parser.y:4992 msgid "type does not match alphabet" msgstr "" -#: cobc/parser.y:4760 +#: cobc/parser.y:4998 msgid "CLASS IS integer IN alphabet-name" msgstr "" -#: cobc/parser.y:4780 cobc/parser.y:4784 +#: cobc/parser.y:5018 cobc/parser.y:5022 msgid "CLASS literal with THRU must have size 1" msgstr "" -#: cobc/parser.y:4879 +#: cobc/parser.y:5117 msgid "separate currency symbol and currency string" msgstr "" -#: cobc/parser.y:4912 +#: cobc/parser.y:5150 #, c-format msgid "invalid CURRENCY SIGN '%s'" msgstr "CURRENCY SIGN non valido '%s'" -#: cobc/parser.y:5139 +#: cobc/parser.y:5377 msgid "cannot use RELATIVE KEY clause on INDEXED files" msgstr "" -#: cobc/parser.y:5143 +#: cobc/parser.y:5381 msgid "cannot use RECORD KEY clause on RELATIVE files" msgstr "" -#: cobc/parser.y:5215 +#: cobc/parser.y:5453 msgid "EXTERNAL/DYNAMIC cannot be used with literals" msgstr "" -#: cobc/parser.y:5235 +#: cobc/parser.y:5473 msgid "EXTERNAL/DYNAMIC cannot be used with USING/VARYING" msgstr "" -#: cobc/parser.y:5246 +#: cobc/parser.y:5484 msgid "EXTERNAL/DYNAMIC cannot be used with DISK FROM" msgstr "" -#: cobc/parser.y:5248 -msgid "ASSIGN DISK FROM" -msgstr "" - -#: cobc/parser.y:5370 +#: cobc/parser.y:5608 msgid "ASSIGN EXTERNAL/DYNAMIC" msgstr "" -#: cobc/parser.y:5486 cobc/parser.y:5666 +#: cobc/parser.y:5724 cobc/parser.y:5921 #, c-format msgid "%s only valid with ORGANIZATION %s" msgstr "" -#: cobc/parser.y:5583 +#: cobc/parser.y:5818 cobc/typeck.c:3818 #, c-format msgid "'%s' is not an alphabet-name" msgstr "" -#: cobc/parser.y:5599 +#: cobc/parser.y:5854 msgid "VSAM status" msgstr "" -#: cobc/parser.y:5733 cobc/parser.y:5758 +#: cobc/parser.y:5988 cobc/parser.y:6013 #, c-format msgid "RECORD DELIMITER %s only allowed with SEQUENTIAL files" msgstr "" -#: cobc/parser.y:5745 +#: cobc/parser.y:6000 #, c-format msgid "RECORD DELIMITER %s only allowed with (LINE) SEQUENTIAL files" msgstr "" -#: cobc/parser.y:5751 +#: cobc/parser.y:6006 msgid "LINE-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5764 +#: cobc/parser.y:6019 msgid "BINARY-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5772 +#: cobc/parser.y:6027 msgid "RECORD DELIMITER clause only allowed with (LINE) SEQUENTIAL files" msgstr "" -#: cobc/parser.y:5776 +#: cobc/parser.y:6031 #, c-format msgid "RECORD DELIMITER %s not recognized; will be ignored" msgstr "" -#: cobc/parser.y:5814 +#: cobc/parser.y:6069 msgid "DUPLICATES for primary keys" msgstr "" -#: cobc/parser.y:6058 +#: cobc/parser.y:6313 msgid "DOS/VS APPLY phrase" msgstr "" -#: cobc/parser.y:6212 +#: cobc/parser.y:6467 msgid "RECORD description missing or invalid" msgstr "" -#: cobc/parser.y:6239 +#: cobc/parser.y:6494 #, c-format msgid "duplicate file description for %s" msgstr "" -#: cobc/parser.y:6288 cobc/parser.y:6893 cobc/parser.y:7389 cobc/parser.y:13485 -#: cobc/parser.y:16686 +#: cobc/parser.y:6543 cobc/parser.y:7170 cobc/parser.y:7670 cobc/parser.y:13913 +#: cobc/parser.y:17210 #, c-format msgid "%s is invalid in a user FUNCTION" msgstr "" -#: cobc/parser.y:6326 cobc/parser.y:6336 +#: cobc/parser.y:6581 cobc/parser.y:6591 msgid "RECORD clause ignored for LINE SEQUENTIAL" msgstr "" -#: cobc/parser.y:6433 +#: cobc/parser.y:6688 msgid "LINAGE clause with wrong file type" msgstr "" -#: cobc/parser.y:6495 +#: cobc/parser.y:6750 msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgstr "" -#: cobc/parser.y:6532 +#: cobc/parser.y:6787 #, c-format msgid "ignoring CODE-SET '%s'" msgstr "" -#: cobc/parser.y:6541 +#: cobc/parser.y:6796 msgid "CODE-SET clause invalid for file type" msgstr "" -#: cobc/parser.y:6562 +#: cobc/parser.y:6817 msgid "REPORT clause with wrong file type" msgstr "" -#: cobc/parser.y:6641 +#: cobc/parser.y:6899 msgid "CD record missing" msgstr "" -#: cobc/parser.y:7091 +#: cobc/parser.y:7372 msgid "CONSTANT item not at 01 level" msgstr "" -#: cobc/parser.y:7236 +#: cobc/parser.y:7517 msgid "REDEFINES clause not following entry-name" msgstr "" -#: cobc/parser.y:7309 cobc/parser.y:7339 cobc/parser.y:7381 cobc/parser.y:7470 -#: cobc/parser.y:8233 +#: cobc/parser.y:7590 cobc/parser.y:7620 cobc/parser.y:7662 cobc/parser.y:7751 +#: cobc/parser.y:8606 #, c-format msgid "%s only allowed at 01/77 level" msgstr "" -#: cobc/parser.y:7312 cobc/parser.y:7341 cobc/parser.y:7383 cobc/parser.y:8235 -#: cobc/parser.y:8587 cobc/parser.y:8609 +#: cobc/parser.y:7593 cobc/parser.y:7622 cobc/parser.y:7664 cobc/parser.y:8608 +#: cobc/parser.y:8987 cobc/parser.y:9009 #, c-format msgid "%s requires a data name" msgstr "" -#: cobc/parser.y:7316 cobc/parser.y:7565 +#: cobc/parser.y:7597 cobc/parser.y:7846 #, fuzzy, c-format #| msgid "%s is obsolete in %s" msgid "%s not allowed in %s" msgstr "%s è obsoleto in %s" -#: cobc/parser.y:7337 cobc/parser.y:7391 cobc/parser.y:8231 cobc/parser.y:8583 -#: cobc/parser.y:8607 +#: cobc/parser.y:7618 cobc/parser.y:7672 cobc/parser.y:8604 cobc/parser.y:8983 +#: cobc/parser.y:9007 #, c-format msgid "%s not allowed here" msgstr "" -#: cobc/parser.y:7528 +#: cobc/parser.y:7809 #, c-format msgid "%s requires DEPENDING clause" msgstr "" -#: cobc/parser.y:7544 +#: cobc/parser.y:7825 msgid "a locale-format PICTURE string must only consist of '9', '.', '+', 'Z' and the currency-sign" msgstr "" -#: cobc/parser.y:7554 +#: cobc/parser.y:7835 msgid "DEPENDING clause needs either an OCCURS clause or a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7560 +#: cobc/parser.y:7841 msgid "only USAGE DISPLAY may specify a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7610 cobc/typeck.c:4752 +#: cobc/parser.y:7893 cobc/typeck.c:4916 #, fuzzy, c-format #| msgid "'%s' is not a statement" msgid "'%s' is not a locale-name" msgstr "'%s' non è una definizione" -#: cobc/parser.y:7656 +#: cobc/parser.y:7939 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "'%s' is not a valid USAGE" msgstr "'%s' non è un integer" -#: cobc/parser.y:7661 +#: cobc/parser.y:7944 #, c-format msgid "unknown USAGE: %s" msgstr "" -#: cobc/parser.y:7808 +#: cobc/parser.y:8139 +#, c-format +msgid "unknown HANDLE type: %s" +msgstr "" + +#: cobc/parser.y:8347 #, c-format -msgid "unknown HANDLE type: %s" +msgid "'%s' is not USAGE UTF-8" msgstr "" -#: cobc/parser.y:8082 +#: cobc/parser.y:8448 msgid "INDEXED should follow ASCENDING/DESCENDING" msgstr "" -#: cobc/parser.y:8317 +#: cobc/parser.y:8658 cobc/parser.y:8660 +#, c-format +msgid "unexpected %s" +msgstr "" + +#: cobc/parser.y:8709 msgid "amount of entries in FROM and TO must match" msgstr "" -#: cobc/parser.y:8326 +#: cobc/parser.y:8718 #, c-format msgid "entry in FROM (%d) must be <= entry in TO (%d)" msgstr "" -#: cobc/parser.y:8585 +#: cobc/parser.y:8985 #, c-format msgid "%s only allowed at 01 level" msgstr "" -#: cobc/parser.y:8589 cobc/parser.y:8611 +#: cobc/parser.y:8989 cobc/parser.y:9011 #, c-format msgid "%s and %s combination not allowed" msgstr "" -#: cobc/parser.y:8723 +#: cobc/parser.y:9127 msgid "GLOBAL is not allowed with RD" msgstr "" -#: cobc/parser.y:9247 +#: cobc/parser.y:9650 #, c-format msgid "%s is not valid for VARYING" msgstr "" -#: cobc/parser.y:9283 +#: cobc/parser.y:9686 msgid "LINE with OCCURS is not supported" msgstr "" -#: cobc/parser.y:9323 +#: cobc/parser.y:9726 msgid "PLUS is not recommended with LEFT, RIGHT or CENTER" msgstr "" -#: cobc/parser.y:9325 +#: cobc/parser.y:9728 msgid "PLUS is not allowed with LEFT, RIGHT or CENTER" msgstr "" -#: cobc/parser.y:9363 +#: cobc/parser.y:9766 msgid "PLUS is ignored on first field of line" msgstr "" -#: cobc/parser.y:9394 +#: cobc/parser.y:9797 msgid "invalid COLUMN integer; must be > 0" msgstr "" -#: cobc/parser.y:9396 +#: cobc/parser.y:9799 msgid "COLUMN numbers should increase" msgstr "" -#: cobc/parser.y:9492 cobc/parser.y:9547 -msgid "INITIAL specified on non-input field" -msgstr "" - -#: cobc/parser.y:9504 cobc/parser.y:9559 -msgid "relative LINE/COLUMN clause required with OCCURS" -msgstr "" - -#: cobc/parser.y:9661 cobc/parser.y:9665 +#: cobc/parser.y:9990 cobc/parser.y:9994 msgid "screen positions from data-item" msgstr "" -#: cobc/parser.y:9821 +#: cobc/parser.y:10153 #, fuzzy, c-format #| msgid "missing definitions:" msgid "missing %s" msgstr "definizioni mancanti:" -#: cobc/parser.y:10508 +#: cobc/parser.y:10840 msgid "OCCURS screen items" msgstr "" -#: cobc/parser.y:10520 +#: cobc/parser.y:10852 msgid "GLOBAL screen items" msgstr "" -#: cobc/parser.y:10571 +#: cobc/parser.y:10904 msgid "overriding convention specified in ENTRY-CONVENTION" msgstr "" -#: cobc/parser.y:10586 +#: cobc/parser.y:10917 msgid "executable program requested but PROCEDURE/ENTRY has USING clause" msgstr "" -#: cobc/parser.y:10654 cobc/parser.y:10671 cobc/parser.y:12278 +#: cobc/parser.y:10987 cobc/parser.y:11004 cobc/parser.y:12667 #, c-format msgid "number of arguments exceeds maximum %d" msgstr "" -#: cobc/parser.y:10663 +#: cobc/parser.y:10996 msgid "CHAINING invalid in user FUNCTION" msgstr "" -#: cobc/parser.y:10699 +#: cobc/parser.y:11032 msgid "ANY LENGTH items may only be BY REFERENCE formal parameters" msgstr "" -#: cobc/parser.y:10716 cobc/parser.y:12337 cobc/parser.y:12350 +#: cobc/parser.y:11049 cobc/parser.y:12728 cobc/parser.y:12741 #, c-format msgid "%s not allowed in CHAINED programs" msgstr "" -#: cobc/parser.y:10718 +#: cobc/parser.y:11051 msgid "parameters passed BY VALUE" msgstr "" -#: cobc/parser.y:10733 cobc/parser.y:10742 cobc/parser.y:10750 -#: cobc/parser.y:10771 +#: cobc/parser.y:11066 cobc/parser.y:11075 cobc/parser.y:11083 +#: cobc/parser.y:11104 msgid "SIZE only allowed for BY VALUE items" msgstr "" -#: cobc/parser.y:10773 cobc/parser.y:10798 +#: cobc/parser.y:11106 cobc/parser.y:11131 msgid "invalid value for SIZE" msgstr "" -#: cobc/parser.y:10813 +#: cobc/parser.y:11146 msgid "MEMORY SIZE phrase in CALL statement" msgstr "" -#: cobc/parser.y:10825 +#: cobc/parser.y:11162 msgid "OPTIONAL only allowed for BY REFERENCE items" msgstr "" -#: cobc/parser.y:10837 +#: cobc/parser.y:11177 msgid "RETURNING clause is required for a FUNCTION" msgstr "" -#: cobc/parser.y:10843 +#: cobc/parser.y:11183 msgid "RETURNING clause cannot be OMITTED for main program" msgstr "" -#: cobc/parser.y:10846 +#: cobc/parser.y:11186 msgid "RETURNING clause cannot be OMITTED for a FUNCTION" msgstr "" -#: cobc/parser.y:10859 +#: cobc/parser.y:11199 msgid "RETURNING item is not defined in LINKAGE SECTION" msgstr "" -#: cobc/parser.y:10861 +#: cobc/parser.y:11201 msgid "RETURNING item must have level 01" msgstr "" -#: cobc/parser.y:10863 +#: cobc/parser.y:11203 msgid "RETURNING item should not have OCCURS" msgstr "" -#: cobc/parser.y:10867 +#: cobc/parser.y:11207 msgid "function RETURNING item may not be ANY LENGTH" msgstr "" -#: cobc/parser.y:11080 +#: cobc/parser.y:11421 #, c-format msgid "'%s' is not a statement" msgstr "'%s' non è una definizione" -#: cobc/parser.y:11083 +#: cobc/parser.y:11424 #, c-format msgid "unknown statement '%s'; it may exist in another dialect" msgstr "" -#: cobc/parser.y:11087 +#: cobc/parser.y:11428 #, c-format msgid "unknown statement '%s'" msgstr "" -#: cobc/parser.y:11105 +#: cobc/parser.y:11446 msgid "SECTION segment-number must be less than or equal to 99" msgstr "" -#: cobc/parser.y:11108 +#: cobc/parser.y:11449 msgid "SECTION segment-number in DECLARATIVES must be less than 50" msgstr "" -#: cobc/parser.y:11116 +#: cobc/parser.y:11457 msgid "SECTION segment within DECLARATIVES" msgstr "" -#: cobc/parser.y:11313 cobc/parser.y:11448 +#: cobc/parser.y:11667 cobc/parser.y:11806 msgid "non-standard ACCEPT" msgstr "" -#: cobc/parser.y:11325 +#: cobc/parser.y:11679 msgid "PROMPT clause" msgstr "" -#: cobc/parser.y:11329 +#: cobc/parser.y:11683 msgid "SIZE IS clause" msgstr "" -#: cobc/parser.y:11549 cobc/parser.y:11842 +#: cobc/parser.y:11907 cobc/parser.y:12226 msgid "TIME-OUT or BEFORE TIME clauses" msgstr "" -#: cobc/parser.y:11575 cobc/parser.y:11591 cobc/parser.y:11606 +#: cobc/parser.y:11937 cobc/parser.y:11960 cobc/parser.y:11978 msgid "AT screen-location" msgstr "" -#: cobc/parser.y:11607 +#: cobc/parser.y:11979 msgid "LINE or COLUMN" msgstr "" -#: cobc/parser.y:11972 +#: cobc/parser.y:12358 msgid "ALLOCATE CHARACTERS requires RETURNING clause" msgstr "" -#: cobc/parser.y:11987 cobc/parser.y:13289 +#: cobc/parser.y:12373 #, c-format msgid "ignoring %s phrase" msgstr "" -#: cobc/parser.y:11989 +#: cobc/parser.y:12375 msgid "addressing mode should be either 24 or 31 bit" msgstr "" -#: cobc/parser.y:12061 +#: cobc/parser.y:12446 msgid "CALL to own PROGRAM-ID" msgstr "" -#: cobc/parser.y:12062 +#: cobc/parser.y:12447 msgid "assuming RECURSIVE attribute" msgstr "" -#: cobc/parser.y:12082 +#: cobc/parser.y:12467 msgid "STATIC CALL convention ignored because of ON EXCEPTION" msgstr "" -#: cobc/parser.y:12091 +#: cobc/parser.y:12476 msgid "ON EXCEPTION ignored because of STATIC CALL" msgstr "" -#: cobc/parser.y:12205 cobc/typeck.c:13644 +#: cobc/parser.y:12594 cobc/typeck.c:14450 msgid "invalid mnemonic name" msgstr "" -#: cobc/parser.y:12229 +#: cobc/parser.y:12618 msgid "id/literal ignored, using prototype name" msgstr "" -#: cobc/parser.y:12235 +#: cobc/parser.y:12624 msgid "NESTED phrase is only valid with literal" msgstr "" -#: cobc/parser.y:12296 +#: cobc/parser.y:12685 #, c-format msgid "%s only allowed when arguments are passed %s" msgstr "" -#: cobc/parser.y:12385 +#: cobc/parser.y:12776 msgid "RETURNING item must have level 01 or 77" msgstr "" -#: cobc/parser.y:12389 +#: cobc/parser.y:12780 msgid "RETURNING item must be a LINKAGE SECTION item or have BASED clause" msgstr "" -#: cobc/parser.y:12423 cobc/parser.y:17409 cobc/parser.y:17464 +#: cobc/parser.y:12814 cobc/parser.y:17937 cobc/parser.y:18000 msgid "NOT EXCEPTION before EXCEPTION" msgstr "" -#: cobc/parser.y:13162 +#: cobc/parser.y:13572 #, c-format msgid "HANDLE must be a %s HANDLE" msgstr "" -#: cobc/parser.y:13174 +#: cobc/parser.y:13584 msgid "HANDLE must be a generic HANDLE" msgstr "" -#: cobc/parser.y:13251 +#: cobc/parser.y:13661 #, c-format msgid "HANDLE clause invalid for %s" msgstr "" -#: cobc/parser.y:13483 cobc/parser.y:16876 +#: cobc/parser.y:13911 cobc/parser.y:17400 #, c-format msgid "%s is invalid in nested program" msgstr "" -#: cobc/parser.y:13521 cobc/parser.y:13564 cobc/parser.y:13575 -#: cobc/parser.y:13586 +#: cobc/parser.y:13940 cobc/parser.y:13983 cobc/parser.y:13994 +#: cobc/parser.y:14005 #, c-format msgid "maximum evaluate depth exceeded (%d)" msgstr "" -#: cobc/parser.y:13627 cobc/parser.y:13637 +#: cobc/parser.y:14048 cobc/parser.y:14089 cobc/parser.y:14633 +#: cobc/parser.y:14644 cobc/parser.y:14653 cobc/parser.y:17959 +#: cobc/parser.y:17981 cobc/parser.y:18022 cobc/parser.y:18038 +#: cobc/parser.y:18078 cobc/parser.y:18095 cobc/parser.y:18132 +#: cobc/parser.y:18149 cobc/parser.y:18199 cobc/parser.y:18216 +#: cobc/parser.y:18252 cobc/parser.y:18269 cobc/parser.y:18310 +#: cobc/parser.y:18327 +#, fuzzy, c-format +#| msgid "'%s' is not a statement" +msgid "%s without imperative statement" +msgstr "'%s' non è una definizione" + +#: cobc/parser.y:14056 cobc/parser.y:14066 msgid "WHEN without imperative statement" msgstr "" -#: cobc/parser.y:13655 cobc/parser.y:13665 +#: cobc/parser.y:14097 cobc/parser.y:14107 msgid "WHEN OTHER without imperative statement" msgstr "" -#: cobc/parser.y:13745 +#: cobc/parser.y:14191 msgid "invalid THROUGH usage" msgstr "" -#: cobc/parser.y:13909 +#: cobc/parser.y:14372 msgid "EXIT PROGRAM is not allowed within a USE GLOBAL procedure" msgstr "" -#: cobc/parser.y:13913 +#: cobc/parser.y:14376 msgid "EXIT PROGRAM not allowed within a FUNCTION" msgstr "" -#: cobc/parser.y:13927 +#: cobc/parser.y:14390 msgid "EXIT FUNCTION is not allowed within a USE GLOBAL procedure" msgstr "" -#: cobc/parser.y:13931 +#: cobc/parser.y:14394 msgid "EXIT FUNCTION only allowed within a FUNCTION" msgstr "" -#: cobc/parser.y:13945 cobc/parser.y:13968 +#: cobc/parser.y:14408 cobc/parser.y:14431 msgid "EXIT PERFORM is only valid with inline PERFORM" msgstr "" -#: cobc/parser.y:13990 +#: cobc/parser.y:14453 msgid "EXIT SECTION is only valid with an active SECTION" msgstr "" -#: cobc/parser.y:14011 +#: cobc/parser.y:14474 msgid "EXIT PARAGRAPH is only valid with an active PARAGRAPH" msgstr "" -#: cobc/parser.y:14034 +#: cobc/parser.y:14497 msgid "RETURNING/GIVING not allowed for non-returning runtime elements" msgstr "" -#: cobc/parser.y:14166 +#: cobc/parser.y:14640 msgid "IF without imperative statement" msgstr "" -#: cobc/parser.y:14497 cobc/parser.y:14506 +#: cobc/parser.y:14983 cobc/parser.y:14992 msgid "single-character literal or data item expected" msgstr "" -#: cobc/parser.y:14524 +#: cobc/parser.y:15010 msgid "TALLYING clause is incomplete" msgstr "" -#: cobc/parser.y:14640 +#: cobc/parser.y:15126 msgid "INSPECT missing ALL/FIRST/LEADING/TRAILING" msgstr "" -#: cobc/parser.y:14902 +#: cobc/parser.y:15390 msgid "LOCK clauses" msgstr "" -#: cobc/parser.y:15059 +#: cobc/parser.y:15547 msgid "inline PERFORM without imperative statement" msgstr "" -#: cobc/parser.y:15180 cobc/parser.y:15188 cobc/parser.y:15196 +#: cobc/parser.y:15670 cobc/parser.y:15678 cobc/parser.y:15686 #, c-format msgid "PERFORM VARYING '%s' (line %d of %s) is not a numeric field" msgstr "" -#: cobc/parser.y:15212 +#: cobc/parser.y:15702 msgid "PERFORM VARYING without BY phrase" msgstr "" -#: cobc/parser.y:15252 +#: cobc/parser.y:15742 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "'%s' is not an object-reference" msgstr "'%s' non è un integer" -#: cobc/parser.y:15292 cobc/typeck.c:12295 cobc/typeck.c:13552 +#: cobc/parser.y:15782 cobc/typeck.c:13066 cobc/typeck.c:14358 msgid "LOCK clause invalid with file LOCK AUTOMATIC" msgstr "" -#: cobc/parser.y:15297 +#: cobc/parser.y:15787 msgid "KEY clause invalid with this file type" msgstr "" -#: cobc/parser.y:15302 cobc/typeck.c:12291 cobc/typeck.c:13548 +#: cobc/parser.y:15792 cobc/typeck.c:13062 cobc/typeck.c:14354 msgid "INVALID KEY clause invalid with this file type" msgstr "" -#: cobc/parser.y:15986 -msgid "file sort requires KEY phrase" +#: cobc/parser.y:16494 +msgid "MERGE requires KEY phrase" +msgstr "" + +#: cobc/parser.y:16498 +msgid "file SORT requires KEY phrase" msgstr "" -#: cobc/parser.y:16010 +#: cobc/parser.y:16522 msgid "table SORT requires KEY phrase" msgstr "" -#: cobc/parser.y:16072 -msgid "file sort requires USING or INPUT PROCEDURE" +#: cobc/parser.y:16527 +msgid "must be an SD filename" +msgstr "" + +#: cobc/parser.y:16585 +msgid "MERGE requires USING files" +msgstr "" + +#: cobc/parser.y:16587 +msgid "file SORT requires USING or INPUT PROCEDURE" msgstr "" -#: cobc/parser.y:16079 +#: cobc/parser.y:16595 msgid "USING invalid with table SORT" msgstr "" -#: cobc/parser.y:16089 +#: cobc/parser.y:16605 msgid "INPUT PROCEDURE invalid with table SORT" msgstr "" -#: cobc/parser.y:16091 +#: cobc/parser.y:16607 msgid "INPUT PROCEDURE invalid with MERGE" msgstr "" -#: cobc/parser.y:16104 -msgid "file sort requires GIVING or OUTPUT PROCEDURE" +#: cobc/parser.y:16621 +msgid "MERGE requires GIVING or OUTPUT PROCEDURE" +msgstr "" + +#: cobc/parser.y:16623 +msgid "file SORT requires GIVING or OUTPUT PROCEDURE" msgstr "" -#: cobc/parser.y:16111 +#: cobc/parser.y:16631 msgid "GIVING invalid with table SORT" msgstr "" -#: cobc/parser.y:16121 +#: cobc/parser.y:16641 msgid "OUTPUT PROCEDURE invalid with table SORT" msgstr "" -#: cobc/parser.y:16148 +#: cobc/parser.y:16668 msgid "SIZE/LENGTH invalid here" msgstr "" -#: cobc/parser.y:16197 +#: cobc/parser.y:16717 msgid "NOT EQUAL condition not allowed on START statement" msgstr "" -#: cobc/parser.y:16255 +#: cobc/parser.y:16776 #, c-format msgid "%s is replaced by %s" msgstr "" -#: cobc/parser.y:16304 +#: cobc/parser.y:16825 msgid "STOP literal" msgstr "" -#: cobc/parser.y:16308 +#: cobc/parser.y:16829 msgid "STOP identifier" msgstr "" -#: cobc/parser.y:16446 +#: cobc/parser.y:16969 msgid "SUPPRESS statement must be within DECLARATIVES" msgstr "" -#: cobc/parser.y:16520 -msgid "UNLOCK invalid for SORT files" +#: cobc/parser.y:17043 +msgid "UNLOCK invalid for SD files" msgstr "" -#: cobc/parser.y:16656 cobc/parser.y:16736 +#: cobc/parser.y:17180 cobc/parser.y:17260 msgid "USE statement must be within DECLARATIVES" msgstr "" -#: cobc/parser.y:16658 +#: cobc/parser.y:17182 msgid "SECTION header missing before USE statement" msgstr "" -#: cobc/parser.y:16738 +#: cobc/parser.y:17262 msgid "USE DEBUGGING not supported in contained program" msgstr "" -#: cobc/parser.y:16786 cobc/parser.y:16795 cobc/parser.y:16813 -#: cobc/parser.y:16849 cobc/typeck.c:4886 +#: cobc/parser.y:17310 cobc/parser.y:17319 cobc/parser.y:17337 +#: cobc/parser.y:17373 cobc/typeck.c:5050 #, c-format msgid "duplicate DEBUGGING target: '%s'" msgstr "" -#: cobc/parser.y:16811 +#: cobc/parser.y:17335 msgid "constant item cannot be used here" msgstr "" -#: cobc/parser.y:16837 +#: cobc/parser.y:17361 msgid "duplicate USE DEBUGGING ON ALL PROCEDURES" msgstr "" -#: cobc/parser.y:17089 +#: cobc/parser.y:17614 msgid "ENCODING clause must come before XML-DECLARATION" msgstr "" -#: cobc/parser.y:17091 +#: cobc/parser.y:17616 msgid "ENCODING clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17094 +#: cobc/parser.y:17619 msgid "XML GENERATE ENCODING clause" msgstr "" -#: cobc/parser.y:17101 +#: cobc/parser.y:17626 msgid "XML-DECLARATION clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17104 +#: cobc/parser.y:17629 msgid "XML GENERATE XML-DECLARATION clause" msgstr "" -#: cobc/parser.y:17110 +#: cobc/parser.y:17635 msgid "XML GENERATE WITH ATTRIBUTES clause" msgstr "" -#: cobc/parser.y:17123 +#: cobc/parser.y:17648 msgid "XML GENERATE NAMESPACE clause" msgstr "" -#: cobc/parser.y:17147 +#: cobc/parser.y:17672 msgid "XML GENERATE NAME OF clause" msgstr "" -#: cobc/parser.y:17211 +#: cobc/parser.y:17736 msgid "XML GENERATE TYPE OF clause" msgstr "" -#: cobc/parser.y:17252 +#: cobc/parser.y:17777 msgid "XML GENERATE SUPPRESS clause" msgstr "" -#: cobc/parser.y:17392 +#: cobc/parser.y:17920 #, fuzzy, c-format #| msgid "'%s' is not a statement" msgid "'%s' is not a schema name" msgstr "'%s' non è una definizione" -#: cobc/parser.y:17510 +#: cobc/parser.y:18055 msgid "NOT SIZE ERROR before SIZE ERROR" msgstr "" -#: cobc/parser.y:17556 +#: cobc/parser.y:18109 msgid "NOT OVERFLOW before OVERFLOW" msgstr "" -#: cobc/parser.y:17655 +#: cobc/parser.y:18161 cobc/parser.y:18176 +msgid "NOT AT END before AT END" +msgstr "" + +#: cobc/parser.y:18229 msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" msgstr "" -#: cobc/parser.y:17705 +#: cobc/parser.y:18287 msgid "NOT INVALID KEY before INVALID KEY" msgstr "" -#: cobc/parser.y:18048 +#: cobc/parser.y:18644 msgid "LINAGE-COUNTER must be qualified here" msgstr "" -#: cobc/parser.y:18051 +#: cobc/parser.y:18647 msgid "invalid LINAGE-COUNTER usage" msgstr "" -#: cobc/parser.y:18062 cobc/parser.y:18158 cobc/parser.y:18247 +#: cobc/parser.y:18658 cobc/parser.y:18754 cobc/parser.y:18843 #, c-format msgid "'%s' is not a file name" msgstr "" -#: cobc/parser.y:18072 +#: cobc/parser.y:18668 msgid "LINE-COUNTER must be qualified here" msgstr "" -#: cobc/parser.y:18076 +#: cobc/parser.y:18672 msgid "invalid LINE-COUNTER usage" msgstr "" -#: cobc/parser.y:18087 cobc/parser.y:18112 +#: cobc/parser.y:18683 cobc/parser.y:18708 #, c-format msgid "'%s' is not a report name" msgstr "" -#: cobc/parser.y:18097 +#: cobc/parser.y:18693 msgid "PAGE-COUNTER must be qualified here" msgstr "" -#: cobc/parser.y:18101 +#: cobc/parser.y:18697 msgid "invalid PAGE-COUNTER usage" msgstr "" -#: cobc/parser.y:18148 cobc/typeck.c:12256 cobc/typeck.c:12339 -#: cobc/typeck.c:13516 +#: cobc/parser.y:18744 cobc/typeck.c:13027 cobc/typeck.c:13110 +#: cobc/typeck.c:14322 #, c-format msgid "%s requires a record name as subject" msgstr "" -#: cobc/parser.y:18175 +#: cobc/parser.y:18771 #, c-format msgid "'%s' not indexed" msgstr "" -#: cobc/parser.y:18180 +#: cobc/parser.y:18776 msgid "SEARCH ALL requires KEY phrase" msgstr "" -#: cobc/parser.y:18204 cobc/parser.y:18229 +#: cobc/parser.y:18800 cobc/parser.y:18825 #, c-format msgid "multiple reference to '%s' " msgstr "" -#: cobc/parser.y:18259 +#: cobc/parser.y:18855 #, c-format msgid "'%s' is not a CD name" msgstr "" -#: cobc/parser.y:18273 +#: cobc/parser.y:18869 #, fuzzy, c-format #| msgid "'%s' is not a statement" msgid "'%s' is not a valid report name" msgstr "'%s' non è una definizione" -#: cobc/parser.y:18526 +#: cobc/parser.y:19134 msgid "invalid mnemonic identifier" msgstr "" -#: cobc/parser.y:18606 +#: cobc/parser.y:19214 +msgid "an alphanumeric literal is expected here" +msgstr "" + +#: cobc/parser.y:19226 msgid "a numeric literal is expected here" msgstr "" -#: cobc/parser.y:18618 cobc/parser.y:19366 +#: cobc/parser.y:19238 cobc/parser.y:19979 msgid "a non-numeric literal is expected here" msgstr "" -#: cobc/parser.y:18784 cobc/typeck.c:7302 cobc/typeck.c:7309 +#: cobc/parser.y:19404 cobc/typeck.c:993 cobc/typeck.c:4825 cobc/typeck.c:7679 +#: cobc/typeck.c:7686 #, c-format msgid "'%s' is not numeric" msgstr "'%s' non è un numero" -#: cobc/parser.y:18800 +#: cobc/parser.y:19420 #, c-format msgid "'%s' is not a field or file" msgstr "" -#: cobc/parser.y:18820 cobc/parser.y:18859 cobc/parser.y:18935 -#, c-format -msgid "'%s' is not a field" -msgstr "" - -#: cobc/parser.y:18841 +#: cobc/parser.y:19446 #, fuzzy, c-format #| msgid "'%s' is not a statement" msgid "'%s' is not a type-name" msgstr "'%s' non è una definizione" -#: cobc/parser.y:18927 cobc/typeck.c:2328 cobc/typeck.c:2407 +#: cobc/parser.y:19526 cobc/typeck.c:2345 cobc/typeck.c:2401 cobc/typeck.c:2550 #, c-format msgid "'%s' cannot be reference modified" msgstr "" -#: cobc/parser.y:19015 +#: cobc/parser.y:19627 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "'%s' is not a field or alphabet" msgstr "'%s' non è un integer" -#: cobc/parser.y:19041 +#: cobc/parser.y:19653 msgid "a subscripted data-item cannot be used here" msgstr "" -#: cobc/parser.y:19089 +#: cobc/parser.y:19701 msgid "unsigned integer value expected" msgstr "" -#: cobc/parser.y:19101 cobc/parser.y:19105 cobc/parser.y:19155 +#: cobc/parser.y:19713 cobc/parser.y:19717 cobc/parser.y:19767 msgid "integer value expected" msgstr "" -#: cobc/parser.y:19110 +#: cobc/parser.y:19722 msgid "invalid symbolic integer" msgstr "" -#: cobc/parser.y:19126 cobc/parser.y:19130 +#: cobc/parser.y:19738 cobc/parser.y:19742 msgid "unsigned positive integer value expected" msgstr "" -#: cobc/parser.y:19159 -msgid "invalid CLASS value" +#: cobc/parser.y:19772 +#, c-format +msgid "CLASS value %d outside of range for the used character set" msgstr "" -#: cobc/parser.y:19246 +#: cobc/parser.y:19859 msgid "PHYSICAL argument for LENGTH functions" msgstr "" -#: cobc/parser.y:19418 cobc/parser.y:19435 +#: cobc/parser.y:20031 cobc/parser.y:20048 msgid "cannot specify offset and SYSTEM-OFFSET at the same time" msgstr "" -#: cobc/parser.y:19702 cobc/parser.y:19711 cobc/parser.y:19721 -#: cobc/parser.y:19731 cobc/parser.y:19751 cobc/parser.y:19771 -#: cobc/parser.y:19777 +#: cobc/parser.y:20228 +msgid "terminator" +msgstr "" + +#: cobc/parser.y:20317 cobc/parser.y:20327 cobc/parser.y:20338 +#: cobc/parser.y:20348 cobc/parser.y:20369 cobc/parser.y:20389 +#: cobc/parser.y:20396 msgid "optional period" msgstr "" -#: cobc/pplex.l:257 cobc/pplex.l:2219 cobc/pplex.l:2233 +#: cobc/pplex.l:261 cobc/pplex.l:2448 cobc/pplex.l:2462 msgid "debugging indicator" msgstr "" -#: cobc/pplex.l:334 +#: cobc/pplex.l:348 msgid "ignoring empty directive" msgstr "" -#: cobc/pplex.l:344 cobc/pplex.l:411 +#: cobc/pplex.l:358 cobc/pplex.l:431 #, c-format msgid "ignoring invalid directive: '%s'" msgstr "" -#: cobc/pplex.l:351 +#: cobc/pplex.l:365 msgid "ignoring invalid directive" msgstr "" -#: cobc/pplex.l:358 +#: cobc/pplex.l:372 msgid "VCS directive" msgstr "" -#: cobc/pplex.l:420 cobc/pplex.l:441 +#: cobc/pplex.l:440 cobc/pplex.l:461 #, c-format msgid "ignoring unknown directive: '%s'" msgstr "" -#: cobc/pplex.l:1065 +#: cobc/pplex.l:1164 msgid "IF/ELIF/ELSE directive without matching END-IF" msgstr "" -#: cobc/pplex.l:1409 +#: cobc/pplex.l:1332 +msgid "free format detected" +msgstr "" + +#: cobc/pplex.l:1608 #, c-format msgid "copybook not found in library '%s', library-name ignored" msgstr "" -#: cobc/pplex.l:1469 +#: cobc/pplex.l:1667 #, c-format msgid "ignoring %s directive because of %s" msgstr "" -#: cobc/pplex.l:1645 +#: cobc/pplex.l:1854 #, c-format msgid "directive nest depth exceeded: %d" msgstr "" -#: cobc/pplex.l:1663 +#: cobc/pplex.l:1872 msgid "ELSE directive without matching IF/ELIF" msgstr "" -#: cobc/pplex.l:1679 +#: cobc/pplex.l:1888 msgid "END-IF directive without matching IF/ELIF/ELSE" msgstr "" -#: cobc/pplex.l:1695 +#: cobc/pplex.l:1904 msgid "ELIF directive without matching IF/ELIF" msgstr "" -#: cobc/pplex.l:1717 +#: cobc/pplex.l:1926 #, c-format msgid "invalid internal case: %u" msgstr "" -#: cobc/pplex.l:1914 +#: cobc/pplex.l:2139 msgid "buffer overrun - too many continuation lines" msgstr "" -#: cobc/pplex.l:2009 cobc/pplex.l:2019 +#: cobc/pplex.l:2236 cobc/pplex.l:2246 msgid "line not terminated by a newline" msgstr "" -#: cobc/pplex.l:2013 cobc/pplex.l:2023 +#: cobc/pplex.l:2240 cobc/pplex.l:2250 #, c-format msgid "source text exceeds %d bytes, will be truncated" msgstr "" -#: cobc/pplex.l:2042 +#: cobc/pplex.l:2269 msgid "version control conflict marker in file" msgstr "" -#: cobc/pplex.l:2194 +#: cobc/pplex.l:2423 msgid "invalid continuation in comment entry" msgstr "" -#: cobc/pplex.l:2241 +#: cobc/pplex.l:2470 #, c-format msgid "invalid indicator '\\' at column %d" msgstr "" -#: cobc/pplex.l:2253 +#: cobc/pplex.l:2482 #, c-format msgid "invalid indicator '%c' at column %d" msgstr "" -#: cobc/pplex.l:2312 cobc/pplex.l:2323 +#: cobc/pplex.l:2541 cobc/pplex.l:2552 msgid "invalid line continuation" msgstr "" -#: cobc/pplex.l:2331 +#: cobc/pplex.l:2560 msgid "continuation character expected" msgstr "" -#: cobc/pplex.l:2399 +#: cobc/pplex.l:2628 #, c-format msgid "source text after program-text area (column %d)" msgstr "" -#: cobc/ppparse.y:107 +#: cobc/ppparse.y:102 cobc/ppparse.y:106 +msgid "partial replacing with literal" +msgstr "" + +#: cobc/ppparse.y:109 msgid "unexpected COBOL word in partial replacement phrase" msgstr "" -#: cobc/ppparse.y:256 +#: cobc/ppparse.y:176 +msgid "invalid partial replacing operand" +msgstr "" + +#: cobc/ppparse.y:291 msgid "directive comparison on different types" msgstr "" -#: cobc/ppparse.y:324 +#: cobc/ppparse.y:359 #, c-format msgid "duplicate DEFINE directive '%s'" msgstr "" -#: cobc/ppparse.y:331 cobc/ppparse.y:341 +#: cobc/ppparse.y:366 cobc/ppparse.y:376 #, c-format msgid "invalid constant %s in DEFINE directive" msgstr "" -#: cobc/ppparse.y:439 +#: cobc/ppparse.y:474 #, c-format msgid "compiler flag '%s' unknown" msgstr "" -#: cobc/ppparse.y:486 +#: cobc/ppparse.y:521 #, c-format msgid "invalid %s directive option '%s'" msgstr "" -#: cobc/ppparse.y:488 +#: cobc/ppparse.y:523 #, c-format msgid "invalid %s directive option" msgstr "" -#: cobc/ppparse.y:839 cobc/ppparse.y:848 cobc/ppparse.y:1258 +#: cobc/ppparse.y:875 cobc/ppparse.y:884 cobc/ppparse.y:1294 #, c-format msgid "invalid %s directive" msgstr "" -#: cobc/ppparse.y:1330 +#: cobc/ppparse.y:1366 msgid "LEAP-SECOND ON directive" msgstr "" -#: cobc/ppparse.y:1439 cobc/ppparse.y:1471 +#: cobc/ppparse.y:1475 cobc/ppparse.y:1507 msgid "invalid constant" msgstr "costante non valida" -#: cobc/reserved.c:4012 +#: cobc/reserved.c:4029 msgid "device name" msgstr "nome dispositivo" -#: cobc/reserved.c:4015 +#: cobc/reserved.c:4032 msgid "switch name" msgstr "" -#: cobc/reserved.c:4018 +#: cobc/reserved.c:4035 msgid "feature name" msgstr "" -#: cobc/reserved.c:4129 +#: cobc/reserved.c:4146 #, c-format msgid "reserved word (%s) must have less than %d characters" msgstr "" -#: cobc/reserved.c:4149 +#: cobc/reserved.c:4166 #, c-format msgid "reserved word (%s) may not contain '%c'" msgstr "" -#: cobc/reserved.c:4166 +#: cobc/reserved.c:4183 msgid "ignored asterisk at end of alias target" msgstr "" -#: cobc/reserved.c:4229 +#: cobc/reserved.c:4248 #, c-format msgid "alias target '%s' is not a default reserved word" msgstr "" -#: cobc/reserved.c:4719 +#: cobc/reserved.c:4738 #, c-format msgid "invalid system-name '%s'" msgstr "" -#: cobc/reserved.c:4883 +#: cobc/reserved.c:4902 #, c-format msgid "'%s' is a reserved word, but isn't supported" msgstr "" -#: cobc/reserved.c:4988 +#: cobc/reserved.c:5005 #, c-format msgid "intrinsic function %s is unknown" msgstr "" -#: cobc/reserved.c:5016 +#: cobc/reserved.c:5033 msgid "Intrinsic Function" msgstr "Funzione intrinseca" -#: cobc/reserved.c:5016 cobc/reserved.c:5249 cobc/reserved.c:5386 +#: cobc/reserved.c:5033 cobc/reserved.c:5266 cobc/reserved.c:5403 msgid "Implemented" msgstr "" -#: cobc/reserved.c:5016 cobc/typeck.c:1163 +#: cobc/reserved.c:5033 cobc/typeck.c:1178 msgid "Parameters" msgstr "Parametri" -#: cobc/reserved.c:5020 cobc/reserved.c:5253 cobc/reserved.c:5400 -#: cobc/reserved.c:5406 +#: cobc/reserved.c:5037 cobc/reserved.c:5270 cobc/reserved.c:5417 +#: cobc/reserved.c:5423 msgid "Yes" msgstr "Sì" -#: cobc/reserved.c:5023 cobc/reserved.c:5256 cobc/reserved.c:5410 +#: cobc/reserved.c:5040 cobc/reserved.c:5273 cobc/reserved.c:5427 msgid "No" msgstr "No" -#: cobc/reserved.c:5029 +#: cobc/reserved.c:5046 msgid "Unlimited" msgstr "" -#: cobc/reserved.c:5046 +#: cobc/reserved.c:5063 msgid "Exception Name" msgstr "" -#: cobc/reserved.c:5148 +#: cobc/reserved.c:5165 #, c-format msgid "special register '%s' is unknown, needs a definition" msgstr "" -#: cobc/reserved.c:5155 +#: cobc/reserved.c:5172 #, c-format msgid "special register '%s' has a bad definition: %s" msgstr "" -#: cobc/reserved.c:5159 +#: cobc/reserved.c:5176 #, c-format msgid "special register '%s' is unknown" msgstr "" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Internal registers" msgstr "Registri interni" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Definition" msgstr "Definizione" -#: cobc/reserved.c:5337 +#: cobc/reserved.c:5354 #, c-format msgid "unknown system-name '%s'" msgstr "" -#: cobc/reserved.c:5363 +#: cobc/reserved.c:5380 msgid "System names" msgstr "" -#: cobc/reserved.c:5386 +#: cobc/reserved.c:5403 msgid "Reserved Words" msgstr "" -#: cobc/reserved.c:5398 +#: cobc/reserved.c:5415 msgid "Yes (Context sensitive)" msgstr "" -#: cobc/reserved.c:5408 +#: cobc/reserved.c:5425 msgid "No (Context sensitive)" msgstr "" -#: cobc/scanner.l:272 +#: cobc/scanner.l:281 #, c-format msgid "'%s' is not a reserved word, so cannot be removed" msgstr "" -#: cobc/scanner.l:320 +#: cobc/scanner.l:329 msgid "separator period in Area A" msgstr "" -#: cobc/scanner.l:1067 +#: cobc/scanner.l:1096 #, c-format msgid "a constant may not be used here - '%s'" msgstr "" -#: cobc/scanner.l:1137 +#: cobc/scanner.l:1170 msgid "ignoring redundant ." msgstr "" -#: cobc/scanner.l:1195 +#: cobc/scanner.l:1249 #, c-format msgid "invalid symbol '%s' - skipping word" msgstr "" -#: cobc/scanner.l:1289 +#: cobc/scanner.l:1323 msgid "invalid national literal" msgstr "" -#: cobc/scanner.l:1293 cobc/tree.c:2800 +#: cobc/scanner.l:1327 cobc/tree.c:2822 #, c-format msgid "invalid literal: '%s'" msgstr "" -#: cobc/scanner.l:1295 +#: cobc/scanner.l:1329 #, c-format msgid "invalid hexadecimal literal: '%s'" msgstr "" -#: cobc/scanner.l:1297 cobc/tree.c:1779 +#: cobc/scanner.l:1331 cobc/tree.c:1803 #, c-format msgid "invalid numeric literal: '%s'" msgstr "" -#: cobc/scanner.l:1299 +#: cobc/scanner.l:1333 #, c-format msgid "invalid floating-point literal: '%s'" msgstr "" -#: cobc/scanner.l:1301 +#: cobc/scanner.l:1335 cobc/scanner.l:1337 #, c-format msgid "invalid %s literal: '%s'" msgstr "" -#: cobc/scanner.l:1350 +#: cobc/scanner.l:1365 +#, c-format +msgid "character code %s out of encoding range %s" +msgstr "" + +#: cobc/scanner.l:1422 +msgid "extraneous separator ',' at end of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1435 +msgid "extraneous character ',' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1440 +#, c-format +msgid "invalid character '%c' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1470 #, c-format msgid "literal length exceeds %u characters" msgstr "" -#: cobc/scanner.l:1365 +#: cobc/scanner.l:1485 #, c-format msgid "missing terminating %c character" msgstr "" -#: cobc/scanner.l:1382 cobc/scanner.l:1444 cobc/scanner.l:1729 +#: cobc/scanner.l:1502 cobc/scanner.l:1569 cobc/scanner.l:1868 msgid "zero-length literal" msgstr "" -#: cobc/scanner.l:1385 +#: cobc/scanner.l:1505 msgid "national literal has zero length; a SPACE will be assumed" msgstr "" -#: cobc/scanner.l:1386 +#: cobc/scanner.l:1506 msgid "alphanumeric literal has zero length; a SPACE will be assumed" msgstr "" -#: cobc/scanner.l:1412 cobc/scanner.l:1413 cobc/scanner.l:1417 -#: cobc/scanner.l:1494 +#: cobc/scanner.l:1519 +msgid "UTF-8 literal" +msgstr "" + +#: cobc/scanner.l:1536 cobc/scanner.l:1537 cobc/scanner.l:1541 +#: cobc/scanner.l:1624 msgid "national literal" msgstr "" -#: cobc/scanner.l:1416 +#: cobc/scanner.l:1540 msgid "national-character literal" msgstr "" -#: cobc/scanner.l:1447 +#: cobc/scanner.l:1571 msgid "hexadecimal literal has zero length; X'00' will be assumed" msgstr "" -#: cobc/scanner.l:1472 +#: cobc/scanner.l:1575 cobc/scanner.l:1601 msgid "hexadecimal-boolean literal" msgstr "" -#: cobc/scanner.l:1480 cobc/scanner.l:1499 cobc/scanner.l:1608 -#: cobc/scanner.l:1659 cobc/scanner.l:1754 cobc/scanner.l:1824 -#, c-format -msgid "literal length %lu exceeds %u characters" +#: cobc/scanner.l:1579 cobc/scanner.l:1619 +msgid "hexadecimal-national literal" msgstr "" -#: cobc/scanner.l:1490 -msgid "hexadecimal-national literal" +#: cobc/scanner.l:1609 cobc/scanner.l:1629 cobc/scanner.l:1744 +#: cobc/scanner.l:1798 cobc/scanner.l:1893 cobc/scanner.l:1963 +#, c-format +msgid "literal length %lu exceeds %u characters" msgstr "" -#: cobc/scanner.l:1521 cobc/scanner.l:1551 cobc/scanner.l:1674 -#: cobc/scanner.l:1771 cobc/scanner.l:1835 +#: cobc/scanner.l:1651 cobc/scanner.l:1680 cobc/scanner.l:1813 +#: cobc/scanner.l:1910 cobc/scanner.l:1974 #, c-format msgid "literal contains invalid character '%c'" msgstr "" -#: cobc/scanner.l:1573 +#: cobc/scanner.l:1704 #, c-format msgid "literal does not have an even number of digits" msgstr "" -#: cobc/scanner.l:1599 +#: cobc/scanner.l:1735 cobc/scanner.l:1788 #, c-format msgid "%s literals must contain at least one character" msgstr "" -#: cobc/scanner.l:1639 cobc/scanner.l:1739 cobc/scanner.l:1813 +#: cobc/scanner.l:1775 cobc/scanner.l:1878 cobc/scanner.l:1952 msgid "ACUCOBOL numeric literal" msgstr "" -#: cobc/scanner.l:1651 -msgid "H literals must contain at least one character" -msgstr "" - -#: cobc/scanner.l:1690 cobc/scanner.l:1783 cobc/scanner.l:1846 +#: cobc/scanner.l:1829 cobc/scanner.l:1922 cobc/scanner.l:1985 #, c-format msgid "literal exceeds limit %u" msgstr "" -#: cobc/scanner.l:1724 +#: cobc/scanner.l:1863 msgid "numeric boolean literal" msgstr "" -#: cobc/scanner.l:1731 -msgid "Boolean literal has zero length; B'0' will be assumed" +#: cobc/scanner.l:1870 +msgid "boolean literal has zero length; B'0' will be assumed" msgstr "" -#: cobc/scanner.l:1807 +#: cobc/scanner.l:1946 msgid "HP COBOL octal literal" msgstr "" -#: cobc/scanner.l:1921 +#: cobc/scanner.l:2059 #, c-format msgid "literal length %lu exceeds maximum of %u digits" msgstr "" -#: cobc/scanner.l:1927 +#: cobc/scanner.l:2065 #, c-format msgid "literal length %lu exceeds %u digits" msgstr "" -#: cobc/scanner.l:2039 cobc/tree.c:3845 +#: cobc/scanner.l:2177 cobc/tree.c:3888 #, c-format msgid "significand has more than %d digits" msgstr "" -#: cobc/scanner.l:2044 +#: cobc/scanner.l:2182 #, c-format msgid "exponent has decimal point" msgstr "" -#: cobc/scanner.l:2050 cobc/tree.c:3853 +#: cobc/scanner.l:2188 cobc/tree.c:3896 #, c-format msgid "exponent has more than 4 digits" msgstr "" -#: cobc/scanner.l:2080 +#: cobc/scanner.l:2218 #, c-format msgid "exponent not between -6143 and 6144" msgstr "" -#: cobc/scanner.l:2089 +#: cobc/scanner.l:2227 #, c-format msgid "significand of 0 must be positive" msgstr "" -#: cobc/scanner.l:2094 +#: cobc/scanner.l:2232 #, c-format msgid "exponent of 0 must be 0" msgstr "" -#: cobc/scanner.l:2099 +#: cobc/scanner.l:2237 #, c-format msgid "exponent of 0 must be positive" msgstr "" -#: cobc/scanner.l:2261 +#: cobc/scanner.l:2399 #, c-format msgid "invalid CONSTANT: %s" msgstr "" -#: cobc/scanner.l:2271 +#: cobc/scanner.l:2409 #, c-format msgid "invalid alphanumeric CONSTANT: %s" msgstr "" -#: cobc/scanner.l:2275 +#: cobc/scanner.l:2413 #, c-format msgid "empty alphanumeric CONSTANT: %s" msgstr "" -#: cobc/scanner.l:2292 cobc/scanner.l:2300 cobc/scanner.l:2305 +#: cobc/scanner.l:2430 cobc/scanner.l:2438 cobc/scanner.l:2443 #, c-format msgid "invalid numeric CONSTANT: %s" msgstr "" -#: cobc/scanner.l:2384 cobc/scanner.l:2411 +#: cobc/scanner.l:2522 cobc/scanner.l:2549 #, c-format msgid "'%s' is not a default reserved word, so cannot be aliased" msgstr "" -#: cobc/scanner.l:2387 +#: cobc/scanner.l:2525 #, c-format msgid "'%s' is already reserved" msgstr "" -#: cobc/scanner.l:2389 +#: cobc/scanner.l:2527 msgid "you may want MAKESYN instead" msgstr "" -#: cobc/scanner.l:2414 +#: cobc/scanner.l:2552 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "'%s' is not a reserved word" msgstr "'%s' non è un integer" -#: cobc/scanner.l:2415 +#: cobc/scanner.l:2553 msgid "you may want ADDSYN or OVERRIDE instead" msgstr "" -#: cobc/tree.c:391 +#: cobc/tree.c:392 #, c-format msgid "%s clause is required for file '%s'" msgstr "" -#: cobc/tree.c:395 +#: cobc/tree.c:396 #, c-format msgid "%s clause is invalid for file '%s' (file type)" msgstr "" -#: cobc/tree.c:399 +#: cobc/tree.c:400 #, c-format msgid "%s clause is invalid for file '%s'" msgstr "" -#: cobc/tree.c:426 +#: cobc/tree.c:427 #, c-format msgid "FOR item '%s' is a record" msgstr "" -#: cobc/tree.c:435 +#: cobc/tree.c:436 #, c-format msgid "FOR item '%s' is in different record to '%s'" msgstr "" -#: cobc/tree.c:444 +#: cobc/tree.c:445 #, c-format msgid "FOR item '%s' is not in a record associated with '%s'" msgstr "" -#: cobc/tree.c:558 +#: cobc/tree.c:559 msgid "internal error node" msgstr "" -#: cobc/tree.c:560 +#: cobc/tree.c:561 msgid "unknown constant" msgstr "costante sconosciuta" -#: cobc/tree.c:571 +#: cobc/tree.c:572 #, c-format msgid "literal \"%s\"" msgstr "" -#: cobc/tree.c:842 -#, c-format -msgid "FUNCTION %s has invalid/not supported arguments - tag %d" -msgstr "" - -#: cobc/tree.c:963 +#: cobc/tree.c:969 #, c-format msgid "invalid date/time function: '%d'" msgstr "" -#: cobc/tree.c:995 +#: cobc/tree.c:1001 #, c-format msgid "FUNCTION '%s' has invalid date/time format" msgstr "" -#: cobc/tree.c:1002 +#: cobc/tree.c:1008 #, c-format msgid "FUNCTION '%s' has format in variable" msgstr "" -#: cobc/tree.c:1482 +#: cobc/tree.c:1488 #, c-format msgid "unknown tree tag: %d, category: %d" msgstr "" -#: cobc/tree.c:1577 +#: cobc/tree.c:1590 #, c-format msgid "unexpected numeric USAGE: %d" msgstr "" -#: cobc/tree.c:1591 +#: cobc/tree.c:1604 #, c-format msgid "unexpected category: %d" msgstr "" -#: cobc/tree.c:1790 +#: cobc/tree.c:1814 #, c-format msgid "literal length %d exceeds maximum of %d digits" msgstr "" -#: cobc/tree.c:1795 +#: cobc/tree.c:1819 #, c-format msgid "literal length %d exceeds %d digits" msgstr "" -#: cobc/tree.c:1844 cobc/tree.c:1856 cobc/tree.c:1913 cobc/tree.c:1963 +#: cobc/tree.c:1868 cobc/tree.c:1880 cobc/tree.c:1937 cobc/tree.c:1987 #, c-format msgid "numeric literal '%s' exceeds limit '%s'" msgstr "" -#: cobc/tree.c:2655 +#: cobc/tree.c:2676 msgid "invalid LOCALE literal" msgstr "" -#: cobc/tree.c:2782 +#: cobc/tree.c:2803 msgid "only literals with the same category can be concatenated" msgstr "" -#: cobc/tree.c:2789 -msgid "only alphanumeric, national or boolean literals may be concatenated" +#: cobc/tree.c:2811 +msgid "only alphanumeric, utf-8, national or boolean literals may be concatenated" msgstr "" -#: cobc/tree.c:2801 +#: cobc/tree.c:2823 #, c-format msgid "literal length %d exceeds %d characters" msgstr "" -#: cobc/tree.c:3078 +#: cobc/tree.c:3103 msgid "B, 0 or /" msgstr "" -#: cobc/tree.c:3092 +#: cobc/tree.c:3117 msgid "the sign of the floating-point exponent" msgstr "" -#: cobc/tree.c:3094 +#: cobc/tree.c:3119 msgid "a leading +/- sign" msgstr "" -#: cobc/tree.c:3096 +#: cobc/tree.c:3121 msgid "a trailing +/- sign" msgstr "" -#: cobc/tree.c:3098 +#: cobc/tree.c:3123 msgid "CR or DB" msgstr "" -#: cobc/tree.c:3100 +#: cobc/tree.c:3125 msgid "a leading currency symbol" msgstr "" -#: cobc/tree.c:3102 +#: cobc/tree.c:3127 msgid "a trailing currency symbol" msgstr "" -#: cobc/tree.c:3104 +#: cobc/tree.c:3129 msgid "a Z or * which is before the decimal point" msgstr "" -#: cobc/tree.c:3106 +#: cobc/tree.c:3131 msgid "a Z or * which is after the decimal point" msgstr "" -#: cobc/tree.c:3108 +#: cobc/tree.c:3133 msgid "a floating +/- string which is before the decimal point" msgstr "" -#: cobc/tree.c:3110 +#: cobc/tree.c:3135 msgid "a floating +/- string which is after the decimal point" msgstr "" -#: cobc/tree.c:3112 +#: cobc/tree.c:3137 msgid "a floating currency symbol string which is before the decimal point" msgstr "" -#: cobc/tree.c:3114 +#: cobc/tree.c:3139 msgid "a floating currency symbol string which is after the decimal point" msgstr "" -#: cobc/tree.c:3118 +#: cobc/tree.c:3143 msgid "A or X" msgstr "" -#: cobc/tree.c:3126 +#: cobc/tree.c:3151 msgid "a P which is before the decimal point" msgstr "" -#: cobc/tree.c:3128 +#: cobc/tree.c:3153 msgid "a P which is after the decimal point" msgstr "" -#: cobc/tree.c:3149 cobc/tree.c:3599 +#: cobc/tree.c:3176 cobc/tree.c:3638 #, c-format msgid "%s may only occur once in a PICTURE string" msgstr "" -#: cobc/tree.c:3151 cobc/tree.c:3541 +#: cobc/tree.c:3178 cobc/tree.c:3570 #, c-format msgid "%s cannot follow %s" msgstr "" -#: cobc/tree.c:3154 +#: cobc/tree.c:3181 msgid "invalid PICTURE string detected" msgstr "" -#: cobc/tree.c:3271 +#: cobc/tree.c:3299 msgid "number or constant in parentheses is not an unsigned integer" msgstr "" -#: cobc/tree.c:3280 +#: cobc/tree.c:3308 #, c-format msgid "only up to %d significant digits are permitted within parentheses" msgstr "" -#: cobc/tree.c:3288 +#: cobc/tree.c:3316 msgid "number or constant in parentheses must be greater than zero" msgstr "" -#: cobc/tree.c:3299 +#: cobc/tree.c:3327 msgid "parentheses must be preceded by a picture symbol" msgstr "" -#: cobc/tree.c:3329 +#: cobc/tree.c:3353 msgid "unbalanced parentheses" msgstr "" -#: cobc/tree.c:3337 +#: cobc/tree.c:3361 msgid "parentheses must contain an unsigned integer" msgstr "" -#: cobc/tree.c:3375 +#: cobc/tree.c:3409 #, c-format msgid "'%s' is not a constant-name" msgstr "" -#: cobc/tree.c:3382 -#, c-format -msgid "'%s' is not a numeric literal" -msgstr "" - -#: cobc/tree.c:3386 -#, c-format -msgid "'%s' is not an integer" +#: cobc/tree.c:3422 +#, fuzzy, c-format +#| msgid "'%s' is not an integer" +msgid "'%s' is not an unsigned positive integer" msgstr "'%s' non è un integer" -#: cobc/tree.c:3390 -#, c-format -msgid "'%s' is not unsigned" -msgstr "" - -#: cobc/tree.c:3450 +#: cobc/tree.c:3479 msgid "missing PICTURE string" msgstr "" -#: cobc/tree.c:3479 +#: cobc/tree.c:3508 msgid "C must be followed by R" msgstr "" -#: cobc/tree.c:3482 +#: cobc/tree.c:3511 msgid "D must be followed by B" msgstr "" -#: cobc/tree.c:3497 cobc/tree.c:3596 cobc/tree.c:3622 cobc/tree.c:3733 +#: cobc/tree.c:3526 cobc/tree.c:3635 cobc/tree.c:3661 cobc/tree.c:3773 msgid "uncommon parentheses" msgstr "" -#: cobc/tree.c:3541 +#: cobc/tree.c:3570 msgid "exponent" msgstr "" -#: cobc/tree.c:3586 +#: cobc/tree.c:3625 msgid "L must be at start of PICTURE string" msgstr "" -#: cobc/tree.c:3604 +#: cobc/tree.c:3643 msgid "S must be at start of PICTURE string" msgstr "" -#: cobc/tree.c:3660 +#: cobc/tree.c:3699 msgid "P must be at start or end of PICTURE string" msgstr "" -#: cobc/tree.c:3690 +#: cobc/tree.c:3730 msgid "cannot have both Z and * in PICTURE string" msgstr "" -#: cobc/tree.c:3768 +#: cobc/tree.c:3808 #, c-format msgid "invalid PICTURE character '%c'" msgstr "" -#: cobc/tree.c:3798 +#: cobc/tree.c:3841 #, c-format msgid "PICTURE string may not contain more than %d characters; contains %d characters" msgstr "" -#: cobc/tree.c:3803 -msgid "PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" +#: cobc/tree.c:3846 +msgid "PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" msgstr "" -#: cobc/tree.c:3830 +#: cobc/tree.c:3873 #, c-format msgid "numeric field cannot be larger than %d digits" msgstr "" -#: cobc/tree.c:4267 +#: cobc/tree.c:4333 #, c-format msgid "needs PICTURE clause for SUM %s" msgstr "" -#: cobc/tree.c:4274 +#: cobc/tree.c:4340 #, c-format msgid "non-numeric PICTURE clause for SUM %s" msgstr "" -#: cobc/tree.c:4346 cobc/tree.c:4359 +#: cobc/tree.c:4412 cobc/tree.c:4425 #, c-format msgid "no DETAIL line defined in report %s" msgstr "" -#: cobc/tree.c:4361 +#: cobc/tree.c:4427 msgid "PAGE LIMIT FIRST DETAIL should be >= HEADING" msgstr "" -#: cobc/tree.c:4364 +#: cobc/tree.c:4430 msgid "PAGE LIMIT FOOTING should be >= HEADING" msgstr "" -#: cobc/tree.c:4366 +#: cobc/tree.c:4432 msgid "PAGE LIMIT LAST DETAIL should be >= FIRST DETAIL" msgstr "" -#: cobc/tree.c:4368 +#: cobc/tree.c:4434 msgid "PAGE LIMIT FOOTING should be >= LAST DETAIL" msgstr "" -#: cobc/tree.c:4370 +#: cobc/tree.c:4436 msgid "PAGE LIMIT LINES should be >= FOOTING" msgstr "" -#: cobc/tree.c:4563 libcob/fileio.c:8999 +#: cobc/tree.c:4631 libcob/fileio.c:9358 #, c-format msgid "maximum keys (%d/%d) exceeded for file '%s'" msgstr "" -#: cobc/tree.c:4627 cobc/tree.c:4650 +#: cobc/tree.c:4695 cobc/tree.c:4718 #, c-format msgid "invalid KEY item '%s', not in file '%s'" msgstr "" -#: cobc/tree.c:4661 +#: cobc/tree.c:4729 #, c-format msgid "minimal record length %d can not hold the key item '%s'; needs to be at least %d" msgstr "" -#: cobc/tree.c:4696 +#: cobc/tree.c:4764 #, fuzzy, c-format #| msgid "missing definitions:" msgid "missing file description for %s" msgstr "definizioni mancanti:" -#: cobc/tree.c:4745 +#: cobc/tree.c:4813 #, c-format msgid "size of record '%s' (%d) smaller than minimum of file '%s' (%d)" msgstr "" -#: cobc/tree.c:4748 cobc/tree.c:4765 +#: cobc/tree.c:4816 cobc/tree.c:4833 msgid "file size adjusted" msgstr "" -#: cobc/tree.c:4760 +#: cobc/tree.c:4828 #, c-format msgid "size of record '%s' (%d) larger than maximum of file '%s' (%d)" msgstr "" -#: cobc/tree.c:4793 +#: cobc/tree.c:4861 msgid "RECORD VARYING specified without limits, but implied limits are equal" msgstr "" -#: cobc/tree.c:4795 +#: cobc/tree.c:4863 #, c-format msgid "%s clause ignored" msgstr "" -#: cobc/tree.c:4890 cobc/typeck.c:7695 cobc/typeck.c:14389 cobc/typeck.c:14441 -#: cobc/typeck.c:14477 libcob/fileio.c:4598 libcob/screenio.c:3720 -#: libcob/screenio.c:3750 +#: cobc/tree.c:4958 cobc/typeck.c:8128 cobc/typeck.c:15186 cobc/typeck.c:15238 +#: cobc/typeck.c:15275 libcob/fileio.c:4724 libcob/screenio.c:4613 +#: libcob/screenio.c:4639 #, c-format msgid "runtime is not configured to support %s" msgstr "" -#: cobc/tree.c:5395 +#: cobc/tree.c:5474 #, c-format msgid "literal '%.38s' is longer than '%s'" msgstr "" -#: cobc/tree.c:5399 +#: cobc/tree.c:5478 #, c-format msgid "literal '%.38s' is longer than reference-modification of '%s'" msgstr "" -#: cobc/tree.c:5424 +#: cobc/tree.c:5508 #, c-format msgid "literal '%s' is alphanumeric but '%s' is numeric" msgstr "" -#: cobc/tree.c:5466 +#: cobc/tree.c:5550 #, c-format msgid "literal '%s' has more decimals than '%s'" msgstr "" -#: cobc/tree.c:5508 +#: cobc/tree.c:5598 #, c-format msgid "literal '%s' has more digits than '%s'" msgstr "" -#: cobc/tree.c:5548 cobc/tree.c:5572 +#: cobc/tree.c:5646 cobc/tree.c:5676 #, c-format msgid "unsigned '%s' may not be %s %s" msgstr "" -#: cobc/tree.c:5558 cobc/tree.c:5581 +#: cobc/tree.c:5658 cobc/tree.c:5689 #, c-format msgid "unsigned '%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5614 cobc/tree.c:5639 +#: cobc/tree.c:5726 cobc/tree.c:5756 #, c-format msgid "'%s' may not be %s %s" msgstr "" -#: cobc/tree.c:5625 cobc/tree.c:5650 +#: cobc/tree.c:5738 cobc/tree.c:5768 #, c-format msgid "'%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5795 +#: cobc/tree.c:5917 msgid "divide by constant ZERO" msgstr "" -#: cobc/tree.c:5879 cobc/tree.c:5886 +#: cobc/tree.c:6001 cobc/tree.c:6008 #, c-format msgid "%s should be COMP-X/COMP-5 for logical operator" msgstr "" -#: cobc/tree.c:5927 cobc/tree.c:5932 cobc/tree.c:6151 cobc/typeck.c:5675 -#: cobc/typeck.c:5684 cobc/typeck.c:5691 cobc/typeck.c:6772 cobc/typeck.c:6913 -msgid "invalid expression" -msgstr "espressione non valida" - -#: cobc/tree.c:6148 +#: cobc/tree.c:6283 #, fuzzy, c-format #| msgid "invalid expression" msgid "invalid expression: %s %s %s" msgstr "espressione non valida" -#: cobc/tree.c:6195 +#: cobc/tree.c:6286 +msgid "invalid expression: boolean expected with logical operator" +msgstr "" + +#: cobc/tree.c:6330 #, c-format msgid "unexpected operator: %d" msgstr "" -#: cobc/tree.c:6206 +#: cobc/tree.c:6341 #, c-format msgid "expression '%.38s' %s '%.38s' is always TRUE" msgstr "" -#: cobc/tree.c:6212 +#: cobc/tree.c:6347 msgid "expression is always TRUE" msgstr "" -#: cobc/tree.c:6225 +#: cobc/tree.c:6360 #, c-format msgid "expression '%.38s' %s '%.38s' is always FALSE" msgstr "" -#: cobc/tree.c:6231 +#: cobc/tree.c:6366 msgid "expression is always FALSE" msgstr "" -#: cobc/tree.c:6443 +#: cobc/tree.c:6588 msgid "invalid file name reference" msgstr "" -#: cobc/tree.c:6451 +#: cobc/tree.c:6596 #, c-format msgid "BY CONTENT assumed for alphanumeric item '%s'" msgstr "" -#: cobc/tree.c:6456 +#: cobc/tree.c:6601 #, c-format msgid "BY CONTENT assumed for national item '%s'" msgstr "" -#: cobc/tree.c:6595 +#: cobc/tree.c:6740 msgid "PERFORM FOREVER since UNTIL is always FALSE" msgstr "" -#: cobc/tree.c:6599 +#: cobc/tree.c:6744 msgid "PERFORM ONCE since UNTIL is always TRUE" msgstr "" -#: cobc/tree.c:6602 +#: cobc/tree.c:6747 msgid "PERFORM NEVER since UNTIL is always TRUE" msgstr "" -#: cobc/tree.c:6726 +#: cobc/tree.c:6871 #, c-format msgid "no definition/prototype seen for FUNCTION '%s'" msgstr "" -#: cobc/tree.c:6728 +#: cobc/tree.c:6873 #, c-format msgid "no definition/prototype seen for PROGRAM '%s'" msgstr "" -#: cobc/tree.c:6737 +#: cobc/tree.c:6882 #, c-format msgid "no definition/prototype seen for FUNCTION with external name '%s'" msgstr "" -#: cobc/tree.c:6739 +#: cobc/tree.c:6884 #, c-format msgid "no definition/prototype seen for PROGRAM with external name '%s'" msgstr "" -#: cobc/tree.c:6831 +#: cobc/tree.c:6976 cobc/tree.c:7158 cobc/tree.c:7233 cobc/tree.c:7239 +#: cobc/tree.c:7247 cobc/tree.c:7255 cobc/tree.c:7277 cobc/tree.c:7287 +#: cobc/tree.c:7292 #, fuzzy, c-format #| msgid "FUNCTION '%s' is not implemented" -msgid "FUNCTION %s has invalid argument" +msgid "FUNCTION '%s' has invalid argument" msgstr "FUNCTION '%s' non implementata" -#: cobc/tree.c:6833 +#: cobc/tree.c:6978 #, c-format -msgid "either all arguments or none should be if type %s" +msgid "either all arguments or none should be of type %s" msgstr "" -#: cobc/tree.c:6863 cobc/tree.c:6869 cobc/tree.c:6911 cobc/tree.c:6916 +#: cobc/tree.c:7010 cobc/tree.c:7016 cobc/tree.c:7057 cobc/tree.c:7063 #, c-format msgid "FUNCTION '%s' has invalid reference modification" msgstr "" -#: cobc/tree.c:6880 cobc/tree.c:7194 +#: cobc/tree.c:7027 cobc/tree.c:7344 #, c-format msgid "FUNCTION '%s' unknown" msgstr "FUNCTION '%s' sconosciuta" -#: cobc/tree.c:6884 +#: cobc/tree.c:7031 #, c-format msgid "FUNCTION '%s' is not implemented" msgstr "FUNCTION '%s' non implementata" -#: cobc/tree.c:6891 cobc/tree.c:6898 cobc/tree.c:7179 +#: cobc/tree.c:7037 cobc/tree.c:7044 cobc/tree.c:7329 #, c-format msgid "FUNCTION '%s' has wrong number of arguments" msgstr "" -#: cobc/tree.c:6905 +#: cobc/tree.c:7051 #, c-format msgid "FUNCTION '%s' cannot have reference modification" msgstr "" -#: cobc/tree.c:7008 cobc/tree.c:7083 cobc/tree.c:7089 cobc/tree.c:7097 -#: cobc/tree.c:7105 cobc/tree.c:7127 cobc/tree.c:7137 cobc/tree.c:7142 -#, fuzzy, c-format -#| msgid "FUNCTION '%s' is not implemented" -msgid "FUNCTION '%s' has invalid argument" -msgstr "FUNCTION '%s' non implementata" - -#: cobc/tree.c:7185 +#: cobc/tree.c:7335 #, fuzzy, c-format #| msgid "FUNCTION '%s' is not implemented" msgid "FUNCTION '%s' has invalid first argument" msgstr "FUNCTION '%s' non implementata" -#: cobc/typeck.c:584 +#: cobc/typeck.c:590 #, c-format msgid "%s should be COMP-5/COMP-X for logical operator" msgstr "" -#: cobc/typeck.c:850 +#: cobc/typeck.c:856 #, c-format msgid "%s item not allowed here: '%s'" msgstr "" -#: cobc/typeck.c:892 +#: cobc/typeck.c:898 #, c-format msgid "'%s' is not a group name" msgstr "" -#: cobc/typeck.c:911 +#: cobc/typeck.c:921 #, c-format msgid "'%s' is not a numeric name" msgstr "" -#: cobc/typeck.c:934 +#: cobc/typeck.c:944 #, c-format msgid "'%s' is not a numeric or numeric-edited name" msgstr "" -#: cobc/typeck.c:974 -#, fuzzy, c-format -#| msgid "'%s' is not numeric" -msgid "'%s' is Alpha, instead of a numeric value" -msgstr "'%s' non è un numero" - -#: cobc/typeck.c:977 -#, c-format -msgid "'%s' is Alpha Edited, instead of a numeric value" -msgstr "" - -#: cobc/typeck.c:990 +#: cobc/typeck.c:1043 #, c-format -msgid "'%s' is not a numeric value" -msgstr "" - -#: cobc/typeck.c:1040 -#, c-format -msgid "'%s' is not an integer value" -msgstr "" +msgid "'%s' is not an integer" +msgstr "'%s' non è un integer" -#: cobc/typeck.c:1044 +#: cobc/typeck.c:1047 msgid "positive numeric integer is required here" msgstr "" -#: cobc/typeck.c:1163 +#: cobc/typeck.c:1178 msgid "System routine" msgstr "Routine di sistema" -#: cobc/typeck.c:2054 libcob/call.c:1180 +#: cobc/typeck.c:2037 libcob/call.c:1172 #, c-format msgid "'%s' literal includes leading spaces which are omitted" msgstr "" -#: cobc/typeck.c:2058 +#: cobc/typeck.c:2041 #, c-format msgid "'%s' literal includes trailing spaces which are omitted" msgstr "" -#: cobc/typeck.c:2125 +#: cobc/typeck.c:2108 msgid "ON/OFF usage requires a SWITCH name" msgstr "" -#: cobc/typeck.c:2143 +#: cobc/typeck.c:2126 #, c-format msgid "word length exceeds maximum of %d characters: '%s'" msgstr "" -#: cobc/typeck.c:2146 +#: cobc/typeck.c:2129 #, c-format msgid "word length exceeds %d characters: '%s'" msgstr "" -#: cobc/typeck.c:2223 +#: cobc/typeck.c:2206 #, c-format msgid "ASSIGN %s interpreted as '%s'" msgstr "" -#: cobc/typeck.c:2315 cobc/typeck.c:2487 +#: cobc/typeck.c:2332 cobc/typeck.c:2631 #, c-format msgid "subscript missing for '%s' - defaulting to 1" msgstr "" -#: cobc/typeck.c:2338 cobc/typeck.c:2403 cobc/typeck.c:2659 +#: cobc/typeck.c:2355 cobc/typeck.c:2546 cobc/typeck.c:2746 #, c-format msgid "'%s' cannot be subscripted" msgstr "" -#: cobc/typeck.c:2342 cobc/typeck.c:2663 +#: cobc/typeck.c:2359 cobc/typeck.c:2750 #, c-format msgid "'%s' requires one subscript" msgstr "" -#: cobc/typeck.c:2345 cobc/typeck.c:2666 +#: cobc/typeck.c:2362 cobc/typeck.c:2753 #, c-format msgid "'%s' requires %d subscripts" msgstr "" -#: cobc/typeck.c:2363 +#: cobc/typeck.c:2380 #, c-format msgid "'%s' (accessed by '%s')" msgstr "" -#: cobc/typeck.c:2471 +#: cobc/typeck.c:2399 cobc/typeck.c:4987 #, c-format -msgid "'%s' has no OCCURS clause" +msgid "%s may not be reference modified" msgstr "" -#: cobc/typeck.c:2537 libcob/common.c:3941 libcob/common.c:3952 +#: cobc/typeck.c:2437 cobc/typeck.c:2442 cobc/typeck.c:2466 +#: libcob/common.c:4477 libcob/common.c:4521 #, c-format -msgid "subscript of '%s' out of bounds: %d" +msgid "length of '%s' out of bounds: %d" msgstr "" -#: cobc/typeck.c:2587 cobc/typeck.c:2598 libcob/common.c:3976 -#: libcob/common.c:4027 +#: cobc/typeck.c:2453 cobc/typeck.c:2462 libcob/common.c:4462 +#: libcob/common.c:4513 #, c-format msgid "offset of '%s' out of bounds: %d" msgstr "" -#: cobc/typeck.c:2592 cobc/typeck.c:2603 cobc/typeck.c:2612 -#: libcob/common.c:3991 libcob/common.c:4035 +#: cobc/typeck.c:2458 +msgid "suspicious reference-modification: always using max. position" +msgstr "" + +#: cobc/typeck.c:2475 +msgid "suspicious reference-modification: always using max. length" +msgstr "" + +#: cobc/typeck.c:2615 #, c-format -msgid "length of '%s' out of bounds: %d" +msgid "'%s' has no OCCURS clause" +msgstr "" + +#: cobc/typeck.c:2694 libcob/common.c:4427 libcob/common.c:4438 +#, c-format +msgid "subscript of '%s' out of bounds: %d" msgstr "" -#: cobc/typeck.c:2727 cobc/typeck.c:2806 +#: cobc/typeck.c:2812 cobc/typeck.c:2891 msgid "reference modification not allowed here" msgstr "" -#: cobc/typeck.c:2741 cobc/typeck.c:2832 +#: cobc/typeck.c:2826 cobc/typeck.c:2917 msgid "88 level item not allowed here" msgstr "" -#: cobc/typeck.c:2745 cobc/typeck.c:2836 cobc/typeck.c:2844 cobc/typeck.c:2906 +#: cobc/typeck.c:2830 cobc/typeck.c:2921 cobc/typeck.c:2929 cobc/typeck.c:2991 msgid "variable length item not allowed here" msgstr "" -#: cobc/typeck.c:2774 +#: cobc/typeck.c:2859 #, c-format msgid "'%s' has not been DEFINEd" msgstr "" -#: cobc/typeck.c:2810 +#: cobc/typeck.c:2895 msgid "only field names allowed here" msgstr "" -#: cobc/typeck.c:2821 +#: cobc/typeck.c:2906 #, c-format msgid "VALUE of '%s': %s target '%s' is invalid" msgstr "" -#: cobc/typeck.c:2823 cobc/typeck.c:2889 +#: cobc/typeck.c:2908 cobc/typeck.c:2974 msgid "target must be in FILE SECTION or LINKAGE SECTION or have the EXTERNAL clause" msgstr "" -#: cobc/typeck.c:2879 cobc/typeck.c:2888 +#: cobc/typeck.c:2964 cobc/typeck.c:2973 #, c-format msgid "VALUE of '%s': %s target is invalid" msgstr "" -#: cobc/typeck.c:2881 +#: cobc/typeck.c:2966 msgid "no previous data-item found" msgstr "" -#: cobc/typeck.c:3040 cobc/typeck.c:4799 +#: cobc/typeck.c:3130 cobc/typeck.c:4963 #, c-format msgid "'%s' cannot be BASED/EXTERNAL" msgstr "" -#: cobc/typeck.c:3045 +#: cobc/typeck.c:3135 #, c-format msgid "'%s' is not in WORKING-STORAGE SECTION" msgstr "" -#: cobc/typeck.c:3052 cobc/typeck.c:4796 +#: cobc/typeck.c:3142 cobc/typeck.c:4960 #, c-format msgid "'%s' not level 01 or 77" msgstr "" -#: cobc/typeck.c:3055 cobc/typeck.c:3090 cobc/typeck.c:4802 +#: cobc/typeck.c:3145 cobc/typeck.c:3180 cobc/typeck.c:4966 #, c-format msgid "'%s' REDEFINES field not allowed here" msgstr "" -#: cobc/typeck.c:3075 cobc/typeck.c:8423 +#: cobc/typeck.c:3165 cobc/typeck.c:8876 #, c-format msgid "duplicate USING BY REFERENCE item '%s'" msgstr "" -#: cobc/typeck.c:3103 +#: cobc/typeck.c:3193 #, c-format msgid "'%s' USING item duplicates RETURNING item" msgstr "" -#: cobc/typeck.c:3177 +#: cobc/typeck.c:3268 #, c-format msgid "prototype and definition of '%s' do not match" msgstr "" -#: cobc/typeck.c:3256 +#: cobc/typeck.c:3389 cobc/typeck.c:3486 #, c-format msgid "parameters #%d ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3259 +#: cobc/typeck.c:3393 #, c-format msgid "returning items ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3295 +#: cobc/typeck.c:3429 msgid "definition is a program but the prototype is a function" msgstr "" -#: cobc/typeck.c:3299 +#: cobc/typeck.c:3433 msgid "definition is a function but the prototype is a program" msgstr "" -#: cobc/typeck.c:3306 -msgid "DECIMAL-POINT IS COMMA clauses differ" -msgstr "" - -#: cobc/typeck.c:3312 -msgid "CURRENCY clauses differ" -msgstr "" - -#: cobc/typeck.c:3348 +#: cobc/typeck.c:3496 msgid "number of parameters differ" msgstr "" -#: cobc/typeck.c:3358 +#: cobc/typeck.c:3506 msgid "definition has a RETURNING item but prototype does not" msgstr "" -#: cobc/typeck.c:3362 +#: cobc/typeck.c:3510 msgid "definition does not have a RETURNING item but prototype does" msgstr "" -#: cobc/typeck.c:3411 +#: cobc/typeck.c:3560 #, c-format msgid "unexpected tree tag: %d" msgstr "" -#: cobc/typeck.c:3433 +#: cobc/typeck.c:3584 #, c-format msgid "expected argument #%d, %s, to be passed BY VALUE" msgstr "" -#: cobc/typeck.c:3437 +#: cobc/typeck.c:3589 #, c-format msgid "expected argument #%d, %s, to be passed BY REFERENCE/CONTENT" msgstr "" -#: cobc/typeck.c:3455 cobc/typeck.c:3580 cobc/typeck.c:3583 +#: cobc/typeck.c:3608 cobc/typeck.c:3733 cobc/typeck.c:3736 #, c-format msgid "argument #%d is not optional" msgstr "" -#: cobc/typeck.c:3468 +#: cobc/typeck.c:3622 #, c-format msgid "argument #%d must be at least %d bytes long" msgstr "" -#: cobc/typeck.c:3483 +#: cobc/typeck.c:3637 #, c-format msgid "argument #%d is a different type of pointer than the parameter" msgstr "" -#: cobc/typeck.c:3490 +#: cobc/typeck.c:3644 #, c-format msgid "argument #%d is ANY LENGTH, but expecting a fixed size item" msgstr "" -#: cobc/typeck.c:3518 +#: cobc/typeck.c:3672 #, c-format msgid "argument #%d, %s, does not conform to the parameter definition" msgstr "" -#: cobc/typeck.c:3566 +#: cobc/typeck.c:3719 #, c-format msgid "expecting up to %d arguments, but found %d" msgstr "" -#: cobc/typeck.c:3598 +#: cobc/typeck.c:3752 msgid "the RETURNING item is of a fixed size, not ANY LENGTH" msgstr "" -#: cobc/typeck.c:3603 +#: cobc/typeck.c:3758 #, c-format msgid "RETURNING item %s is not a valid type" msgstr "" -#: cobc/typeck.c:3609 +#: cobc/typeck.c:3764 msgid "unexpected RETURNING item" msgstr "" -#: cobc/typeck.c:3612 +#: cobc/typeck.c:3767 msgid "expecting a RETURNING item, but none provided" msgstr "" -#: cobc/typeck.c:3663 -#, c-format -msgid "'%s' is not an alphabet name" -msgstr "" - -#: cobc/typeck.c:3939 +#: cobc/typeck.c:4091 #, c-format msgid "duplicate character values in alphabet '%s': %s" msgstr "" -#: cobc/typeck.c:3944 +#: cobc/typeck.c:4096 #, c-format msgid "invalid character values in alphabet '%s', starting at position %d" msgstr "" -#: cobc/typeck.c:4045 +#: cobc/typeck.c:4198 #, c-format msgid "duplicate character values in class '%s'" msgstr "" -#: cobc/typeck.c:4074 +#: cobc/typeck.c:4227 msgid "invalid ALPHABET name" msgstr "" -#: cobc/typeck.c:4103 +#: cobc/typeck.c:4256 #, c-format msgid "'%s' is not a locale name" msgstr "" -#: cobc/typeck.c:4257 +#: cobc/typeck.c:4410 msgid "invalid RECORD DEPENDING item" msgstr "" -#: cobc/typeck.c:4262 +#: cobc/typeck.c:4415 msgid "RECORD DEPENDING must reference a data-item" msgstr "" -#: cobc/typeck.c:4285 +#: cobc/typeck.c:4438 #, c-format msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgstr "" -#: cobc/typeck.c:4298 +#: cobc/typeck.c:4451 #, c-format msgid "file %s: RELATIVE KEY %s is not numeric" msgstr "" -#: cobc/typeck.c:4307 +#: cobc/typeck.c:4460 #, c-format msgid "file %s: RELATIVE KEY %s must be integer" msgstr "" -#: cobc/typeck.c:4312 +#: cobc/typeck.c:4465 #, c-format msgid "file %s: RELATIVE KEY %s must be unsigned" msgstr "" -#: cobc/typeck.c:4319 +#: cobc/typeck.c:4472 #, c-format msgid "file %s: RELATIVE KEY %s cannot have OCCURS" msgstr "" -#: cobc/typeck.c:4325 +#: cobc/typeck.c:4478 #, c-format msgid "RELATIVE KEY %s cannot be in file record belonging to %s" msgstr "" -#: cobc/typeck.c:4334 +#: cobc/typeck.c:4487 #, c-format msgid "file %s: RELATIVE KEY %s declared outside WORKING-STORAGE" msgstr "" -#: cobc/typeck.c:4356 cobc/typeck.c:8396 +#: cobc/typeck.c:4509 cobc/typeck.c:8833 #, c-format msgid "'%s' is not a valid data name" msgstr "" -#: cobc/typeck.c:4363 +#: cobc/typeck.c:4516 #, c-format msgid "CRT STATUS item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "" -#: cobc/typeck.c:4369 +#: cobc/typeck.c:4522 #, c-format msgid "'%s' numeric CRT STATUS must have at least 4 digits" msgstr "" -#: cobc/typeck.c:4375 +#: cobc/typeck.c:4528 #, c-format msgid "'%s' CRT STATUS must be 3 or 4 characters long" msgstr "" -#: cobc/typeck.c:4397 +#: cobc/typeck.c:4550 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "FILE STATUS '%s' is not a field" msgstr "'%s' non è un integer" -#: cobc/typeck.c:4409 +#: cobc/typeck.c:4562 #, c-format msgid "FILE STATUS '%s' may not be a decimal or have a PIC with a P" msgstr "" -#: cobc/typeck.c:4414 +#: cobc/typeck.c:4567 #, c-format msgid "FILE STATUS '%s' is a numeric field, but I-O status codes are not numeric in general" msgstr "" -#: cobc/typeck.c:4418 +#: cobc/typeck.c:4571 #, c-format msgid "FILE STATUS '%s' must be an alphanumeric or numeric field" msgstr "" -#: cobc/typeck.c:4425 +#: cobc/typeck.c:4578 #, c-format msgid "FILE STATUS '%s' must be USAGE DISPLAY" msgstr "" -#: cobc/typeck.c:4432 +#: cobc/typeck.c:4585 #, c-format msgid "FILE STATUS '%s' must be 2 characters long" msgstr "" -#: cobc/typeck.c:4440 +#: cobc/typeck.c:4593 #, c-format msgid "FILE STATUS '%s' must be in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE" msgstr "" -#: cobc/typeck.c:4446 +#: cobc/typeck.c:4599 #, c-format msgid "FILE STATUS '%s' may not be located after an OCCURS DEPENDING field" msgstr "" -#: cobc/typeck.c:4460 +#: cobc/typeck.c:4613 #, c-format msgid "variable '%s' will be implicitly defined" msgstr "" -#: cobc/typeck.c:4489 cobc/typeck.c:4550 +#: cobc/typeck.c:4703 msgid "ASSIGN variable" msgstr "" -#: cobc/typeck.c:4555 +#: cobc/typeck.c:4708 #, c-format msgid "ASSIGN data item '%s' is invalid" msgstr "" -#: cobc/typeck.c:4619 +#: cobc/typeck.c:4773 #, c-format msgid "'%s' CURSOR must be 4 or 6 characters long" msgstr "" -#: cobc/typeck.c:4680 +#: cobc/typeck.c:4844 #, c-format msgid "'%s' cannot have nested OCCURS DEPENDING" msgstr "" -#: cobc/typeck.c:4694 +#: cobc/typeck.c:4858 #, c-format msgid "'%s' OCCURS DEPENDING ON field item invalid here" msgstr "" -#: cobc/typeck.c:4704 +#: cobc/typeck.c:4868 #, c-format msgid "'%s' cannot have OCCURS DEPENDING because of '%s'" msgstr "" -#: cobc/typeck.c:4716 +#: cobc/typeck.c:4880 #, c-format msgid "'%s' OCCURS DEPENDING ON item must have GLOBAL attribute" msgstr "" -#: cobc/typeck.c:4730 +#: cobc/typeck.c:4894 #, c-format msgid "PASSWORD '%s' for EXTERNAL file '%s' must have EXTERNAL attribute" msgstr "" -#: cobc/typeck.c:4768 +#: cobc/typeck.c:4932 #, c-format msgid "duplicate APPLY COMMIT target: '%s'" msgstr "" -#: cobc/typeck.c:4782 +#: cobc/typeck.c:4946 msgid "APPLY COMMIT statement invalid for SORT file" msgstr "" -#: cobc/typeck.c:4785 +#: cobc/typeck.c:4949 msgid "APPLY COMMIT statement invalid for REPORT file" msgstr "" -#: cobc/typeck.c:4792 +#: cobc/typeck.c:4956 #, c-format msgid "APPLY COMMIT item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "" -#: cobc/typeck.c:4806 +#: cobc/typeck.c:4970 #, c-format msgid "item not allowed here: '%s'" msgstr "" -#: cobc/typeck.c:4819 +#: cobc/typeck.c:4983 #, c-format msgid "%s may not be subscripted" msgstr "" -#: cobc/typeck.c:4823 -#, c-format -msgid "%s may not be reference modified" -msgstr "" - -#: cobc/typeck.c:4883 +#: cobc/typeck.c:5047 #, c-format msgid "DEBUGGING target invalid: '%s'" msgstr "" -#: cobc/typeck.c:4889 +#: cobc/typeck.c:5053 #, c-format msgid "DEBUGGING target already specified with ALL PROCEDURES: '%s'" msgstr "" -#: cobc/typeck.c:4909 +#: cobc/typeck.c:5073 msgid "DEBUGGING target" msgstr "" -#: cobc/typeck.c:4916 +#: cobc/typeck.c:5080 #, c-format msgid "'%s' is not a valid DEBUGGING target" msgstr "" -#: cobc/typeck.c:4962 cobc/typeck.c:4970 +#: cobc/typeck.c:5126 cobc/typeck.c:5134 #, c-format msgid "'%s' is not in DECLARATIVES" msgstr "" -#: cobc/typeck.c:4984 +#: cobc/typeck.c:5148 #, c-format msgid "invalid reference to '%s' (in DECLARATIVES)" msgstr "" -#: cobc/typeck.c:4996 +#: cobc/typeck.c:5162 #, c-format msgid "GO TO paragraph '%s' which is defined in another SECTION" msgstr "" -#: cobc/typeck.c:5006 +#: cobc/typeck.c:5172 #, c-format msgid "'%s' is not a procedure name" msgstr "" -#: cobc/typeck.c:5041 +#: cobc/typeck.c:5207 #, c-format msgid "%s and %s are not in the same SECTION" msgstr "" -#: cobc/typeck.c:5046 +#: cobc/typeck.c:5212 #, c-format msgid "%s is defined before %s" msgstr "" -#: cobc/typeck.c:5088 +#: cobc/typeck.c:5254 #, c-format msgid "'%s' ANY LENGTH item must be a formal parameter" msgstr "" -#: cobc/typeck.c:5136 +#: cobc/typeck.c:5302 #, c-format msgid "LINKAGE item '%s' is not a PROCEDURE USING parameter" msgstr "" -#: cobc/typeck.c:5192 +#: cobc/typeck.c:5358 #, c-format msgid "'%s' is not an alterable paragraph" msgstr "" -#: cobc/typeck.c:5802 cobc/typeck.c:5806 +#: cobc/typeck.c:5852 +#, fuzzy +#| msgid "invalid expression" +msgid "invalid expression: unfinished expression" +msgstr "espressione non valida" + +#: cobc/typeck.c:5858 cobc/typeck.c:5865 +msgid "invalid expression" +msgstr "espressione non valida" + +#: cobc/typeck.c:5990 cobc/typeck.c:5994 #, c-format msgid "suggest parentheses around %s within %s" msgstr "" -#: cobc/typeck.c:5815 +#: cobc/typeck.c:6003 #, fuzzy #| msgid "invalid expression" msgid "invalid conditional expression" msgstr "espressione non valida" -#: cobc/typeck.c:5932 +#: cobc/typeck.c:6120 #, c-format msgid "internal decimal structure size exceeded: %d" msgstr "" -#: cobc/typeck.c:5935 +#: cobc/typeck.c:6123 msgid "Try to minimize the number of parentheses or split into multiple computations." msgstr "" -#: cobc/typeck.c:5959 +#: cobc/typeck.c:6147 #, c-format msgid "more than %d nested expressions" msgstr "" -#: cobc/typeck.c:6000 +#: cobc/typeck.c:6188 msgid "precision of result may change with arithmetic-osvs" msgstr "" -#: cobc/typeck.c:6080 +#: cobc/typeck.c:6268 #, c-format msgid "unexpected operation: %c (%d)" msgstr "" -#: cobc/typeck.c:6085 +#: cobc/typeck.c:6273 #, c-format msgid "%s operator may be misplaced" msgstr "" -#: cobc/typeck.c:6160 +#: cobc/typeck.c:6349 msgid "unexpected constant expansion" msgstr "" -#: cobc/typeck.c:6882 cobc/typeck.c:11024 +#: cobc/typeck.c:7106 cobc/typeck.c:11656 cobc/typeck.c:11661 msgid "alphanumeric value is expected" msgstr "" -#: cobc/typeck.c:6884 cobc/typeck.c:11019 +#: cobc/typeck.c:7109 cobc/typeck.c:11651 msgid "numeric value is expected" msgstr "" -#: cobc/typeck.c:6954 +#: cobc/typeck.c:7203 +#, fuzzy +#| msgid "invalid expression" +msgid "invalid expression: condition expected" +msgstr "espressione non valida" + +#: cobc/typeck.c:7271 +#, fuzzy +#| msgid "invalid expression" +msgid "incomplete expression" +msgstr "espressione non valida" + +#: cobc/typeck.c:7312 #, c-format msgid "more than %d nested conditions" msgstr "" -#: cobc/typeck.c:7290 cobc/typeck.c:7371 +#: cobc/typeck.c:7667 cobc/typeck.c:7748 msgid "no CORRESPONDING items found" msgstr "" -#: cobc/typeck.c:7443 +#: cobc/typeck.c:7820 msgid "no items to ACCEPT found" msgstr "" -#: cobc/typeck.c:7493 +#: cobc/typeck.c:7870 msgid "no items to DISPLAY found" msgstr "" -#: cobc/typeck.c:7605 +#: cobc/typeck.c:7981 msgid "cannot specify figurative constant ZERO in AT clause" msgstr "" -#: cobc/typeck.c:7609 +#: cobc/typeck.c:7985 msgid "value in AT clause is not numeric" msgstr "" -#: cobc/typeck.c:7615 +#: cobc/typeck.c:7991 msgid "value in AT clause must have 4 or 6 digits" msgstr "" -#: cobc/typeck.c:7737 +#: cobc/typeck.c:8168 msgid "invalid PROMPT literal" msgstr "" -#: cobc/typeck.c:7742 +#: cobc/typeck.c:8173 msgid "invalid PROMPT identifier" msgstr "" -#: cobc/typeck.c:8032 +#: cobc/typeck.c:8465 #, c-format msgid "'%s' is not an input device" msgstr "" -#: cobc/typeck.c:8059 cobc/typeck.c:9242 +#: cobc/typeck.c:8492 cobc/typeck.c:9708 #, c-format msgid "'%s' is not defined in SPECIAL-NAMES" msgstr "" -#: cobc/typeck.c:8064 +#: cobc/typeck.c:8497 #, c-format msgid "invalid input device '%s'" msgstr "" -#: cobc/typeck.c:8069 cobc/typeck.c:9246 +#: cobc/typeck.c:8502 cobc/typeck.c:9712 #, c-format msgid "unknown device '%s'; it may exist in another dialect" msgstr "" -#: cobc/typeck.c:8072 cobc/typeck.c:9249 +#: cobc/typeck.c:8505 cobc/typeck.c:9715 #, c-format msgid "unknown device '%s'; not defined in SPECIAL-NAMES" msgstr "" -#: cobc/typeck.c:8088 +#: cobc/typeck.c:8524 msgid "target of RETURNING is not a data pointer" msgstr "" -#: cobc/typeck.c:8115 cobc/typeck.c:12634 cobc/typeck.c:12700 -#: cobc/typeck.c:12768 +#: cobc/typeck.c:8551 cobc/typeck.c:13410 cobc/typeck.c:13479 +#: cobc/typeck.c:13547 #, c-format msgid "cannot change address of '%s', which is not BASED or a LINKAGE item" msgstr "" -#: cobc/typeck.c:8121 +#: cobc/typeck.c:8557 msgid "target of ALLOCATE must have BASED clause" msgstr "" -#: cobc/typeck.c:8155 cobc/typeck.c:8571 +#: cobc/typeck.c:8591 cobc/typeck.c:9023 msgid "amount must be specified as a numeric expression" msgstr "" -#: cobc/typeck.c:8161 +#: cobc/typeck.c:8597 msgid "INITIALIZED TO item is not alphanumeric" msgstr "" -#: cobc/typeck.c:8232 +#: cobc/typeck.c:8667 msgid "only alphanumeric FUNCTION types are allowed here" msgstr "" -#: cobc/typeck.c:8240 +#: cobc/typeck.c:8675 msgid "invalid RETURNING field" msgstr "" -#: cobc/typeck.c:8259 +#: cobc/typeck.c:8694 msgid "STDCALL not available on this platform" msgstr "" -#: cobc/typeck.c:8263 +#: cobc/typeck.c:8698 msgid "STDCALL used on 64-bit Windows platform" msgstr "" -#: cobc/typeck.c:8268 +#: cobc/typeck.c:8703 msgid "STATIC CALL convention requires a literal program name" msgstr "" -#: cobc/typeck.c:8273 cobc/typeck.c:11975 cobc/typeck.c:12900 -#: cobc/typeck.c:13271 +#: cobc/typeck.c:8708 cobc/typeck.c:12746 cobc/typeck.c:13681 +#: cobc/typeck.c:14077 msgid "HANDLE must be either a generic or a THREAD HANDLE" msgstr "" -#: cobc/typeck.c:8291 +#: cobc/typeck.c:8726 msgid "numeric literal is negative" msgstr "" -#: cobc/typeck.c:8370 +#: cobc/typeck.c:8805 msgid "numeric literal exceeds size limits" msgstr "" -#: cobc/typeck.c:8385 +#: cobc/typeck.c:8820 #, c-format msgid "figurative constant %s invalid here" msgstr "" -#: cobc/typeck.c:8403 +#: cobc/typeck.c:8840 #, c-format msgid "'%s' is not a 01 or 77 level item" msgstr "" -#: cobc/typeck.c:8407 +#: cobc/typeck.c:8856 #, c-format msgid "'%s' ANY LENGTH item not passed BY REFERENCE" msgstr "" -#: cobc/typeck.c:8457 cobc/typeck.c:8462 +#: cobc/typeck.c:8909 cobc/typeck.c:8914 #, c-format msgid "wrong number of CALL parameters for '%s', %d given, %d expected" msgstr "" -#: cobc/typeck.c:8529 cobc/typeck.c:8603 cobc/typeck.c:8607 cobc/typeck.c:8637 -#: cobc/typeck.c:11932 cobc/typeck.c:12092 cobc/typeck.c:12281 -#: cobc/typeck.c:12285 cobc/typeck.c:13206 cobc/typeck.c:13539 -#: cobc/typeck.c:13542 +#: cobc/typeck.c:8981 cobc/typeck.c:9055 cobc/typeck.c:9059 cobc/typeck.c:9095 +#: cobc/typeck.c:12703 cobc/typeck.c:12863 cobc/typeck.c:13052 +#: cobc/typeck.c:13056 cobc/typeck.c:14012 cobc/typeck.c:14345 +#: cobc/typeck.c:14348 #, c-format msgid "%s not allowed on %s files" msgstr "" -#: cobc/typeck.c:8704 +#: cobc/typeck.c:9172 msgid "positions cannot be specified for main windows" msgstr "" -#: cobc/typeck.c:8714 cobc/typeck.c:8718 cobc/typeck.c:8740 +#: cobc/typeck.c:9183 cobc/typeck.c:9187 cobc/typeck.c:9211 msgid "HANDLE must be either a generic or a WINDOW HANDLE or X(10)" msgstr "" -#: cobc/typeck.c:8849 +#: cobc/typeck.c:9324 #, c-format msgid "'%s' is an invalid type for DISPLAY operand" msgstr "" -#: cobc/typeck.c:8854 +#: cobc/typeck.c:9329 msgid "invalid type for DISPLAY operand" msgstr "" -#: cobc/typeck.c:9202 cobc/typeck.c:9235 +#: cobc/typeck.c:9668 cobc/typeck.c:9701 #, c-format msgid "'%s' is not an output device" msgstr "" -#: cobc/typeck.c:9335 +#: cobc/typeck.c:9800 msgid "invalid use of 88 level in WHEN expression" msgstr "" -#: cobc/typeck.c:9396 +#: cobc/typeck.c:9861 msgid "wrong number of WHEN parameters" msgstr "" -#: cobc/typeck.c:9518 cobc/typeck.c:9530 +#: cobc/typeck.c:9983 cobc/typeck.c:9995 #, c-format msgid "target %d of FREE is not a BASED data item" msgstr "" -#: cobc/typeck.c:9536 +#: cobc/typeck.c:10001 #, c-format msgid "target %d of FREE must be a data pointer" msgstr "" -#: cobc/typeck.c:9550 +#: cobc/typeck.c:10015 msgid "GO TO without procedure-name" msgstr "" -#: cobc/typeck.c:9560 +#: cobc/typeck.c:10023 msgid "GO TO with multiple procedure-names" msgstr "" -#: cobc/typeck.c:9582 -msgid "GO TO ENTRY with multiple entry-names" -msgstr "" - -#: cobc/typeck.c:9646 +#: cobc/typeck.c:10088 msgid "invalid INITIALIZE statement" msgstr "" -#: cobc/typeck.c:9752 cobc/typeck.c:9755 +#: cobc/typeck.c:10193 cobc/typeck.c:10196 #, c-format msgid "%s operands differ in size" msgstr "" -#: cobc/typeck.c:9785 +#: cobc/typeck.c:10226 #, c-format msgid "unexpected clause %d" msgstr "" -#: cobc/typeck.c:9860 cobc/typeck.c:9871 cobc/typeck.c:9882 cobc/typeck.c:9893 +#: cobc/typeck.c:10301 cobc/typeck.c:10312 cobc/typeck.c:10323 +#: cobc/typeck.c:10334 #, c-format msgid "data name expected before %s" msgstr "" -#: cobc/typeck.c:9903 +#: cobc/typeck.c:10344 #, c-format msgid "ALL, LEADING or TRAILING expected before '%s'" msgstr "" -#: cobc/typeck.c:9913 +#: cobc/typeck.c:10354 msgid "operand has wrong size" msgstr "" -#: cobc/typeck.c:10007 +#: cobc/typeck.c:10448 #, c-format msgid "'%s' defined here as PIC %s" msgstr "" -#: cobc/typeck.c:10011 +#: cobc/typeck.c:10452 #, c-format msgid "'%s' defined here as a group of length %d" msgstr "" -#: cobc/typeck.c:10017 +#: cobc/typeck.c:10458 #, c-format msgid "internal register '%s' defined as USAGE %s" msgstr "" -#: cobc/typeck.c:10020 +#: cobc/typeck.c:10461 #, c-format msgid "'%s' defined here as USAGE %s" msgstr "" -#: cobc/typeck.c:10045 cobc/typeck.c:10063 +#: cobc/typeck.c:10486 cobc/typeck.c:10504 #, c-format msgid "value size is %d" msgstr "" -#: cobc/typeck.c:10059 +#: cobc/typeck.c:10500 #, c-format msgid "value is %s" msgstr "" -#: cobc/typeck.c:10338 -msgid "invalid destination for MOVE" -msgstr "" - -#: cobc/typeck.c:10380 +#: cobc/typeck.c:10824 msgid "MOVE of figurative constant SPACE to numeric item" msgstr "" -#: cobc/typeck.c:10395 +#: cobc/typeck.c:10839 msgid "MOVE of figurative constant QUOTE to numeric item" msgstr "" -#: cobc/typeck.c:10400 cobc/typeck.c:10411 +#: cobc/typeck.c:10844 cobc/typeck.c:10855 msgid "MOVE of figurative constant to numeric item" msgstr "" -#: cobc/typeck.c:10469 +#: cobc/typeck.c:10936 msgid "numeric literal in VALUE clause of numeric-edited item" msgstr "" -#: cobc/typeck.c:10494 +#: cobc/typeck.c:10966 msgid "numeric move to ALPHABETIC" msgstr "" -#: cobc/typeck.c:10506 +#: cobc/typeck.c:10978 msgid "data item not signed" msgstr "" -#: cobc/typeck.c:10509 +#: cobc/typeck.c:10981 msgid "ignoring sign" msgstr "" -#: cobc/typeck.c:10821 +#: cobc/typeck.c:11381 msgid "overlapping MOVE may occur and produce unpredictable results" msgstr "" -#: cobc/typeck.c:10828 +#: cobc/typeck.c:11388 msgid "overlapping MOVE may produce unpredictable results" msgstr "" -#: cobc/typeck.c:10961 +#: cobc/typeck.c:11593 msgid "invalid source for MOVE" msgstr "" -#: cobc/typeck.c:10982 +#: cobc/typeck.c:11614 msgid "source is non-numeric - substituting zero" msgstr "" -#: cobc/typeck.c:10988 cobc/typeck.c:10999 +#: cobc/typeck.c:11620 cobc/typeck.c:11631 msgid "invalid VALUE clause" msgstr "" -#: cobc/typeck.c:10991 cobc/typeck.c:12841 cobc/typeck.c:12846 -#: cobc/typeck.c:12873 cobc/typeck.c:12878 +#: cobc/typeck.c:11623 cobc/typeck.c:13622 cobc/typeck.c:13627 +#: cobc/typeck.c:13654 cobc/typeck.c:13659 msgid "invalid SET statement" msgstr "" -#: cobc/typeck.c:10993 +#: cobc/typeck.c:11625 msgid "invalid MOVE statement" msgstr "" -#: cobc/typeck.c:11000 +#: cobc/typeck.c:11632 msgid "literal exceeds data size" msgstr "" -#: cobc/typeck.c:11004 +#: cobc/typeck.c:11636 msgid "numeric literal exceeds data size" msgstr "" -#: cobc/typeck.c:11013 +#: cobc/typeck.c:11645 msgid "MOVE of non-integer to alphanumeric" msgstr "" -#: cobc/typeck.c:11029 +#: cobc/typeck.c:11666 cobc/typeck.c:11671 +msgid "national value is expected" +msgstr "" + +#: cobc/typeck.c:11676 msgid "value does not fit the picture string" msgstr "" -#: cobc/typeck.c:11035 +#: cobc/typeck.c:11682 msgid "value size exceeds data size" msgstr "" -#: cobc/typeck.c:11040 +#: cobc/typeck.c:11687 msgid "sending field larger than receiving field" msgstr "" -#: cobc/typeck.c:11045 +#: cobc/typeck.c:11692 msgid "some digits may be truncated" msgstr "" -#: cobc/typeck.c:11798 cobc/typeck.c:11848 +#: cobc/typeck.c:12566 cobc/typeck.c:12619 #, c-format msgid "invalid MOVE target: %s" msgstr "" -#: cobc/typeck.c:12105 +#: cobc/typeck.c:12876 msgid "READ PREVIOUS not allowed for this file type" msgstr "" -#: cobc/typeck.c:12113 +#: cobc/typeck.c:12884 msgid "KEY ignored with sequential READ" msgstr "" -#: cobc/typeck.c:12209 +#: cobc/typeck.c:12980 msgid "figurative constants not allowed in FROM clause" msgstr "" -#: cobc/typeck.c:12216 -msgid "literal in FROM clause must be alphanumeric, national or boolean" +#: cobc/typeck.c:12987 +msgid "literal in FROM clause must be alphanumeric, utf-8, national or boolean" msgstr "" -#: cobc/typeck.c:12239 cobc/typeck.c:13499 +#: cobc/typeck.c:13010 cobc/typeck.c:14305 #, c-format msgid "%s FILE requires a FROM clause" msgstr "" -#: cobc/typeck.c:12261 cobc/typeck.c:12345 cobc/typeck.c:13521 +#: cobc/typeck.c:13032 cobc/typeck.c:13116 cobc/typeck.c:14327 #, c-format msgid "%s subject does not refer to a record name" msgstr "" -#: cobc/typeck.c:12351 +#: cobc/typeck.c:13122 msgid "RELEASE not allowed on this record item" msgstr "" -#: cobc/typeck.c:12433 cobc/typeck.c:12454 cobc/typeck.c:12461 +#: cobc/typeck.c:13183 cobc/typeck.c:13209 cobc/typeck.c:13237 msgid "invalid SEARCH ALL condition" msgstr "" -#: cobc/typeck.c:12578 cobc/typeck.c:12585 +#: cobc/typeck.c:13231 +msgid "SEARCH ALL requires comparision of KEY field" +msgstr "" + +#: cobc/typeck.c:13354 cobc/typeck.c:13361 msgid "SET targets must be PROGRAM-POINTER" msgstr "" -#: cobc/typeck.c:12610 +#: cobc/typeck.c:13386 #, c-format msgid "SET target '%s' is not numeric, an INDEX or a POINTER" msgstr "" -#: cobc/typeck.c:12627 cobc/typeck.c:12696 cobc/typeck.c:12764 +#: cobc/typeck.c:13403 cobc/typeck.c:13475 cobc/typeck.c:13543 #, c-format msgid "cannot change address of '%s', which is not level 1 or 77" msgstr "" -#: cobc/typeck.c:12721 +#: cobc/typeck.c:13500 #, c-format msgid "SET target '%s' is not a POINTER for FCD" msgstr "" -#: cobc/typeck.c:12789 +#: cobc/typeck.c:13569 #, c-format msgid "SET target '%s' is not a POINTER for FCD-KEYDEF" msgstr "" -#: cobc/typeck.c:12882 +#: cobc/typeck.c:13663 msgid "field does not have a FALSE clause" msgstr "" -#: cobc/typeck.c:12913 +#: cobc/typeck.c:13694 msgid "THREAD-priority must be between 1 and 32767" msgstr "" -#: cobc/typeck.c:12933 +#: cobc/typeck.c:13714 msgid "SET ATTRIBUTE requires a screen item as subject" msgstr "" -#: cobc/typeck.c:12939 +#: cobc/typeck.c:13720 msgid "SET ATTRIBUTE subject does not refer to a screen item" msgstr "" -#: cobc/typeck.c:12990 -msgid "invalid SORT filename" -msgstr "" - -#: cobc/typeck.c:13051 -msgid "invalid SORT USING parameter" -msgstr "" - -#: cobc/typeck.c:13080 -msgid "invalid SORT GIVING parameter" -msgstr "" +#: cobc/typeck.c:13835 cobc/typeck.c:13875 +#, fuzzy, c-format +#| msgid "invalid parameter: %s" +msgid "invalid %s parameter" +msgstr "parametro non valido: %s" -#: cobc/typeck.c:13134 cobc/typeck.c:13161 cobc/typeck.c:13181 +#: cobc/typeck.c:13940 cobc/typeck.c:13967 cobc/typeck.c:13987 msgid "invalid key item" msgstr "" -#: cobc/typeck.c:13211 +#: cobc/typeck.c:14017 msgid "LENGTH/SIZE clause only allowed on INDEXED files" msgstr "" -#: cobc/typeck.c:13216 +#: cobc/typeck.c:14022 msgid "START not allowed with ACCESS MODE RANDOM" msgstr "" -#: cobc/typeck.c:13305 -#, c-format -msgid "%s item '%s' must be numeric and an integer" -msgstr "" - -#: cobc/typeck.c:13311 +#: cobc/typeck.c:14111 cobc/typeck.c:14117 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "%s item '%s' must be an integer" msgstr "'%s' non è un integer" -#: cobc/typeck.c:13315 +#: cobc/typeck.c:14121 #, c-format msgid "%s item '%s' may not have PICTURE with P in it" msgstr "" -#: cobc/typeck.c:13331 +#: cobc/typeck.c:14137 #, fuzzy, c-format #| msgid "'%s' is not a statement" msgid "'%s' is not an elementary item" msgstr "'%s' non è una definizione" -#: cobc/typeck.c:13407 +#: cobc/typeck.c:14213 msgid "STRING items must be all NATIONAL or none" msgstr "" -#: cobc/typeck.c:13555 +#: cobc/typeck.c:14361 msgid "LOCK clause invalid here" msgstr "" -#: cobc/typeck.c:13800 +#: cobc/typeck.c:14606 msgid "data item is not part of a report" msgstr "" -#: cobc/typeck.c:13820 +#: cobc/typeck.c:14626 msgid "improper use of SUPPRESS PRINTING" msgstr "" -#: cobc/typeck.c:13835 +#: cobc/typeck.c:14642 #, fuzzy, c-format #| msgid "must be numeric" msgid "%s must be alphanumeric or national" msgstr "deve essere un numero" -#: cobc/typeck.c:13846 +#: cobc/typeck.c:14652 #, c-format msgid "%s may not be a figurative constant" msgstr "" -#: cobc/typeck.c:13885 +#: cobc/typeck.c:14690 #, c-format msgid "%s must be a child of the input record" msgstr "" -#: cobc/typeck.c:13911 +#: cobc/typeck.c:14715 #, c-format msgid "%s may not be an ignored item in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:13922 +#: cobc/typeck.c:14725 #, fuzzy, c-format #| msgid "must be numeric" msgid "%s must be elementary" msgstr "deve essere un numero" -#: cobc/typeck.c:13935 +#: cobc/typeck.c:14737 #, c-format msgid "STRING item '%s' must be USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/typeck.c:13947 +#: cobc/typeck.c:14749 #, c-format msgid "%s must be USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/typeck.c:13961 +#: cobc/typeck.c:14761 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "%s must be an integer" msgstr "'%s' non è un integer" -#: cobc/typeck.c:13977 cobc/typeck.c:13983 +#: cobc/typeck.c:14776 cobc/typeck.c:14782 msgid "JSON/XML GENERATE receiving item" msgstr "" -#: cobc/typeck.c:13980 +#: cobc/typeck.c:14779 msgid "JSON/XML GENERATE receiving item may not have JUSTIFIED clause" msgstr "" -#: cobc/typeck.c:14068 +#: cobc/typeck.c:14867 msgid "JSON/XML GENERATE input record may not be reference modified" msgstr "" -#: cobc/typeck.c:14074 +#: cobc/typeck.c:14873 msgid "JSON/XML GENERATE input record may not have RENAMES clause" msgstr "" -#: cobc/typeck.c:14079 +#: cobc/typeck.c:14878 #, c-format msgid "all the children of '%s' are ignored in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14086 +#: cobc/typeck.c:14885 msgid "JSON/XML GENERATE input record has subrecords with non-unique names" msgstr "" -#: cobc/typeck.c:14091 +#: cobc/typeck.c:14890 msgid "floating-point items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14095 +#: cobc/typeck.c:14894 msgid "OCCURS items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14142 +#: cobc/typeck.c:14941 msgid "NAMESPACE must be a valid URI" msgstr "" -#: cobc/typeck.c:14186 +#: cobc/typeck.c:14985 msgid "NAMESPACE-PREFIX must be a valid XML name" msgstr "" -#: cobc/typeck.c:14215 cobc/typeck.c:14223 +#: cobc/typeck.c:15014 cobc/typeck.c:15022 msgid "NAME OF item" msgstr "" -#: cobc/typeck.c:14220 +#: cobc/typeck.c:15019 msgid "NAME OF item must be the input record or a child of it" msgstr "" -#: cobc/typeck.c:14230 +#: cobc/typeck.c:15029 msgid "NAME OF ... OMITTED only valid for source identifier" msgstr "" -#: cobc/typeck.c:14238 +#: cobc/typeck.c:15037 #, c-format msgid "NAME OF literal must be a valid %s identifier" msgstr "" -#: cobc/typeck.c:14265 cobc/typeck.c:14266 cobc/typeck.c:14269 -#: cobc/typeck.c:14273 +#: cobc/typeck.c:15062 cobc/typeck.c:15063 cobc/typeck.c:15066 +#: cobc/typeck.c:15070 msgid "TYPE OF item" msgstr "" -#: cobc/typeck.c:14291 +#: cobc/typeck.c:15088 msgid "SUPPRESS WHEN SPACE item" msgstr "" -#: cobc/typeck.c:14294 +#: cobc/typeck.c:15091 msgid "SUPPRESS WHEN LOW-VALUE item" msgstr "" -#: cobc/typeck.c:14296 +#: cobc/typeck.c:15093 msgid "SUPPRESS WHEN HIGH-VALUE item" msgstr "" -#: cobc/typeck.c:14325 cobc/typeck.c:14333 cobc/typeck.c:14337 +#: cobc/typeck.c:15122 cobc/typeck.c:15130 cobc/typeck.c:15134 msgid "SUPPRESS item" msgstr "" -#: cobc/typeck.c:14329 +#: cobc/typeck.c:15126 msgid "SUPPRESS item with WHEN clause" msgstr "" -#: cobc/typeck.c:14407 +#: cobc/typeck.c:15204 msgid "WITH ATTRIBUTES specified, but no attributes can be generated" msgstr "" @@ -6010,171 +6123,185 @@ msgid " -Wparentheses warn if parentheses are omitted around AND within msgstr "" #: cobc/warning.def:70 -msgid " -Wstrict-typing warn strictly about type mismatch" +msgid " -Wstrict-typing warn strictly about type mismatch, even when same size" msgstr "" #: cobc/warning.def:73 -msgid " -Wimplicit-define warn whenever data items are implicitly defined" +msgid " -Wtyping warn about type mismatch" msgstr "" #: cobc/warning.def:76 -msgid " -Wno-corresponding do not warn about CORRESPONDING with no matching items" +msgid " -Wimplicit-define warn whenever data items are implicitly defined" msgstr "" #: cobc/warning.def:79 -msgid " -Winitial-value warn if initial VALUE clause is ignored" +msgid " -Wno-corresponding do not warn about CORRESPONDING with no matching items" msgstr "" #: cobc/warning.def:82 -msgid " -Wprototypes warn about missing FUNCTION prototypes/definitions" +msgid " -Winitial-value warn if initial VALUE clause is ignored" msgstr "" #: cobc/warning.def:85 -msgid " -Warithmetic-osvs warn if arithmetic expression precision has changed" +msgid " -Wprototypes warn about missing FUNCTION prototypes/definitions" msgstr "" #: cobc/warning.def:88 -msgid " -Wcall-params warn about non 01/77 items for CALL parameters" +msgid " -Warithmetic-osvs warn if arithmetic expression precision has changed" msgstr "" #: cobc/warning.def:91 -msgid " -Wconstant-expression warn about expressions that always resolve to true/false" +msgid " -Wcall-params warn about non 01/77 items for CALL parameters" msgstr "" #: cobc/warning.def:94 -msgid " -Wconstant-numlit-expression\twarn about numeric expressions that always resolve to true/false" +msgid " -Wconstant-expression warn about expressions that always resolve to true/false" msgstr "" #: cobc/warning.def:97 -msgid " -Wlarger-01-redefines warn about larger redefines allowed by COBOL standards" +msgid " -Wconstant-numlit-expression\twarn about numeric expressions that always resolve to true/false" msgstr "" #: cobc/warning.def:100 -msgid " -Wcolumn-overflow warn about text after program-text area, FIXED format" +msgid " -Wlarger-01-redefines warn about larger redefines allowed by COBOL standards" msgstr "" #: cobc/warning.def:103 -msgid " -Wterminator warn about lack of scope terminator END-XXX" +msgid " -Wcolumn-overflow warn about text after program-text area, FIXED format" msgstr "" #: cobc/warning.def:106 -msgid " -Wlinkage warn about dangling LINKAGE items" +msgid " -Wterminator warn about lack of scope terminator END-XXX" msgstr "" #: cobc/warning.def:109 -msgid " -Wunreachable warn about likely unreachable statements" +msgid " -Wlinkage warn about dangling LINKAGE items" msgstr "" #: cobc/warning.def:112 -msgid " -Wno-dialect do not warn about dialect specific issues" +msgid " -Wunreachable warn about likely unreachable statements" msgstr "" #: cobc/warning.def:115 -msgid " -Wno-goto-section do not warn about GO TO section-name" +msgid " -Wno-dialect do not warn about dialect specific issues" msgstr "" #: cobc/warning.def:118 -msgid " -Wgoto-different-section\twarn about GO TO a praragraph defined in a different section" +msgid " -Wno-goto-section do not warn about GO TO section-name" msgstr "" #: cobc/warning.def:121 -msgid " -Wsuspicious-perform-thru\twarn if PERFORM THRU references procedures not in ascending order or multiple sections" +msgid " -Wgoto-different-section\twarn about GO TO a praragraph defined in a different section" msgstr "" #: cobc/warning.def:124 -msgid " -Wdangling-text warn about source text after program-area" +msgid " -Wsuspicious-perform-thru\twarn if PERFORM THRU references procedures not in ascending order or multiple sections" msgstr "" #: cobc/warning.def:127 -msgid " -Wno-missing-newline do not warn about missing newlines" +msgid " -Wdangling-text warn about source text after program-area" msgstr "" #: cobc/warning.def:130 -msgid " -Wno-others do not warn about different issues" +msgid " -Wno-missing-newline do not warn about missing newlines" msgstr "" #: cobc/warning.def:133 +msgid " -Wno-others do not warn about different issues" +msgstr "" + +#: cobc/warning.def:136 msgid " -Wno-unsupported do not warn if runtime does not support a feature used" msgstr "" -#: libcob/call.c:94 +#: libcob/call.c:98 #, c-format msgid "LoadLibrary/GetProcAddress error %d" msgstr "" -#: libcob/call.c:841 +#: libcob/call.c:626 +#, c-format +msgid "preloading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:817 #, c-format msgid "%s: PROGRAM name exceeds %d characters" msgstr "" -#: libcob/call.c:842 +#: libcob/call.c:818 #, c-format msgid "%s: FUNCTION name exceeds %d characters" msgstr "" -#: libcob/call.c:1067 +#: libcob/call.c:945 libcob/call.c:978 +#, c-format +msgid "loading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:1049 msgid "indeterminable error in resolve of COBOL CALL" msgstr "" -#: libcob/call.c:1149 +#: libcob/call.c:1145 #, c-format msgid "user-defined FUNCTION '%s' not found" msgstr "" -#: libcob/call.c:1239 libcob/call.c:1325 libcob/call.c:1445 libcob/call.c:1472 +#: libcob/call.c:1247 libcob/call.c:1328 libcob/call.c:1448 libcob/call.c:1475 #, c-format msgid "NULL parameter passed to '%s'" msgstr "" -#: libcob/call.c:1329 +#: libcob/call.c:1332 #, c-format msgid "invalid number of arguments passed to '%s'" msgstr "" -#: libcob/call.c:1449 +#: libcob/call.c:1452 msgid "multiple call to 'cob_setjmp'" msgstr "" -#: libcob/call.c:1476 +#: libcob/call.c:1479 msgid "call to 'cob_longjmp' with no prior 'cob_setjmp'" msgstr "" -#: libcob/call.c:1703 libcob/call.c:1730 libcob/common.c:8144 +#: libcob/call.c:1608 +#, c-format +msgid "preloading of '%s' failed" +msgstr "" + +#: libcob/call.c:1706 libcob/call.c:1733 libcob/common.c:8965 msgid "cob_init() has not been called" msgstr "" -#: libcob/call.c:1709 +#: libcob/call.c:1712 #, c-format msgid "parameter %d is not within range of %d" msgstr "" -#: libcob/call.c:1715 +#: libcob/call.c:1718 #, fuzzy, c-format #| msgid "Parameters" msgid "parameter %d is NULL" msgstr "Parametri" -#: libcob/call.c:2042 +#: libcob/call.c:2045 msgid "NULL field" msgstr "" -#: libcob/call.c:2050 +#: libcob/call.c:2053 #, fuzzy #| msgid "file not open" msgid "field not allocated" msgstr "file non aperto" -#: libcob/call.c:2116 +#: libcob/call.c:2119 #, c-format msgid "attempt to over-write constant field with '%s'" msgstr "" -#: libcob/call.c:2156 libcob/call.c:2212 -#, c-format -msgid "attempt to over-write constant parameter %d with " -msgstr "" - -#: libcob/call.c:2263 +#: libcob/call.c:2161 libcob/call.c:2219 libcob/call.c:2270 #, c-format msgid "attempt to over-write constant parameter %d with '%s'" msgstr "" @@ -6214,678 +6341,701 @@ msgstr "" msgid "%s: option requires an argument -- '%c'" msgstr "" -#: libcob/common.c:1242 +#: libcob/common.c:1074 +#, c-format +msgid "requested coredump creation failed with status %d" +msgstr "" + +#: libcob/common.c:1303 msgid "fatal arithmetic error" msgstr "" -#: libcob/common.c:1245 +#: libcob/common.c:1306 msgid "interrupt from keyboard" msgstr "" -#: libcob/common.c:1249 +#: libcob/common.c:1310 msgid "hangup" msgstr "" -#: libcob/common.c:1253 +#: libcob/common.c:1314 msgid "quit" msgstr "" -#: libcob/common.c:1257 +#: libcob/common.c:1318 #, fuzzy #| msgid "Definition" msgid "termination" msgstr "Definizione" -#: libcob/common.c:1261 +#: libcob/common.c:1322 msgid "emt termination" msgstr "" -#: libcob/common.c:1265 +#: libcob/common.c:1326 msgid "broken pipe" msgstr "" -#: libcob/common.c:1269 +#: libcob/common.c:1330 msgid "I/O signal" msgstr "" -#: libcob/common.c:1273 +#: libcob/common.c:1334 msgid "attempt to reference invalid memory address" msgstr "" -#: libcob/common.c:1277 +#: libcob/common.c:1338 msgid "bus error" msgstr "" -#: libcob/common.c:1281 +#: libcob/common.c:1342 msgid "illegal instruction" msgstr "" -#: libcob/common.c:1285 +#: libcob/common.c:1346 #, fuzzy #| msgid "aborting" msgid "abort" msgstr "annullamento" -#: libcob/common.c:1289 +#: libcob/common.c:1350 msgid "process killed" msgstr "" -#: libcob/common.c:1293 +#: libcob/common.c:1354 msgid "alarm signal" msgstr "" -#: libcob/common.c:1297 +#: libcob/common.c:1358 #, fuzzy #| msgid "preprocessing:" msgid "stop process" msgstr "preprocessing:" -#: libcob/common.c:1301 libcob/common.c:1305 +#: libcob/common.c:1362 libcob/common.c:1366 msgid "child process stopped" msgstr "" #. TRANSLATORS: This msgid is used for an OS signal like SIGABRT. -#: libcob/common.c:1312 +#: libcob/common.c:1373 msgid "signal" msgstr "" #. TRANSLATORS: This msgid is shown for a requested but not complete stack trace. -#: libcob/common.c:1314 +#: libcob/common.c:1375 msgid "(more COBOL runtime elements follow...)" msgstr "" -#: libcob/common.c:1316 libcob/common.c:8101 +#: libcob/common.c:1377 libcob/common.c:8922 #, c-format msgid "abnormal termination - file contents may be incorrect" msgstr "" -#: libcob/common.c:3145 libcob/common.c:8581 libcob/common.c:8595 +#: libcob/common.c:3441 libcob/common.c:9398 libcob/common.c:9412 #, fuzzy #| msgid "C version %s%s" msgid "version mismatch" msgstr "La versione di C è %s%s" -#: libcob/common.c:3146 libcob/common.c:3148 libcob/common.c:8582 -#: libcob/common.c:8584 +#: libcob/common.c:3442 libcob/common.c:3444 libcob/common.c:9399 +#: libcob/common.c:9401 #, fuzzy, c-format #| msgid "C version %s%s" msgid "%s has version %s.%d" msgstr "La versione di C è %s%s" -#: libcob/common.c:3158 +#: libcob/common.c:3454 #, c-format msgid "CALL to %s requires %d arguments" msgstr "" -#: libcob/common.c:3779 +#: libcob/common.c:4141 #, c-format msgid "code execution leaving %s" msgstr "" -#: libcob/common.c:3789 +#: libcob/common.c:4151 #, c-format msgid "BASED/LINKAGE item %s has NULL address" msgstr "" -#: libcob/common.c:3802 libcob/common.c:3806 +#: libcob/common.c:4168 +#, c-format +msgid "memory violation detected for '%s' after %s" +msgstr "" + +#: libcob/common.c:4171 +#, c-format +msgid "memory violation detected after %s" +msgstr "" + +#: libcob/common.c:4229 libcob/common.c:4244 libcob/common.c:4283 +#: libcob/common.c:4287 #, c-format msgid "LINKAGE item %s not passed by caller" msgstr "" -#: libcob/common.c:3892 +#: libcob/common.c:4253 +#, c-format +msgid "LINKAGE item %s (size %lu) too small in the caller (size %lu)" +msgstr "" + +#: libcob/common.c:4378 #, fuzzy, c-format #| msgid "'%s' is not numeric" msgid "'%s' (Type: %s) not numeric: '%s'" msgstr "'%s' non è un numero" -#: libcob/common.c:3917 +#: libcob/common.c:4403 #, c-format msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgstr "" -#: libcob/common.c:3920 libcob/common.c:3958 +#: libcob/common.c:4406 libcob/common.c:4444 #, c-format msgid "maximum subscript for '%s': %d" msgstr "" -#: libcob/common.c:3922 +#: libcob/common.c:4408 #, c-format msgid "minimum subscript for '%s': %d" msgstr "" -#: libcob/common.c:3955 +#: libcob/common.c:4441 #, c-format msgid "current maximum subscript for '%s': %d" msgstr "" -#: libcob/common.c:3979 +#: libcob/common.c:4465 #, c-format msgid "offset of '%s' out of bounds: %d, maximum: %d" msgstr "" -#: libcob/common.c:3994 +#: libcob/common.c:4480 #, c-format msgid "length of '%s' out of bounds: %d, maximum: %d" msgstr "" -#: libcob/common.c:4005 +#: libcob/common.c:4491 #, c-format msgid "length of '%s' out of bounds: %d, starting at: %d, maximum: %d" msgstr "" -#: libcob/common.c:4093 libcob/common.c:4098 +#: libcob/common.c:4579 libcob/common.c:4584 #, c-format msgid "EXTERNAL item '%s' previously allocated with size %d, requested size is %d" msgstr "" -#: libcob/common.c:4593 +#: libcob/common.c:4961 libcob/common.c:5201 #, c-format msgid "COB_CURRENT_DATE '%s' is invalid" msgstr "" -#: libcob/common.c:5641 libcob/common.c:5644 +#: libcob/common.c:6321 libcob/common.c:6324 msgid "Program abandoned at user request" msgstr "" -#: libcob/common.c:5668 +#: libcob/common.c:6348 #, c-format msgid "parameter to SYSTEM call is larger than %d characters" msgstr "" -#: libcob/common.c:6202 +#: libcob/common.c:6998 #, c-format msgid "error '%s' during CBL_GC_FORK" msgstr "" -#: libcob/common.c:6207 libcob/common.c:6304 +#: libcob/common.c:7003 libcob/common.c:7100 #, c-format msgid "'%s' is not supported on this platform" msgstr "" -#: libcob/common.c:6233 +#: libcob/common.c:7029 #, c-format msgid "error '%s' for P%d during CBL_GC_WAITPID" msgstr "" -#: libcob/common.c:6424 -msgid "Call to CBL_GC_GETOPT with wrong longoption size." +#: libcob/common.c:7220 +msgid "call to CBL_GC_GETOPT with wrong longoption size" msgstr "" -#: libcob/common.c:6429 -msgid "Call to CBL_GC_GETOPT with missing longind." +#: libcob/common.c:7225 +msgid "call to CBL_GC_GETOPT with missing longind" msgstr "" -#: libcob/common.c:6856 libcob/common.c:6877 libcob/common.c:6890 -#: libcob/common.c:9107 libcob/common.c:9111 +#: libcob/common.c:7654 libcob/common.c:7675 libcob/common.c:7688 +#: libcob/common.c:9924 libcob/common.c:9928 #, fuzzy, c-format #| msgid " (default)" msgid "(default)" msgstr " (default)" -#: libcob/common.c:7143 libcob/common.c:7162 +#: libcob/common.c:7973 libcob/common.c:7992 msgid "should be unsigned" msgstr "" -#: libcob/common.c:7151 libcob/common.c:7200 +#: libcob/common.c:7981 libcob/common.c:8030 #, fuzzy #| msgid "must be numeric" msgid "should be numeric" msgstr "deve essere un numero" -#: libcob/common.c:7209 +#: libcob/common.c:8039 #, c-format msgid "minimum value: %lu" msgstr "" -#: libcob/common.c:7261 libcob/common.c:7825 libcob/common.c:7839 +#: libcob/common.c:8069 libcob/common.c:8640 libcob/common.c:8654 +#: bin/cobcrun.c:206 #, c-format msgid "should not contain '%c'" msgstr "" -#: libcob/common.c:7342 libcob/common.c:7390 libcob/common.c:7418 -#: libcob/common.c:7427 libcob/common.c:7435 libcob/common.c:7460 +#: libcob/common.c:8150 libcob/common.c:8169 libcob/common.c:8231 +#: libcob/common.c:8240 libcob/common.c:8248 libcob/common.c:8273 #, c-format msgid "not set" msgstr "" -#: libcob/common.c:7410 libcob/common.c:7413 libcob/common.c:7416 +#: libcob/common.c:8223 libcob/common.c:8226 libcob/common.c:8229 #, fuzzy, c-format #| msgid "Written by %s\n" msgid "set by %s" msgstr "Scritto da %s\n" -#: libcob/common.c:7552 +#: libcob/common.c:8367 #, c-format msgid "WARNING - '%s' without a value - ignored!" msgstr "" -#: libcob/common.c:7555 +#: libcob/common.c:8370 #, c-format msgid "'%s' without a value!" msgstr "" -#: libcob/common.c:7582 +#: libcob/common.c:8397 #, c-format msgid "WARNING - '%s %s' without a value - ignored!" msgstr "" -#: libcob/common.c:8085 +#: libcob/common.c:8906 #, fuzzy #| msgid "error: " msgid "error" msgstr "errore: " -#: libcob/common.c:8127 +#: libcob/common.c:8948 msgid "attempt to CANCEL active program" msgstr "" -#: libcob/common.c:8154 +#: libcob/common.c:8975 msgid "CALL of program with CHAINING clause" msgstr "" -#: libcob/common.c:8158 +#: libcob/common.c:8979 msgid "stack overflow, possible PERFORM depth exceeded" msgstr "" -#: libcob/common.c:8163 +#: libcob/common.c:8984 msgid "invalid entry/exit in GLOBAL USE procedure" msgstr "" -#: libcob/common.c:8167 +#: libcob/common.c:8988 msgid "unable to allocate memory" msgstr "impossibile allocare memoria" -#: libcob/common.c:8172 +#: libcob/common.c:8993 msgid "invalid entry into module" msgstr "" -#: libcob/common.c:8179 +#: libcob/common.c:9000 #, c-format msgid "recursive CALL from '%s' to '%s' which is NOT RECURSIVE" msgstr "" -#: libcob/common.c:8184 +#: libcob/common.c:9005 #, c-format msgid "invalid recursive COBOL CALL to '%s'" msgstr "" -#: libcob/common.c:8199 +#: libcob/common.c:9020 msgid "end of file" msgstr "" -#: libcob/common.c:8202 +#: libcob/common.c:9023 msgid "key out of range" msgstr "" -#: libcob/common.c:8205 +#: libcob/common.c:9026 msgid "key order not ascending" msgstr "" -#: libcob/common.c:8208 +#: libcob/common.c:9029 msgid "record key already exists" msgstr "" -#: libcob/common.c:8211 +#: libcob/common.c:9032 msgid "record key does not exist" msgstr "" -#: libcob/common.c:8214 +#: libcob/common.c:9035 msgid "permanent file error" msgstr "" -#: libcob/common.c:8217 +#: libcob/common.c:9038 msgid "inconsistent file name" msgstr "" -#: libcob/common.c:8220 +#: libcob/common.c:9041 msgid "file does not exist" msgstr "" -#: libcob/common.c:8223 +#: libcob/common.c:9044 msgid "permission denied" msgstr "permesso negato" -#: libcob/common.c:8226 +#: libcob/common.c:9047 msgid "mismatch of fixed file attributes" msgstr "" -#: libcob/common.c:8229 +#: libcob/common.c:9050 msgid "file already open" msgstr "file già aperto" -#: libcob/common.c:8232 +#: libcob/common.c:9053 msgid "file not open" msgstr "file non aperto" -#: libcob/common.c:8235 +#: libcob/common.c:9056 msgid "READ must be executed first" msgstr "" -#: libcob/common.c:8238 +#: libcob/common.c:9059 msgid "record overflow" msgstr "" -#: libcob/common.c:8241 +#: libcob/common.c:9062 msgid "READ after unsuccessful READ/START" msgstr "" -#: libcob/common.c:8244 +#: libcob/common.c:9065 msgid "READ/START not allowed, file not open for input" msgstr "" -#: libcob/common.c:8247 +#: libcob/common.c:9068 msgid "WRITE not allowed, file not open for output" msgstr "" -#: libcob/common.c:8250 +#: libcob/common.c:9071 msgid "DELETE/REWRITE not allowed, file not open for I-O" msgstr "" -#: libcob/common.c:8253 +#: libcob/common.c:9074 msgid "record locked by another file connector" msgstr "" -#: libcob/common.c:8256 +#: libcob/common.c:9077 msgid "LINAGE values invalid" msgstr "" -#: libcob/common.c:8259 +#: libcob/common.c:9080 msgid "file sharing conflict" msgstr "" -#: libcob/common.c:8262 +#: libcob/common.c:9083 msgid "invalid data in LINE SEQUENTIAL file" msgstr "" -#: libcob/common.c:8266 +#: libcob/common.c:9087 msgid "runtime library is not configured for this operation" msgstr "" -#: libcob/common.c:8271 +#: libcob/common.c:9092 msgid "unknown file error" msgstr "" -#: libcob/common.c:8278 +#: libcob/common.c:9099 #, c-format msgid "%s (status = %02d) for file %s" msgstr "" -#: libcob/common.c:8281 +#: libcob/common.c:9102 #, c-format msgid "%s (status = %02d) for file %s on %s" msgstr "" -#: libcob/common.c:8288 +#: libcob/common.c:9109 msgid "attempt to use non-implemented function" msgstr "" -#: libcob/common.c:8291 +#: libcob/common.c:9112 msgid "attempt to use non-implemented XML I/O" msgstr "" -#: libcob/common.c:8294 +#: libcob/common.c:9115 msgid "attempt to use non-implemented JSON I/O" msgstr "" -#: libcob/common.c:8341 +#: libcob/common.c:9162 msgid "environment variables" msgstr "" -#: libcob/common.c:8466 libcob/common.c:8539 libcob/common.c:8554 -#: libcob/common.c:8859 libcob/common.c:8893 libcob/common.c:8910 -#: libcob/common.c:8925 +#: libcob/common.c:9283 libcob/common.c:9356 libcob/common.c:9371 +#: libcob/common.c:9676 libcob/common.c:9710 libcob/common.c:9727 +#: libcob/common.c:9742 #, fuzzy, c-format #| msgid "C version %s%s" msgid "%s, version %d.%d.%d" msgstr "La versione di C è %s%s" -#: libcob/common.c:8468 libcob/common.c:8541 libcob/common.c:8558 -#: libcob/common.c:8862 libcob/common.c:8913 libcob/common.c:8928 +#: libcob/common.c:9285 libcob/common.c:9358 libcob/common.c:9375 +#: libcob/common.c:9679 libcob/common.c:9730 libcob/common.c:9745 #, c-format msgid "%s, version %d.%d.%d (compiled with %d.%d)" msgstr "" -#: libcob/common.c:8471 +#: libcob/common.c:9288 #, fuzzy, c-format #| msgid "C version %s%s" msgid "%s, version %s" msgstr "La versione di C è %s%s" -#: libcob/common.c:8739 +#: libcob/common.c:9556 #, fuzzy, c-format #| msgid "License LGPLv3+: GNU LGPL version 3 or later <http://gnu.org/licenses/lgpl.html>" msgid "License LGPLv3+: GNU LGPL version 3 or later <%s>" msgstr "Licenza GPLv3+: GNU GPL versione 3 o successive <http://gnu.org/licenses/lgpl.html>" -#: libcob/common.c:8803 libcob/common.c:8805 +#: libcob/common.c:9620 libcob/common.c:9622 msgid "dynamic loading" msgstr "caricamento dinamico" -#: libcob/common.c:8938 +#: libcob/common.c:9755 #, fuzzy #| msgid "<support>" msgid "mouse support" msgstr "<support>" -#: libcob/common.c:8955 +#: libcob/common.c:9772 msgid "CALL configuration" msgstr "Configurazione CALL" -#: libcob/common.c:8956 +#: libcob/common.c:9773 msgid "File I/O configuration" msgstr "Configurazione I/O file" -#: libcob/common.c:8957 +#: libcob/common.c:9774 msgid "Screen I/O configuration" msgstr "Configurazione I/O schermo" -#: libcob/common.c:8958 +#: libcob/common.c:9775 msgid "Miscellaneous" msgstr "Varie" -#: libcob/common.c:8959 +#: libcob/common.c:9776 msgid "System configuration" msgstr "Configurazione sistema" -#: libcob/common.c:8963 +#: libcob/common.c:9780 msgid "runtime configuration" msgstr "" -#: libcob/common.c:8965 +#: libcob/common.c:9782 msgid "via" msgstr "" -#: libcob/common.c:9040 libcob/common.c:9068 +#: libcob/common.c:9857 libcob/common.c:9885 msgid "... removed from environment" msgstr "" -#: libcob/common.c:9094 libcob/common.c:9096 +#: libcob/common.c:9911 libcob/common.c:9913 #, c-format msgid "(set by %s)" msgstr "" -#: libcob/common.c:9104 +#: libcob/common.c:9921 #, fuzzy, c-format #| msgid " (reset)" msgid "(reset)" msgstr " (reset)" -#: libcob/common.c:9334 +#: libcob/common.c:10151 msgid "compiler was not built with --enable-debug-log; COB_DEBUG_LOG ignored" msgstr "" -#: libcob/common.c:9524 libcob/common.c:9550 +#: libcob/common.c:10338 libcob/common.c:10364 #, c-format msgid "%s called with unknown option: %d" msgstr "" #. TRANSLATORS: This msgid is shown for a requested but empty stack trace. -#: libcob/common.c:9597 +#: libcob/common.c:10411 msgid "No COBOL runtime elements on stack." msgstr "" -#: libcob/common.c:9915 +#: libcob/common.c:10734 #, c-format msgid "Module dump due to %s" msgstr "" -#: libcob/common.c:9943 +#: libcob/common.c:10762 #, c-format msgid "Dump Program-Id %s from %s compiled %s" msgstr "" -#: libcob/common.c:9969 +#: libcob/common.c:10788 #, fuzzy, c-format #| msgid "Written by %s\n" msgid "dump written to %s" msgstr "Scritto da %s\n" -#: libcob/fileio.c:816 libcob/fileio.c:1628 libcob/fileio.c:1882 -#: libcob/fileio.c:3812 libcob/fileio.c:4396 libcob/fileio.c:9658 -#: libcob/fileio.c:9686 libcob/numeric.c:1583 +#: libcob/fileio.c:784 libcob/fileio.c:1664 libcob/fileio.c:1926 +#: libcob/fileio.c:3938 libcob/fileio.c:4522 libcob/fileio.c:10049 +#: libcob/fileio.c:10077 libcob/numeric.c:1915 #, c-format msgid "invalid internal call of %s" msgstr "" -#: libcob/fileio.c:3359 +#: libcob/fileio.c:3486 #, c-format msgid "BDB error: %s" msgstr "" -#: libcob/fileio.c:3369 +#: libcob/fileio.c:3496 #, c-format msgid "BDB error: %s %s" msgstr "" -#: libcob/fileio.c:3383 libcob/fileio.c:3403 +#: libcob/fileio.c:3510 libcob/fileio.c:3530 #, c-format msgid "cannot join BDB environment (%s), error: %d %s" msgstr "" -#: libcob/fileio.c:3458 libcob/fileio.c:3483 libcob/fileio.c:3509 -#: libcob/fileio.c:3528 +#: libcob/fileio.c:3585 libcob/fileio.c:3610 libcob/fileio.c:3636 +#: libcob/fileio.c:3655 #, c-format msgid "BDB (%s), error: %d %s" msgstr "" -#: libcob/fileio.c:6071 +#: libcob/fileio.c:6199 #, c-format msgid "ERROR FILE %s has ASSIGN field is NULL" msgstr "" -#: libcob/fileio.c:6862 +#: libcob/fileio.c:7050 #, c-format msgid "call to CBL_OPEN_FILE with wrong access mode: %d" msgstr "" -#: libcob/fileio.c:6946 +#: libcob/fileio.c:7135 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_lock: %d" msgstr "" -#: libcob/fileio.c:6949 +#: libcob/fileio.c:7138 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_dev: %d" msgstr "" -#: libcob/fileio.c:7174 libcob/fileio.c:7457 +#: libcob/fileio.c:7362 libcob/fileio.c:7645 #, c-format msgid "'%s' - File detail area is too short" msgstr "" -#: libcob/fileio.c:7686 +#: libcob/fileio.c:7871 msgid "SORT is unable to acquire temporary file" msgstr "" #. TRANSLATORS: This msgid is concatenated with a filename; -#. setup translation to allow this to be followed on the right side. -#: libcob/fileio.c:8432 +#. setup translation to allow this to be followed on the right side, +#. if necessary use a colon or hyphen +#: libcob/fileio.c:8777 msgid "implicit CLOSE of " msgstr "" -#: libcob/fileio.c:9617 libcob/fileio.c:9752 +#: libcob/fileio.c:10008 libcob/fileio.c:10193 #, c-format msgid "ERROR: EXTFH called with FCD version %d" msgstr "" -#: libcob/fileio.c:9886 +#: libcob/fileio.c:10310 #, c-format msgid "ERROR: EXTFH called with wrong file organization %d" msgstr "" -#: libcob/fileio.c:9893 +#: libcob/fileio.c:10317 #, c-format msgid "ERROR: EXTFH called with no %s pointer" msgstr "" -#: libcob/fileio.c:10029 +#: libcob/fileio.c:10461 #, c-format msgid "ERROR: EXTFH called with no %s pointer; Function %d" msgstr "" -#: libcob/fileio.c:10208 +#: libcob/fileio.c:10683 #, c-format msgid "ERROR: EXTFH called with unknown Function %d" msgstr "" -#: libcob/reportio.c:630 +#: libcob/reportio.c:629 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT %d" msgstr "" -#: libcob/reportio.c:637 libcob/reportio.c:652 +#: libcob/reportio.c:636 libcob/reportio.c:651 #, c-format msgid "INITIATE %s NEXT GROUP %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:645 +#: libcob/reportio.c:644 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:1327 +#: libcob/reportio.c:1336 #, c-format msgid "INITIATE %s was already done" msgstr "" -#: libcob/reportio.c:1343 +#: libcob/reportio.c:1352 #, c-format msgid "INITIATE %s PAGE LIMIT problem" msgstr "" -#: libcob/reportio.c:1420 +#: libcob/reportio.c:1429 #, c-format msgid "TERMINATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1565 +#: libcob/reportio.c:1574 #, c-format msgid "GENERATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1917 +#: libcob/reportio.c:1926 #, c-format msgid "could not find line to SUPPRESS in report %s" msgstr "" -#: libcob/screenio.c:568 +#: libcob/screenio.c:1055 msgid "failed to initialize curses" msgstr "" -#: libcob/screenio.c:4081 +#: libcob/screenio.c:5034 msgid "end of program, please press a key to exit" msgstr "programma terminato, premere un tasto per uscire" -#: libcob/termio.c:78 libcob/termio.c:117 +#: libcob/termio.c:76 libcob/termio.c:136 msgid "(Not representable)" msgstr "(Non rappresentabile)" -#: libcob/termio.c:354 +#: libcob/termio.c:406 #, c-format msgid "cannot open %s (=%s)" msgstr "" -#: libcob/termio.c:369 +#: libcob/termio.c:421 msgid "COB_DISPLAY_PUNCH_FILE is invalid, output to SYSPUNCH skipped" msgstr "" @@ -6954,32 +7104,22 @@ msgid "" " (COB_LIBRARY_PATH and/or COB_PRELOAD)" msgstr "" -#: bin/cobcrun.c:146 -#, c-format -msgid "GnuCOBOL home page: <%s>" -msgstr "" - -#: bin/cobcrun.c:148 -#, c-format -msgid "General help using GNU software: <%s>" -msgstr "" - -#: bin/cobcrun.c:288 +#: bin/cobcrun.c:286 msgid "invalid configuration file name" msgstr "" -#: bin/cobcrun.c:355 +#: bin/cobcrun.c:353 #, fuzzy, c-format #| msgid "invalid parameter: %s" msgid "invalid module argument '%s'" msgstr "parametro non valido: %s" -#: bin/cobcrun.c:410 +#: bin/cobcrun.c:408 #, c-format msgid "%s: missing PROGRAM name" msgstr "" -#: bin/cobcrun.c:412 +#: bin/cobcrun.c:410 #, c-format msgid "Try '%s --help' for more information." msgstr "" @@ -6990,6 +7130,9 @@ msgstr "" #~ msgid "default" #~ msgstr "default" +#~ msgid "GnuCOBOL home page: <http://www.gnu.org/software/gnucobol/>" +#~ msgstr "Homepage di GnuCOBOL: <http://www.gnu.org/software/gnucobol/>" + #, c-format #~ msgid "%s is not implemented" #~ msgstr "%s non è implementato" diff --git a/po/ja.po b/po/ja.po index 9ea079bb5..33ce9af18 100644 --- a/po/ja.po +++ b/po/ja.po @@ -7,7 +7,7 @@ msgid "" msgstr "" "Project-Id-Version: OpenCOBOL 0.13\n" "Report-Msgid-Bugs-To: gnucobol-messages@gnu.org\n" -"POT-Creation-Date: 2022-10-23 03:06+0200\n" +"POT-Creation-Date: 2023-07-28 19:20+0200\n" "PO-Revision-Date: 2004-08-01 23:55+0900\n" "Last-Translator: Keisuke Nishida <knishida@coboler.com>\n" "Language-Team: Japanese <translation-team-ja@lists.sourceforge.net>\n" @@ -18,563 +18,573 @@ msgstr "" "Plural-Forms: nplurals=1; plural=0;\n" "X-Poedit-Language: Japanese\n" -#: cobc/cobc.c:98 +#: cobc/cobc.c:116 cobc/codegen.c:2655 cobc/scanner.l:1375 #, fuzzy, c-format msgid "invalid parameter: %s" msgstr " MOVE ʸǤ" -#: cobc/cobc.c:153 cobc/cobc.c:2233 cobc/cobc.c:2236 cobc/parser.y:802 -#: cobc/reserved.c:4022 libcob/common.c:226 libcob/common.c:1308 -#: libcob/common.c:2384 libcob/common.c:2388 libcob/common.c:2426 -#: libcob/common.c:2464 libcob/common.c:2654 libcob/common.c:7351 -#: libcob/common.c:8370 libcob/common.c:9391 libcob/common.c:9470 -#: libcob/common.c:9912 +#: cobc/cobc.c:171 cobc/cobc.c:2392 cobc/cobc.c:2395 cobc/parser.y:895 +#: cobc/reserved.c:4039 libcob/common.c:235 libcob/common.c:1369 +#: libcob/common.c:2698 libcob/common.c:2702 libcob/common.c:2740 +#: libcob/common.c:2778 libcob/common.c:2939 libcob/common.c:8159 +#: libcob/common.c:9191 libcob/common.c:10209 libcob/common.c:10284 +#: libcob/common.c:10731 msgid "unknown" msgstr "" -#: cobc/cobc.c:855 +#: cobc/cobc.c:905 #, fuzzy msgid "internal compiler error" msgstr "³ե륨顼Ǥ" -#: cobc/cobc.c:921 cobc/cobc.c:1008 cobc/cobc.c:1070 cobc/cobc.c:1146 -#: cobc/cobc.c:1186 cobc/cobc.c:1262 +#: cobc/cobc.c:971 cobc/cobc.c:1058 cobc/cobc.c:1120 cobc/cobc.c:1196 +#: cobc/cobc.c:1236 cobc/cobc.c:1312 #, c-format msgid "cannot allocate %d bytes of memory" msgstr "" -#: cobc/cobc.c:934 cobc/cobc.c:950 cobc/cobc.c:970 cobc/cobc.c:1029 -#: cobc/cobc.c:1048 cobc/cobc.c:1166 cobc/cobc.c:1281 cobc/cobc.c:1323 -#: cobc/field.c:2216 libcob/common.c:8191 +#: cobc/cobc.c:984 cobc/cobc.c:1000 cobc/cobc.c:1020 cobc/cobc.c:1079 +#: cobc/cobc.c:1098 cobc/cobc.c:1216 cobc/cobc.c:1331 cobc/cobc.c:1415 +#: cobc/field.c:2346 libcob/common.c:9012 #, c-format msgid "call to %s with NULL pointer" msgstr "" -#: cobc/cobc.c:991 +#: cobc/cobc.c:1041 #, c-format msgid "cannot reallocate %d bytes of memory" msgstr "" -#: cobc/cobc.c:1087 cobc/cobc.c:1203 +#: cobc/cobc.c:1137 cobc/cobc.c:1253 msgid "attempt to reallocate non-allocated memory" msgstr "" -#: cobc/cobc.c:1120 cobc/cobc.c:1236 +#: cobc/cobc.c:1170 cobc/cobc.c:1286 #, c-format msgid "call to %s with invalid pointer, as it is missing in list" msgstr "" -#: cobc/cobc.c:1448 +#: cobc/cobc.c:1540 #, c-format msgid "assuming literal for unquoted '%s'" msgstr "" -#: cobc/cobc.c:1495 +#: cobc/cobc.c:1587 #, fuzzy msgid " - length exceeds maximum" msgstr "ͤ礭ܤ礭ۤƤޤ" -#: cobc/cobc.c:1499 +#: cobc/cobc.c:1591 msgid " - name cannot be empty" msgstr "" -#: cobc/cobc.c:1502 -msgid " - name cannot begin with space or underscore" +#: cobc/cobc.c:1594 +msgid " - name cannot begin with space or hyphen" msgstr "" -#: cobc/cobc.c:1505 +#: cobc/cobc.c:1597 msgid " - name cannot begin with 'cob_' or 'COB_'" msgstr "" -#: cobc/cobc.c:1508 +#: cobc/cobc.c:1600 msgid " - name duplicates a 'C' keyword" msgstr "" -#: cobc/cobc.c:1511 +#: cobc/cobc.c:1603 msgid " - name cannot contain a directory separator" msgstr "" -#: cobc/cobc.c:1520 +#: cobc/cobc.c:1612 #, fuzzy, c-format msgid "invalid file base name '%s'%s" msgstr "ʥ٥ֹǤ `%s'" -#: cobc/cobc.c:1524 +#: cobc/cobc.c:1616 #, fuzzy, c-format msgid "invalid ENTRY '%s'%s" msgstr " X Ǥ: %s" -#: cobc/cobc.c:1527 +#: cobc/cobc.c:1619 #, fuzzy, c-format msgid "invalid PROGRAM-ID '%s'%s" msgstr "`%s' Ͻޤ" -#: cobc/cobc.c:1659 +#: cobc/cobc.c:1751 #, fuzzy, c-format msgid "file '%s' does not exist" msgstr "ե뤬¸ߤޤ" -#: cobc/cobc.c:1685 +#: cobc/cobc.c:1777 #, fuzzy, c-format msgid "duplicate exception '%s'" msgstr " VALUE Ǥ" -#: cobc/cobc.c:1733 +#: cobc/cobc.c:1825 #, fuzzy, c-format msgid "invalid exception-name: %s" msgstr " MOVE ʸǤ" -#: cobc/cobc.c:1870 cobc/cobc.c:8780 +#: cobc/cobc.c:1998 cobc/cobc.c:9211 msgid "please check environment variables as noted above" msgstr "" -#: cobc/cobc.c:1882 cobc/error.c:348 cobc/error.c:382 cobc/error.c:408 -#: cobc/error.c:411 cobc/error.c:477 cobc/error.c:631 cobc/error.c:675 -#: cobc/error.c:779 cobc/error.c:782 +#: cobc/cobc.c:2010 cobc/error.c:140 msgid "error: " msgstr "" -#: cobc/cobc.c:1905 +#: cobc/cobc.c:2033 #, fuzzy, c-format msgid "duplicate DEFINE '%s' - ignored" msgstr "ʥ٥ֹǤ `%s'" -#: cobc/cobc.c:1958 +#: cobc/cobc.c:2086 #, c-format msgid "environment variable '%s' is '%s'; should not contain '%c'" msgstr "" -#: cobc/cobc.c:1988 +#: cobc/cobc.c:2116 msgid "parameter buffer size exceeded" msgstr "" -#: cobc/cobc.c:2028 +#: cobc/cobc.c:2156 #, c-format msgid "warning: could not move temporary file to %s" msgstr "" -#: cobc/cobc.c:2239 +#: cobc/cobc.c:2329 +#, c-format +msgid "environment variable '%s' has invalid content" +msgstr "" + +#: cobc/cobc.c:2398 #, c-format msgid "aborting compile of %s at line %d (%s: %s)" msgstr "" -#: cobc/cobc.c:2243 +#: cobc/cobc.c:2402 #, c-format msgid "aborting codegen for %s, last statement at line %d (%s: %s)" msgstr "" -#: cobc/cobc.c:2246 +#: cobc/cobc.c:2405 #, c-format msgid "aborting codegen for %s (%s: %s)" msgstr "" -#: cobc/cobc.c:2251 +#: cobc/cobc.c:2410 msgid "aborting" msgstr "" -#: cobc/cobc.c:2329 libcob/common.c:2823 libcob/common.c:8149 bin/cobcrun.c:375 +#: cobc/cobc.c:2488 libcob/common.c:3107 libcob/common.c:8970 bin/cobcrun.c:373 #, c-format msgid "Please report this!" msgstr "" -#: cobc/cobc.c:2346 bin/cobcrun.c:100 +#: cobc/cobc.c:2505 bin/cobcrun.c:100 #, c-format msgid "License GPLv3+: GNU GPL version 3 or later <%s>" msgstr "" -#: cobc/cobc.c:2348 libcob/common.c:8741 bin/cobcrun.c:102 +#: cobc/cobc.c:2507 libcob/common.c:9558 bin/cobcrun.c:102 msgid "" "This is free software; see the source for copying conditions. There is NO\n" "warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." msgstr "" -#: cobc/cobc.c:2350 libcob/common.c:8743 bin/cobcrun.c:104 +#: cobc/cobc.c:2509 libcob/common.c:9560 bin/cobcrun.c:104 #, c-format msgid "Written by %s" msgstr "" #. TRANSLATORS: This msgid is intended as the "Packaged" msgid, %s expands to date and time -#: cobc/cobc.c:2352 cobc/cobc.c:2365 libcob/common.c:8747 bin/cobcrun.c:106 +#: cobc/cobc.c:2511 cobc/cobc.c:2524 libcob/common.c:9564 bin/cobcrun.c:106 #, c-format msgid "Built %s" msgstr "" #. TRANSLATORS: This msgid is intended as the "Built" msgid, %s expands to date and time -#: cobc/cobc.c:2354 cobc/cobc.c:2367 libcob/common.c:8750 bin/cobcrun.c:108 +#: cobc/cobc.c:2513 cobc/cobc.c:2526 libcob/common.c:9567 bin/cobcrun.c:108 #, c-format msgid "Packaged %s" msgstr "" -#: cobc/cobc.c:2356 cobc/cobc.c:2369 cobc/cobc.c:2478 libcob/common.c:8787 +#: cobc/cobc.c:2515 cobc/cobc.c:2528 cobc/cobc.c:2637 libcob/common.c:9604 msgid "C version" msgstr "" -#: cobc/cobc.c:2382 +#: cobc/cobc.c:2541 libcob/common.c:1075 msgid "executing:" msgstr "" -#: cobc/cobc.c:2384 +#: cobc/cobc.c:2543 #, fuzzy msgid "to be executed:" msgstr "READ ˼¹ԤʤФʤޤ" -#: cobc/cobc.c:2422 cobc/cobc.c:2423 libcob/common.c:6834 libcob/common.c:6835 -#: libcob/common.c:6866 libcob/common.c:6867 +#: cobc/cobc.c:2581 cobc/cobc.c:2582 libcob/common.c:7632 libcob/common.c:7633 +#: libcob/common.c:7664 libcob/common.c:7665 msgid "env" msgstr "" -#: cobc/cobc.c:2474 libcob/common.c:8783 +#: cobc/cobc.c:2633 libcob/common.c:9600 msgid "build information" msgstr "" -#: cobc/cobc.c:2475 libcob/common.c:8784 +#: cobc/cobc.c:2634 libcob/common.c:9601 msgid "build environment" msgstr "" -#: cobc/cobc.c:2484 libcob/common.c:8794 +#: cobc/cobc.c:2643 libcob/common.c:9611 msgid "GnuCOBOL information" msgstr "" -#: cobc/cobc.c:2492 cobc/cobc.c:2575 cobc/cobc.c:2591 libcob/common.c:8410 -#: libcob/common.c:8777 libcob/common.c:8778 libcob/common.c:8812 -#: libcob/common.c:8878 libcob/common.c:8900 libcob/common.c:8934 +#: cobc/cobc.c:2651 cobc/cobc.c:2739 cobc/cobc.c:2755 libcob/common.c:9233 +#: libcob/common.c:9594 libcob/common.c:9595 libcob/common.c:9629 +#: libcob/common.c:9695 libcob/common.c:9717 libcob/common.c:9751 msgid "disabled" msgstr "" -#: cobc/cobc.c:2523 cobc/cobc.c:2541 libcob/common.c:7397 libcob/common.c:8400 -#: libcob/common.c:8407 libcob/common.c:8816 libcob/common.c:8834 +#: cobc/cobc.c:2687 cobc/cobc.c:2705 libcob/common.c:8179 libcob/common.c:9221 +#: libcob/common.c:9230 libcob/common.c:9633 libcob/common.c:9651 msgid "yes" msgstr "" -#: cobc/cobc.c:2525 cobc/cobc.c:2543 libcob/common.c:7399 libcob/common.c:8402 -#: libcob/common.c:8818 libcob/common.c:8836 +#: cobc/cobc.c:2689 cobc/cobc.c:2707 libcob/common.c:8181 libcob/common.c:9223 +#: libcob/common.c:9635 libcob/common.c:9653 msgid "no" msgstr "" -#: cobc/cobc.c:2529 libcob/common.c:8822 +#: cobc/cobc.c:2693 libcob/common.c:9639 msgid "8 bytes" msgstr "" -#: cobc/cobc.c:2531 libcob/common.c:8824 +#: cobc/cobc.c:2695 libcob/common.c:9641 msgid "4 bytes" msgstr "" -#: cobc/cobc.c:2535 cobc/cobc.c:2537 libcob/common.c:8828 libcob/common.c:8830 +#: cobc/cobc.c:2699 cobc/cobc.c:2701 libcob/common.c:9645 libcob/common.c:9647 msgid "endianness" msgstr "" -#: cobc/cobc.c:2535 libcob/common.c:8828 +#: cobc/cobc.c:2699 libcob/common.c:9645 msgid "big-endian" msgstr "" -#: cobc/cobc.c:2537 libcob/common.c:8830 +#: cobc/cobc.c:2701 libcob/common.c:9647 msgid "little-endian" msgstr "" -#: cobc/cobc.c:2541 cobc/cobc.c:2543 libcob/common.c:8834 libcob/common.c:8836 +#: cobc/cobc.c:2705 cobc/cobc.c:2707 libcob/common.c:9651 libcob/common.c:9653 msgid "native EBCDIC" msgstr "" -#: cobc/cobc.c:2546 libcob/common.c:8937 +#: cobc/cobc.c:2710 libcob/common.c:9754 msgid "extended screen I/O" msgstr "" -#: cobc/cobc.c:2549 libcob/common.c:8840 +#: cobc/cobc.c:2713 libcob/common.c:9657 msgid "variable file format" msgstr "" -#: cobc/cobc.c:2555 cobc/cobc.c:2557 libcob/common.c:8846 libcob/common.c:8848 +#: cobc/cobc.c:2719 cobc/cobc.c:2721 libcob/common.c:9663 libcob/common.c:9665 msgid "sequential file handler" msgstr "" -#: cobc/cobc.c:2557 libcob/common.c:8848 +#: cobc/cobc.c:2721 libcob/common.c:9665 msgid "built-in" msgstr "" -#: cobc/cobc.c:2561 cobc/cobc.c:2563 cobc/cobc.c:2565 cobc/cobc.c:2567 -#: cobc/cobc.c:2570 cobc/cobc.c:2572 cobc/cobc.c:2575 libcob/common.c:8852 -#: libcob/common.c:8866 libcob/common.c:8868 libcob/common.c:8870 -#: libcob/common.c:8873 libcob/common.c:8875 libcob/common.c:8878 +#: cobc/cobc.c:2725 cobc/cobc.c:2727 cobc/cobc.c:2729 cobc/cobc.c:2731 +#: cobc/cobc.c:2734 cobc/cobc.c:2736 cobc/cobc.c:2739 libcob/common.c:9669 +#: libcob/common.c:9683 libcob/common.c:9685 libcob/common.c:9687 +#: libcob/common.c:9690 libcob/common.c:9692 libcob/common.c:9695 msgid "indexed file handler" msgstr "" -#: cobc/cobc.c:2580 cobc/cobc.c:2582 cobc/cobc.c:2585 libcob/common.c:8884 +#: cobc/cobc.c:2744 cobc/cobc.c:2746 cobc/cobc.c:2749 libcob/common.c:9701 msgid "mathematical library" msgstr "" -#: cobc/cobc.c:2589 cobc/cobc.c:2591 libcob/common.c:8895 libcob/common.c:8900 +#: cobc/cobc.c:2753 cobc/cobc.c:2755 libcob/common.c:9712 libcob/common.c:9717 msgid "XML library" msgstr "" -#: cobc/cobc.c:2594 libcob/common.c:8917 libcob/common.c:8932 -#: libcob/common.c:8934 +#: cobc/cobc.c:2758 libcob/common.c:9734 libcob/common.c:9749 +#: libcob/common.c:9751 msgid "JSON library" msgstr "" -#: cobc/cobc.c:2597 libcob/common.c:8810 libcob/common.c:8941 +#: cobc/cobc.c:2761 libcob/common.c:9627 libcob/common.c:9758 msgid "enabled" msgstr "" -#: cobc/cobc.c:2604 +#: cobc/cobc.c:2768 msgid "only one of options 'E', 'S', 'C', 'c' may be specified" msgstr "" -#: cobc/cobc.c:2610 +#: cobc/cobc.c:2774 msgid "only one of options 'm', 'x', 'b' may be specified" msgstr "" -#: cobc/cobc.c:2652 +#: cobc/cobc.c:2816 #, c-format msgid "option requires one of 'ALL', 'FD', 'WS', 'LS', 'RD', 'FD', 'SC', 'LO' - not '%s'" msgstr "" -#: cobc/cobc.c:2682 +#: cobc/cobc.c:2846 #, fuzzy, c-format msgid "'%s' is not an intrinsic function" msgstr "`%s' ǤϤޤ" -#: cobc/cobc.c:2726 cobc/cobc.c:8094 cobc/cobc.c:8213 cobc/codegen.c:3783 -#: cobc/codegen.c:3884 cobc/codegen.c:5571 cobc/codegen.c:5700 -#: cobc/codegen.c:13034 cobc/tree.c:1391 cobc/tree.c:4497 cobc/tree.c:5067 -#: cobc/tree.c:5316 cobc/typeck.c:4344 cobc/typeck.c:9044 cobc/typeck.c:9079 -#: cobc/typeck.c:9977 cobc/typeck.c:12619 cobc/typeck.c:12690 -#: cobc/typeck.c:12758 cobc/typeck.c:13043 cobc/typeck.c:13086 -#: libcob/fileio.c:9703 libcob/fileio.c:9714 +#: cobc/cobc.c:2889 cobc/cobc.c:8507 cobc/cobc.c:8626 cobc/codegen.c:3761 +#: cobc/codegen.c:3864 cobc/codegen.c:5671 cobc/codegen.c:5816 +#: cobc/codegen.c:13429 cobc/parser.y:391 cobc/tree.c:1397 cobc/tree.c:4565 +#: cobc/tree.c:5135 cobc/tree.c:5392 cobc/typeck.c:4497 cobc/typeck.c:9504 +#: cobc/typeck.c:9541 cobc/typeck.c:10418 cobc/typeck.c:13395 +#: cobc/typeck.c:13469 cobc/typeck.c:13537 cobc/typeck.c:13825 +#: cobc/typeck.c:13887 libcob/fileio.c:10094 libcob/fileio.c:10105 #, fuzzy, c-format msgid "call to '%s' with invalid parameter '%s'" msgstr "`%s' ʬȤǤޤ" -#: cobc/cobc.c:3136 +#: cobc/cobc.c:3300 #, fuzzy msgid "loading standard configuration file 'default.conf'" msgstr "ʹϢǤ" -#: cobc/cobc.c:3217 +#: cobc/cobc.c:3387 msgid "the used C compiler is known to not be able to generate assembler code" msgstr "" -#: cobc/cobc.c:3299 +#: cobc/cobc.c:3469 #, fuzzy msgid "invalid output file name" msgstr "ϥȥ꡼Ǥ" -#: cobc/cobc.c:3361 +#: cobc/cobc.c:3531 #, c-format msgid "warning: '%s' is not a directory, defaulting to current directory" msgstr "" -#: cobc/cobc.c:3388 +#: cobc/cobc.c:3558 #, c-format msgid "warning: %d lines per listing page specified, using %d" msgstr "" -#: cobc/cobc.c:3438 +#: cobc/cobc.c:3615 #, c-format msgid "warning: assuming '%s' is a DEFINE - did you intend to use -debug?" msgstr "" -#: cobc/cobc.c:3699 cobc/cobc.c:3724 cobc/cobc.c:3752 +#: cobc/cobc.c:3661 cobc/cobc.c:3702 cobc/cobc.c:4281 +#, fuzzy, c-format +msgid "ignoring nonexistent directory \"%s\"" +msgstr "ޥʥ̵뤵ޤ" + +#: cobc/cobc.c:3943 cobc/cobc.c:3968 cobc/cobc.c:3996 #, fuzzy, c-format msgid "unknown warning option '%s'" msgstr "Τ褦ʸϤޤ `%s'" -#: cobc/cobc.c:3813 +#: cobc/cobc.c:4063 #, fuzzy, c-format msgid "%s option requires a listing file" msgstr "`%s' %d ĤźɬפȤޤ" -#: cobc/cobc.c:3820 +#: cobc/cobc.c:4070 msgid "output to stdout only valid for preprocess" msgstr "" -#: cobc/cobc.c:3829 +#: cobc/cobc.c:4085 +#, fuzzy +#| msgid "-MT must be given to specify target file\n" +msgid "-MT must be given to specify target file" +msgstr "åȥե -MT ǻꤷƲ\n" + +#: cobc/cobc.c:4091 msgid "all runtime checks are enabled" msgstr "" -#: cobc/cobc.c:4030 +#: cobc/cobc.c:4316 msgid "only one stdin input allowed" msgstr "" -#: cobc/cobc.c:4040 +#: cobc/cobc.c:4326 #, fuzzy, c-format msgid "invalid file name parameter (length > %d)" msgstr " VALUE Ǥ" -#: cobc/cobc.c:4270 +#: cobc/cobc.c:4559 msgid "return status:" msgstr "" -#: cobc/cobc.c:4306 libcob/common.c:5711 +#: cobc/cobc.c:4595 libcob/common.c:6391 #, c-format msgid "external process \"%s\" ended with signal %s (%d)" msgstr "" -#: cobc/cobc.c:4364 +#: cobc/cobc.c:4654 msgid "nothing for -j to run" msgstr "" -#: cobc/cobc.c:4406 cobc/cobc.c:4420 +#: cobc/cobc.c:4697 cobc/cobc.c:4711 #, fuzzy, c-format msgid "%s is resolved by environment as: %s" msgstr "%s %s ǤϸŤͤǤ" -#: cobc/cobc.c:4882 +#: cobc/cobc.c:5175 msgid "preprocessing:" msgstr "" -#: cobc/cobc.c:4952 +#: cobc/cobc.c:5244 msgid "'cobxref' execution unsuccessful" msgstr "" -#: cobc/cobc.c:4955 +#: cobc/cobc.c:5247 #, c-format msgid "check that 'cobxref' is in %s" msgstr "" -#: cobc/cobc.c:4957 +#: cobc/cobc.c:5249 msgid "no listing produced" msgstr "" -#: cobc/cobc.c:5882 cobc/cobc.c:5921 +#: cobc/cobc.c:6234 cobc/cobc.c:6273 msgid "No fields defined." msgstr "" -#: cobc/cobc.c:5941 +#: cobc/cobc.c:6293 msgid "No labels defined." msgstr "" -#: cobc/cobc.c:5963 +#: cobc/cobc.c:6324 cobc/cobc.c:9292 +msgid "command line:" +msgstr "" + +#: cobc/cobc.c:6342 msgid "Error/Warning summary:" msgstr "" -#: cobc/cobc.c:6006 +#: cobc/cobc.c:6385 msgid "0 warnings in compilation group" msgstr "" -#: cobc/cobc.c:6010 +#: cobc/cobc.c:6389 msgid "1 warning in compilation group" msgstr "" -#: cobc/cobc.c:6014 +#: cobc/cobc.c:6393 #, c-format msgid "%d warnings in compilation group" msgstr "" -#: cobc/cobc.c:6020 +#: cobc/cobc.c:6399 msgid "0 errors in compilation group" msgstr "" -#: cobc/cobc.c:6024 +#: cobc/cobc.c:6403 msgid "1 error in compilation group" msgstr "" -#: cobc/cobc.c:6028 +#: cobc/cobc.c:6407 #, c-format msgid "%d errors in compilation group" msgstr "" -#: cobc/cobc.c:6034 +#: cobc/cobc.c:6413 #, c-format msgid "Too many errors in compilation group: %d maximum errors" msgstr "" -#: cobc/cobc.c:6632 +#: cobc/cobc.c:7028 #, c-format msgid "%s:%d: too many continuation lines" msgstr "" -#: cobc/cobc.c:7552 +#: cobc/cobc.c:7956 msgid "parsing:" msgstr "" -#: cobc/cobc.c:7612 +#: cobc/cobc.c:8017 msgid "translating:" msgstr "" -#: cobc/cobc.c:8786 +#: cobc/cobc.c:9217 msgid "no input files" msgstr "" -#: cobc/cobc.c:8816 +#: cobc/cobc.c:9248 #, fuzzy, c-format msgid "%s option invalid in this combination" msgstr "ʹϢǤ" -#: cobc/cobc.c:8857 -msgid "command line:" -msgstr "" - -#: cobc/codegen.c:1041 cobc/codegen.c:4463 cobc/codegen.c:11648 -#: cobc/codegen.c:12186 +#: cobc/codegen.c:1040 cobc/codegen.c:4506 cobc/codegen.c:11910 +#: cobc/codegen.c:12467 #, fuzzy msgid "unexpected CONSTANT item" msgstr "ʿǤ" -#: cobc/codegen.c:2981 cobc/codegen.c:3261 cobc/codegen.c:8523 cobc/tree.c:1413 +#: cobc/codegen.c:2921 cobc/codegen.c:3207 cobc/codegen.c:8866 cobc/tree.c:1419 #, fuzzy, c-format msgid "unexpected cast type: %d" msgstr "ʿǤ" -#: cobc/codegen.c:3713 cobc/codegen.c:4413 +#: cobc/codegen.c:3690 cobc/codegen.c:4455 #, c-format msgid "internal statement stack depth exceeded: %d" msgstr "" -#: cobc/codegen.c:3785 +#: cobc/codegen.c:3763 #, fuzzy, c-format msgid "%s is not a field" msgstr "%s ̤Ǥ" -#: cobc/codegen.c:4186 cobc/codegen.c:4257 +#: cobc/codegen.c:4177 cobc/codegen.c:4279 #, fuzzy, c-format msgid "unexpected function: %s" msgstr "ʿǤ" -#: cobc/codegen.c:5204 +#: cobc/codegen.c:5256 #, fuzzy, c-format msgid "unexpected tree category: %d" msgstr "ʿǤ" -#: cobc/codegen.c:5971 +#: cobc/codegen.c:6108 #, fuzzy, c-format msgid "unexpected size: %d" msgstr "ʿǤ" -#: cobc/codegen.c:7595 +#: cobc/codegen.c:7894 #, c-format msgid "No ENTRY FOR GO TO '%s'" msgstr "" -#: cobc/codegen.c:7816 cobc/codegen.c:8163 +#: cobc/codegen.c:8283 cobc/codegen.c:8609 #, fuzzy, c-format msgid "unexpected handler type: %d" msgstr "ʿǤ" -#: cobc/codegen.c:8254 -msgid "unexpected error_node parameter" -msgstr "" - -#: cobc/codegen.c:8544 +#: cobc/codegen.c:8887 #, fuzzy, c-format msgid "unexpected tree type: %d" msgstr "ʿǤ" -#: cobc/codegen.c:9520 +#: cobc/codegen.c:9776 msgid "Nested OCCURS in report" msgstr "" -#: cobc/codeoptim.c:2777 +#: cobc/codeoptim.c:2856 #, fuzzy, c-format msgid "unexpected optimization value: %d" msgstr "ʿǤ" -#: cobc/config.c:164 libcob/common.c:7824 libcob/common.c:7838 -#: libcob/common.c:8315 +#: cobc/config.c:164 libcob/common.c:8639 libcob/common.c:8653 +#: libcob/common.c:9136 #, fuzzy, c-format msgid "invalid value '%s' for configuration tag '%s'" msgstr "%s: `%s':\n" -#: cobc/config.c:167 libcob/common.c:7117 libcob/common.c:7234 +#: cobc/config.c:167 libcob/common.c:7915 libcob/common.c:7939 #, c-format msgid "should be one of the following values: %s" msgstr "" @@ -583,7 +593,7 @@ msgstr "" msgid "must be numeric" msgstr "" -#: cobc/config.c:171 libcob/common.c:7215 +#: cobc/config.c:171 libcob/common.c:8045 #, c-format msgid "maximum value: %lu" msgstr "" @@ -598,46 +608,46 @@ msgstr "" msgid "unsupported value '%s' for configuration tag '%s'" msgstr "%s: `%s':\n" -#: cobc/config.c:318 cobc/pplex.l:1185 libcob/common.c:7739 +#: cobc/config.c:319 cobc/pplex.l:1264 libcob/common.c:8554 msgid "recursive inclusion" msgstr "" -#: cobc/config.c:393 libcob/common.c:7791 +#: cobc/config.c:394 libcob/common.c:8606 #, fuzzy msgid "configuration file was included here" msgstr "ʹϢǤ" -#: cobc/config.c:422 +#: cobc/config.c:423 #, c-format msgid "The previous loaded configuration '%s' will be discarded." msgstr "" -#: cobc/config.c:458 +#: cobc/config.c:459 msgid "missing definitions:" msgstr "" -#: cobc/config.c:460 +#: cobc/config.c:461 #, fuzzy, c-format msgid "\tno definition of '%s'" msgstr "`%s' Ƥޤ" -#: cobc/config.c:523 +#: cobc/config.c:524 #, fuzzy, c-format msgid "invalid configuration tag '%s'" msgstr "ʹϢǤ" -#: cobc/config.c:536 libcob/common.c:7545 libcob/common.c:7629 -#: libcob/common.c:7657 +#: cobc/config.c:537 libcob/common.c:8360 libcob/common.c:8444 +#: libcob/common.c:8472 #, fuzzy, c-format msgid "unknown configuration tag '%s'" msgstr "Τ褦ʸϤޤ `%s'" -#: cobc/config.c:560 +#: cobc/config.c:561 #, fuzzy, c-format msgid "invalid configuration tag '%s' in word-list" msgstr "ʹϢǤ" -#: cobc/config.c:622 +#: cobc/config.c:623 #, c-format msgid "Could not access word list for '%s'" msgstr "" @@ -678,11 +688,11 @@ msgstr " #: cobc/config.def:73 msgid "" "default initialization for fields without VALUE, may be one of\n" -" * character in quotes\n" -" * decimal 0..255 representing a character\n" -" * \"init\" to initialize to PICTURE/USAGE\n" -" * \"none\" to do no explicit initialization\n" -" * default: \"init\"" +" * character in quotes\n" +" * decimal 0..255 representing a character\n" +" * \"init\" to initialize to PICTURE/USAGE\n" +" * \"none\" to do no explicit initialization\n" +" * default: \"init\"" msgstr "" #: cobc/config.def:83 @@ -709,1088 +719,1097 @@ msgstr "" msgid "whether DECIMAL-POINT IS COMMA has effect in XML/JSON GENERATE, may be one of: none, xml, json, all" msgstr "" -#: cobc/config.def:103 -msgid "resolve file names at run time using environment variables" +#: cobc/config.def:101 +msgid "checking for subscript (only done with EC-BOUND-SUBSCRIPT active), may be one of: full, max, record" msgstr "" #: cobc/config.def:106 -msgid "alternate formatting of numeric fields" +msgid "resolve file names at run time using environment variables" msgstr "" #: cobc/config.def:109 -msgid "numeric truncation according to ANSI" +msgid "alternate formatting of numeric fields" msgstr "" #: cobc/config.def:112 -#, fuzzy -msgid "allow complex OCCURS DEPENDING ON" -msgstr "`%s' OCCURS DEPENDING ĤȤޤ" +msgid "numeric truncation according to ANSI" +msgstr "" #: cobc/config.def:115 -msgid "adjust items following OCCURS DEPENDING (implies complex-odo)" +msgid "allow non-standard OCCURS DEPENDING ON syntax" msgstr "" #: cobc/config.def:118 -msgid "allow REDEFINES to other than last equal level number" +msgid "adjust items following OCCURS DEPENDING (implies complex-odo)" msgstr "" #: cobc/config.def:121 +#, fuzzy +msgid "applies JUSTIFY with VALUE clause" +msgstr " VALUE Ǥ" + +#: cobc/config.def:124 +msgid "allow REDEFINES to other than last equal level number" +msgstr "" + +#: cobc/config.def:127 msgid "allow certain syntax variations (e.g. REDEFINES position)" msgstr "" -#: cobc/config.def:124 +#: cobc/config.def:130 msgid "allow zero length reference-modification (only changed with EC-BOUND-REF-MOD active)" msgstr "" -#: cobc/config.def:127 +#: cobc/config.def:133 msgid "allow non-matching level numbers" msgstr "" -#: cobc/config.def:130 +#: cobc/config.def:136 msgid "require ASSIGN USING items to be in WORKING-STORAGE" msgstr "" -#: cobc/config.def:133 +#: cobc/config.def:139 msgid "LOCAL-STORAGE SECTION implies RECURSIVE attribute" msgstr "" -#: cobc/config.def:136 +#: cobc/config.def:142 msgid "LINKAGE SECTION items remain allocated between invocations" msgstr "" -#: cobc/config.def:139 +#: cobc/config.def:145 msgid "MOVE operates as on IBM (left to right, byte by byte)" msgstr "" -#: cobc/config.def:142 +#: cobc/config.def:148 msgid "exit point of any currently executing perform is recognized if reached" msgstr "" -#: cobc/config.def:145 +#: cobc/config.def:151 msgid "limit precision in intermediate results to precision of final result (less accurate)" msgstr "" -#: cobc/config.def:148 +#: cobc/config.def:154 msgid "evaluate constant expressions at compile time" msgstr "" -#: cobc/config.def:151 +#: cobc/config.def:157 msgid "allow hexadecimal value 'F' for NUMERIC test of signed PACKED DECIMAL field" msgstr "" -#: cobc/config.def:154 +#: cobc/config.def:160 msgid "program names don't lead to a reserved identifier" msgstr "" -#: cobc/config.def:157 +#: cobc/config.def:163 msgid "set WITH UPDATE clause as default for ACCEPT dest-item, instead of WITH NO UPDATE" msgstr "" -#: cobc/config.def:160 +#: cobc/config.def:166 msgid "set WITH AUTO clause as default for ACCEPT dest-item, instead of WITH TAB" msgstr "" -#: cobc/config.def:163 +#: cobc/config.def:169 msgid "assume CONSOLE IS CRT if not set otherwise" msgstr "" -#: cobc/config.def:166 +#: cobc/config.def:172 msgid "NO-ECHO hides input with asterisks like SECURE" msgstr "" -#: cobc/config.def:169 +#: cobc/config.def:175 msgid "assume a field DISPLAY starts at LINE 0 COL 0 (i.e. at the cursor), not LINE 1 COL 1" msgstr "" -#: cobc/config.def:172 +#: cobc/config.def:178 msgid "special behaviour of DISPLAY SPACE/ALL X'01'/ALL X'02'/ALL X'07'" msgstr "" -#: cobc/config.def:175 +#: cobc/config.def:181 msgid "COMP-1 is a 16-bit signed integer" msgstr "" -#: cobc/config.def:178 +#: cobc/config.def:184 msgid "POINTER is a 64-bit unsigned integer" msgstr "" -#: cobc/config.def:181 +#: cobc/config.def:187 msgid "imply zero in move of non-numeric literal to numeric items" msgstr "" -#: cobc/config.def:184 +#: cobc/config.def:190 msgid "implicitly define a variable if an ASSIGN DYNAMIC does not match any data item" msgstr "" -#: cobc/config.def:187 +#: cobc/config.def:193 msgid "specifying device by mnemonic" msgstr "" -#: cobc/config.def:193 +#: cobc/config.def:199 msgid "" "check contents of Area A (when reference format supports Area A enforcement),\n" -" enabled checks include:\n" -" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" -" and toplevel numbers (01 and 77) must start in Area A;\n" -" * statements must not start in Area A; and\n" -" * separator periods must not be within Area A." +" enabled checks include:\n" +" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" +" and toplevel numbers (01 and 77) must start in Area A;\n" +" * statements must not start in Area A; and\n" +" * separator periods must not be within Area A" msgstr "" -#: cobc/config.def:203 +#: cobc/config.def:209 msgid "comment paragraphs in IDENTIFICATION DIVISION (AUTHOR, DATE-WRITTEN, ...)" msgstr "" -#: cobc/config.def:207 -msgid "CONTROL DIVISION" -msgstr "" - -#: cobc/config.def:211 cobc/ppparse.y:101 cobc/ppparse.y:104 -msgid "partial replacing with literal" +#: cobc/config.def:217 +msgid "" +"apply partial replacing with literal source operand even when it replaces with spaces only;\n" +" * \"skip\" prevents such replacements" msgstr "" -#: cobc/config.def:214 +#: cobc/config.def:221 msgid "MEMORY-SIZE clause" msgstr "" -#: cobc/config.def:217 +#: cobc/config.def:224 msgid "MULTIPLE-FILE-TAPE clause" msgstr "" -#: cobc/config.def:220 +#: cobc/config.def:227 #, fuzzy msgid "LABEL-RECORDS clause" msgstr "`%s' Ͻޤ" -#: cobc/config.def:223 +#: cobc/config.def:230 #, fuzzy msgid "VALUE-OF clause" msgstr " VALUE Ǥ" -#: cobc/config.def:226 +#: cobc/config.def:233 #, fuzzy msgid "DATA-RECORDS clause" msgstr "`%s' Ͻޤ" -#: cobc/config.def:229 +#: cobc/config.def:236 msgid "OCCURS clause on top-level" msgstr "" -#: cobc/config.def:232 cobc/parser.y:7285 +#: cobc/config.def:239 cobc/parser.y:7566 msgid "SAME AS clause" msgstr "" -#: cobc/config.def:235 cobc/parser.y:7621 +#: cobc/config.def:242 cobc/parser.y:7904 #, fuzzy msgid "TYPE TO clause" msgstr "`%s' Ͻޤ" -#: cobc/config.def:238 cobc/parser.y:7644 +#: cobc/config.def:245 cobc/parser.y:7927 msgid "USAGE type-name" msgstr "" -#: cobc/config.def:241 cobc/parser.y:8190 +#: cobc/config.def:248 cobc/parser.y:8563 msgid "SYNCHRONIZED clause" msgstr "" -#: cobc/config.def:244 cobc/parser.y:8193 +#: cobc/config.def:251 cobc/parser.y:8566 msgid "LEFT/RIGHT phrases in SYNCHRONIZED clause" msgstr "" -#: cobc/config.def:247 +#: cobc/config.def:254 msgid "SPECIAL-NAMES clause" msgstr "" -#: cobc/config.def:250 +#: cobc/config.def:257 #, fuzzy -msgid "GOTO statement without name" -msgstr "%s ʸ END-%s ǽäƤޤ" +msgid "GO TO statement without name" +msgstr "GO TO ʣμ³̾ꤵƤޤ" -#: cobc/config.def:253 +#: cobc/config.def:260 #, fuzzy msgid "STOP-literal statement" msgstr " MOVE ʸǤ" -#: cobc/config.def:256 +#: cobc/config.def:263 #, fuzzy msgid "STOP-identifier statement" msgstr " VALUE Ǥ" -#: cobc/config.def:259 +#: cobc/config.def:266 msgid "STOP ERROR statement" msgstr "" -#: cobc/config.def:262 +#: cobc/config.def:269 msgid "DEBUGGING MODE and debugging indicator" msgstr "" -#: cobc/config.def:268 +#: cobc/config.def:275 msgid "PADDING CHARACTER clause" msgstr "" -#: cobc/config.def:271 +#: cobc/config.def:278 msgid "NEXT SENTENCE phrase" msgstr "" -#: cobc/config.def:274 +#: cobc/config.def:281 msgid "listing-directive statements EJECT, SKIP1, SKIP2, SKIP3" msgstr "" -#: cobc/config.def:277 +#: cobc/config.def:284 msgid "listing-directive statement TITLE" msgstr "" -#: cobc/config.def:280 +#: cobc/config.def:287 #, fuzzy msgid "ENTRY statement" msgstr " MOVE ʸǤ" -#: cobc/config.def:283 +#: cobc/config.def:290 #, fuzzy msgid "move noninteger to alphanumeric" msgstr "ѿܤؤ MOVE Ͻޤ" -#: cobc/config.def:286 +#: cobc/config.def:293 #, fuzzy msgid "move figurative constants to numeric" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/config.def:289 +#: cobc/config.def:296 #, fuzzy msgid "move figurative constant SPACE to numeric" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/config.def:292 +#: cobc/config.def:299 #, fuzzy msgid "move figurative constant QUOTE to numeric" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/config.def:295 +#: cobc/config.def:302 #, fuzzy msgid "OCCURS DEPENDING ON without to" msgstr "OCCURS DEPENDING ON `%s' ϰϤۤƤޤ: %d" -#: cobc/config.def:298 cobc/parser.y:11102 +#: cobc/config.def:305 cobc/parser.y:11443 msgid "section segments" msgstr "" -#: cobc/config.def:301 +#: cobc/config.def:308 #, fuzzy msgid "ALTER statement" msgstr " MOVE ʸǤ" -#: cobc/config.def:304 +#: cobc/config.def:311 msgid "OVERFLOW clause for CALL" msgstr "" -#: cobc/config.def:307 +#: cobc/config.def:314 #, fuzzy msgid "boolean literals (B'1010')" msgstr "ʿǤ" -#: cobc/config.def:310 +#: cobc/config.def:317 #, fuzzy msgid "hexadecimal-boolean literals (BX'A')" msgstr "ʿǤ" -#: cobc/config.def:313 +#: cobc/config.def:320 #, fuzzy msgid "national literals (N'UTF-16 string')" msgstr " H Ǥ: %s" -#: cobc/config.def:316 +#: cobc/config.def:323 #, fuzzy msgid "hexadecimal-national literals (NX'265E')" msgstr " X Ǥ: %s" -#: cobc/config.def:319 +#: cobc/config.def:326 msgid "non-standard national literals (NC'UTF-16 string')" msgstr "" -#: cobc/config.def:322 +#: cobc/config.def:329 msgid "HP COBOL octal literals (%377)" msgstr "" -#: cobc/config.def:325 +#: cobc/config.def:332 msgid "ACUCOBOL-GT literals (#B #O #H #X)" msgstr "" -#: cobc/config.def:328 cobc/pplex.l:2199 +#: cobc/config.def:335 +msgid "EBCDIC symbolic characters in literals (\" \"135,151,151\"bar\"195, 194\"Z\" for \" foobarBAZ\")" +msgstr "" + +#: cobc/config.def:338 cobc/pplex.l:2428 msgid "continuation of COBOL words" msgstr "" -#: cobc/config.def:331 +#: cobc/config.def:341 msgid "NOT ON EXCEPTION before ON EXCEPTION" msgstr "" -#: cobc/config.def:334 +#: cobc/config.def:344 msgid "extensions to ACCEPT and DISPLAY" msgstr "" -#: cobc/config.def:337 cobc/field.c:3357 +#: cobc/config.def:347 cobc/field.c:3645 msgid "RENAMES of 01-, 66- and 77-level items" msgstr "" -#: cobc/config.def:341 +#: cobc/config.def:351 msgid "allow larger REDEFINES items" msgstr "" -#: cobc/config.def:344 +#: cobc/config.def:354 #, fuzzy msgid "constants defined in SPECIAL-NAMES" msgstr "`%s' SPECIAL-NAMES Ƥޤ" -#: cobc/config.def:347 +#: cobc/config.def:357 msgid "constant with level 78 item (note: has left to right precedence in expressions)" msgstr "" -#: cobc/config.def:350 +#: cobc/config.def:360 msgid "constant with level 01 CONSTANT AS/FROM item" msgstr "" -#: cobc/config.def:353 +#: cobc/config.def:363 msgid "PERFORM VARYING without BY phrase (implies BY 1)" msgstr "" -#: cobc/config.def:356 +#: cobc/config.def:366 msgid "references to sections not in DECLARATIVES from within DECLARATIVES" msgstr "" -#: cobc/config.def:359 cobc/parser.y:12225 cobc/parser.y:12521 +#: cobc/config.def:369 cobc/parser.y:12614 cobc/parser.y:12913 msgid "CALL/CANCEL with program-prototype-name" msgstr "" -#: cobc/config.def:362 +#: cobc/config.def:372 msgid "specifying call-convention by mnemonic" msgstr "" -#: cobc/config.def:365 +#: cobc/config.def:375 msgid "specifying call-convention by WITH ... LINKAGE" msgstr "" -#: cobc/config.def:368 +#: cobc/config.def:378 +msgid "support for PROCEDURE DIVISION USING OPTIONAL" +msgstr "" + +#: cobc/config.def:381 msgid "numeric literals in VALUE clause of numeric-edited items" msgstr "" -#: cobc/config.def:371 +#: cobc/config.def:384 msgid "incorrect order of CONFIGURATION SECTION paragraphs" msgstr "" -#: cobc/config.def:374 +#: cobc/config.def:387 msgid "allow >> DEFINE CONSTANT var AS literal" msgstr "" -#: cobc/config.def:377 +#: cobc/config.def:390 #, fuzzy #| msgid "REDEFINES clause must follow entry-name" msgid "REDEFINES clause not following entry-name in definition" msgstr "REDEFINES Ϲ̾ľˤʤФʤޤ" -#: cobc/config.def:380 +#: cobc/config.def:393 msgid "record sizes does not match RECORD clause" msgstr "" -#: cobc/config.def:383 cobc/parser.y:5736 cobc/parser.y:5750 cobc/parser.y:5763 -#: cobc/parser.y:5774 +#: cobc/config.def:396 cobc/parser.y:5991 cobc/parser.y:6005 cobc/parser.y:6018 +#: cobc/parser.y:6029 #, fuzzy msgid "RECORD DELIMITER clause" msgstr "`%s' Ͻޤ" -#: cobc/config.def:386 +#: cobc/config.def:399 msgid "BINARY-SEQUENTIAL and LINE-SEQUENTIAL phrases in RECORD DELIMITER" msgstr "" -#: cobc/config.def:389 cobc/tree.c:4805 +#: cobc/config.def:402 cobc/tree.c:4873 msgid "RECORD DELIMITER clause on file with fixed-length records" msgstr "" -#: cobc/config.def:392 +#: cobc/config.def:405 msgid "missing statement (e.g. empty IF / PERFORM)" msgstr "" -#: cobc/config.def:395 +#: cobc/config.def:408 msgid "missing period in PROCEDURE DIVISION (when reference format supports Area A enforcement)" msgstr "" -#: cobc/config.def:398 +#: cobc/config.def:411 msgid "zero-length literals, e.g. '' and \"\"" msgstr "" -#: cobc/config.def:401 +#: cobc/config.def:414 msgid "XML GENERATE's phrases other than COUNT IN" msgstr "" -#: cobc/config.def:404 cobc/typeck.c:8565 +#: cobc/config.def:417 cobc/typeck.c:9017 msgid "AFTER phrase in CONTINUE statement" msgstr "" -#: cobc/config.def:407 -msgid "ENTRY FOR GOTO and GOTO ENTRY statements" +#: cobc/config.def:420 +msgid "ENTRY FOR GO TO and GO TO ENTRY statements" msgstr "" -#: cobc/config.def:410 +#: cobc/config.def:423 cobc/typeck.c:4642 msgid "ASSIGN [TO] variable in SELECT" msgstr "" -#: cobc/config.def:413 +#: cobc/config.def:426 msgid "ASSIGN USING/VARYING variable in SELECT" msgstr "" -#: cobc/config.def:416 +#: cobc/config.def:429 msgid "ASSIGN EXTERNAL/DYNAMIC in SELECT" msgstr "" -#: cobc/config.def:419 +#: cobc/config.def:432 msgid "ASSIGN DISK FROM variable in SELECT" msgstr "" -#: cobc/config.def:422 +#: cobc/config.def:435 msgid "VSAM status in FILE STATUS" msgstr "" -#: cobc/config.def:425 +#: cobc/config.def:438 msgid "CALL to own PROGRAM-ID implies RECURSIVE attribute" msgstr "" -#: cobc/config.def:428 +#: cobc/config.def:441 msgid "DEPENDING clause in RECORD CONTAINS" msgstr "" -#: cobc/config.def:431 cobc/tree.c:3584 +#: cobc/config.def:444 cobc/tree.c:3623 msgid "PICTURE string with 'L' character" msgstr "" -#: cobc/error.c:83 +#: cobc/error.c:141 libcob/common.c:1379 libcob/common.c:8715 +#: libcob/common.c:8766 +#, c-format +msgid "warning: " +msgstr "" + +#: cobc/error.c:142 libcob/common.c:8784 +msgid "note: " +msgstr "" + +#: cobc/error.c:162 #, fuzzy, c-format msgid "in section '%s':" msgstr "%s: `%s':\n" -#: cobc/error.c:94 +#: cobc/error.c:173 #, fuzzy, c-format msgid "in paragraph '%s':" msgstr "%s: `%s':\n" -#: cobc/error.c:129 cobc/error.c:133 cobc/error.c:136 +#: cobc/error.c:227 cobc/error.c:231 cobc/error.c:234 msgid "too many errors" msgstr "" -#: cobc/error.c:145 +#: cobc/error.c:243 #, fuzzy, c-format msgid "in file included from " msgstr "ʹϢǤ" -#: cobc/error.c:163 libcob/common.c:8325 +#: cobc/error.c:261 libcob/common.c:9146 msgid "configuration error:" msgstr "" -#: cobc/error.c:176 libcob/common.c:861 +#: cobc/error.c:274 libcob/common.c:920 #, c-format msgid "system error %d" msgstr "" -#: cobc/error.c:346 cobc/error.c:413 cobc/error.c:475 cobc/error.c:631 -#: cobc/error.c:675 cobc/error.c:785 libcob/common.c:1318 libcob/common.c:7900 -#: libcob/common.c:7951 -#, c-format -msgid "warning: " -msgstr "" - -#: cobc/error.c:518 cobc/error.c:534 cobc/error.c:868 cobc/error.c:889 +#: cobc/error.c:616 cobc/error.c:632 cobc/error.c:971 cobc/error.c:992 #, c-format msgid "%s used" msgstr "" -#: cobc/error.c:521 cobc/error.c:871 +#: cobc/error.c:619 cobc/error.c:974 #, c-format msgid "%s is archaic in %s" msgstr "%s %s ǤϸŤͤǤ" -#: cobc/error.c:525 cobc/error.c:875 +#: cobc/error.c:623 cobc/error.c:978 #, c-format msgid "%s is obsolete in %s" msgstr "%s %s ǤǤǤ" -#: cobc/error.c:531 cobc/error.c:881 cobc/parser.y:5738 +#: cobc/error.c:629 cobc/error.c:984 cobc/parser.y:5993 #, c-format msgid "%s ignored" msgstr "%s ̵뤷ޤ" -#: cobc/error.c:537 cobc/error.c:891 +#: cobc/error.c:635 cobc/error.c:994 #, fuzzy, c-format msgid "%s does not conform to %s" msgstr "%s %s ˽򤷤Ƥޤ" -#: cobc/error.c:553 +#: cobc/error.c:651 #, fuzzy msgid "configuration warning:" msgstr "ʹϢǤ" -#: cobc/error.c:728 cobc/error.c:731 cobc/error.c:755 cobc/error.c:758 -#: libcob/common.c:7969 -msgid "note: " -msgstr "" - -#: cobc/error.c:933 cobc/error.c:962 +#: cobc/error.c:1040 cobc/error.c:1069 #, fuzzy, c-format msgid "redefinition of '%s'" msgstr "`%s' Ƥޤ" -#: cobc/error.c:939 cobc/error.c:973 +#: cobc/error.c:1046 cobc/error.c:1080 #, fuzzy, c-format msgid "'%s' previously defined here" msgstr "`%s' Ϥޤ" -#: cobc/error.c:1017 cobc/error.c:1023 +#: cobc/error.c:1124 cobc/error.c:1130 #, fuzzy, c-format msgid "'%s' is not defined" msgstr "%s ̤Ǥ" -#: cobc/error.c:1019 +#: cobc/error.c:1126 #, fuzzy, c-format msgid "'%s' cannot be used here" msgstr "`%s' źդޤ" -#: cobc/error.c:1021 cobc/parser.y:7658 +#: cobc/error.c:1128 cobc/parser.y:7941 #, c-format msgid "'%s' is not defined, but is a reserved word in another dialect" msgstr "" -#: cobc/error.c:1060 +#: cobc/error.c:1167 #, fuzzy, c-format msgid "'%s' is ambiguous; needs qualification" msgstr "%s ¿Ƥޤդ˽Ʋ" -#: cobc/error.c:1090 +#: cobc/error.c:1197 #, fuzzy, c-format msgid "'%s' is a special register" msgstr "`%s' ǤϤޤ" -#: cobc/error.c:1093 +#: cobc/error.c:1200 #, fuzzy, c-format msgid "'%s' internally defined" msgstr "%s ̤Ǥ" -#: cobc/error.c:1097 cobc/parser.y:18176 cobc/parser.y:18181 cobc/typeck.c:5000 -#: cobc/typeck.c:5047 cobc/typeck.c:5048 +#: cobc/error.c:1204 cobc/parser.y:18772 cobc/parser.y:18777 cobc/typeck.c:5166 +#: cobc/typeck.c:5213 cobc/typeck.c:5214 #, fuzzy, c-format msgid "'%s' defined here" msgstr "`%s' Ϥޤ" -#: cobc/error.c:1108 +#: cobc/error.c:1215 #, c-format msgid "fatal error: %s" msgstr "" -#: cobc/error.c:1117 +#: cobc/error.c:1224 #, fuzzy, c-format msgid "group item '%s' cannot have %s clause" msgstr "롼׹ `%s' %s ĤȤޤ" -#: cobc/error.c:1132 +#: cobc/error.c:1239 #, fuzzy, c-format msgid "constant item '%s' requires a %s clause" msgstr "٥ %02d `%s' ˤ %s 礬ɬפǤ" -#: cobc/error.c:1136 +#: cobc/error.c:1243 #, fuzzy, c-format msgid "level %02d item '%s' requires a %s clause" msgstr "٥ %02d `%s' ˤ %s 礬ɬפǤ" -#: cobc/error.c:1151 +#: cobc/error.c:1258 #, fuzzy, c-format msgid "constant item '%s' can only have a %s clause" msgstr "٥ %02d `%s' %s ĤȤޤ" -#: cobc/error.c:1155 +#: cobc/error.c:1262 #, fuzzy, c-format msgid "level %02d item '%s' can only have a %s clause" msgstr "٥ %02d `%s' %s ĤȤޤ" -#: cobc/field.c:136 +#: cobc/field.c:139 msgid "constant expression has Divide by ZERO" msgstr "" -#: cobc/field.c:192 cobc/field.c:329 cobc/field.c:337 +#: cobc/field.c:195 cobc/field.c:332 cobc/field.c:340 msgid "missing right parenthesis" msgstr "" -#: cobc/field.c:221 +#: cobc/field.c:224 #, c-format msgid "expression stack overflow at %d entries for operation '%c'" msgstr "" -#: cobc/field.c:262 +#: cobc/field.c:265 #, c-format msgid "expression stack overflow at %d entries" msgstr "" -#: cobc/field.c:279 +#: cobc/field.c:282 msgid "missing left parenthesis" msgstr "" -#: cobc/field.c:320 +#: cobc/field.c:323 #, fuzzy, c-format msgid "invalid operator '%s' in expression" msgstr "ʼǤ" -#: cobc/field.c:339 +#: cobc/field.c:342 #, c-format msgid "'%c' operator misplaced" msgstr "" -#: cobc/field.c:400 +#: cobc/field.c:403 #, fuzzy, c-format msgid "invalid level number '%s'" msgstr "ʥ٥ֹǤ `%s'" -#: cobc/field.c:460 cobc/field.c:498 +#: cobc/field.c:463 cobc/field.c:502 #, fuzzy msgid "level number must begin with 01 or 77" msgstr "٥ֹ 01 77 ǻϤޤʤФʤޤ" -#: cobc/field.c:558 cobc/field.c:562 +#: cobc/field.c:562 cobc/field.c:566 #, fuzzy, c-format msgid "no previous data item of level %02d" msgstr "٥ %02d Υǡܤˤޤ" -#: cobc/field.c:620 +#: cobc/field.c:631 #, fuzzy, c-format msgid "'%s' cannot be qualified here" msgstr "`%s' Ͻޤ" -#: cobc/field.c:626 +#: cobc/field.c:637 #, fuzzy, c-format msgid "'%s' cannot be subscripted here" msgstr "`%s' źդޤ" -#: cobc/field.c:642 cobc/field.c:653 +#: cobc/field.c:653 cobc/field.c:664 #, fuzzy, c-format msgid "'%s' is not defined in '%s'" msgstr "`%s' `%s' Ƥޤ" -#: cobc/field.c:660 +#: cobc/field.c:671 #, fuzzy msgid "level number of REDEFINES entries must be identical" msgstr "REDEFINES ιܤƱ٥ֹǤʤФʤޤ" -#: cobc/field.c:665 +#: cobc/field.c:676 #, fuzzy, c-format msgid "'%s' is not the original definition" msgstr "`%s' ϺǽǤϤޤ" -#: cobc/field.c:826 cobc/parser.y:659 +#: cobc/field.c:720 cobc/parser.y:1051 +#, fuzzy, c-format +msgid "duplicate %s" +msgstr "ʥ٥ֹǤ `%s'" + +#: cobc/field.c:878 cobc/parser.y:733 #, fuzzy, c-format msgid "duplicate %s clause" msgstr "ʥ٥ֹǤ `%s'" -#: cobc/field.c:906 +#: cobc/field.c:988 #, c-format msgid "%s clause not compatible with PIC %s" msgstr "" -#: cobc/field.c:917 cobc/field.c:953 +#: cobc/field.c:999 cobc/field.c:1036 #, c-format msgid "%s clause not compatible with USAGE %s" msgstr "" -#: cobc/field.c:1053 cobc/field.c:1069 cobc/field.c:1131 cobc/field.c:1142 +#: cobc/field.c:1140 cobc/field.c:1159 cobc/field.c:1227 cobc/field.c:1238 #, fuzzy, c-format msgid "PICTURE clause required for '%s'" msgstr "`%s' ˤ PICTURE 礬ɬפǤ" -#: cobc/field.c:1138 +#: cobc/field.c:1234 #, fuzzy, c-format msgid "a non-numeric literal is expected for '%s'" msgstr "ʸɬפǤ" -#: cobc/field.c:1150 +#: cobc/field.c:1247 #, c-format msgid "defining implicit picture size %d for '%s'" msgstr "" -#: cobc/field.c:1171 +#: cobc/field.c:1271 #, c-format msgid "'%s' ANY LENGTH only allowed in LINKAGE" msgstr "" -#: cobc/field.c:1175 +#: cobc/field.c:1275 #, c-format msgid "'%s' ANY LENGTH must be 01 level" msgstr "" -#: cobc/field.c:1179 +#: cobc/field.c:1279 #, fuzzy, c-format msgid "'%s' ANY LENGTH cannot be BASED/EXTERNAL" msgstr "`%s' BLANK WHEN ZERO ĤȤޤ" -#: cobc/field.c:1184 cobc/field.c:1210 +#: cobc/field.c:1283 cobc/field.c:1313 #, fuzzy, c-format msgid "'%s' ANY LENGTH has invalid definition" msgstr "`%s' ϺǽǤϤޤ" -#: cobc/field.c:1192 +#: cobc/field.c:1295 #, fuzzy, c-format msgid "'%s' ANY NUMERIC must be PIC 9" msgstr "`%s' OCCURS DEPENDING ĤȤޤ" -#: cobc/field.c:1198 +#: cobc/field.c:1301 #, fuzzy, c-format -msgid "'%s' ANY LENGTH must be PIC X, PIC N or PIC 1" +msgid "'%s' ANY LENGTH must be PIC X, PIC U, PIC N or PIC 1" msgstr "`%s' OCCURS DEPENDING ĤȤޤ" -#: cobc/field.c:1208 +#: cobc/field.c:1311 #, fuzzy, c-format msgid "'%s' ANY NUMERIC has invalid definition" msgstr "`%s' ϺǽǤϤޤ" -#: cobc/field.c:1224 +#: cobc/field.c:1327 #, c-format msgid "'%s' EXTERNAL must be specified at 01/77 level" msgstr "" -#: cobc/field.c:1228 +#: cobc/field.c:1331 #, c-format msgid "'%s' EXTERNAL can only be specified in WORKING-STORAGE section" msgstr "" -#: cobc/field.c:1232 +#: cobc/field.c:1335 #, c-format msgid "'%s' EXTERNAL and BASED are mutually exclusive" msgstr "" -#: cobc/field.c:1235 +#: cobc/field.c:1338 #, c-format msgid "'%s' EXTERNAL not allowed with REDEFINES" msgstr "" -#: cobc/field.c:1247 +#: cobc/field.c:1350 #, fuzzy, c-format msgid "'%s' BASED not allowed here" msgstr "`%s' Ͻޤ" -#: cobc/field.c:1250 +#: cobc/field.c:1353 #, c-format msgid "'%s' BASED not allowed with REDEFINES" msgstr "" -#: cobc/field.c:1253 +#: cobc/field.c:1356 #, fuzzy, c-format msgid "'%s' BASED only allowed at the 01 and 77 levels" msgstr "`%s' Ͻޤ" -#: cobc/field.c:1279 +#: cobc/field.c:1383 #, fuzzy, c-format msgid "'%s' cannot have an OCCURS clause due to '%s'" msgstr "`%s' `%s' Τ OCCURS ĤȤޤ" -#: cobc/field.c:1298 +#: cobc/field.c:1402 #, fuzzy, c-format msgid "the original definition '%s' should not have an OCCURS clause" msgstr "`%s' θˤ OCCURS դƤϤʤޤ" -#: cobc/field.c:1305 +#: cobc/field.c:1408 +#, fuzzy, c-format +msgid "the original definition '%s' should not have an ANY LENGTH clause" +msgstr "`%s' θˤ OCCURS դƤϤʤޤ" + +#: cobc/field.c:1415 msgid "REDEFINES must follow the original definition" msgstr "REDEFINES ϻȸιܤľˤʤФʤޤ" -#: cobc/field.c:1313 +#: cobc/field.c:1423 #, fuzzy, c-format msgid "'%s' cannot be variable length" msgstr "`%s' ϲĹ˽ޤ" -#: cobc/field.c:1316 +#: cobc/field.c:1426 #, fuzzy, c-format msgid "the original definition '%s' cannot be variable length" msgstr "`%s' θϲĹǤäƤϤʤޤ" -#: cobc/field.c:1335 +#: cobc/field.c:1445 cobc/field.c:1708 #, fuzzy, c-format msgid "'%s' cannot have JUSTIFIED RIGHT clause" msgstr "`%s' JUSTIFIED RIGHT ĤȤޤ" -#: cobc/field.c:1342 +#: cobc/field.c:1453 #, fuzzy, c-format msgid "'%s' cannot have BLANK WHEN ZERO clause" msgstr "`%s' PICTURE ĤȤޤ" -#: cobc/field.c:1348 +#: cobc/field.c:1460 #, fuzzy, c-format msgid "SCREEN group item '%s' has invalid clause" msgstr "롼׹ `%s' %s ĤȤޤ" -#: cobc/field.c:1436 +#: cobc/field.c:1548 #, c-format msgid "%s USAGE %s incompatible with %s USAGE %s" msgstr "" -#: cobc/field.c:1516 +#: cobc/field.c:1629 #, fuzzy, c-format msgid "'%s' cannot have PICTURE clause" msgstr "`%s' PICTURE ĤȤޤ" -#: cobc/field.c:1533 -#, fuzzy, c-format -msgid "%s item '%s' should be USAGE DISPLAY" -msgstr "`%s' SPECIAL-NAMES Ƥޤ" - -#: cobc/field.c:1556 +#: cobc/field.c:1662 #, c-format msgid "'%s' COMP-6 with sign - changing to COMP-3" msgstr "" -#: cobc/field.c:1582 +#: cobc/field.c:1688 msgid "elementary items with SIGN clause must have S in PICTURE" msgstr "" -#: cobc/field.c:1585 +#: cobc/field.c:1691 msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/field.c:1602 -#, fuzzy, c-format -msgid "'%s' cannot have JUSTIFIED RIGHT" -msgstr "`%s' JUSTIFIED RIGHT ĤȤޤ" - -#: cobc/field.c:1614 +#: cobc/field.c:1720 #, fuzzy, c-format msgid "'%s' cannot have S in PICTURE string and BLANK WHEN ZERO" msgstr "`%s' BLANK WHEN ZERO ĤȤޤ" -#: cobc/field.c:1619 +#: cobc/field.c:1725 #, c-format msgid "'%s' cannot have BLANK WHEN ZERO without being USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/field.c:1631 +#: cobc/field.c:1737 #, fuzzy, c-format msgid "'%s' cannot have * in PICTURE string and BLANK WHEN ZERO" msgstr "`%s' BLANK WHEN ZERO ĤȤޤ" -#: cobc/field.c:1638 +#: cobc/field.c:1744 #, fuzzy, c-format msgid "'%s' is not numeric, so cannot have BLANK WHEN ZERO" msgstr "`%s' BLANK WHEN ZERO ĤȤޤ" -#: cobc/field.c:1691 +#: cobc/field.c:1798 #, c-format msgid "elements in VALUE clause for '%s' (%d) exceed max amount (%d)" msgstr "" -#: cobc/field.c:1708 cobc/field.c:1712 +#: cobc/field.c:1822 +msgid "unexpected VALUES ARE for elementary item" +msgstr "" + +#: cobc/field.c:1836 cobc/field.c:1840 #, fuzzy, c-format msgid "initial VALUE clause ignored for %s item '%s'" msgstr " VALUE Ǥ" -#: cobc/field.c:1725 +#: cobc/field.c:1853 msgid "FULL has no effect on numeric items; you may want REQUIRED or PIC Z" msgstr "" -#: cobc/field.c:1755 +#: cobc/field.c:1884 msgid "VALUE may not contain a figurative constant" msgstr "" -#: cobc/field.c:1763 -msgid "cannot specify both FULL and JUSTIFIED" +#: cobc/field.c:1893 cobc/field.c:1935 cobc/parser.y:750 cobc/parser.y:1823 +#: cobc/parser.y:1826 +#, c-format +msgid "cannot specify both %s and %s" msgstr "" -#: cobc/field.c:1775 +#: cobc/field.c:1905 #, c-format msgid "'%s' has FROM, TO or USING without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1792 +#: cobc/field.c:1922 #, c-format msgid "'%s' has numeric VALUE without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1805 -msgid "cannot specify both PIC and VALUE" -msgstr "" - -#: cobc/field.c:1813 +#: cobc/field.c:1943 msgid "cannot have PIC without FROM, TO or USING" msgstr "" -#: cobc/field.c:1822 +#: cobc/field.c:1952 msgid "cannot have numeric VALUE without PIC" msgstr "" -#: cobc/field.c:1831 +#: cobc/field.c:1961 msgid "cannot have FROM, TO or USING without PIC" msgstr "" -#: cobc/field.c:1841 +#: cobc/field.c:1971 msgid "VALUE item may not be numeric" msgstr "" -#: cobc/field.c:1856 +#: cobc/field.c:1986 #, c-format msgid "'%s' needs a PIC, COL, LINE, VALUE, BELL or BLANK clause" msgstr "" -#: cobc/field.c:1868 +#: cobc/field.c:1998 #, c-format msgid "'%s' cannot have PIC without FROM, TO, USING or numeric VALUE" msgstr "" -#: cobc/field.c:1876 +#: cobc/field.c:2006 #, c-format msgid "'%s' needs a PIC, FROM, TO, USING, VALUE, BELL, BLANK or ERASE clause" msgstr "" -#: cobc/field.c:1912 +#: cobc/field.c:2042 msgid "cannot use AUTO, FULL, PROMPT, REQUIRED or SECURE on elementary item without TO or USING" msgstr "" -#: cobc/field.c:1919 +#: cobc/field.c:2049 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED, OCCURS or SIGN on item without FROM, TO or USING" msgstr "" -#: cobc/field.c:1938 +#: cobc/field.c:2068 msgid "cannot use AUTO, FULL, REQUIRED or SECURE on elementary item without FROM, TO or USING" msgstr "" -#: cobc/field.c:1943 +#: cobc/field.c:2073 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED or SIGN without FROM, TO or USING" msgstr "" -#: cobc/field.c:1960 +#: cobc/field.c:2090 #, fuzzy msgid "cannot have BLANK WHEN ZERO without PIC" msgstr "`%s' BLANK WHEN ZERO ĤȤޤ" -#: cobc/field.c:1963 +#: cobc/field.c:2093 #, fuzzy msgid "cannot have JUSTIFIED without PIC" msgstr "`%s' JUSTIFIED RIGHT ĤȤޤ" -#: cobc/field.c:1983 +#: cobc/field.c:2113 msgid "cannot have AUTO without FROM, TO or USING" msgstr "" -#: cobc/field.c:1988 +#: cobc/field.c:2118 msgid "cannot use FULL or REQUIRED on item without TO or USING" msgstr "" -#: cobc/field.c:1995 +#: cobc/field.c:2125 msgid "SECURE can be used with TO only" msgstr "" -#: cobc/field.c:1997 +#: cobc/field.c:2127 #, fuzzy #| msgid "READ must be executed first" msgid "SECURE must be used with TO" msgstr "READ ˼¹ԤʤФʤޤ" -#: cobc/field.c:2016 +#: cobc/field.c:2146 #, fuzzy, c-format msgid "'%s' does nothing" msgstr "%s ̤Ǥ" -#: cobc/field.c:2235 +#: cobc/field.c:2361 #, fuzzy, c-format msgid "'%s' 77 level is not allowed here" msgstr "`%s' Ͻޤ" -#: cobc/field.c:2627 +#: cobc/field.c:2399 msgid "OCCURS and multi COLUMNs is not allowed" msgstr "" -#: cobc/field.c:2655 +#: cobc/field.c:2419 #, fuzzy, c-format msgid "duplicate LINE %d ignored" msgstr "ʥ٥ֹǤ `%s'" -#: cobc/field.c:2672 +#: cobc/field.c:2870 #, c-format msgid "ignoring SYNCHRONIZED for group item '%s'" msgstr "" -#: cobc/field.c:2686 cobc/field.c:2954 +#: cobc/field.c:2884 cobc/field.c:3219 msgid "larger REDEFINES" msgstr "" -#: cobc/field.c:2699 cobc/field.c:2957 cobc/field.c:2962 +#: cobc/field.c:2898 cobc/field.c:3222 cobc/field.c:3227 #, fuzzy, c-format msgid "size of '%s' larger than size of '%s'" msgstr "`%s' Υ `%s' ΥۤƤޤ" -#: cobc/field.c:2812 cobc/field.c:2879 +#: cobc/field.c:3045 cobc/field.c:3129 cobc/parser.y:832 #, fuzzy, c-format msgid "'%s' cannot be larger than %d bytes" msgstr "18 ۤܤϵޤ" -#: cobc/field.c:2850 cobc/field.c:2858 +#: cobc/field.c:3086 cobc/field.c:3094 #, fuzzy, c-format msgid "'%s' binary field cannot be larger than %d digits" msgstr "18 ۤܤϵޤ" -#: cobc/field.c:2940 cobc/field.c:3522 -#, fuzzy, c-format -msgid "unexpected USAGE: %d" -msgstr "ʿǤ" - -#: cobc/field.c:3067 cobc/parser.y:710 cobc/parser.y:712 cobc/parser.y:6274 -#: cobc/parser.y:6284 cobc/parser.y:7344 cobc/parser.y:7347 cobc/parser.y:7349 -#: cobc/parser.y:7351 cobc/parser.y:7386 cobc/parser.y:8237 cobc/parser.y:8239 -#: cobc/parser.y:8241 cobc/parser.y:8243 cobc/parser.y:8558 cobc/parser.y:8567 -#: cobc/parser.y:10564 cobc/parser.y:12075 cobc/parser.y:13492 -#: cobc/parser.y:14902 cobc/typeck.c:5034 +#: cobc/field.c:3353 cobc/parser.y:791 cobc/parser.y:793 cobc/parser.y:6529 +#: cobc/parser.y:6539 cobc/parser.y:7625 cobc/parser.y:7628 cobc/parser.y:7630 +#: cobc/parser.y:7632 cobc/parser.y:7667 cobc/parser.y:8610 cobc/parser.y:8612 +#: cobc/parser.y:8614 cobc/parser.y:8616 cobc/parser.y:8958 cobc/parser.y:8967 +#: cobc/parser.y:10897 cobc/parser.y:12460 cobc/parser.y:13920 +#: cobc/parser.y:15390 cobc/typeck.c:5200 #, c-format msgid "%s and %s are mutually exclusive" msgstr "" -#: cobc/field.c:3068 cobc/parser.y:7529 cobc/parser.y:7566 +#: cobc/field.c:3354 cobc/parser.y:7810 cobc/parser.y:7847 msgid "variable-length PICTURE" msgstr "" -#: cobc/field.c:3187 +#: cobc/field.c:3475 msgid "literal type does not match numeric data type" msgstr "" -#: cobc/field.c:3261 +#: cobc/field.c:3549 #, c-format msgid "THRU item '%s' may not come before '%s'" msgstr "" -#: cobc/field.c:3284 +#: cobc/field.c:3572 #, c-format msgid "RENAMES cannot start/end at the OCCURS item '%s'" msgstr "" -#: cobc/field.c:3292 +#: cobc/field.c:3580 #, c-format msgid "cannot use RENAMES on part of the table '%s'" msgstr "" -#: cobc/field.c:3330 +#: cobc/field.c:3618 #, c-format msgid "RENAMES may not contain '%s' as it is a pointer or object reference" msgstr "" -#: cobc/field.c:3335 +#: cobc/field.c:3623 #, c-format msgid "RENAMES may not contain '%s' as it is an OCCURS DEPENDING table" msgstr "" -#: cobc/field.c:3359 +#: cobc/field.c:3647 msgid "RENAMES may not reference a level 88" msgstr "" -#: cobc/field.c:3383 +#: cobc/field.c:3671 #, c-format msgid "'%s' must immediately follow the record '%s'" msgstr "" -#: cobc/field.c:3391 +#: cobc/field.c:3679 #, c-format msgid "THRU item must be different to '%s'" msgstr "" -#: cobc/field.c:3397 +#: cobc/field.c:3685 #, c-format msgid "'%s' and '%s' must be in the same record" msgstr "" -#: cobc/field.c:3408 +#: cobc/field.c:3696 #, c-format msgid "THRU item '%s' may not be subordinate to '%s'" msgstr "" @@ -1838,261 +1857,290 @@ msgid "" " intrinsics to be used without FUNCTION keyword" msgstr "" -#: cobc/flag.def:78 -msgid "" -" -fec=<exception-name>\tenable code generation for <exception-name>,\n" -" sets -fsource-location" -msgstr "" - -#: cobc/flag.def:81 cobc/help.c:96 -msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" -msgstr "" - -#: cobc/flag.def:84 +#: cobc/flag.def:85 msgid "" " -fdump=<scope> dump data fields on abort, <scope> may be\n" " a combination of: ALL, WS, LS, RD, FD, SC, LO" msgstr "" -#: cobc/flag.def:87 +#: cobc/flag.def:88 msgid "" " -fno-dump=<scope> exclude data fields from dumping on abort, <scope> may\n" -" be a combination of: ALL, WS, LS, RD, FD, SC, LO" +" be a combination of: ALL, WS, LS, RD, FD, SC, LO\n" +" default if no scope specified: ALL" msgstr "" -#: cobc/flag.def:92 +#: cobc/flag.def:94 msgid "" " -fcallfh=<name> specifies <name> to be used for I/O\n" " as external provided EXTFH interface module" msgstr "" -#: cobc/flag.def:96 +#: cobc/flag.def:98 msgid "" -" -febcdic-table=[DEFAULT|RESTRICTED-GC|IBM|GCOS]\tdefine EBCDIC translation table:\n" -" * default: translation to extended ASCII as per MF\n" -" * restricted-gc: translation from restricted ASCII only\n" -" * ibm: translation to restricted ASCII as per IBM\n" -" * gcos: translation to extended ASCII as per GCOS7" +" -febcdic-table=<cconv-table>/<file>\tEBCDIC/ASCII translation table\n" +" * e.g. default, ebcdic500_latin1..." msgstr "" -#: cobc/flag.def:107 +#: cobc/flag.def:102 +msgid "" +" -fdefault-colseq=[ASCII|EBCDIC|NATIVE]\tdefine default collating sequence\n" +" * default: NATIVE" +msgstr "" + +#: cobc/flag.def:110 msgid "" " -fwinmain generate WinMain instead of main when compiling\n" " as executable" msgstr "" -#: cobc/flag.def:111 +#: cobc/flag.def:114 msgid " -fcomputed-goto generate computed goto C statements" msgstr "" -#: cobc/flag.def:114 +#: cobc/flag.def:117 msgid " -fextra-brace generate extra braces in C source" msgstr "" -#: cobc/flag.def:117 +#: cobc/flag.def:120 msgid " -fcorrect-numeric attempt correction of invalid numeric display items" msgstr "" -#: cobc/flag.def:120 +#: cobc/flag.def:123 msgid " -fstack-on-heap PERFORM stack allocated on heap" msgstr "" -#: cobc/flag.def:123 +#: cobc/flag.def:126 msgid "" " -fstack-extended store origin of entrypoints and PERFORM\n" -" * turned on by -debug/-dump" +" * turned on by --debug/-fdump" msgstr "" -#: cobc/flag.def:128 +#: cobc/flag.def:130 +msgid " -fno-fast-compare disables inline comparisions" +msgstr "" + +#: cobc/flag.def:135 msgid "" " -fno-remove-unreachable\tdisable remove of unreachable code\n" " * turned off by -g" msgstr "" -#: cobc/flag.def:132 +#: cobc/flag.def:139 msgid "" " -ftrace generate trace code\n" " * scope: executed SECTION/PARAGRAPH" msgstr "" -#: cobc/flag.def:136 +#: cobc/flag.def:143 msgid "" " -ftraceall generate trace code\n" " * scope: executed SECTION/PARAGRAPH/STATEMENTS" msgstr "" -#: cobc/flag.def:140 +#: cobc/flag.def:147 #, fuzzy msgid " -fsyntax-only syntax error checking only; don't emit any output" msgstr "ʸˡåΤߡϤʤ" -#: cobc/flag.def:143 +#: cobc/flag.def:150 #, fuzzy msgid "" " -fdebugging-line enable debugging lines\n" " * 'D' in indicator column or floating >>D" msgstr "ǥХåԤͭˤ" -#: cobc/flag.def:147 +#: cobc/flag.def:154 msgid "" " -fsource-location generate source location code\n" -" * turned on by -debug/-ftraceall/-fec/-dump" +" * turned on by --debug/-ftraceall/-fec/-fdump" msgstr "" -#: cobc/flag.def:151 +#: cobc/flag.def:158 msgid " -fimplicit-init automatic initialization of the COBOL runtime system" msgstr "" -#: cobc/flag.def:154 +#: cobc/flag.def:161 msgid "" " -fno-recursive-check disable check of recursive program call;\n" " effectively compiling as RECURSIVE program" msgstr "" -#: cobc/flag.def:158 +#: cobc/flag.def:165 msgid "" " -fstack-check PERFORM stack checking\n" -" * turned on by -debug/-g" +" * turned on by --debug/-g" msgstr "" -#: cobc/flag.def:162 +#: cobc/flag.def:169 +msgid "" +" -fmemory-check=<scope> checks for invalid writes to internal storage,\n" +" <scope> may be one of: all, pointer, using, none\n" +" * default: none, set to all by --debug" +msgstr "" + +#: cobc/flag.def:174 msgid " -fsection-exit-check check that code execution does not leave the scope of SECTIONs" msgstr "" -#: cobc/flag.def:165 +#: cobc/flag.def:177 msgid " -fimplicit-goback-check\tcheck that code execution does not end implicit at end of PROCEDURE DIVISION" msgstr "" -#: cobc/flag.def:168 +#: cobc/flag.def:180 msgid "" " -fwrite-after use AFTER 1 for WRITE of LINE SEQUENTIAL\n" " * default: BEFORE 1" msgstr "" -#: cobc/flag.def:172 +#: cobc/flag.def:184 msgid "" -" -fmfcomment '*' or '/' in column 1 treated as comment\n" -" * FIXED format only" +" -fmfcomment '*' in column 1 treated as comment with listing suppression\n" +" * FIXED/COBOL85/VARIABLE format only" msgstr "" -#: cobc/flag.def:176 +#: cobc/flag.def:188 msgid "" " -facucomment '$' in indicator area treated as '*',\n" " '|' treated as floating comment" msgstr "" -#: cobc/flag.def:181 +#: cobc/flag.def:193 msgid "" " -fno-trunc allow numeric field overflow\n" " * non-ANSI behaviour" msgstr "" -#: cobc/flag.def:185 +#: cobc/flag.def:197 msgid "" " -fsingle-quote use a single quote (apostrophe) for QUOTE\n" " * default: double quote" msgstr "" -#: cobc/flag.def:195 +#: cobc/flag.def:207 msgid "" " -foptional-file treat all files as OPTIONAL\n" " * unless NOT OPTIONAL specified" msgstr "" -#: cobc/flag.def:199 +#: cobc/flag.def:211 #, fuzzy msgid " -fstatic-call output static function calls for the CALL statement" msgstr "CALL ʸŪؿƤӽФԤʤ" -#: cobc/flag.def:202 +#: cobc/flag.def:214 msgid "" " -fno-gen-c-decl-static-call\tdisable generation of C function declarations\n" " for subroutines with static CALL" msgstr "" -#: cobc/flag.def:206 +#: cobc/flag.def:218 msgid "" " -fgen-c-line-directives\tgenerate source location directives in C code;\n" -" * turned on by -g" +" * turned on by -g/--coverage" msgstr "" -#: cobc/flag.def:210 +#: cobc/flag.def:222 msgid "" " -fgen-c-labels generate extra labels in C sources;\n" " * turned on by -g" msgstr "" -#: cobc/flag.def:214 +#: cobc/flag.def:226 msgid "" -" -fno-theaders suppress all headers and output of compilation\n" -" options from listing while keeping page breaks" +" -fno-theaders suppress all headers from listing while keeping\n" +" page breaks" msgstr "" -#: cobc/flag.def:218 +#: cobc/flag.def:230 msgid " -fno-tsource suppress source from listing" msgstr "" -#: cobc/flag.def:221 +#: cobc/flag.def:233 msgid " -fno-tmessages suppress warning and error summary from listing" msgstr "" -#: cobc/flag.def:224 +#: cobc/flag.def:236 msgid " -ftsymbols specify symbols in listing" msgstr "" -#: cobc/flag.def:227 +#: cobc/flag.def:239 +msgid " -ftcmd specify command line in listing" +msgstr "" + +#: cobc/flag.def:242 +msgid " -fno-ttimestamp suppress timestamp in listing headers" +msgstr "" + +#: cobc/flag.def:245 +msgid "" +" -fttitle=<title> set listing title with '_' replaced by spaces;\n" +" defaults to package name and version" +msgstr "" + +#: cobc/flag.def:249 msgid "" " -fno-diagnostics-show-option\tsuppress output of option that directly\n" " controls the diagnostic" msgstr "" -#: cobc/help.c:32 +#: cobc/flag.def:253 +msgid " -fno-diagnostics-show-caret\tdo not display source context on warning/error diagnostic" +msgstr "" + +#: cobc/flag.def:256 +msgid " -fno-diagnostics-show-line-numbers\tsuppress display of line numbers in diagnostics" +msgstr "" + +#: cobc/help.c:33 msgid "GnuCOBOL compiler for most COBOL dialects with lots of extensions" msgstr "" -#: cobc/help.c:34 +#: cobc/help.c:35 #, c-format msgid "Usage: %s [options]... file..." msgstr "" -#: cobc/help.c:47 bin/cobcrun.c:143 +#: cobc/help.c:48 bin/cobcrun.c:143 #, c-format msgid "" "Report bugs to: %s\n" "or (preferably) use the issue tracker via the home page." msgstr "" -#: cobc/help.c:51 -msgid "GnuCOBOL home page: <https://www.gnu.org/software/gnucobol/>" +#: cobc/help.c:52 bin/cobcrun.c:146 +#, c-format +msgid "GnuCOBOL home page: <%s>" msgstr "" -#: cobc/help.c:52 -msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" +#: cobc/help.c:54 bin/cobcrun.c:148 +#, c-format +msgid "General help using GNU software: <%s>" msgstr "" -#: cobc/help.c:58 bin/cobcrun.c:125 +#: cobc/help.c:61 bin/cobcrun.c:125 msgid "Options:" msgstr "" -#: cobc/help.c:59 +#: cobc/help.c:62 msgid " -h, --help display this help and exit" msgstr "" -#: cobc/help.c:60 +#: cobc/help.c:63 msgid " -V, --version display compiler version information and exit" msgstr "" -#: cobc/help.c:61 +#: cobc/help.c:64 msgid " -dumpversion display compiler version and exit" msgstr "" -#: cobc/help.c:62 +#: cobc/help.c:65 msgid "" " -i, --info display compiler information (build/environment)\n" " and exit" msgstr "" -#: cobc/help.c:64 +#: cobc/help.c:67 msgid "" " -v, --verbose verbose mode, display additional information;\n" " multiple -v options increase the verbosity,\n" @@ -2103,27 +2151,27 @@ msgid "" " (3) pass verbose option to linker" msgstr "" -#: cobc/help.c:71 +#: cobc/help.c:74 msgid " -q, --brief reduced displays, commands invoked not shown" msgstr "" -#: cobc/help.c:72 +#: cobc/help.c:75 msgid " -### like -v but commands not executed" msgstr "" -#: cobc/help.c:73 +#: cobc/help.c:76 msgid " -x build an executable program" msgstr "" -#: cobc/help.c:74 +#: cobc/help.c:77 msgid " -m build a dynamically loadable module (default)" msgstr "" -#: cobc/help.c:75 +#: cobc/help.c:78 msgid " -j [<args>], --job[=<args>]\trun program after build, passing <args>" msgstr "" -#: cobc/help.c:76 +#: cobc/help.c:79 msgid "" " -std=<dialect> warnings/features for a specific dialect\n" " <dialect> can be one of:\n" @@ -2135,115 +2183,111 @@ msgid "" " see configuration files in directory config" msgstr "" -#: cobc/help.c:84 +#: cobc/help.c:87 msgid " -F, --free use free source format (alias for -fformat=free)" msgstr "" -#: cobc/help.c:85 +#: cobc/help.c:88 msgid "" " --fixed use fixed source format (default; alias for\n" " -fformat=fixed)" msgstr "" -#: cobc/help.c:87 +#: cobc/help.c:90 msgid " -O, -O2, -O3, -Os enable optimization" msgstr "" -#: cobc/help.c:88 +#: cobc/help.c:91 msgid " -O0 disable optimization" msgstr "" -#: cobc/help.c:89 +#: cobc/help.c:92 msgid " -g enable C compiler debug and stack check" msgstr "" -#: cobc/help.c:90 +#: cobc/help.c:93 msgid "" " -d, --debug enable all run-time error checking,\n" " equal to -fstack-check -fec=EC-ALL" msgstr "" -#: cobc/help.c:93 +#: cobc/help.c:97 msgid "" " -fec=<exception-name>\tenable code generation for <exception-name>,\n" " see --list-exceptions for the possible values,\n" " sets -fsource-location" msgstr "" -#: cobc/help.c:97 +#: cobc/help.c:100 +msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" +msgstr "" + +#: cobc/help.c:101 msgid " -o <file> place the output into <file>" msgstr "" -#: cobc/help.c:98 +#: cobc/help.c:102 msgid "" " -b combine all input files into a single\n" " dynamically loadable module" msgstr "" -#: cobc/help.c:100 +#: cobc/help.c:104 msgid " -E preprocess only; do not compile or link" msgstr "" -#: cobc/help.c:101 +#: cobc/help.c:105 msgid " -C translation only; convert COBOL to C" msgstr "" -#: cobc/help.c:102 +#: cobc/help.c:106 msgid " -S compile only; output assembly file" msgstr "" -#: cobc/help.c:103 +#: cobc/help.c:107 msgid " -c compile and assemble, but do not link" msgstr "" -#: cobc/help.c:104 +#: cobc/help.c:108 msgid " -T <file> generate and place a wide program listing into <file>" msgstr "" -#: cobc/help.c:105 +#: cobc/help.c:109 msgid " -t <file> generate and place a program listing into <file>" msgstr "" -#: cobc/help.c:106 +#: cobc/help.c:110 msgid " --tlines=<lines> specify lines per page in listing, default = 55" msgstr "" -#: cobc/help.c:108 -msgid " --tsymbols specify symbols in listing, use -ftsymbols instead" -msgstr "" - -#: cobc/help.c:110 +#: cobc/help.c:111 msgid " -P[=<dir or file>] generate preprocessed program listing (.lst)" msgstr "" -#: cobc/help.c:112 +#: cobc/help.c:113 msgid "" " -X, --Xref generate cross reference through 'cobxref'\n" " (V. Coen's 'cobxref' must be in path)" msgstr "" -#: cobc/help.c:115 +#: cobc/help.c:116 msgid " -X, --Xref specify cross reference in listing" msgstr "" -#: cobc/help.c:117 -msgid " -I <directory> add <directory> to copy/include search path" -msgstr "" - #: cobc/help.c:118 -msgid " -L <directory> add <directory> to library search path" +msgid " -I <directory> add <directory> to copy/include search path" msgstr "" #: cobc/help.c:119 -msgid " -l <lib> link the library <lib>" +msgid " -L <directory> add <directory> to library search path" msgstr "" #: cobc/help.c:120 -msgid " -A <options> add <options> to the C compile phase" +msgid " -l <lib> link the library <lib>" msgstr "" #: cobc/help.c:121 -msgid " -Q <options> add <options> to the C link phase" +msgid " -K <entry> generate CALL to <entry> as static" msgstr "" #: cobc/help.c:122 @@ -2251,3842 +2295,3905 @@ msgid " -D <define> define <define> for COBOL compilation" msgstr "" #: cobc/help.c:123 -msgid " -K <entry> generate CALL to <entry> as static" +msgid " -A <options> add <options> to the C compile phase" msgstr "" #: cobc/help.c:124 -msgid " --conf=<file> user-defined dialect configuration; see -std" +msgid " -Q <options> add <options> to the C link phase" msgstr "" #: cobc/help.c:125 -msgid " --list-reserved display reserved words" +msgid " --coverage instrument generated binaries for coverage" msgstr "" #: cobc/help.c:126 +msgid " --conf=<file> user-defined dialect configuration; see -std" +msgstr "" + +#: cobc/help.c:127 +msgid " --list-reserved display reserved words" +msgstr "" + +#: cobc/help.c:128 #, fuzzy msgid " --list-intrinsics display intrinsic functions" msgstr "`%s' ǤϤޤ" -#: cobc/help.c:127 +#: cobc/help.c:129 #, fuzzy msgid " --list-mnemonics display mnemonic names" msgstr "`%s' ǤϤޤ" -#: cobc/help.c:128 +#: cobc/help.c:130 #, fuzzy msgid " --list-exceptions display exception names" msgstr "`%s' ǤϤޤ" -#: cobc/help.c:129 +#: cobc/help.c:131 #, fuzzy msgid " --list-system display system routines" msgstr "`%s' ǤϤޤ" -#: cobc/help.c:130 +#: cobc/help.c:132 msgid "" " --save-temps[=<dir>] save intermediate files\n" " * default: current directory" msgstr "" -#: cobc/help.c:132 +#: cobc/help.c:134 +msgid " -MT <target> set/add target file used in dependency list" +msgstr "" + +#: cobc/help.c:135 +msgid " -MF <file> place dependency list into <file>" +msgstr "" + +#: cobc/help.c:136 msgid " -ext <extension> add file extension for resolving COPY" msgstr "" -#: cobc/help.c:139 +#: cobc/help.c:143 #, fuzzy msgid "Warning options:" msgstr "Τ褦ʸϤޤ `%s'" -#: cobc/help.c:140 +#: cobc/help.c:144 msgid " -Wall enable most warnings (all except as noted below)" msgstr "" -#: cobc/help.c:141 +#: cobc/help.c:145 msgid " -Wextra like -Wall but enable some extra warning flags" msgstr "" -#: cobc/help.c:142 +#: cobc/help.c:146 msgid " -w disable all warnings" msgstr "" -#: cobc/help.c:143 +#: cobc/help.c:147 msgid " -Wno-<warning> disable warning enabled by default, -Wall or -Wextra" msgstr "" #. TRANSLATORS: This msgid is appended to msgid for -Wno-pending and others -#: cobc/help.c:149 +#: cobc/help.c:153 msgid " * ALWAYS active" msgstr "" #. TRANSLATORS: This msgid is appended to msgid for -Wpossible-truncate and others -#: cobc/help.c:153 +#: cobc/help.c:157 msgid " * NOT set with -Wall" msgstr "" -#: cobc/help.c:161 +#: cobc/help.c:165 +msgid " -fdiagnostics-plain-output\tmake diagnostic output as plain as possible" +msgstr "" + +#: cobc/help.c:166 msgid " -Werror treat all warnings as errors" msgstr "" -#: cobc/help.c:162 +#: cobc/help.c:167 msgid " -Wno-error don't treat warnings as errors" msgstr "" -#: cobc/help.c:163 +#: cobc/help.c:168 msgid " -Werror=<warning> treat specified <warning> as error" msgstr "" -#: cobc/help.c:164 +#: cobc/help.c:169 msgid " -Wno-error=<warning> don't treat specified <warning> as error" msgstr "" -#: cobc/help.c:180 +#: cobc/help.c:185 msgid "Compiler options:" msgstr "" -#: cobc/help.c:198 +#: cobc/help.c:203 msgid "" " -fibmcomp sets -fbinary-size=2-4-8 -fsynchronized-clause=ok\n" " -fno-ibmcomp sets -fbinary-size=1--8 -fsynchronized-clause=ignore" msgstr "" -#: cobc/help.c:201 +#: cobc/help.c:206 msgid "" " -falternate-ebcdic use restricted ASCII to EBCDIC translate\n" " -fno-alternate-ebcdic use extended ASCII to EBCDIC translate" msgstr "" -#: cobc/help.c:230 +#: cobc/help.c:235 msgid "Compiler dialect configuration options:" msgstr "" -#: cobc/help.c:232 cobc/help.c:238 +#: cobc/help.c:237 cobc/help.c:243 msgid "<value>" msgstr "" -#: cobc/help.c:242 +#: cobc/help.c:247 msgid "<support>" msgstr "" -#: cobc/help.c:251 +#: cobc/help.c:256 msgid "where <support> is one of the following:" msgstr "" #. TRANSLATORS: This msgid is used when a variable name #. or label is referenced in a compiler message. -#: cobc/help.c:254 cobc/help.c:257 cobc/help.c:260 cobc/help.c:263 -#: cobc/help.c:266 cobc/help.c:269 cobc/help.c:272 cobc/help.c:275 -#: cobc/typeck.c:2361 +#: cobc/help.c:259 cobc/help.c:262 cobc/help.c:265 cobc/help.c:268 +#: cobc/help.c:271 cobc/help.c:274 cobc/help.c:277 cobc/help.c:280 +#: cobc/typeck.c:2378 #, c-format msgid "'%s'" msgstr "" -#: cobc/help.c:277 +#: cobc/help.c:282 msgid "word to be taken out of the reserved words list" msgstr "" -#: cobc/help.c:277 cobc/help.c:278 cobc/help.c:280 +#: cobc/help.c:282 cobc/help.c:283 cobc/help.c:285 msgid "<word>" msgstr "" -#: cobc/help.c:278 +#: cobc/help.c:283 msgid "word to be added to reserved words list" msgstr "" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "word to be added to reserved words list as alias" msgstr "" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "<word>:<alias>" msgstr "" -#: cobc/help.c:280 +#: cobc/help.c:285 msgid "special register to disable" msgstr "" -#: cobc/help.c:281 +#: cobc/help.c:286 msgid "special register to enable" msgstr "" -#: cobc/help.c:282 +#: cobc/help.c:287 msgid "<word> or <word>:<definition>, where definition uses backslash escaped spaces" msgstr "" -#: cobc/parser.y:315 cobc/parser.y:323 +#: cobc/parser.y:307 #, c-format msgid "'%s' should start in Area A" msgstr "" -#: cobc/parser.y:331 cobc/parser.y:333 +#: cobc/parser.y:315 +#, c-format +msgid "%s should start in Area A" +msgstr "" + +#: cobc/parser.y:322 +#, c-format +msgid "%s should not start in Area A" +msgstr "" + +#: cobc/parser.y:330 cobc/parser.y:332 msgid "start of statement in Area A" msgstr "" -#: cobc/parser.y:344 cobc/parser.y:379 +#: cobc/parser.y:428 #, fuzzy, c-format msgid "unreachable statement '%s'" msgstr " MOVE ʸǤ" -#: cobc/parser.y:470 +#: cobc/parser.y:542 #, c-format msgid "ENTRY '%s' duplicated" msgstr "" -#: cobc/parser.y:520 +#: cobc/parser.y:594 #, c-format msgid "ENTRY FOR GO TO '%s' duplicated" msgstr "" -#: cobc/parser.y:536 +#: cobc/parser.y:610 #, c-format msgid "maximum nested program depth exceeded (%d)" msgstr "" -#: cobc/parser.y:562 cobc/parser.y:589 +#: cobc/parser.y:636 cobc/parser.y:663 #, fuzzy, c-format msgid "%s statement not terminated by %s" msgstr "%s ʸ END-%s ǽäƤޤ" -#: cobc/parser.y:592 +#: cobc/parser.y:666 #, fuzzy, c-format msgid "%s statement not terminated" msgstr "%s ʸ END-%s ǽäƤޤ" -#: cobc/parser.y:634 -msgid "USE statement invalid for SORT file" -msgstr "" - -#: cobc/parser.y:676 cobc/parser.y:1670 cobc/parser.y:1673 -#, c-format -msgid "cannot specify both %s and %s" -msgstr "" +#: cobc/parser.y:708 +#, fuzzy +msgid "USE statement invalid for SD file" +msgstr " VALUE Ǥ" -#: cobc/parser.y:677 +#: cobc/parser.y:751 #, fuzzy, c-format #| msgid "%s ignored" msgid "%s is ignored" msgstr "%s ̵뤷ޤ" -#: cobc/parser.y:686 +#: cobc/parser.y:760 #, c-format -msgid "Cannot specify %s without number of lines on page" +msgid "cannot specify %s without number of lines on page" msgstr "" -#: cobc/parser.y:696 +#: cobc/parser.y:770 #, c-format msgid "maximum OCCURS depth exceeded (%d)" msgstr "" -#: cobc/parser.y:704 cobc/typeck.c:3037 +#: cobc/parser.y:785 cobc/typeck.c:3127 #, c-format msgid "'%s' is not in LINKAGE SECTION" msgstr "" -#: cobc/parser.y:725 +#: cobc/parser.y:806 msgid "TO phrase without DEPENDING phrase" msgstr "" -#: cobc/parser.y:727 +#: cobc/parser.y:808 msgid "maximum number of occurrences assumed to be exact number" msgstr "" -#: cobc/parser.y:732 cobc/parser.y:8032 +#: cobc/parser.y:813 cobc/parser.y:8398 msgid "OCCURS TO must be greater than OCCURS FROM" msgstr "" -#: cobc/parser.y:741 +#: cobc/parser.y:823 #, fuzzy msgid "OCCURS DEPENDING ON without TO phrase" msgstr "GO TO ʣμ³̾ꤵƤޤ" -#: cobc/parser.y:806 +#: cobc/parser.y:899 #, c-format msgid "%s header missing" msgstr "" -#: cobc/parser.y:807 +#: cobc/parser.y:900 #, c-format msgid "%s header assumed" msgstr "" -#: cobc/parser.y:939 -#, fuzzy, c-format -msgid "duplicate %s" -msgstr "ʥ٥ֹǤ `%s'" - -#: cobc/parser.y:941 +#: cobc/parser.y:1053 #, c-format msgid "%s incorrectly after %s" msgstr "" -#: cobc/parser.y:1078 +#: cobc/parser.y:1208 #, fuzzy, c-format msgid "redefinition of program name '%s'" msgstr "`%s' Ƥޤ" -#: cobc/parser.y:1083 +#: cobc/parser.y:1213 #, fuzzy, c-format msgid "redefinition of program ID '%s'" msgstr "`%s' Ƥޤ" -#: cobc/parser.y:1117 +#: cobc/parser.y:1247 #, c-format msgid "FUNCTION '%s' has no PROCEDURE DIVISION" msgstr "" -#: cobc/parser.y:1228 +#: cobc/parser.y:1372 msgid "functions may not be defined within a program/function" msgstr "" -#: cobc/parser.y:1278 +#: cobc/parser.y:1426 #, c-format msgid "END FUNCTION '%s' is different from FUNCTION-ID '%s'" msgstr "" -#: cobc/parser.y:1292 +#: cobc/parser.y:1440 #, c-format msgid "END PROGRAM '%s' is different from PROGRAM-ID '%s'" msgstr "" -#: cobc/parser.y:1341 +#: cobc/parser.y:1489 msgid "currency symbol must be one character long" msgstr "" -#: cobc/parser.y:1398 +#: cobc/parser.y:1546 #, fuzzy, c-format msgid "invalid character '%c' in currency symbol" msgstr "ʼǤ" -#: cobc/parser.y:1414 +#: cobc/parser.y:1562 msgid "prototype has same name as current function and will be ignored" msgstr "" -#: cobc/parser.y:1441 +#: cobc/parser.y:1589 #, c-format msgid "duplicate REPOSITORY entries for '%s' do not match" msgstr "" -#: cobc/parser.y:1445 +#: cobc/parser.y:1593 #, c-format msgid "duplicate REPOSITORY entry for '%s'" msgstr "" -#: cobc/parser.y:1510 +#: cobc/parser.y:1658 #, c-format msgid "ORGANIZATION %s is incompatible with RECORD DELIMITER" msgstr "" -#: cobc/parser.y:1548 cobc/parser.y:1939 cobc/typeck.c:829 +#: cobc/parser.y:1694 cobc/parser.y:2142 cobc/typeck.c:835 #, fuzzy, c-format msgid "condition-name not allowed here: '%s'" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:1554 cobc/parser.y:2127 +#: cobc/parser.y:1700 cobc/parser.y:2345 #, fuzzy msgid "SCREEN item cannot be used here" msgstr "`%s' źդޤ" -#: cobc/parser.y:1557 +#: cobc/parser.y:1703 #, fuzzy msgid "REPORT item cannot be used here" msgstr "`%s' źդޤ" -#: cobc/parser.y:1563 +#: cobc/parser.y:1709 #, fuzzy msgid "TYPEDEF item cannot be used here" msgstr "`%s' źդޤ" -#: cobc/parser.y:1572 +#: cobc/parser.y:1718 #, fuzzy msgid "elementary item expected" msgstr "ͤɬפǤ" -#: cobc/parser.y:1579 +#: cobc/parser.y:1725 msgid "item may not reference itself" msgstr "" -#: cobc/parser.y:1586 +#: cobc/parser.y:1733 msgid "item may not be subordinate to any item with USAGE clause" msgstr "" -#: cobc/parser.y:1588 +#: cobc/parser.y:1735 msgid "item may not be subordinate to any item with SIGN clause" msgstr "" -#: cobc/parser.y:1631 +#: cobc/parser.y:1780 #, c-format msgid "illegal combination of %s with other clauses" msgstr "" -#: cobc/parser.y:1641 +#: cobc/parser.y:1794 #, c-format msgid "entry following %s may not be subordinate to it" msgstr "" -#: cobc/parser.y:1859 +#: cobc/parser.y:2042 +msgid "INITIAL specified on non-input field" +msgstr "" + +#: cobc/parser.y:2054 +msgid "relative LINE/COLUMN clause required with OCCURS" +msgstr "" + +#: cobc/parser.y:2072 msgid "FOR phrase cannot immediately follow ALL/LEADING/TRAILING" msgstr "" -#: cobc/parser.y:1861 +#: cobc/parser.y:2074 msgid "missing CHARACTERS/ALL/LEADING/TRAILING phrase after FOR phrase" msgstr "" -#: cobc/parser.y:1868 +#: cobc/parser.y:2081 #, fuzzy msgid "missing value between ALL/LEADING/TRAILING words" msgstr "`%s' ALL ޤ LEADINGɬפǤ" -#: cobc/parser.y:1873 +#: cobc/parser.y:2086 msgid "missing FOR phrase before CHARACTERS/ALL/LEADING/TRAILING phrase" msgstr "" -#: cobc/parser.y:1880 +#: cobc/parser.y:2093 #, fuzzy msgid "missing ALL/LEADING/TRAILING before value" msgstr "`%s' ALL ޤ LEADINGɬפǤ" -#: cobc/parser.y:1935 +#: cobc/parser.y:2138 msgid "use of condition-name in place of data-name" msgstr "" -#: cobc/parser.y:1966 +#: cobc/parser.y:2169 msgid "cannot specify NO ADVANCING in screen DISPLAY" msgstr "" -#: cobc/parser.y:2029 cobc/parser.y:2046 +#: cobc/parser.y:2232 cobc/parser.y:2249 msgid "non-standard DISPLAY" msgstr "" -#: cobc/parser.y:2033 +#: cobc/parser.y:2236 msgid "screens may only be displayed on CRT" msgstr "" -#: cobc/parser.y:2038 cobc/parser.y:2081 +#: cobc/parser.y:2241 cobc/parser.y:2284 msgid "cannot mix screens and fields in the same DISPLAY statement" msgstr "" -#: cobc/parser.y:2042 +#: cobc/parser.y:2245 msgid "screen clauses may only be used for DISPLAY on CRT" msgstr "" -#: cobc/parser.y:2087 +#: cobc/parser.y:2290 msgid "ambiguous DISPLAY; put items to display on device in separate DISPLAY" msgstr "" -#: cobc/parser.y:2103 +#: cobc/parser.y:2301 #, fuzzy, c-format msgid "%s is not an alphanumeric literal" msgstr "`%s' ϿͤǤϤޤ" -#: cobc/parser.y:2105 +#: cobc/parser.y:2305 #, fuzzy, c-format msgid "'%s' is not USAGE DISPLAY" msgstr "`%s' SPECIAL-NAMES Ƥޤ" -#: cobc/parser.y:2120 cobc/typeck.c:9790 +#: cobc/parser.y:2322 cobc/parser.y:19534 +#, fuzzy, c-format +msgid "'%s' is not a field" +msgstr "%s ̤Ǥ" + +#: cobc/parser.y:2338 cobc/typeck.c:10231 #, fuzzy, c-format msgid "invalid target for %s" msgstr "%s: `%s':\n" -#: cobc/parser.y:2129 +#: cobc/parser.y:2347 #, fuzzy msgid "RENAMES item may not be used here" msgstr "`%s' źդޤ" -#: cobc/parser.y:2131 cobc/typeck.c:2737 cobc/typeck.c:2828 +#: cobc/parser.y:2349 cobc/typeck.c:2822 cobc/typeck.c:2913 #, fuzzy msgid "ANY LENGTH item not allowed here" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:2135 +#: cobc/parser.y:2353 #, c-format msgid "item '%s' has wrong class for VALIDATE" msgstr "" -#: cobc/parser.y:2144 +#: cobc/parser.y:2362 #, fuzzy #| msgid "REDEFINES clause must follow entry-name" msgid "WHEN clause must follow EVERY clause" msgstr "REDEFINES Ϲ̾ľˤʤФʤޤ" -#: cobc/parser.y:2229 cobc/parser.y:18631 +#: cobc/parser.y:2447 cobc/parser.y:19251 #, fuzzy msgid "non-zero value expected" msgstr "ͤɬפǤ" -#: cobc/parser.y:2235 cobc/tree.c:4735 +#: cobc/parser.y:2453 cobc/tree.c:4803 #, fuzzy, c-format msgid "RECORD size (IDX) exceeds maximum allowed (%d)" msgstr "쥳Ĺû᤮ޤ `%s'" -#: cobc/parser.y:2239 cobc/tree.c:4739 +#: cobc/parser.y:2457 cobc/tree.c:4807 #, fuzzy, c-format msgid "RECORD size exceeds maximum allowed (%d)" msgstr "쥳Ĺû᤮ޤ `%s'" -#: cobc/parser.y:2244 +#: cobc/parser.y:2462 #, fuzzy msgid "RECORD clause invalid" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:3368 +#: cobc/parser.y:3595 msgid "multiple PROGRAM-ID's without matching END PROGRAM" msgstr "" -#: cobc/parser.y:3371 +#: cobc/parser.y:3598 msgid "executable requested but no program found" msgstr "" -#: cobc/parser.y:3488 +#: cobc/parser.y:3717 msgid "prototypes must be come before any program/function definitions" msgstr "" -#: cobc/parser.y:3691 +#: cobc/parser.y:3930 msgid "COMMON may only be used in a contained program" msgstr "" -#: cobc/parser.y:3778 +#: cobc/parser.y:4017 msgid "CALL prototypes" msgstr "" -#: cobc/parser.y:3953 cobc/parser.y:4235 cobc/parser.y:4281 cobc/parser.y:4394 -#: cobc/parser.y:4608 cobc/parser.y:4705 cobc/parser.y:4744 cobc/parser.y:4803 -#: cobc/parser.y:4824 cobc/parser.y:4867 cobc/parser.y:4946 cobc/parser.y:4965 -#: cobc/parser.y:4981 cobc/parser.y:4999 cobc/parser.y:5017 cobc/parser.y:5034 -#: cobc/parser.y:5052 cobc/parser.y:7404 cobc/parser.y:8628 +#: cobc/parser.y:4192 cobc/parser.y:4471 cobc/parser.y:4517 cobc/parser.y:4632 +#: cobc/parser.y:4846 cobc/parser.y:4943 cobc/parser.y:4982 cobc/parser.y:5041 +#: cobc/parser.y:5062 cobc/parser.y:5105 cobc/parser.y:5184 cobc/parser.y:5203 +#: cobc/parser.y:5219 cobc/parser.y:5237 cobc/parser.y:5255 cobc/parser.y:5272 +#: cobc/parser.y:5290 cobc/parser.y:7685 cobc/parser.y:9028 #, fuzzy, c-format msgid "%s not allowed in nested programs" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:4109 +#: cobc/parser.y:4345 msgid "segment-number must be in range of values 1 to 49" msgstr "" -#: cobc/parser.y:4121 +#: cobc/parser.y:4357 #, fuzzy msgid "duplicate CLASSIFICATION clause" msgstr "ʥ٥ֹǤ `%s'" -#: cobc/parser.y:4200 +#: cobc/parser.y:4436 msgid "PROGRAM phrase" msgstr "" -#: cobc/parser.y:4302 cobc/parser.y:4313 cobc/parser.y:4657 +#: cobc/parser.y:4538 cobc/parser.y:4549 cobc/parser.y:4895 #, fuzzy, c-format msgid "invalid %s clause" msgstr " VALUE Ǥ" -#: cobc/parser.y:4616 cobc/parser.y:4754 +#: cobc/parser.y:4854 cobc/parser.y:4992 #, fuzzy msgid "type does not match alphabet" msgstr "`%s' ϥե٥å̾ǤϤޤ" -#: cobc/parser.y:4760 +#: cobc/parser.y:4998 #, fuzzy msgid "CLASS IS integer IN alphabet-name" msgstr "`%s' ϥե٥å̾ǤϤޤ" -#: cobc/parser.y:4780 cobc/parser.y:4784 +#: cobc/parser.y:5018 cobc/parser.y:5022 msgid "CLASS literal with THRU must have size 1" msgstr "" -#: cobc/parser.y:4879 +#: cobc/parser.y:5117 msgid "separate currency symbol and currency string" msgstr "" -#: cobc/parser.y:4912 +#: cobc/parser.y:5150 #, fuzzy, c-format msgid "invalid CURRENCY SIGN '%s'" msgstr " X Ǥ: %s" -#: cobc/parser.y:5139 +#: cobc/parser.y:5377 msgid "cannot use RELATIVE KEY clause on INDEXED files" msgstr "" -#: cobc/parser.y:5143 +#: cobc/parser.y:5381 msgid "cannot use RECORD KEY clause on RELATIVE files" msgstr "" -#: cobc/parser.y:5215 +#: cobc/parser.y:5453 msgid "EXTERNAL/DYNAMIC cannot be used with literals" msgstr "" -#: cobc/parser.y:5235 +#: cobc/parser.y:5473 msgid "EXTERNAL/DYNAMIC cannot be used with USING/VARYING" msgstr "" -#: cobc/parser.y:5246 +#: cobc/parser.y:5484 msgid "EXTERNAL/DYNAMIC cannot be used with DISK FROM" msgstr "" -#: cobc/parser.y:5248 -msgid "ASSIGN DISK FROM" -msgstr "" - -#: cobc/parser.y:5370 +#: cobc/parser.y:5608 msgid "ASSIGN EXTERNAL/DYNAMIC" msgstr "" -#: cobc/parser.y:5486 cobc/parser.y:5666 +#: cobc/parser.y:5724 cobc/parser.y:5921 #, c-format msgid "%s only valid with ORGANIZATION %s" msgstr "" -#: cobc/parser.y:5583 +#: cobc/parser.y:5818 cobc/typeck.c:3818 #, fuzzy, c-format msgid "'%s' is not an alphabet-name" msgstr "`%s' ϥե٥å̾ǤϤޤ" -#: cobc/parser.y:5599 +#: cobc/parser.y:5854 msgid "VSAM status" msgstr "" -#: cobc/parser.y:5733 cobc/parser.y:5758 +#: cobc/parser.y:5988 cobc/parser.y:6013 #, c-format msgid "RECORD DELIMITER %s only allowed with SEQUENTIAL files" msgstr "" -#: cobc/parser.y:5745 +#: cobc/parser.y:6000 #, c-format msgid "RECORD DELIMITER %s only allowed with (LINE) SEQUENTIAL files" msgstr "" -#: cobc/parser.y:5751 +#: cobc/parser.y:6006 msgid "LINE-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5764 +#: cobc/parser.y:6019 msgid "BINARY-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5772 +#: cobc/parser.y:6027 msgid "RECORD DELIMITER clause only allowed with (LINE) SEQUENTIAL files" msgstr "" -#: cobc/parser.y:5776 +#: cobc/parser.y:6031 #, c-format msgid "RECORD DELIMITER %s not recognized; will be ignored" msgstr "" -#: cobc/parser.y:5814 +#: cobc/parser.y:6069 msgid "DUPLICATES for primary keys" msgstr "" -#: cobc/parser.y:6058 +#: cobc/parser.y:6313 msgid "DOS/VS APPLY phrase" msgstr "" -#: cobc/parser.y:6212 +#: cobc/parser.y:6467 msgid "RECORD description missing or invalid" msgstr "" -#: cobc/parser.y:6239 +#: cobc/parser.y:6494 #, fuzzy, c-format msgid "duplicate file description for %s" msgstr "ʥ٥ֹǤ `%s'" -#: cobc/parser.y:6288 cobc/parser.y:6893 cobc/parser.y:7389 cobc/parser.y:13485 -#: cobc/parser.y:16686 +#: cobc/parser.y:6543 cobc/parser.y:7170 cobc/parser.y:7670 cobc/parser.y:13913 +#: cobc/parser.y:17210 #, c-format msgid "%s is invalid in a user FUNCTION" msgstr "" -#: cobc/parser.y:6326 cobc/parser.y:6336 +#: cobc/parser.y:6581 cobc/parser.y:6591 msgid "RECORD clause ignored for LINE SEQUENTIAL" msgstr "" -#: cobc/parser.y:6433 +#: cobc/parser.y:6688 msgid "LINAGE clause with wrong file type" msgstr "" -#: cobc/parser.y:6495 +#: cobc/parser.y:6750 msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgstr "" -#: cobc/parser.y:6532 +#: cobc/parser.y:6787 #, c-format msgid "ignoring CODE-SET '%s'" msgstr "" -#: cobc/parser.y:6541 +#: cobc/parser.y:6796 #, fuzzy msgid "CODE-SET clause invalid for file type" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:6562 +#: cobc/parser.y:6817 #, fuzzy msgid "REPORT clause with wrong file type" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:6641 +#: cobc/parser.y:6899 msgid "CD record missing" msgstr "" -#: cobc/parser.y:7091 +#: cobc/parser.y:7372 msgid "CONSTANT item not at 01 level" msgstr "" -#: cobc/parser.y:7236 +#: cobc/parser.y:7517 #, fuzzy #| msgid "REDEFINES clause must follow entry-name" msgid "REDEFINES clause not following entry-name" msgstr "REDEFINES Ϲ̾ľˤʤФʤޤ" -#: cobc/parser.y:7309 cobc/parser.y:7339 cobc/parser.y:7381 cobc/parser.y:7470 -#: cobc/parser.y:8233 +#: cobc/parser.y:7590 cobc/parser.y:7620 cobc/parser.y:7662 cobc/parser.y:7751 +#: cobc/parser.y:8606 #, fuzzy, c-format msgid "%s only allowed at 01/77 level" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:7312 cobc/parser.y:7341 cobc/parser.y:7383 cobc/parser.y:8235 -#: cobc/parser.y:8587 cobc/parser.y:8609 +#: cobc/parser.y:7593 cobc/parser.y:7622 cobc/parser.y:7664 cobc/parser.y:8608 +#: cobc/parser.y:8987 cobc/parser.y:9009 #, fuzzy, c-format msgid "%s requires a data name" msgstr "`%s' ϥե٥å̾ǤϤޤ" -#: cobc/parser.y:7316 cobc/parser.y:7565 +#: cobc/parser.y:7597 cobc/parser.y:7846 #, fuzzy, c-format msgid "%s not allowed in %s" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:7337 cobc/parser.y:7391 cobc/parser.y:8231 cobc/parser.y:8583 -#: cobc/parser.y:8607 +#: cobc/parser.y:7618 cobc/parser.y:7672 cobc/parser.y:8604 cobc/parser.y:8983 +#: cobc/parser.y:9007 #, fuzzy, c-format msgid "%s not allowed here" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:7528 +#: cobc/parser.y:7809 #, fuzzy, c-format msgid "%s requires DEPENDING clause" msgstr "`%s' ϥե٥å̾ǤϤޤ" -#: cobc/parser.y:7544 +#: cobc/parser.y:7825 msgid "a locale-format PICTURE string must only consist of '9', '.', '+', 'Z' and the currency-sign" msgstr "" -#: cobc/parser.y:7554 +#: cobc/parser.y:7835 msgid "DEPENDING clause needs either an OCCURS clause or a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7560 +#: cobc/parser.y:7841 msgid "only USAGE DISPLAY may specify a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7610 cobc/typeck.c:4752 +#: cobc/parser.y:7893 cobc/typeck.c:4916 #, fuzzy, c-format msgid "'%s' is not a locale-name" msgstr "`%s' ϥե̾ǤϤޤ" -#: cobc/parser.y:7656 +#: cobc/parser.y:7939 #, fuzzy, c-format msgid "'%s' is not a valid USAGE" msgstr "`%s' ϥե٥å̾ǤϤޤ" -#: cobc/parser.y:7661 +#: cobc/parser.y:7944 #, fuzzy, c-format msgid "unknown USAGE: %s" msgstr "Υե륨顼Ǥ" -#: cobc/parser.y:7808 +#: cobc/parser.y:8139 #, c-format msgid "unknown HANDLE type: %s" msgstr "" -#: cobc/parser.y:8082 +#: cobc/parser.y:8347 +#, fuzzy, c-format +msgid "'%s' is not USAGE UTF-8" +msgstr "`%s' SPECIAL-NAMES Ƥޤ" + +#: cobc/parser.y:8448 msgid "INDEXED should follow ASCENDING/DESCENDING" msgstr "" -#: cobc/parser.y:8317 +#: cobc/parser.y:8658 cobc/parser.y:8660 +#, fuzzy, c-format +msgid "unexpected %s" +msgstr "ʿǤ" + +#: cobc/parser.y:8709 msgid "amount of entries in FROM and TO must match" msgstr "" -#: cobc/parser.y:8326 +#: cobc/parser.y:8718 #, c-format msgid "entry in FROM (%d) must be <= entry in TO (%d)" msgstr "" -#: cobc/parser.y:8585 +#: cobc/parser.y:8985 #, fuzzy, c-format msgid "%s only allowed at 01 level" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:8589 cobc/parser.y:8611 +#: cobc/parser.y:8989 cobc/parser.y:9011 #, c-format msgid "%s and %s combination not allowed" msgstr "" -#: cobc/parser.y:8723 +#: cobc/parser.y:9127 #, fuzzy msgid "GLOBAL is not allowed with RD" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:9247 +#: cobc/parser.y:9650 #, fuzzy, c-format msgid "%s is not valid for VARYING" msgstr "`%s' ϥե̾ǤϤޤ" -#: cobc/parser.y:9283 +#: cobc/parser.y:9686 msgid "LINE with OCCURS is not supported" msgstr "" -#: cobc/parser.y:9323 +#: cobc/parser.y:9726 msgid "PLUS is not recommended with LEFT, RIGHT or CENTER" msgstr "" -#: cobc/parser.y:9325 +#: cobc/parser.y:9728 #, fuzzy msgid "PLUS is not allowed with LEFT, RIGHT or CENTER" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:9363 +#: cobc/parser.y:9766 msgid "PLUS is ignored on first field of line" msgstr "" -#: cobc/parser.y:9394 +#: cobc/parser.y:9797 msgid "invalid COLUMN integer; must be > 0" msgstr "" -#: cobc/parser.y:9396 +#: cobc/parser.y:9799 msgid "COLUMN numbers should increase" msgstr "" -#: cobc/parser.y:9492 cobc/parser.y:9547 -msgid "INITIAL specified on non-input field" -msgstr "" - -#: cobc/parser.y:9504 cobc/parser.y:9559 -msgid "relative LINE/COLUMN clause required with OCCURS" -msgstr "" - -#: cobc/parser.y:9661 cobc/parser.y:9665 +#: cobc/parser.y:9990 cobc/parser.y:9994 msgid "screen positions from data-item" msgstr "" -#: cobc/parser.y:9821 +#: cobc/parser.y:10153 #, c-format msgid "missing %s" msgstr "" -#: cobc/parser.y:10508 +#: cobc/parser.y:10840 #, fuzzy msgid "OCCURS screen items" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:10520 +#: cobc/parser.y:10852 #, fuzzy msgid "GLOBAL screen items" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:10571 +#: cobc/parser.y:10904 msgid "overriding convention specified in ENTRY-CONVENTION" msgstr "" -#: cobc/parser.y:10586 +#: cobc/parser.y:10917 msgid "executable program requested but PROCEDURE/ENTRY has USING clause" msgstr "" -#: cobc/parser.y:10654 cobc/parser.y:10671 cobc/parser.y:12278 +#: cobc/parser.y:10987 cobc/parser.y:11004 cobc/parser.y:12667 #, fuzzy, c-format msgid "number of arguments exceeds maximum %d" msgstr "ͤ礭ܤ礭ۤƤޤ" -#: cobc/parser.y:10663 +#: cobc/parser.y:10996 msgid "CHAINING invalid in user FUNCTION" msgstr "" -#: cobc/parser.y:10699 +#: cobc/parser.y:11032 #, fuzzy msgid "ANY LENGTH items may only be BY REFERENCE formal parameters" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:10716 cobc/parser.y:12337 cobc/parser.y:12350 +#: cobc/parser.y:11049 cobc/parser.y:12728 cobc/parser.y:12741 #, fuzzy, c-format msgid "%s not allowed in CHAINED programs" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:10718 +#: cobc/parser.y:11051 msgid "parameters passed BY VALUE" msgstr "" -#: cobc/parser.y:10733 cobc/parser.y:10742 cobc/parser.y:10750 -#: cobc/parser.y:10771 +#: cobc/parser.y:11066 cobc/parser.y:11075 cobc/parser.y:11083 +#: cobc/parser.y:11104 msgid "SIZE only allowed for BY VALUE items" msgstr "" -#: cobc/parser.y:10773 cobc/parser.y:10798 +#: cobc/parser.y:11106 cobc/parser.y:11131 #, fuzzy msgid "invalid value for SIZE" msgstr "ʹϢǤ" -#: cobc/parser.y:10813 +#: cobc/parser.y:11146 msgid "MEMORY SIZE phrase in CALL statement" msgstr "" -#: cobc/parser.y:10825 +#: cobc/parser.y:11162 msgid "OPTIONAL only allowed for BY REFERENCE items" msgstr "" -#: cobc/parser.y:10837 +#: cobc/parser.y:11177 #, fuzzy msgid "RETURNING clause is required for a FUNCTION" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/parser.y:10843 +#: cobc/parser.y:11183 msgid "RETURNING clause cannot be OMITTED for main program" msgstr "" -#: cobc/parser.y:10846 +#: cobc/parser.y:11186 #, fuzzy msgid "RETURNING clause cannot be OMITTED for a FUNCTION" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/parser.y:10859 +#: cobc/parser.y:11199 msgid "RETURNING item is not defined in LINKAGE SECTION" msgstr "" -#: cobc/parser.y:10861 +#: cobc/parser.y:11201 msgid "RETURNING item must have level 01" msgstr "" -#: cobc/parser.y:10863 +#: cobc/parser.y:11203 #, fuzzy msgid "RETURNING item should not have OCCURS" msgstr "`%s' θˤ OCCURS դƤϤʤޤ" -#: cobc/parser.y:10867 +#: cobc/parser.y:11207 msgid "function RETURNING item may not be ANY LENGTH" msgstr "" -#: cobc/parser.y:11080 +#: cobc/parser.y:11421 #, fuzzy, c-format msgid "'%s' is not a statement" msgstr "`%s' ϥե̾ǤϤޤ" -#: cobc/parser.y:11083 +#: cobc/parser.y:11424 #, c-format msgid "unknown statement '%s'; it may exist in another dialect" msgstr "" -#: cobc/parser.y:11087 +#: cobc/parser.y:11428 #, fuzzy, c-format msgid "unknown statement '%s'" msgstr "Τ褦ʸϤޤ `%s'" -#: cobc/parser.y:11105 +#: cobc/parser.y:11446 msgid "SECTION segment-number must be less than or equal to 99" msgstr "" -#: cobc/parser.y:11108 +#: cobc/parser.y:11449 msgid "SECTION segment-number in DECLARATIVES must be less than 50" msgstr "" -#: cobc/parser.y:11116 +#: cobc/parser.y:11457 #, fuzzy msgid "SECTION segment within DECLARATIVES" msgstr "`%s' SPECIAL-NAMES Ƥޤ" -#: cobc/parser.y:11313 cobc/parser.y:11448 +#: cobc/parser.y:11667 cobc/parser.y:11806 msgid "non-standard ACCEPT" msgstr "" -#: cobc/parser.y:11325 +#: cobc/parser.y:11679 #, fuzzy msgid "PROMPT clause" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:11329 +#: cobc/parser.y:11683 msgid "SIZE IS clause" msgstr "" -#: cobc/parser.y:11549 cobc/parser.y:11842 +#: cobc/parser.y:11907 cobc/parser.y:12226 msgid "TIME-OUT or BEFORE TIME clauses" msgstr "" -#: cobc/parser.y:11575 cobc/parser.y:11591 cobc/parser.y:11606 +#: cobc/parser.y:11937 cobc/parser.y:11960 cobc/parser.y:11978 msgid "AT screen-location" msgstr "" -#: cobc/parser.y:11607 +#: cobc/parser.y:11979 msgid "LINE or COLUMN" msgstr "" -#: cobc/parser.y:11972 +#: cobc/parser.y:12358 msgid "ALLOCATE CHARACTERS requires RETURNING clause" msgstr "" -#: cobc/parser.y:11987 cobc/parser.y:13289 +#: cobc/parser.y:12373 #, fuzzy, c-format msgid "ignoring %s phrase" msgstr "ޥʥ̵뤵ޤ" -#: cobc/parser.y:11989 +#: cobc/parser.y:12375 msgid "addressing mode should be either 24 or 31 bit" msgstr "" -#: cobc/parser.y:12061 +#: cobc/parser.y:12446 msgid "CALL to own PROGRAM-ID" msgstr "" -#: cobc/parser.y:12062 +#: cobc/parser.y:12447 msgid "assuming RECURSIVE attribute" msgstr "" -#: cobc/parser.y:12082 +#: cobc/parser.y:12467 msgid "STATIC CALL convention ignored because of ON EXCEPTION" msgstr "" -#: cobc/parser.y:12091 +#: cobc/parser.y:12476 msgid "ON EXCEPTION ignored because of STATIC CALL" msgstr "" -#: cobc/parser.y:12205 cobc/typeck.c:13644 +#: cobc/parser.y:12594 cobc/typeck.c:14450 #, fuzzy msgid "invalid mnemonic name" msgstr "ʥˡ˥åǤ" -#: cobc/parser.y:12229 +#: cobc/parser.y:12618 msgid "id/literal ignored, using prototype name" msgstr "" -#: cobc/parser.y:12235 +#: cobc/parser.y:12624 msgid "NESTED phrase is only valid with literal" msgstr "" -#: cobc/parser.y:12296 +#: cobc/parser.y:12685 #, fuzzy, c-format msgid "%s only allowed when arguments are passed %s" msgstr "WHEN ΰοǤ" -#: cobc/parser.y:12385 +#: cobc/parser.y:12776 msgid "RETURNING item must have level 01 or 77" msgstr "" -#: cobc/parser.y:12389 +#: cobc/parser.y:12780 msgid "RETURNING item must be a LINKAGE SECTION item or have BASED clause" msgstr "" -#: cobc/parser.y:12423 cobc/parser.y:17409 cobc/parser.y:17464 +#: cobc/parser.y:12814 cobc/parser.y:17937 cobc/parser.y:18000 msgid "NOT EXCEPTION before EXCEPTION" msgstr "" -#: cobc/parser.y:13162 +#: cobc/parser.y:13572 #, c-format msgid "HANDLE must be a %s HANDLE" msgstr "" -#: cobc/parser.y:13174 +#: cobc/parser.y:13584 msgid "HANDLE must be a generic HANDLE" msgstr "" -#: cobc/parser.y:13251 +#: cobc/parser.y:13661 #, fuzzy, c-format msgid "HANDLE clause invalid for %s" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/parser.y:13483 cobc/parser.y:16876 +#: cobc/parser.y:13911 cobc/parser.y:17400 #, fuzzy, c-format msgid "%s is invalid in nested program" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:13521 cobc/parser.y:13564 cobc/parser.y:13575 -#: cobc/parser.y:13586 +#: cobc/parser.y:13940 cobc/parser.y:13983 cobc/parser.y:13994 +#: cobc/parser.y:14005 #, c-format msgid "maximum evaluate depth exceeded (%d)" msgstr "" -#: cobc/parser.y:13627 cobc/parser.y:13637 +#: cobc/parser.y:14048 cobc/parser.y:14089 cobc/parser.y:14633 +#: cobc/parser.y:14644 cobc/parser.y:14653 cobc/parser.y:17959 +#: cobc/parser.y:17981 cobc/parser.y:18022 cobc/parser.y:18038 +#: cobc/parser.y:18078 cobc/parser.y:18095 cobc/parser.y:18132 +#: cobc/parser.y:18149 cobc/parser.y:18199 cobc/parser.y:18216 +#: cobc/parser.y:18252 cobc/parser.y:18269 cobc/parser.y:18310 +#: cobc/parser.y:18327 +#, fuzzy, c-format +msgid "%s without imperative statement" +msgstr "`%s' ϥե̾ǤϤޤ" + +#: cobc/parser.y:14056 cobc/parser.y:14066 msgid "WHEN without imperative statement" msgstr "" -#: cobc/parser.y:13655 cobc/parser.y:13665 +#: cobc/parser.y:14097 cobc/parser.y:14107 msgid "WHEN OTHER without imperative statement" msgstr "" -#: cobc/parser.y:13745 +#: cobc/parser.y:14191 #, fuzzy msgid "invalid THROUGH usage" msgstr " VALUE Ǥ" -#: cobc/parser.y:13909 +#: cobc/parser.y:14372 msgid "EXIT PROGRAM is not allowed within a USE GLOBAL procedure" msgstr "" -#: cobc/parser.y:13913 +#: cobc/parser.y:14376 msgid "EXIT PROGRAM not allowed within a FUNCTION" msgstr "" -#: cobc/parser.y:13927 +#: cobc/parser.y:14390 msgid "EXIT FUNCTION is not allowed within a USE GLOBAL procedure" msgstr "" -#: cobc/parser.y:13931 +#: cobc/parser.y:14394 msgid "EXIT FUNCTION only allowed within a FUNCTION" msgstr "" -#: cobc/parser.y:13945 cobc/parser.y:13968 +#: cobc/parser.y:14408 cobc/parser.y:14431 msgid "EXIT PERFORM is only valid with inline PERFORM" msgstr "" -#: cobc/parser.y:13990 +#: cobc/parser.y:14453 msgid "EXIT SECTION is only valid with an active SECTION" msgstr "" -#: cobc/parser.y:14011 +#: cobc/parser.y:14474 msgid "EXIT PARAGRAPH is only valid with an active PARAGRAPH" msgstr "" -#: cobc/parser.y:14034 +#: cobc/parser.y:14497 msgid "RETURNING/GIVING not allowed for non-returning runtime elements" msgstr "" -#: cobc/parser.y:14166 +#: cobc/parser.y:14640 msgid "IF without imperative statement" msgstr "" -#: cobc/parser.y:14497 cobc/parser.y:14506 +#: cobc/parser.y:14983 cobc/parser.y:14992 msgid "single-character literal or data item expected" msgstr "" -#: cobc/parser.y:14524 +#: cobc/parser.y:15010 msgid "TALLYING clause is incomplete" msgstr "" -#: cobc/parser.y:14640 +#: cobc/parser.y:15126 msgid "INSPECT missing ALL/FIRST/LEADING/TRAILING" msgstr "" -#: cobc/parser.y:14902 +#: cobc/parser.y:15390 #, fuzzy msgid "LOCK clauses" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:15059 +#: cobc/parser.y:15547 msgid "inline PERFORM without imperative statement" msgstr "" -#: cobc/parser.y:15180 cobc/parser.y:15188 cobc/parser.y:15196 +#: cobc/parser.y:15670 cobc/parser.y:15678 cobc/parser.y:15686 #, c-format msgid "PERFORM VARYING '%s' (line %d of %s) is not a numeric field" msgstr "" -#: cobc/parser.y:15212 +#: cobc/parser.y:15702 #, fuzzy msgid "PERFORM VARYING without BY phrase" msgstr "GO TO ʣμ³̾ꤵƤޤ" -#: cobc/parser.y:15252 +#: cobc/parser.y:15742 #, fuzzy, c-format msgid "'%s' is not an object-reference" msgstr "`%s' ǤϤޤ" -#: cobc/parser.y:15292 cobc/typeck.c:12295 cobc/typeck.c:13552 +#: cobc/parser.y:15782 cobc/typeck.c:13066 cobc/typeck.c:14358 msgid "LOCK clause invalid with file LOCK AUTOMATIC" msgstr "" -#: cobc/parser.y:15297 +#: cobc/parser.y:15787 #, fuzzy msgid "KEY clause invalid with this file type" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:15302 cobc/typeck.c:12291 cobc/typeck.c:13548 +#: cobc/parser.y:15792 cobc/typeck.c:13062 cobc/typeck.c:14354 msgid "INVALID KEY clause invalid with this file type" msgstr "" -#: cobc/parser.y:15986 -msgid "file sort requires KEY phrase" +#: cobc/parser.y:16494 +msgid "MERGE requires KEY phrase" msgstr "" -#: cobc/parser.y:16010 +#: cobc/parser.y:16498 +msgid "file SORT requires KEY phrase" +msgstr "" + +#: cobc/parser.y:16522 msgid "table SORT requires KEY phrase" msgstr "" -#: cobc/parser.y:16072 -msgid "file sort requires USING or INPUT PROCEDURE" +#: cobc/parser.y:16527 +#, fuzzy +msgid "must be an SD filename" +msgstr "`%s' ϥե̾ǤϤޤ" + +#: cobc/parser.y:16585 +msgid "MERGE requires USING files" msgstr "" -#: cobc/parser.y:16079 +#: cobc/parser.y:16587 +msgid "file SORT requires USING or INPUT PROCEDURE" +msgstr "" + +#: cobc/parser.y:16595 msgid "USING invalid with table SORT" msgstr "" -#: cobc/parser.y:16089 +#: cobc/parser.y:16605 msgid "INPUT PROCEDURE invalid with table SORT" msgstr "" -#: cobc/parser.y:16091 +#: cobc/parser.y:16607 msgid "INPUT PROCEDURE invalid with MERGE" msgstr "" -#: cobc/parser.y:16104 -msgid "file sort requires GIVING or OUTPUT PROCEDURE" +#: cobc/parser.y:16621 +msgid "MERGE requires GIVING or OUTPUT PROCEDURE" +msgstr "" + +#: cobc/parser.y:16623 +msgid "file SORT requires GIVING or OUTPUT PROCEDURE" msgstr "" -#: cobc/parser.y:16111 +#: cobc/parser.y:16631 msgid "GIVING invalid with table SORT" msgstr "" -#: cobc/parser.y:16121 +#: cobc/parser.y:16641 msgid "OUTPUT PROCEDURE invalid with table SORT" msgstr "" -#: cobc/parser.y:16148 +#: cobc/parser.y:16668 #, fuzzy msgid "SIZE/LENGTH invalid here" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:16197 +#: cobc/parser.y:16717 msgid "NOT EQUAL condition not allowed on START statement" msgstr "" -#: cobc/parser.y:16255 +#: cobc/parser.y:16776 #, fuzzy, c-format msgid "%s is replaced by %s" msgstr "%s %s ǤϸŤͤǤ" -#: cobc/parser.y:16304 +#: cobc/parser.y:16825 msgid "STOP literal" msgstr "" -#: cobc/parser.y:16308 +#: cobc/parser.y:16829 #, fuzzy msgid "STOP identifier" msgstr " VALUE Ǥ" -#: cobc/parser.y:16446 +#: cobc/parser.y:16969 msgid "SUPPRESS statement must be within DECLARATIVES" msgstr "" -#: cobc/parser.y:16520 +#: cobc/parser.y:17043 #, fuzzy -msgid "UNLOCK invalid for SORT files" +msgid "UNLOCK invalid for SD files" msgstr " VALUE Ǥ" -#: cobc/parser.y:16656 cobc/parser.y:16736 +#: cobc/parser.y:17180 cobc/parser.y:17260 msgid "USE statement must be within DECLARATIVES" msgstr "" -#: cobc/parser.y:16658 +#: cobc/parser.y:17182 msgid "SECTION header missing before USE statement" msgstr "" -#: cobc/parser.y:16738 +#: cobc/parser.y:17262 msgid "USE DEBUGGING not supported in contained program" msgstr "" -#: cobc/parser.y:16786 cobc/parser.y:16795 cobc/parser.y:16813 -#: cobc/parser.y:16849 cobc/typeck.c:4886 +#: cobc/parser.y:17310 cobc/parser.y:17319 cobc/parser.y:17337 +#: cobc/parser.y:17373 cobc/typeck.c:5050 #, fuzzy, c-format msgid "duplicate DEBUGGING target: '%s'" msgstr " VALUE Ǥ" -#: cobc/parser.y:16811 +#: cobc/parser.y:17335 #, fuzzy msgid "constant item cannot be used here" msgstr "`%s' źդޤ" -#: cobc/parser.y:16837 +#: cobc/parser.y:17361 msgid "duplicate USE DEBUGGING ON ALL PROCEDURES" msgstr "" -#: cobc/parser.y:17089 +#: cobc/parser.y:17614 msgid "ENCODING clause must come before XML-DECLARATION" msgstr "" -#: cobc/parser.y:17091 +#: cobc/parser.y:17616 msgid "ENCODING clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17094 +#: cobc/parser.y:17619 msgid "XML GENERATE ENCODING clause" msgstr "" -#: cobc/parser.y:17101 +#: cobc/parser.y:17626 msgid "XML-DECLARATION clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17104 +#: cobc/parser.y:17629 msgid "XML GENERATE XML-DECLARATION clause" msgstr "" -#: cobc/parser.y:17110 +#: cobc/parser.y:17635 msgid "XML GENERATE WITH ATTRIBUTES clause" msgstr "" -#: cobc/parser.y:17123 +#: cobc/parser.y:17648 msgid "XML GENERATE NAMESPACE clause" msgstr "" -#: cobc/parser.y:17147 +#: cobc/parser.y:17672 msgid "XML GENERATE NAME OF clause" msgstr "" -#: cobc/parser.y:17211 +#: cobc/parser.y:17736 msgid "XML GENERATE TYPE OF clause" msgstr "" -#: cobc/parser.y:17252 +#: cobc/parser.y:17777 msgid "XML GENERATE SUPPRESS clause" msgstr "" -#: cobc/parser.y:17392 +#: cobc/parser.y:17920 #, fuzzy, c-format msgid "'%s' is not a schema name" msgstr "`%s' ϥե̾ǤϤޤ" -#: cobc/parser.y:17510 +#: cobc/parser.y:18055 msgid "NOT SIZE ERROR before SIZE ERROR" msgstr "" -#: cobc/parser.y:17556 +#: cobc/parser.y:18109 msgid "NOT OVERFLOW before OVERFLOW" msgstr "" -#: cobc/parser.y:17655 +#: cobc/parser.y:18161 cobc/parser.y:18176 +msgid "NOT AT END before AT END" +msgstr "" + +#: cobc/parser.y:18229 msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" msgstr "" -#: cobc/parser.y:17705 +#: cobc/parser.y:18287 msgid "NOT INVALID KEY before INVALID KEY" msgstr "" -#: cobc/parser.y:18048 +#: cobc/parser.y:18644 #, fuzzy msgid "LINAGE-COUNTER must be qualified here" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:18051 +#: cobc/parser.y:18647 #, fuzzy msgid "invalid LINAGE-COUNTER usage" msgstr " VALUE Ǥ" -#: cobc/parser.y:18062 cobc/parser.y:18158 cobc/parser.y:18247 +#: cobc/parser.y:18658 cobc/parser.y:18754 cobc/parser.y:18843 #, fuzzy, c-format msgid "'%s' is not a file name" msgstr "`%s' ϥե̾ǤϤޤ" -#: cobc/parser.y:18072 +#: cobc/parser.y:18668 #, fuzzy msgid "LINE-COUNTER must be qualified here" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:18076 +#: cobc/parser.y:18672 #, fuzzy msgid "invalid LINE-COUNTER usage" msgstr " VALUE Ǥ" -#: cobc/parser.y:18087 cobc/parser.y:18112 +#: cobc/parser.y:18683 cobc/parser.y:18708 #, fuzzy, c-format msgid "'%s' is not a report name" msgstr "`%s' ϥե̾ǤϤޤ" -#: cobc/parser.y:18097 +#: cobc/parser.y:18693 #, fuzzy msgid "PAGE-COUNTER must be qualified here" msgstr "`%s' Ͻޤ" -#: cobc/parser.y:18101 +#: cobc/parser.y:18697 #, fuzzy msgid "invalid PAGE-COUNTER usage" msgstr " VALUE Ǥ" -#: cobc/parser.y:18148 cobc/typeck.c:12256 cobc/typeck.c:12339 -#: cobc/typeck.c:13516 +#: cobc/parser.y:18744 cobc/typeck.c:13027 cobc/typeck.c:13110 +#: cobc/typeck.c:14322 #, fuzzy, c-format msgid "%s requires a record name as subject" msgstr "`%s' ϥե٥å̾ǤϤޤ" -#: cobc/parser.y:18175 +#: cobc/parser.y:18771 #, fuzzy, c-format msgid "'%s' not indexed" msgstr "`%s' ˤ INDEXED BY ɬפǤ" -#: cobc/parser.y:18180 +#: cobc/parser.y:18776 #, fuzzy msgid "SEARCH ALL requires KEY phrase" msgstr "`%s' %d ĤźɬפȤޤ" -#: cobc/parser.y:18204 cobc/parser.y:18229 +#: cobc/parser.y:18800 cobc/parser.y:18825 #, c-format msgid "multiple reference to '%s' " msgstr "" -#: cobc/parser.y:18259 +#: cobc/parser.y:18855 #, fuzzy, c-format msgid "'%s' is not a CD name" msgstr "`%s' ϥե̾ǤϤޤ" -#: cobc/parser.y:18273 +#: cobc/parser.y:18869 #, fuzzy, c-format msgid "'%s' is not a valid report name" msgstr "`%s' ϥե̾ǤϤޤ" -#: cobc/parser.y:18526 +#: cobc/parser.y:19134 #, fuzzy msgid "invalid mnemonic identifier" msgstr "ʥˡ˥åǤ" -#: cobc/parser.y:18606 +#: cobc/parser.y:19214 +#, fuzzy +msgid "an alphanumeric literal is expected here" +msgstr "ʸɬפǤ" + +#: cobc/parser.y:19226 #, fuzzy msgid "a numeric literal is expected here" msgstr "ʸɬפǤ" -#: cobc/parser.y:18618 cobc/parser.y:19366 +#: cobc/parser.y:19238 cobc/parser.y:19979 #, fuzzy msgid "a non-numeric literal is expected here" msgstr "ʸɬפǤ" -#: cobc/parser.y:18784 cobc/typeck.c:7302 cobc/typeck.c:7309 +#: cobc/parser.y:19404 cobc/typeck.c:993 cobc/typeck.c:4825 cobc/typeck.c:7679 +#: cobc/typeck.c:7686 #, fuzzy, c-format msgid "'%s' is not numeric" msgstr "`%s' ϿܤǤϤޤ" -#: cobc/parser.y:18800 +#: cobc/parser.y:19420 #, fuzzy, c-format msgid "'%s' is not a field or file" msgstr "`%s' ϥե̾ǤϤޤ" -#: cobc/parser.y:18820 cobc/parser.y:18859 cobc/parser.y:18935 -#, fuzzy, c-format -msgid "'%s' is not a field" -msgstr "%s ̤Ǥ" - -#: cobc/parser.y:18841 +#: cobc/parser.y:19446 #, fuzzy, c-format msgid "'%s' is not a type-name" msgstr "`%s' ϥե̾ǤϤޤ" -#: cobc/parser.y:18927 cobc/typeck.c:2328 cobc/typeck.c:2407 +#: cobc/parser.y:19526 cobc/typeck.c:2345 cobc/typeck.c:2401 cobc/typeck.c:2550 #, fuzzy, c-format msgid "'%s' cannot be reference modified" msgstr "`%s' ʬȤǤޤ" -#: cobc/parser.y:19015 +#: cobc/parser.y:19627 #, fuzzy, c-format msgid "'%s' is not a field or alphabet" msgstr "`%s' ϥե̾ǤϤޤ" -#: cobc/parser.y:19041 +#: cobc/parser.y:19653 #, fuzzy msgid "a subscripted data-item cannot be used here" msgstr "`%s' źդޤ" -#: cobc/parser.y:19089 +#: cobc/parser.y:19701 #, fuzzy msgid "unsigned integer value expected" msgstr "ͤɬפǤ" -#: cobc/parser.y:19101 cobc/parser.y:19105 cobc/parser.y:19155 +#: cobc/parser.y:19713 cobc/parser.y:19717 cobc/parser.y:19767 #, fuzzy msgid "integer value expected" msgstr "ͤɬפǤ" -#: cobc/parser.y:19110 +#: cobc/parser.y:19722 #, fuzzy msgid "invalid symbolic integer" msgstr " VALUE Ǥ" -#: cobc/parser.y:19126 cobc/parser.y:19130 +#: cobc/parser.y:19738 cobc/parser.y:19742 #, fuzzy msgid "unsigned positive integer value expected" msgstr "ͤɬפǤ" -#: cobc/parser.y:19159 -#, fuzzy -msgid "invalid CLASS value" -msgstr " VALUE Ǥ" +#: cobc/parser.y:19772 +#, c-format +msgid "CLASS value %d outside of range for the used character set" +msgstr "" -#: cobc/parser.y:19246 +#: cobc/parser.y:19859 msgid "PHYSICAL argument for LENGTH functions" msgstr "" -#: cobc/parser.y:19418 cobc/parser.y:19435 +#: cobc/parser.y:20031 cobc/parser.y:20048 msgid "cannot specify offset and SYSTEM-OFFSET at the same time" msgstr "" -#: cobc/parser.y:19702 cobc/parser.y:19711 cobc/parser.y:19721 -#: cobc/parser.y:19731 cobc/parser.y:19751 cobc/parser.y:19771 -#: cobc/parser.y:19777 +#: cobc/parser.y:20228 +msgid "terminator" +msgstr "" + +#: cobc/parser.y:20317 cobc/parser.y:20327 cobc/parser.y:20338 +#: cobc/parser.y:20348 cobc/parser.y:20369 cobc/parser.y:20389 +#: cobc/parser.y:20396 msgid "optional period" msgstr "" -#: cobc/pplex.l:257 cobc/pplex.l:2219 cobc/pplex.l:2233 +#: cobc/pplex.l:261 cobc/pplex.l:2448 cobc/pplex.l:2462 msgid "debugging indicator" msgstr "" -#: cobc/pplex.l:334 +#: cobc/pplex.l:348 #, fuzzy msgid "ignoring empty directive" msgstr "ޥʥ̵뤵ޤ" -#: cobc/pplex.l:344 cobc/pplex.l:411 +#: cobc/pplex.l:358 cobc/pplex.l:431 #, fuzzy, c-format msgid "ignoring invalid directive: '%s'" msgstr "ޥʥ̵뤵ޤ" -#: cobc/pplex.l:351 +#: cobc/pplex.l:365 #, fuzzy msgid "ignoring invalid directive" msgstr "ޥʥ̵뤵ޤ" -#: cobc/pplex.l:358 +#: cobc/pplex.l:372 #, fuzzy msgid "VCS directive" msgstr " VALUE Ǥ" -#: cobc/pplex.l:420 cobc/pplex.l:441 +#: cobc/pplex.l:440 cobc/pplex.l:461 #, fuzzy, c-format msgid "ignoring unknown directive: '%s'" msgstr "ޥʥ̵뤵ޤ" -#: cobc/pplex.l:1065 +#: cobc/pplex.l:1164 msgid "IF/ELIF/ELSE directive without matching END-IF" msgstr "" -#: cobc/pplex.l:1409 +#: cobc/pplex.l:1332 +msgid "free format detected" +msgstr "" + +#: cobc/pplex.l:1608 #, c-format msgid "copybook not found in library '%s', library-name ignored" msgstr "" -#: cobc/pplex.l:1469 +#: cobc/pplex.l:1667 #, fuzzy, c-format msgid "ignoring %s directive because of %s" msgstr "ޥʥ̵뤵ޤ" -#: cobc/pplex.l:1645 +#: cobc/pplex.l:1854 #, fuzzy, c-format msgid "directive nest depth exceeded: %d" msgstr "`%s' ϼƤޤ" -#: cobc/pplex.l:1663 +#: cobc/pplex.l:1872 msgid "ELSE directive without matching IF/ELIF" msgstr "" -#: cobc/pplex.l:1679 +#: cobc/pplex.l:1888 msgid "END-IF directive without matching IF/ELIF/ELSE" msgstr "" -#: cobc/pplex.l:1695 +#: cobc/pplex.l:1904 msgid "ELIF directive without matching IF/ELIF" msgstr "" -#: cobc/pplex.l:1717 +#: cobc/pplex.l:1926 #, fuzzy, c-format msgid "invalid internal case: %u" msgstr "ͤ礭ܤ礭ۤƤޤ" -#: cobc/pplex.l:1914 +#: cobc/pplex.l:2139 msgid "buffer overrun - too many continuation lines" msgstr "" -#: cobc/pplex.l:2009 cobc/pplex.l:2019 +#: cobc/pplex.l:2236 cobc/pplex.l:2246 #, fuzzy msgid "line not terminated by a newline" msgstr "ե뤬ԤǽäƤޤ" -#: cobc/pplex.l:2013 cobc/pplex.l:2023 +#: cobc/pplex.l:2240 cobc/pplex.l:2250 #, c-format msgid "source text exceeds %d bytes, will be truncated" msgstr "" -#: cobc/pplex.l:2042 +#: cobc/pplex.l:2269 msgid "version control conflict marker in file" msgstr "" -#: cobc/pplex.l:2194 +#: cobc/pplex.l:2423 #, fuzzy msgid "invalid continuation in comment entry" msgstr "ʹϢǤ" -#: cobc/pplex.l:2241 +#: cobc/pplex.l:2470 #, fuzzy, c-format msgid "invalid indicator '\\' at column %d" msgstr "7 ܤʻؼҤǤ `%c'" -#: cobc/pplex.l:2253 +#: cobc/pplex.l:2482 #, fuzzy, c-format msgid "invalid indicator '%c' at column %d" msgstr "7 ܤʻؼҤǤ `%c'" -#: cobc/pplex.l:2312 cobc/pplex.l:2323 +#: cobc/pplex.l:2541 cobc/pplex.l:2552 #, fuzzy msgid "invalid line continuation" msgstr "ʹϢǤ" -#: cobc/pplex.l:2331 +#: cobc/pplex.l:2560 msgid "continuation character expected" msgstr "" -#: cobc/pplex.l:2399 +#: cobc/pplex.l:2628 #, fuzzy, c-format msgid "source text after program-text area (column %d)" msgstr "Ԥ %d ۤƤޤ" -#: cobc/ppparse.y:107 +#: cobc/ppparse.y:102 cobc/ppparse.y:106 +msgid "partial replacing with literal" +msgstr "" + +#: cobc/ppparse.y:109 msgid "unexpected COBOL word in partial replacement phrase" msgstr "" -#: cobc/ppparse.y:256 +#: cobc/ppparse.y:176 +#, fuzzy +msgid "invalid partial replacing operand" +msgstr " X Ǥ: %s" + +#: cobc/ppparse.y:291 msgid "directive comparison on different types" msgstr "" -#: cobc/ppparse.y:324 +#: cobc/ppparse.y:359 #, fuzzy, c-format msgid "duplicate DEFINE directive '%s'" msgstr " VALUE Ǥ" -#: cobc/ppparse.y:331 cobc/ppparse.y:341 +#: cobc/ppparse.y:366 cobc/ppparse.y:376 #, fuzzy, c-format msgid "invalid constant %s in DEFINE directive" msgstr " VALUE Ǥ" -#: cobc/ppparse.y:439 +#: cobc/ppparse.y:474 #, c-format msgid "compiler flag '%s' unknown" msgstr "" -#: cobc/ppparse.y:486 +#: cobc/ppparse.y:521 #, fuzzy, c-format msgid "invalid %s directive option '%s'" msgstr " VALUE Ǥ" -#: cobc/ppparse.y:488 +#: cobc/ppparse.y:523 #, fuzzy, c-format msgid "invalid %s directive option" msgstr " VALUE Ǥ" -#: cobc/ppparse.y:839 cobc/ppparse.y:848 cobc/ppparse.y:1258 +#: cobc/ppparse.y:875 cobc/ppparse.y:884 cobc/ppparse.y:1294 #, fuzzy, c-format msgid "invalid %s directive" msgstr " VALUE Ǥ" -#: cobc/ppparse.y:1330 +#: cobc/ppparse.y:1366 #, fuzzy msgid "LEAP-SECOND ON directive" msgstr "ޥʥ̵뤵ޤ" -#: cobc/ppparse.y:1439 cobc/ppparse.y:1471 +#: cobc/ppparse.y:1475 cobc/ppparse.y:1507 #, fuzzy msgid "invalid constant" msgstr "ʿǤ" -#: cobc/reserved.c:4012 +#: cobc/reserved.c:4029 #, fuzzy msgid "device name" msgstr "ʥˡ˥åǤ" -#: cobc/reserved.c:4015 +#: cobc/reserved.c:4032 msgid "switch name" msgstr "" -#: cobc/reserved.c:4018 +#: cobc/reserved.c:4035 msgid "feature name" msgstr "" -#: cobc/reserved.c:4129 +#: cobc/reserved.c:4146 #, c-format msgid "reserved word (%s) must have less than %d characters" msgstr "" -#: cobc/reserved.c:4149 +#: cobc/reserved.c:4166 #, c-format msgid "reserved word (%s) may not contain '%c'" msgstr "" -#: cobc/reserved.c:4166 +#: cobc/reserved.c:4183 msgid "ignored asterisk at end of alias target" msgstr "" -#: cobc/reserved.c:4229 +#: cobc/reserved.c:4248 #, c-format msgid "alias target '%s' is not a default reserved word" msgstr "" -#: cobc/reserved.c:4719 +#: cobc/reserved.c:4738 #, fuzzy, c-format msgid "invalid system-name '%s'" msgstr "ʥƥ̾Ǥ `%s'" -#: cobc/reserved.c:4883 +#: cobc/reserved.c:4902 #, c-format msgid "'%s' is a reserved word, but isn't supported" msgstr "" -#: cobc/reserved.c:4988 +#: cobc/reserved.c:5005 #, fuzzy, c-format msgid "intrinsic function %s is unknown" msgstr "`%s' ǤϤޤ" -#: cobc/reserved.c:5016 +#: cobc/reserved.c:5033 #, fuzzy msgid "Intrinsic Function" msgstr "`%s' ǤϤޤ" -#: cobc/reserved.c:5016 cobc/reserved.c:5249 cobc/reserved.c:5386 +#: cobc/reserved.c:5033 cobc/reserved.c:5266 cobc/reserved.c:5403 #, fuzzy msgid "Implemented" msgstr "`%s' ϼƤޤ" -#: cobc/reserved.c:5016 cobc/typeck.c:1163 +#: cobc/reserved.c:5033 cobc/typeck.c:1178 msgid "Parameters" msgstr "" -#: cobc/reserved.c:5020 cobc/reserved.c:5253 cobc/reserved.c:5400 -#: cobc/reserved.c:5406 +#: cobc/reserved.c:5037 cobc/reserved.c:5270 cobc/reserved.c:5417 +#: cobc/reserved.c:5423 msgid "Yes" msgstr "" -#: cobc/reserved.c:5023 cobc/reserved.c:5256 cobc/reserved.c:5410 +#: cobc/reserved.c:5040 cobc/reserved.c:5273 cobc/reserved.c:5427 msgid "No" msgstr "" -#: cobc/reserved.c:5029 +#: cobc/reserved.c:5046 msgid "Unlimited" msgstr "" -#: cobc/reserved.c:5046 +#: cobc/reserved.c:5063 msgid "Exception Name" msgstr "" -#: cobc/reserved.c:5148 +#: cobc/reserved.c:5165 #, c-format msgid "special register '%s' is unknown, needs a definition" msgstr "" -#: cobc/reserved.c:5155 +#: cobc/reserved.c:5172 #, c-format msgid "special register '%s' has a bad definition: %s" msgstr "" -#: cobc/reserved.c:5159 +#: cobc/reserved.c:5176 #, c-format msgid "special register '%s' is unknown" msgstr "" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Internal registers" msgstr "" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 #, fuzzy msgid "Definition" msgstr "`%s' Ƥޤ" -#: cobc/reserved.c:5337 +#: cobc/reserved.c:5354 #, fuzzy, c-format msgid "unknown system-name '%s'" msgstr "Τ褦ʸϤޤ `%s'" -#: cobc/reserved.c:5363 +#: cobc/reserved.c:5380 #, fuzzy msgid "System names" msgstr "ʥˡ˥åǤ" -#: cobc/reserved.c:5386 +#: cobc/reserved.c:5403 msgid "Reserved Words" msgstr "" -#: cobc/reserved.c:5398 +#: cobc/reserved.c:5415 msgid "Yes (Context sensitive)" msgstr "" -#: cobc/reserved.c:5408 +#: cobc/reserved.c:5425 msgid "No (Context sensitive)" msgstr "" -#: cobc/scanner.l:272 +#: cobc/scanner.l:281 #, c-format msgid "'%s' is not a reserved word, so cannot be removed" msgstr "" -#: cobc/scanner.l:320 +#: cobc/scanner.l:329 msgid "separator period in Area A" msgstr "" -#: cobc/scanner.l:1067 +#: cobc/scanner.l:1096 #, fuzzy, c-format msgid "a constant may not be used here - '%s'" msgstr "`%s' źդޤ" -#: cobc/scanner.l:1137 +#: cobc/scanner.l:1170 msgid "ignoring redundant ." msgstr "" -#: cobc/scanner.l:1195 +#: cobc/scanner.l:1249 #, c-format msgid "invalid symbol '%s' - skipping word" msgstr "" -#: cobc/scanner.l:1289 +#: cobc/scanner.l:1323 #, fuzzy msgid "invalid national literal" msgstr " X Ǥ: %s" -#: cobc/scanner.l:1293 cobc/tree.c:2800 +#: cobc/scanner.l:1327 cobc/tree.c:2822 #, fuzzy, c-format msgid "invalid literal: '%s'" msgstr " H Ǥ: %s" -#: cobc/scanner.l:1295 +#: cobc/scanner.l:1329 #, fuzzy, c-format msgid "invalid hexadecimal literal: '%s'" msgstr " X Ǥ: %s" -#: cobc/scanner.l:1297 cobc/tree.c:1779 +#: cobc/scanner.l:1331 cobc/tree.c:1803 #, fuzzy, c-format msgid "invalid numeric literal: '%s'" msgstr "ʿǤ" -#: cobc/scanner.l:1299 +#: cobc/scanner.l:1333 #, fuzzy, c-format msgid "invalid floating-point literal: '%s'" msgstr "ʿǤ" -#: cobc/scanner.l:1301 +#: cobc/scanner.l:1335 cobc/scanner.l:1337 #, fuzzy, c-format msgid "invalid %s literal: '%s'" msgstr " X Ǥ: %s" -#: cobc/scanner.l:1350 +#: cobc/scanner.l:1365 +#, c-format +msgid "character code %s out of encoding range %s" +msgstr "" + +#: cobc/scanner.l:1422 +msgid "extraneous separator ',' at end of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1435 +msgid "extraneous character ',' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1440 +#, c-format +msgid "invalid character '%c' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1470 #, fuzzy, c-format msgid "literal length exceeds %u characters" msgstr "쥳Ĺû᤮ޤ `%s'" -#: cobc/scanner.l:1365 +#: cobc/scanner.l:1485 #, c-format msgid "missing terminating %c character" msgstr "" -#: cobc/scanner.l:1382 cobc/scanner.l:1444 cobc/scanner.l:1729 +#: cobc/scanner.l:1502 cobc/scanner.l:1569 cobc/scanner.l:1868 #, fuzzy msgid "zero-length literal" msgstr "ʿǤ" -#: cobc/scanner.l:1385 +#: cobc/scanner.l:1505 #, fuzzy msgid "national literal has zero length; a SPACE will be assumed" msgstr "ʸɬפǤ" -#: cobc/scanner.l:1386 +#: cobc/scanner.l:1506 #, fuzzy msgid "alphanumeric literal has zero length; a SPACE will be assumed" msgstr "ʸɬפǤ" -#: cobc/scanner.l:1412 cobc/scanner.l:1413 cobc/scanner.l:1417 -#: cobc/scanner.l:1494 +#: cobc/scanner.l:1519 +msgid "UTF-8 literal" +msgstr "" + +#: cobc/scanner.l:1536 cobc/scanner.l:1537 cobc/scanner.l:1541 +#: cobc/scanner.l:1624 #, fuzzy msgid "national literal" msgstr " H Ǥ: %s" -#: cobc/scanner.l:1416 +#: cobc/scanner.l:1540 #, fuzzy msgid "national-character literal" msgstr " H Ǥ: %s" -#: cobc/scanner.l:1447 +#: cobc/scanner.l:1571 #, fuzzy msgid "hexadecimal literal has zero length; X'00' will be assumed" msgstr "ʸɬפǤ" -#: cobc/scanner.l:1472 +#: cobc/scanner.l:1575 cobc/scanner.l:1601 #, fuzzy msgid "hexadecimal-boolean literal" msgstr "ʿǤ" -#: cobc/scanner.l:1480 cobc/scanner.l:1499 cobc/scanner.l:1608 -#: cobc/scanner.l:1659 cobc/scanner.l:1754 cobc/scanner.l:1824 -#, fuzzy, c-format -msgid "literal length %lu exceeds %u characters" -msgstr "쥳Ĺû᤮ޤ `%s'" - -#: cobc/scanner.l:1490 +#: cobc/scanner.l:1579 cobc/scanner.l:1619 #, fuzzy msgid "hexadecimal-national literal" msgstr " X Ǥ: %s" -#: cobc/scanner.l:1521 cobc/scanner.l:1551 cobc/scanner.l:1674 -#: cobc/scanner.l:1771 cobc/scanner.l:1835 +#: cobc/scanner.l:1609 cobc/scanner.l:1629 cobc/scanner.l:1744 +#: cobc/scanner.l:1798 cobc/scanner.l:1893 cobc/scanner.l:1963 +#, fuzzy, c-format +msgid "literal length %lu exceeds %u characters" +msgstr "쥳Ĺû᤮ޤ `%s'" + +#: cobc/scanner.l:1651 cobc/scanner.l:1680 cobc/scanner.l:1813 +#: cobc/scanner.l:1910 cobc/scanner.l:1974 #, fuzzy, c-format msgid "literal contains invalid character '%c'" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/scanner.l:1573 +#: cobc/scanner.l:1704 #, fuzzy, c-format msgid "literal does not have an even number of digits" msgstr "쥳Ĺû᤮ޤ `%s'" -#: cobc/scanner.l:1599 +#: cobc/scanner.l:1735 cobc/scanner.l:1788 #, fuzzy, c-format msgid "%s literals must contain at least one character" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/scanner.l:1639 cobc/scanner.l:1739 cobc/scanner.l:1813 +#: cobc/scanner.l:1775 cobc/scanner.l:1878 cobc/scanner.l:1952 #, fuzzy msgid "ACUCOBOL numeric literal" msgstr "ʿǤ" -#: cobc/scanner.l:1651 -#, fuzzy -msgid "H literals must contain at least one character" -msgstr "%s 礬ե `%s' ɬפǤ" - -#: cobc/scanner.l:1690 cobc/scanner.l:1783 cobc/scanner.l:1846 +#: cobc/scanner.l:1829 cobc/scanner.l:1922 cobc/scanner.l:1985 #, fuzzy, c-format msgid "literal exceeds limit %u" msgstr "ͤ礭ܤ礭ۤƤޤ" -#: cobc/scanner.l:1724 +#: cobc/scanner.l:1863 #, fuzzy msgid "numeric boolean literal" msgstr "ʿǤ" -#: cobc/scanner.l:1731 +#: cobc/scanner.l:1870 #, fuzzy -msgid "Boolean literal has zero length; B'0' will be assumed" +msgid "boolean literal has zero length; B'0' will be assumed" msgstr "ʸɬפǤ" -#: cobc/scanner.l:1807 +#: cobc/scanner.l:1946 #, fuzzy msgid "HP COBOL octal literal" msgstr "ʿǤ" -#: cobc/scanner.l:1921 +#: cobc/scanner.l:2059 #, fuzzy, c-format msgid "literal length %lu exceeds maximum of %u digits" msgstr "쥳Ĺû᤮ޤ `%s'" -#: cobc/scanner.l:1927 +#: cobc/scanner.l:2065 #, fuzzy, c-format msgid "literal length %lu exceeds %u digits" msgstr "쥳Ĺû᤮ޤ `%s'" -#: cobc/scanner.l:2039 cobc/tree.c:3845 +#: cobc/scanner.l:2177 cobc/tree.c:3888 #, fuzzy, c-format msgid "significand has more than %d digits" msgstr "18 ۤܤϵޤ" -#: cobc/scanner.l:2044 +#: cobc/scanner.l:2182 #, c-format msgid "exponent has decimal point" msgstr "" -#: cobc/scanner.l:2050 cobc/tree.c:3853 +#: cobc/scanner.l:2188 cobc/tree.c:3896 #, c-format msgid "exponent has more than 4 digits" msgstr "" -#: cobc/scanner.l:2080 +#: cobc/scanner.l:2218 #, c-format msgid "exponent not between -6143 and 6144" msgstr "" -#: cobc/scanner.l:2089 +#: cobc/scanner.l:2227 #, c-format msgid "significand of 0 must be positive" msgstr "" -#: cobc/scanner.l:2094 +#: cobc/scanner.l:2232 #, c-format msgid "exponent of 0 must be 0" msgstr "" -#: cobc/scanner.l:2099 +#: cobc/scanner.l:2237 #, c-format msgid "exponent of 0 must be positive" msgstr "" -#: cobc/scanner.l:2261 +#: cobc/scanner.l:2399 #, fuzzy, c-format msgid "invalid CONSTANT: %s" msgstr "ʿǤ" -#: cobc/scanner.l:2271 +#: cobc/scanner.l:2409 #, fuzzy, c-format msgid "invalid alphanumeric CONSTANT: %s" msgstr "ʿǤ" -#: cobc/scanner.l:2275 +#: cobc/scanner.l:2413 #, fuzzy, c-format msgid "empty alphanumeric CONSTANT: %s" msgstr "ʿǤ" -#: cobc/scanner.l:2292 cobc/scanner.l:2300 cobc/scanner.l:2305 +#: cobc/scanner.l:2430 cobc/scanner.l:2438 cobc/scanner.l:2443 #, fuzzy, c-format msgid "invalid numeric CONSTANT: %s" msgstr "ʿǤ" -#: cobc/scanner.l:2384 cobc/scanner.l:2411 +#: cobc/scanner.l:2522 cobc/scanner.l:2549 #, c-format msgid "'%s' is not a default reserved word, so cannot be aliased" msgstr "" -#: cobc/scanner.l:2387 +#: cobc/scanner.l:2525 #, c-format msgid "'%s' is already reserved" msgstr "" -#: cobc/scanner.l:2389 +#: cobc/scanner.l:2527 msgid "you may want MAKESYN instead" msgstr "" -#: cobc/scanner.l:2414 +#: cobc/scanner.l:2552 #, fuzzy, c-format msgid "'%s' is not a reserved word" msgstr "`%s' ϥե̾ǤϤޤ" -#: cobc/scanner.l:2415 +#: cobc/scanner.l:2553 msgid "you may want ADDSYN or OVERRIDE instead" msgstr "" -#: cobc/tree.c:391 +#: cobc/tree.c:392 #, fuzzy, c-format msgid "%s clause is required for file '%s'" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/tree.c:395 +#: cobc/tree.c:396 #, fuzzy, c-format msgid "%s clause is invalid for file '%s' (file type)" msgstr "`%s' Ͻޤ" -#: cobc/tree.c:399 +#: cobc/tree.c:400 #, fuzzy, c-format msgid "%s clause is invalid for file '%s'" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/tree.c:426 +#: cobc/tree.c:427 #, c-format msgid "FOR item '%s' is a record" msgstr "" -#: cobc/tree.c:435 +#: cobc/tree.c:436 #, c-format msgid "FOR item '%s' is in different record to '%s'" msgstr "" -#: cobc/tree.c:444 +#: cobc/tree.c:445 #, c-format msgid "FOR item '%s' is not in a record associated with '%s'" msgstr "" -#: cobc/tree.c:558 +#: cobc/tree.c:559 msgid "internal error node" msgstr "" -#: cobc/tree.c:560 +#: cobc/tree.c:561 #, fuzzy msgid "unknown constant" msgstr "Τ褦ʸϤޤ `%s'" -#: cobc/tree.c:571 +#: cobc/tree.c:572 #, fuzzy, c-format msgid "literal \"%s\"" msgstr " H Ǥ: %s" -#: cobc/tree.c:842 -#, fuzzy, c-format -msgid "FUNCTION %s has invalid/not supported arguments - tag %d" -msgstr "`%s' ʬȤǤޤ" - -#: cobc/tree.c:963 +#: cobc/tree.c:969 #, fuzzy, c-format msgid "invalid date/time function: '%d'" msgstr " PICTURE Ǥ" -#: cobc/tree.c:995 +#: cobc/tree.c:1001 #, fuzzy, c-format msgid "FUNCTION '%s' has invalid date/time format" msgstr "`%s' ʬȤǤޤ" -#: cobc/tree.c:1002 +#: cobc/tree.c:1008 #, fuzzy, c-format msgid "FUNCTION '%s' has format in variable" msgstr "`%s' ʬȤǤޤ" -#: cobc/tree.c:1482 +#: cobc/tree.c:1488 #, c-format msgid "unknown tree tag: %d, category: %d" msgstr "" -#: cobc/tree.c:1577 +#: cobc/tree.c:1590 #, fuzzy, c-format msgid "unexpected numeric USAGE: %d" msgstr "ʿǤ" -#: cobc/tree.c:1591 +#: cobc/tree.c:1604 #, fuzzy, c-format msgid "unexpected category: %d" msgstr "ʿǤ" -#: cobc/tree.c:1790 +#: cobc/tree.c:1814 #, fuzzy, c-format msgid "literal length %d exceeds maximum of %d digits" msgstr "쥳Ĺû᤮ޤ `%s'" -#: cobc/tree.c:1795 +#: cobc/tree.c:1819 #, fuzzy, c-format msgid "literal length %d exceeds %d digits" msgstr "쥳Ĺû᤮ޤ `%s'" -#: cobc/tree.c:1844 cobc/tree.c:1856 cobc/tree.c:1913 cobc/tree.c:1963 +#: cobc/tree.c:1868 cobc/tree.c:1880 cobc/tree.c:1937 cobc/tree.c:1987 #, fuzzy, c-format msgid "numeric literal '%s' exceeds limit '%s'" msgstr "ͤ礭ܤ礭ۤƤޤ" -#: cobc/tree.c:2655 +#: cobc/tree.c:2676 #, fuzzy msgid "invalid LOCALE literal" msgstr " X Ǥ: %s" -#: cobc/tree.c:2782 +#: cobc/tree.c:2803 #, fuzzy msgid "only literals with the same category can be concatenated" msgstr "ʸɬפǤ" -#: cobc/tree.c:2789 +#: cobc/tree.c:2811 #, fuzzy -msgid "only alphanumeric, national or boolean literals may be concatenated" +msgid "only alphanumeric, utf-8, national or boolean literals may be concatenated" msgstr "ʸɬפǤ" -#: cobc/tree.c:2801 +#: cobc/tree.c:2823 #, fuzzy, c-format msgid "literal length %d exceeds %d characters" msgstr "쥳Ĺû᤮ޤ `%s'" -#: cobc/tree.c:3078 +#: cobc/tree.c:3103 msgid "B, 0 or /" msgstr "" -#: cobc/tree.c:3092 +#: cobc/tree.c:3117 msgid "the sign of the floating-point exponent" msgstr "" -#: cobc/tree.c:3094 +#: cobc/tree.c:3119 msgid "a leading +/- sign" msgstr "" -#: cobc/tree.c:3096 +#: cobc/tree.c:3121 msgid "a trailing +/- sign" msgstr "" -#: cobc/tree.c:3098 +#: cobc/tree.c:3123 msgid "CR or DB" msgstr "" -#: cobc/tree.c:3100 +#: cobc/tree.c:3125 msgid "a leading currency symbol" msgstr "" -#: cobc/tree.c:3102 +#: cobc/tree.c:3127 msgid "a trailing currency symbol" msgstr "" -#: cobc/tree.c:3104 +#: cobc/tree.c:3129 msgid "a Z or * which is before the decimal point" msgstr "" -#: cobc/tree.c:3106 +#: cobc/tree.c:3131 msgid "a Z or * which is after the decimal point" msgstr "" -#: cobc/tree.c:3108 +#: cobc/tree.c:3133 msgid "a floating +/- string which is before the decimal point" msgstr "" -#: cobc/tree.c:3110 +#: cobc/tree.c:3135 msgid "a floating +/- string which is after the decimal point" msgstr "" -#: cobc/tree.c:3112 +#: cobc/tree.c:3137 msgid "a floating currency symbol string which is before the decimal point" msgstr "" -#: cobc/tree.c:3114 +#: cobc/tree.c:3139 msgid "a floating currency symbol string which is after the decimal point" msgstr "" -#: cobc/tree.c:3118 +#: cobc/tree.c:3143 msgid "A or X" msgstr "" -#: cobc/tree.c:3126 +#: cobc/tree.c:3151 msgid "a P which is before the decimal point" msgstr "" -#: cobc/tree.c:3128 +#: cobc/tree.c:3153 msgid "a P which is after the decimal point" msgstr "" -#: cobc/tree.c:3149 cobc/tree.c:3599 +#: cobc/tree.c:3176 cobc/tree.c:3638 #, c-format msgid "%s may only occur once in a PICTURE string" msgstr "" -#: cobc/tree.c:3151 cobc/tree.c:3541 +#: cobc/tree.c:3178 cobc/tree.c:3570 #, fuzzy, c-format msgid "%s cannot follow %s" msgstr "`%s' Ͻޤ" -#: cobc/tree.c:3154 +#: cobc/tree.c:3181 #, fuzzy msgid "invalid PICTURE string detected" msgstr "ʥץǤ -std=%s\n" -#: cobc/tree.c:3271 +#: cobc/tree.c:3299 msgid "number or constant in parentheses is not an unsigned integer" msgstr "" -#: cobc/tree.c:3280 +#: cobc/tree.c:3308 #, c-format msgid "only up to %d significant digits are permitted within parentheses" msgstr "" -#: cobc/tree.c:3288 +#: cobc/tree.c:3316 msgid "number or constant in parentheses must be greater than zero" msgstr "" -#: cobc/tree.c:3299 +#: cobc/tree.c:3327 msgid "parentheses must be preceded by a picture symbol" msgstr "" -#: cobc/tree.c:3329 +#: cobc/tree.c:3353 msgid "unbalanced parentheses" msgstr "" -#: cobc/tree.c:3337 +#: cobc/tree.c:3361 msgid "parentheses must contain an unsigned integer" msgstr "" -#: cobc/tree.c:3375 +#: cobc/tree.c:3409 #, fuzzy, c-format msgid "'%s' is not a constant-name" msgstr "`%s' ϥե̾ǤϤޤ" -#: cobc/tree.c:3382 -#, fuzzy, c-format -msgid "'%s' is not a numeric literal" -msgstr "`%s' ϿͤǤϤޤ" - -#: cobc/tree.c:3386 +#: cobc/tree.c:3422 #, fuzzy, c-format -msgid "'%s' is not an integer" +msgid "'%s' is not an unsigned positive integer" msgstr "`%s' ǤϤޤ" -#: cobc/tree.c:3390 -#, fuzzy, c-format -msgid "'%s' is not unsigned" -msgstr "%s ̤Ǥ" - -#: cobc/tree.c:3450 +#: cobc/tree.c:3479 msgid "missing PICTURE string" msgstr "" -#: cobc/tree.c:3479 +#: cobc/tree.c:3508 msgid "C must be followed by R" msgstr "" -#: cobc/tree.c:3482 +#: cobc/tree.c:3511 msgid "D must be followed by B" msgstr "" -#: cobc/tree.c:3497 cobc/tree.c:3596 cobc/tree.c:3622 cobc/tree.c:3733 +#: cobc/tree.c:3526 cobc/tree.c:3635 cobc/tree.c:3661 cobc/tree.c:3773 msgid "uncommon parentheses" msgstr "" -#: cobc/tree.c:3541 +#: cobc/tree.c:3570 msgid "exponent" msgstr "" -#: cobc/tree.c:3586 +#: cobc/tree.c:3625 msgid "L must be at start of PICTURE string" msgstr "" -#: cobc/tree.c:3604 +#: cobc/tree.c:3643 msgid "S must be at start of PICTURE string" msgstr "" -#: cobc/tree.c:3660 +#: cobc/tree.c:3699 msgid "P must be at start or end of PICTURE string" msgstr "" -#: cobc/tree.c:3690 +#: cobc/tree.c:3730 msgid "cannot have both Z and * in PICTURE string" msgstr "" -#: cobc/tree.c:3768 +#: cobc/tree.c:3808 #, fuzzy, c-format msgid "invalid PICTURE character '%c'" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/tree.c:3798 +#: cobc/tree.c:3841 #, c-format msgid "PICTURE string may not contain more than %d characters; contains %d characters" msgstr "" -#: cobc/tree.c:3803 -msgid "PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" +#: cobc/tree.c:3846 +msgid "PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" msgstr "" -#: cobc/tree.c:3830 +#: cobc/tree.c:3873 #, fuzzy, c-format msgid "numeric field cannot be larger than %d digits" msgstr "18 ۤܤϵޤ" -#: cobc/tree.c:4267 +#: cobc/tree.c:4333 #, fuzzy, c-format msgid "needs PICTURE clause for SUM %s" msgstr "`%s' ˤ PICTURE 礬ɬפǤ" -#: cobc/tree.c:4274 +#: cobc/tree.c:4340 #, fuzzy, c-format msgid "non-numeric PICTURE clause for SUM %s" msgstr "`%s' ˤ PICTURE 礬ɬפǤ" -#: cobc/tree.c:4346 cobc/tree.c:4359 +#: cobc/tree.c:4412 cobc/tree.c:4425 #, c-format msgid "no DETAIL line defined in report %s" msgstr "" -#: cobc/tree.c:4361 +#: cobc/tree.c:4427 msgid "PAGE LIMIT FIRST DETAIL should be >= HEADING" msgstr "" -#: cobc/tree.c:4364 +#: cobc/tree.c:4430 msgid "PAGE LIMIT FOOTING should be >= HEADING" msgstr "" -#: cobc/tree.c:4366 +#: cobc/tree.c:4432 msgid "PAGE LIMIT LAST DETAIL should be >= FIRST DETAIL" msgstr "" -#: cobc/tree.c:4368 +#: cobc/tree.c:4434 msgid "PAGE LIMIT FOOTING should be >= LAST DETAIL" msgstr "" -#: cobc/tree.c:4370 +#: cobc/tree.c:4436 msgid "PAGE LIMIT LINES should be >= FOOTING" msgstr "" -#: cobc/tree.c:4563 libcob/fileio.c:8999 +#: cobc/tree.c:4631 libcob/fileio.c:9358 #, c-format msgid "maximum keys (%d/%d) exceeded for file '%s'" msgstr "" -#: cobc/tree.c:4627 cobc/tree.c:4650 +#: cobc/tree.c:4695 cobc/tree.c:4718 #, fuzzy, c-format msgid "invalid KEY item '%s', not in file '%s'" msgstr " X Ǥ: %s" -#: cobc/tree.c:4661 +#: cobc/tree.c:4729 #, c-format msgid "minimal record length %d can not hold the key item '%s'; needs to be at least %d" msgstr "" -#: cobc/tree.c:4696 +#: cobc/tree.c:4764 #, c-format msgid "missing file description for %s" msgstr "" -#: cobc/tree.c:4745 +#: cobc/tree.c:4813 #, fuzzy, c-format msgid "size of record '%s' (%d) smaller than minimum of file '%s' (%d)" msgstr "`%s' Υ `%s' ΥۤƤޤ" -#: cobc/tree.c:4748 cobc/tree.c:4765 +#: cobc/tree.c:4816 cobc/tree.c:4833 msgid "file size adjusted" msgstr "" -#: cobc/tree.c:4760 +#: cobc/tree.c:4828 #, fuzzy, c-format msgid "size of record '%s' (%d) larger than maximum of file '%s' (%d)" msgstr "`%s' Υ `%s' ΥۤƤޤ" -#: cobc/tree.c:4793 +#: cobc/tree.c:4861 msgid "RECORD VARYING specified without limits, but implied limits are equal" msgstr "" -#: cobc/tree.c:4795 +#: cobc/tree.c:4863 #, fuzzy, c-format #| msgid "%s ignored" msgid "%s clause ignored" msgstr "%s ̵뤷ޤ" -#: cobc/tree.c:4890 cobc/typeck.c:7695 cobc/typeck.c:14389 cobc/typeck.c:14441 -#: cobc/typeck.c:14477 libcob/fileio.c:4598 libcob/screenio.c:3720 -#: libcob/screenio.c:3750 +#: cobc/tree.c:4958 cobc/typeck.c:8128 cobc/typeck.c:15186 cobc/typeck.c:15238 +#: cobc/typeck.c:15275 libcob/fileio.c:4724 libcob/screenio.c:4613 +#: libcob/screenio.c:4639 #, fuzzy, c-format msgid "runtime is not configured to support %s" msgstr "ʹϢǤ" -#: cobc/tree.c:5395 +#: cobc/tree.c:5474 #, fuzzy, c-format msgid "literal '%.38s' is longer than '%s'" msgstr "`%s' Υ `%s' ΥۤƤޤ" -#: cobc/tree.c:5399 +#: cobc/tree.c:5478 #, c-format msgid "literal '%.38s' is longer than reference-modification of '%s'" msgstr "" -#: cobc/tree.c:5424 +#: cobc/tree.c:5508 #, c-format msgid "literal '%s' is alphanumeric but '%s' is numeric" msgstr "" -#: cobc/tree.c:5466 +#: cobc/tree.c:5550 #, c-format msgid "literal '%s' has more decimals than '%s'" msgstr "" -#: cobc/tree.c:5508 +#: cobc/tree.c:5598 #, c-format msgid "literal '%s' has more digits than '%s'" msgstr "" -#: cobc/tree.c:5548 cobc/tree.c:5572 +#: cobc/tree.c:5646 cobc/tree.c:5676 #, c-format msgid "unsigned '%s' may not be %s %s" msgstr "" -#: cobc/tree.c:5558 cobc/tree.c:5581 +#: cobc/tree.c:5658 cobc/tree.c:5689 #, c-format msgid "unsigned '%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5614 cobc/tree.c:5639 +#: cobc/tree.c:5726 cobc/tree.c:5756 #, fuzzy, c-format msgid "'%s' may not be %s %s" msgstr "`%s' źդޤ" -#: cobc/tree.c:5625 cobc/tree.c:5650 +#: cobc/tree.c:5738 cobc/tree.c:5768 #, c-format msgid "'%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5795 +#: cobc/tree.c:5917 #, fuzzy msgid "divide by constant ZERO" msgstr "ʿǤ" -#: cobc/tree.c:5879 cobc/tree.c:5886 +#: cobc/tree.c:6001 cobc/tree.c:6008 #, c-format msgid "%s should be COMP-X/COMP-5 for logical operator" msgstr "" -#: cobc/tree.c:5927 cobc/tree.c:5932 cobc/tree.c:6151 cobc/typeck.c:5675 -#: cobc/typeck.c:5684 cobc/typeck.c:5691 cobc/typeck.c:6772 cobc/typeck.c:6913 -#, fuzzy -msgid "invalid expression" -msgstr "ʼǤ" - -#: cobc/tree.c:6148 +#: cobc/tree.c:6283 #, fuzzy, c-format msgid "invalid expression: %s %s %s" msgstr "ʼǤ" -#: cobc/tree.c:6195 +#: cobc/tree.c:6286 +msgid "invalid expression: boolean expected with logical operator" +msgstr "" + +#: cobc/tree.c:6330 #, fuzzy, c-format msgid "unexpected operator: %d" msgstr "ʿǤ" -#: cobc/tree.c:6206 +#: cobc/tree.c:6341 #, c-format msgid "expression '%.38s' %s '%.38s' is always TRUE" msgstr "" -#: cobc/tree.c:6212 +#: cobc/tree.c:6347 msgid "expression is always TRUE" msgstr "" -#: cobc/tree.c:6225 +#: cobc/tree.c:6360 #, c-format msgid "expression '%.38s' %s '%.38s' is always FALSE" msgstr "" -#: cobc/tree.c:6231 +#: cobc/tree.c:6366 msgid "expression is always FALSE" msgstr "" -#: cobc/tree.c:6443 +#: cobc/tree.c:6588 #, fuzzy msgid "invalid file name reference" msgstr " VALUE Ǥ" -#: cobc/tree.c:6451 +#: cobc/tree.c:6596 #, c-format msgid "BY CONTENT assumed for alphanumeric item '%s'" msgstr "" -#: cobc/tree.c:6456 +#: cobc/tree.c:6601 #, c-format msgid "BY CONTENT assumed for national item '%s'" msgstr "" -#: cobc/tree.c:6595 +#: cobc/tree.c:6740 msgid "PERFORM FOREVER since UNTIL is always FALSE" msgstr "" -#: cobc/tree.c:6599 +#: cobc/tree.c:6744 msgid "PERFORM ONCE since UNTIL is always TRUE" msgstr "" -#: cobc/tree.c:6602 +#: cobc/tree.c:6747 msgid "PERFORM NEVER since UNTIL is always TRUE" msgstr "" -#: cobc/tree.c:6726 +#: cobc/tree.c:6871 #, c-format msgid "no definition/prototype seen for FUNCTION '%s'" msgstr "" -#: cobc/tree.c:6728 +#: cobc/tree.c:6873 #, c-format msgid "no definition/prototype seen for PROGRAM '%s'" msgstr "" -#: cobc/tree.c:6737 +#: cobc/tree.c:6882 #, c-format msgid "no definition/prototype seen for FUNCTION with external name '%s'" msgstr "" -#: cobc/tree.c:6739 +#: cobc/tree.c:6884 #, c-format msgid "no definition/prototype seen for PROGRAM with external name '%s'" msgstr "" -#: cobc/tree.c:6831 +#: cobc/tree.c:6976 cobc/tree.c:7158 cobc/tree.c:7233 cobc/tree.c:7239 +#: cobc/tree.c:7247 cobc/tree.c:7255 cobc/tree.c:7277 cobc/tree.c:7287 +#: cobc/tree.c:7292 #, fuzzy, c-format -msgid "FUNCTION %s has invalid argument" +msgid "FUNCTION '%s' has invalid argument" msgstr "`%s' ʬȤǤޤ" -#: cobc/tree.c:6833 +#: cobc/tree.c:6978 #, c-format -msgid "either all arguments or none should be if type %s" +msgid "either all arguments or none should be of type %s" msgstr "" -#: cobc/tree.c:6863 cobc/tree.c:6869 cobc/tree.c:6911 cobc/tree.c:6916 +#: cobc/tree.c:7010 cobc/tree.c:7016 cobc/tree.c:7057 cobc/tree.c:7063 #, fuzzy, c-format msgid "FUNCTION '%s' has invalid reference modification" msgstr "`%s' ʬȤǤޤ" -#: cobc/tree.c:6880 cobc/tree.c:7194 +#: cobc/tree.c:7027 cobc/tree.c:7344 #, fuzzy, c-format msgid "FUNCTION '%s' unknown" msgstr "`%s' ϼƤޤ" -#: cobc/tree.c:6884 +#: cobc/tree.c:7031 #, fuzzy, c-format msgid "FUNCTION '%s' is not implemented" msgstr "`%s' ϼƤޤ" -#: cobc/tree.c:6891 cobc/tree.c:6898 cobc/tree.c:7179 +#: cobc/tree.c:7037 cobc/tree.c:7044 cobc/tree.c:7329 #, fuzzy, c-format msgid "FUNCTION '%s' has wrong number of arguments" msgstr "WHEN ΰοǤ" -#: cobc/tree.c:6905 +#: cobc/tree.c:7051 #, fuzzy, c-format msgid "FUNCTION '%s' cannot have reference modification" msgstr "`%s' ʬȤǤޤ" -#: cobc/tree.c:7008 cobc/tree.c:7083 cobc/tree.c:7089 cobc/tree.c:7097 -#: cobc/tree.c:7105 cobc/tree.c:7127 cobc/tree.c:7137 cobc/tree.c:7142 -#, fuzzy, c-format -msgid "FUNCTION '%s' has invalid argument" -msgstr "`%s' ʬȤǤޤ" - -#: cobc/tree.c:7185 +#: cobc/tree.c:7335 #, fuzzy, c-format msgid "FUNCTION '%s' has invalid first argument" msgstr "`%s' ʬȤǤޤ" -#: cobc/typeck.c:584 +#: cobc/typeck.c:590 #, c-format msgid "%s should be COMP-5/COMP-X for logical operator" msgstr "" -#: cobc/typeck.c:850 +#: cobc/typeck.c:856 #, fuzzy, c-format msgid "%s item not allowed here: '%s'" msgstr "`%s' Ͻޤ" -#: cobc/typeck.c:892 +#: cobc/typeck.c:898 #, fuzzy, c-format msgid "'%s' is not a group name" msgstr "`%s' ϽĹܤǤϤޤ" -#: cobc/typeck.c:911 +#: cobc/typeck.c:921 #, fuzzy, c-format msgid "'%s' is not a numeric name" msgstr "`%s' ϿܤǤϤޤ" -#: cobc/typeck.c:934 +#: cobc/typeck.c:944 #, fuzzy, c-format msgid "'%s' is not a numeric or numeric-edited name" msgstr "`%s' Ͽܡ⤷ϿԽܤǤϤޤ" -#: cobc/typeck.c:974 -#, fuzzy, c-format -msgid "'%s' is Alpha, instead of a numeric value" -msgstr "`%s' ϿͤǤϤޤ" - -#: cobc/typeck.c:977 -#, fuzzy, c-format -msgid "'%s' is Alpha Edited, instead of a numeric value" -msgstr "`%s' ϿͤǤϤޤ" - -#: cobc/typeck.c:990 -#, fuzzy, c-format -msgid "'%s' is not a numeric value" -msgstr "`%s' ϿͤǤϤޤ" - -#: cobc/typeck.c:1040 +#: cobc/typeck.c:1043 #, fuzzy, c-format -msgid "'%s' is not an integer value" +msgid "'%s' is not an integer" msgstr "`%s' ǤϤޤ" -#: cobc/typeck.c:1044 +#: cobc/typeck.c:1047 msgid "positive numeric integer is required here" msgstr "" -#: cobc/typeck.c:1163 +#: cobc/typeck.c:1178 msgid "System routine" msgstr "" -#: cobc/typeck.c:2054 libcob/call.c:1180 +#: cobc/typeck.c:2037 libcob/call.c:1172 #, c-format msgid "'%s' literal includes leading spaces which are omitted" msgstr "" -#: cobc/typeck.c:2058 +#: cobc/typeck.c:2041 #, c-format msgid "'%s' literal includes trailing spaces which are omitted" msgstr "" -#: cobc/typeck.c:2125 +#: cobc/typeck.c:2108 msgid "ON/OFF usage requires a SWITCH name" msgstr "" -#: cobc/typeck.c:2143 +#: cobc/typeck.c:2126 #, fuzzy, c-format msgid "word length exceeds maximum of %d characters: '%s'" msgstr "쥳Ĺû᤮ޤ `%s'" -#: cobc/typeck.c:2146 +#: cobc/typeck.c:2129 #, fuzzy, c-format msgid "word length exceeds %d characters: '%s'" msgstr "쥳Ĺû᤮ޤ `%s'" -#: cobc/typeck.c:2223 +#: cobc/typeck.c:2206 #, c-format msgid "ASSIGN %s interpreted as '%s'" msgstr "" -#: cobc/typeck.c:2315 cobc/typeck.c:2487 +#: cobc/typeck.c:2332 cobc/typeck.c:2631 #, c-format msgid "subscript missing for '%s' - defaulting to 1" msgstr "" -#: cobc/typeck.c:2338 cobc/typeck.c:2403 cobc/typeck.c:2659 +#: cobc/typeck.c:2355 cobc/typeck.c:2546 cobc/typeck.c:2746 #, fuzzy, c-format msgid "'%s' cannot be subscripted" msgstr "`%s' źդޤ" -#: cobc/typeck.c:2342 cobc/typeck.c:2663 +#: cobc/typeck.c:2359 cobc/typeck.c:2750 #, fuzzy, c-format msgid "'%s' requires one subscript" msgstr "`%s' 1 ĤźɬפȤޤ" -#: cobc/typeck.c:2345 cobc/typeck.c:2666 +#: cobc/typeck.c:2362 cobc/typeck.c:2753 #, fuzzy, c-format msgid "'%s' requires %d subscripts" msgstr "`%s' %d ĤźɬפȤޤ" -#: cobc/typeck.c:2363 +#: cobc/typeck.c:2380 #, c-format msgid "'%s' (accessed by '%s')" msgstr "" -#: cobc/typeck.c:2471 +#: cobc/typeck.c:2399 cobc/typeck.c:4987 #, fuzzy, c-format -msgid "'%s' has no OCCURS clause" -msgstr "`%s' PICTURE ĤȤޤ" +msgid "%s may not be reference modified" +msgstr "`%s' ʬȤǤޤ" -#: cobc/typeck.c:2537 libcob/common.c:3941 libcob/common.c:3952 +#: cobc/typeck.c:2437 cobc/typeck.c:2442 cobc/typeck.c:2466 +#: libcob/common.c:4477 libcob/common.c:4521 #, fuzzy, c-format -msgid "subscript of '%s' out of bounds: %d" -msgstr "'%s' źϰϤĶƤޤ: %d" +msgid "length of '%s' out of bounds: %d" +msgstr "'%s' ĹϰϤĶƤޤ: %d" -#: cobc/typeck.c:2587 cobc/typeck.c:2598 libcob/common.c:3976 -#: libcob/common.c:4027 +#: cobc/typeck.c:2453 cobc/typeck.c:2462 libcob/common.c:4462 +#: libcob/common.c:4513 #, fuzzy, c-format msgid "offset of '%s' out of bounds: %d" msgstr "'%s' γϰ֤ϰϤĶƤޤ: %d" -#: cobc/typeck.c:2592 cobc/typeck.c:2603 cobc/typeck.c:2612 -#: libcob/common.c:3991 libcob/common.c:4035 +#: cobc/typeck.c:2458 +msgid "suspicious reference-modification: always using max. position" +msgstr "" + +#: cobc/typeck.c:2475 +msgid "suspicious reference-modification: always using max. length" +msgstr "" + +#: cobc/typeck.c:2615 #, fuzzy, c-format -msgid "length of '%s' out of bounds: %d" -msgstr "'%s' ĹϰϤĶƤޤ: %d" +msgid "'%s' has no OCCURS clause" +msgstr "`%s' PICTURE ĤȤޤ" + +#: cobc/typeck.c:2694 libcob/common.c:4427 libcob/common.c:4438 +#, fuzzy, c-format +msgid "subscript of '%s' out of bounds: %d" +msgstr "'%s' źϰϤĶƤޤ: %d" -#: cobc/typeck.c:2727 cobc/typeck.c:2806 +#: cobc/typeck.c:2812 cobc/typeck.c:2891 #, fuzzy msgid "reference modification not allowed here" msgstr "`%s' Ͻޤ" -#: cobc/typeck.c:2741 cobc/typeck.c:2832 +#: cobc/typeck.c:2826 cobc/typeck.c:2917 #, fuzzy msgid "88 level item not allowed here" msgstr "`%s' Ͻޤ" -#: cobc/typeck.c:2745 cobc/typeck.c:2836 cobc/typeck.c:2844 cobc/typeck.c:2906 +#: cobc/typeck.c:2830 cobc/typeck.c:2921 cobc/typeck.c:2929 cobc/typeck.c:2991 #, fuzzy msgid "variable length item not allowed here" msgstr "`%s' Ͻޤ" -#: cobc/typeck.c:2774 +#: cobc/typeck.c:2859 #, fuzzy, c-format msgid "'%s' has not been DEFINEd" msgstr "`%s' SPECIAL-NAMES Ƥޤ" -#: cobc/typeck.c:2810 +#: cobc/typeck.c:2895 #, fuzzy msgid "only field names allowed here" msgstr "`%s' Ͻޤ" -#: cobc/typeck.c:2821 +#: cobc/typeck.c:2906 #, c-format msgid "VALUE of '%s': %s target '%s' is invalid" msgstr "" -#: cobc/typeck.c:2823 cobc/typeck.c:2889 +#: cobc/typeck.c:2908 cobc/typeck.c:2974 msgid "target must be in FILE SECTION or LINKAGE SECTION or have the EXTERNAL clause" msgstr "" -#: cobc/typeck.c:2879 cobc/typeck.c:2888 +#: cobc/typeck.c:2964 cobc/typeck.c:2973 #, fuzzy, c-format msgid "VALUE of '%s': %s target is invalid" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/typeck.c:2881 +#: cobc/typeck.c:2966 #, fuzzy msgid "no previous data-item found" msgstr "٥ %02d Υǡܤˤޤ" -#: cobc/typeck.c:3040 cobc/typeck.c:4799 +#: cobc/typeck.c:3130 cobc/typeck.c:4963 #, fuzzy, c-format msgid "'%s' cannot be BASED/EXTERNAL" msgstr "`%s' BLANK WHEN ZERO ĤȤޤ" -#: cobc/typeck.c:3045 +#: cobc/typeck.c:3135 #, c-format msgid "'%s' is not in WORKING-STORAGE SECTION" msgstr "" -#: cobc/typeck.c:3052 cobc/typeck.c:4796 +#: cobc/typeck.c:3142 cobc/typeck.c:4960 #, fuzzy, c-format msgid "'%s' not level 01 or 77" msgstr "`%s' ϥ٥ 01 77 ǤʤФʤޤ" -#: cobc/typeck.c:3055 cobc/typeck.c:3090 cobc/typeck.c:4802 +#: cobc/typeck.c:3145 cobc/typeck.c:3180 cobc/typeck.c:4966 #, c-format msgid "'%s' REDEFINES field not allowed here" msgstr "" -#: cobc/typeck.c:3075 cobc/typeck.c:8423 +#: cobc/typeck.c:3165 cobc/typeck.c:8876 #, fuzzy, c-format msgid "duplicate USING BY REFERENCE item '%s'" msgstr " VALUE Ǥ" -#: cobc/typeck.c:3103 +#: cobc/typeck.c:3193 #, c-format msgid "'%s' USING item duplicates RETURNING item" msgstr "" -#: cobc/typeck.c:3177 +#: cobc/typeck.c:3268 #, fuzzy, c-format msgid "prototype and definition of '%s' do not match" msgstr "`%s' Ƥޤ" -#: cobc/typeck.c:3256 +#: cobc/typeck.c:3389 cobc/typeck.c:3486 #, c-format msgid "parameters #%d ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3259 +#: cobc/typeck.c:3393 #, c-format msgid "returning items ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3295 +#: cobc/typeck.c:3429 msgid "definition is a program but the prototype is a function" msgstr "" -#: cobc/typeck.c:3299 +#: cobc/typeck.c:3433 msgid "definition is a function but the prototype is a program" msgstr "" -#: cobc/typeck.c:3306 -msgid "DECIMAL-POINT IS COMMA clauses differ" -msgstr "" - -#: cobc/typeck.c:3312 -msgid "CURRENCY clauses differ" -msgstr "" - -#: cobc/typeck.c:3348 +#: cobc/typeck.c:3496 #, fuzzy msgid "number of parameters differ" msgstr "ͤ礭ܤ礭ۤƤޤ" -#: cobc/typeck.c:3358 +#: cobc/typeck.c:3506 msgid "definition has a RETURNING item but prototype does not" msgstr "" -#: cobc/typeck.c:3362 +#: cobc/typeck.c:3510 msgid "definition does not have a RETURNING item but prototype does" msgstr "" -#: cobc/typeck.c:3411 +#: cobc/typeck.c:3560 #, fuzzy, c-format msgid "unexpected tree tag: %d" msgstr "ʿǤ" -#: cobc/typeck.c:3433 +#: cobc/typeck.c:3584 #, c-format msgid "expected argument #%d, %s, to be passed BY VALUE" msgstr "" -#: cobc/typeck.c:3437 +#: cobc/typeck.c:3589 #, c-format msgid "expected argument #%d, %s, to be passed BY REFERENCE/CONTENT" msgstr "" -#: cobc/typeck.c:3455 cobc/typeck.c:3580 cobc/typeck.c:3583 +#: cobc/typeck.c:3608 cobc/typeck.c:3733 cobc/typeck.c:3736 #, c-format msgid "argument #%d is not optional" msgstr "" -#: cobc/typeck.c:3468 +#: cobc/typeck.c:3622 #, c-format msgid "argument #%d must be at least %d bytes long" msgstr "" -#: cobc/typeck.c:3483 +#: cobc/typeck.c:3637 #, c-format msgid "argument #%d is a different type of pointer than the parameter" msgstr "" -#: cobc/typeck.c:3490 +#: cobc/typeck.c:3644 #, c-format msgid "argument #%d is ANY LENGTH, but expecting a fixed size item" msgstr "" -#: cobc/typeck.c:3518 +#: cobc/typeck.c:3672 #, c-format msgid "argument #%d, %s, does not conform to the parameter definition" msgstr "" -#: cobc/typeck.c:3566 +#: cobc/typeck.c:3719 #, c-format msgid "expecting up to %d arguments, but found %d" msgstr "" -#: cobc/typeck.c:3598 +#: cobc/typeck.c:3752 msgid "the RETURNING item is of a fixed size, not ANY LENGTH" msgstr "" -#: cobc/typeck.c:3603 +#: cobc/typeck.c:3758 #, fuzzy, c-format msgid "RETURNING item %s is not a valid type" msgstr "`%s' θˤ OCCURS դƤϤʤޤ" -#: cobc/typeck.c:3609 +#: cobc/typeck.c:3764 #, fuzzy msgid "unexpected RETURNING item" msgstr "ʿǤ" -#: cobc/typeck.c:3612 +#: cobc/typeck.c:3767 msgid "expecting a RETURNING item, but none provided" msgstr "" -#: cobc/typeck.c:3663 -#, fuzzy, c-format -msgid "'%s' is not an alphabet name" -msgstr "`%s' ϥե٥å̾ǤϤޤ" - -#: cobc/typeck.c:3939 +#: cobc/typeck.c:4091 #, fuzzy, c-format msgid "duplicate character values in alphabet '%s': %s" msgstr "ʥ٥ֹǤ `%s'" -#: cobc/typeck.c:3944 +#: cobc/typeck.c:4096 #, fuzzy, c-format msgid "invalid character values in alphabet '%s', starting at position %d" msgstr "ʥ٥ֹǤ `%s'" -#: cobc/typeck.c:4045 +#: cobc/typeck.c:4198 #, fuzzy, c-format msgid "duplicate character values in class '%s'" msgstr "ʥ٥ֹǤ `%s'" -#: cobc/typeck.c:4074 +#: cobc/typeck.c:4227 #, fuzzy msgid "invalid ALPHABET name" msgstr " VALUE Ǥ" -#: cobc/typeck.c:4103 +#: cobc/typeck.c:4256 #, fuzzy, c-format msgid "'%s' is not a locale name" msgstr "`%s' ϥե̾ǤϤޤ" -#: cobc/typeck.c:4257 +#: cobc/typeck.c:4410 #, fuzzy msgid "invalid RECORD DEPENDING item" msgstr " VALUE Ǥ" -#: cobc/typeck.c:4262 +#: cobc/typeck.c:4415 msgid "RECORD DEPENDING must reference a data-item" msgstr "" -#: cobc/typeck.c:4285 +#: cobc/typeck.c:4438 #, c-format msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgstr "" -#: cobc/typeck.c:4298 +#: cobc/typeck.c:4451 #, fuzzy, c-format msgid "file %s: RELATIVE KEY %s is not numeric" msgstr "18 ۤܤϵޤ" -#: cobc/typeck.c:4307 +#: cobc/typeck.c:4460 #, c-format msgid "file %s: RELATIVE KEY %s must be integer" msgstr "" -#: cobc/typeck.c:4312 +#: cobc/typeck.c:4465 #, c-format msgid "file %s: RELATIVE KEY %s must be unsigned" msgstr "" -#: cobc/typeck.c:4319 +#: cobc/typeck.c:4472 #, c-format msgid "file %s: RELATIVE KEY %s cannot have OCCURS" msgstr "" -#: cobc/typeck.c:4325 +#: cobc/typeck.c:4478 #, c-format msgid "RELATIVE KEY %s cannot be in file record belonging to %s" msgstr "" -#: cobc/typeck.c:4334 +#: cobc/typeck.c:4487 #, c-format msgid "file %s: RELATIVE KEY %s declared outside WORKING-STORAGE" msgstr "" -#: cobc/typeck.c:4356 cobc/typeck.c:8396 +#: cobc/typeck.c:4509 cobc/typeck.c:8833 #, fuzzy, c-format msgid "'%s' is not a valid data name" msgstr "`%s' ϥե٥å̾ǤϤޤ" -#: cobc/typeck.c:4363 +#: cobc/typeck.c:4516 #, c-format msgid "CRT STATUS item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "" -#: cobc/typeck.c:4369 +#: cobc/typeck.c:4522 #, c-format msgid "'%s' numeric CRT STATUS must have at least 4 digits" msgstr "" -#: cobc/typeck.c:4375 +#: cobc/typeck.c:4528 #, c-format msgid "'%s' CRT STATUS must be 3 or 4 characters long" msgstr "" -#: cobc/typeck.c:4397 +#: cobc/typeck.c:4550 #, fuzzy, c-format msgid "FILE STATUS '%s' is not a field" msgstr "%s ̤Ǥ" -#: cobc/typeck.c:4409 +#: cobc/typeck.c:4562 #, c-format msgid "FILE STATUS '%s' may not be a decimal or have a PIC with a P" msgstr "" -#: cobc/typeck.c:4414 +#: cobc/typeck.c:4567 #, c-format msgid "FILE STATUS '%s' is a numeric field, but I-O status codes are not numeric in general" msgstr "" -#: cobc/typeck.c:4418 +#: cobc/typeck.c:4571 #, fuzzy, c-format msgid "FILE STATUS '%s' must be an alphanumeric or numeric field" msgstr "`%s' Ͽܡ⤷ϿԽܤǤϤޤ" -#: cobc/typeck.c:4425 +#: cobc/typeck.c:4578 #, fuzzy, c-format msgid "FILE STATUS '%s' must be USAGE DISPLAY" msgstr "`%s' SPECIAL-NAMES Ƥޤ" -#: cobc/typeck.c:4432 +#: cobc/typeck.c:4585 #, c-format msgid "FILE STATUS '%s' must be 2 characters long" msgstr "" -#: cobc/typeck.c:4440 +#: cobc/typeck.c:4593 #, c-format msgid "FILE STATUS '%s' must be in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE" msgstr "" -#: cobc/typeck.c:4446 +#: cobc/typeck.c:4599 #, c-format msgid "FILE STATUS '%s' may not be located after an OCCURS DEPENDING field" msgstr "" -#: cobc/typeck.c:4460 +#: cobc/typeck.c:4613 #, c-format msgid "variable '%s' will be implicitly defined" msgstr "" -#: cobc/typeck.c:4489 cobc/typeck.c:4550 +#: cobc/typeck.c:4703 msgid "ASSIGN variable" msgstr "" -#: cobc/typeck.c:4555 +#: cobc/typeck.c:4708 #, fuzzy, c-format msgid "ASSIGN data item '%s' is invalid" msgstr "롼׹ `%s' %s ĤȤޤ" -#: cobc/typeck.c:4619 +#: cobc/typeck.c:4773 #, c-format msgid "'%s' CURSOR must be 4 or 6 characters long" msgstr "" -#: cobc/typeck.c:4680 +#: cobc/typeck.c:4844 #, fuzzy, c-format msgid "'%s' cannot have nested OCCURS DEPENDING" msgstr "`%s' OCCURS DEPENDING ĤȤޤ" -#: cobc/typeck.c:4694 +#: cobc/typeck.c:4858 #, fuzzy, c-format msgid "'%s' OCCURS DEPENDING ON field item invalid here" msgstr "`%s' Ͻޤ" -#: cobc/typeck.c:4704 +#: cobc/typeck.c:4868 #, fuzzy, c-format msgid "'%s' cannot have OCCURS DEPENDING because of '%s'" msgstr "`%s' OCCURS DEPENDING ĤȤޤ" -#: cobc/typeck.c:4716 +#: cobc/typeck.c:4880 #, c-format msgid "'%s' OCCURS DEPENDING ON item must have GLOBAL attribute" msgstr "" -#: cobc/typeck.c:4730 +#: cobc/typeck.c:4894 #, c-format msgid "PASSWORD '%s' for EXTERNAL file '%s' must have EXTERNAL attribute" msgstr "" -#: cobc/typeck.c:4768 +#: cobc/typeck.c:4932 #, fuzzy, c-format msgid "duplicate APPLY COMMIT target: '%s'" msgstr " VALUE Ǥ" -#: cobc/typeck.c:4782 +#: cobc/typeck.c:4946 #, fuzzy msgid "APPLY COMMIT statement invalid for SORT file" msgstr " VALUE Ǥ" -#: cobc/typeck.c:4785 +#: cobc/typeck.c:4949 #, fuzzy msgid "APPLY COMMIT statement invalid for REPORT file" msgstr " VALUE Ǥ" -#: cobc/typeck.c:4792 +#: cobc/typeck.c:4956 #, c-format msgid "APPLY COMMIT item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "" -#: cobc/typeck.c:4806 +#: cobc/typeck.c:4970 #, fuzzy, c-format msgid "item not allowed here: '%s'" msgstr "`%s' Ͻޤ" -#: cobc/typeck.c:4819 +#: cobc/typeck.c:4983 #, fuzzy, c-format msgid "%s may not be subscripted" msgstr "`%s' źդޤ" -#: cobc/typeck.c:4823 -#, fuzzy, c-format -msgid "%s may not be reference modified" -msgstr "`%s' ʬȤǤޤ" - -#: cobc/typeck.c:4883 +#: cobc/typeck.c:5047 #, fuzzy, c-format msgid "DEBUGGING target invalid: '%s'" msgstr "`%s' ϥե٥å̾ǤϤޤ" -#: cobc/typeck.c:4889 +#: cobc/typeck.c:5053 #, fuzzy, c-format msgid "DEBUGGING target already specified with ALL PROCEDURES: '%s'" msgstr "`%s' ϥե٥å̾ǤϤޤ" -#: cobc/typeck.c:4909 +#: cobc/typeck.c:5073 #, fuzzy msgid "DEBUGGING target" msgstr "`%s' ϥե٥å̾ǤϤޤ" -#: cobc/typeck.c:4916 +#: cobc/typeck.c:5080 #, fuzzy, c-format msgid "'%s' is not a valid DEBUGGING target" msgstr "`%s' ϥե٥å̾ǤϤޤ" -#: cobc/typeck.c:4962 cobc/typeck.c:4970 +#: cobc/typeck.c:5126 cobc/typeck.c:5134 #, fuzzy, c-format msgid "'%s' is not in DECLARATIVES" msgstr "`%s' SPECIAL-NAMES Ƥޤ" -#: cobc/typeck.c:4984 +#: cobc/typeck.c:5148 #, c-format msgid "invalid reference to '%s' (in DECLARATIVES)" msgstr "" -#: cobc/typeck.c:4996 +#: cobc/typeck.c:5162 #, c-format msgid "GO TO paragraph '%s' which is defined in another SECTION" msgstr "" -#: cobc/typeck.c:5006 +#: cobc/typeck.c:5172 #, fuzzy, c-format msgid "'%s' is not a procedure name" msgstr "`%s' ϼ³̾ǤϤޤ" -#: cobc/typeck.c:5041 +#: cobc/typeck.c:5207 #, c-format msgid "%s and %s are not in the same SECTION" msgstr "" -#: cobc/typeck.c:5046 +#: cobc/typeck.c:5212 #, fuzzy, c-format msgid "%s is defined before %s" msgstr "`%s' Ϥޤ" -#: cobc/typeck.c:5088 +#: cobc/typeck.c:5254 #, fuzzy, c-format msgid "'%s' ANY LENGTH item must be a formal parameter" msgstr "`%s' Ͻޤ" -#: cobc/typeck.c:5136 +#: cobc/typeck.c:5302 #, c-format msgid "LINKAGE item '%s' is not a PROCEDURE USING parameter" msgstr "" -#: cobc/typeck.c:5192 +#: cobc/typeck.c:5358 #, fuzzy, c-format msgid "'%s' is not an alterable paragraph" msgstr "`%s' ǤϤޤ" -#: cobc/typeck.c:5802 cobc/typeck.c:5806 +#: cobc/typeck.c:5852 +#, fuzzy +msgid "invalid expression: unfinished expression" +msgstr "ʼǤ" + +#: cobc/typeck.c:5858 cobc/typeck.c:5865 +#, fuzzy +msgid "invalid expression" +msgstr "ʼǤ" + +#: cobc/typeck.c:5990 cobc/typeck.c:5994 #, fuzzy, c-format msgid "suggest parentheses around %s within %s" msgstr "OR ܤ AND ˤϳ̤侩ޤ" -#: cobc/typeck.c:5815 +#: cobc/typeck.c:6003 #, fuzzy msgid "invalid conditional expression" msgstr "ʼǤ" -#: cobc/typeck.c:5932 +#: cobc/typeck.c:6120 #, c-format msgid "internal decimal structure size exceeded: %d" msgstr "" -#: cobc/typeck.c:5935 +#: cobc/typeck.c:6123 msgid "Try to minimize the number of parentheses or split into multiple computations." msgstr "" -#: cobc/typeck.c:5959 +#: cobc/typeck.c:6147 #, c-format msgid "more than %d nested expressions" msgstr "" -#: cobc/typeck.c:6000 +#: cobc/typeck.c:6188 msgid "precision of result may change with arithmetic-osvs" msgstr "" -#: cobc/typeck.c:6080 +#: cobc/typeck.c:6268 #, fuzzy, c-format msgid "unexpected operation: %c (%d)" msgstr "ʿǤ" -#: cobc/typeck.c:6085 +#: cobc/typeck.c:6273 #, c-format msgid "%s operator may be misplaced" msgstr "" -#: cobc/typeck.c:6160 +#: cobc/typeck.c:6349 #, fuzzy msgid "unexpected constant expansion" msgstr "ʿǤ" -#: cobc/typeck.c:6882 cobc/typeck.c:11024 +#: cobc/typeck.c:7106 cobc/typeck.c:11656 cobc/typeck.c:11661 #, fuzzy msgid "alphanumeric value is expected" msgstr "ʸɬפǤ" -#: cobc/typeck.c:6884 cobc/typeck.c:11019 +#: cobc/typeck.c:7109 cobc/typeck.c:11651 #, fuzzy msgid "numeric value is expected" msgstr "ͤɬפǤ" -#: cobc/typeck.c:6954 +#: cobc/typeck.c:7203 +#, fuzzy +msgid "invalid expression: condition expected" +msgstr "ʥץǤ -std=%s\n" + +#: cobc/typeck.c:7271 +#, fuzzy +msgid "incomplete expression" +msgstr "ʼǤ" + +#: cobc/typeck.c:7312 #, c-format msgid "more than %d nested conditions" msgstr "" -#: cobc/typeck.c:7290 cobc/typeck.c:7371 +#: cobc/typeck.c:7667 cobc/typeck.c:7748 msgid "no CORRESPONDING items found" msgstr "" -#: cobc/typeck.c:7443 +#: cobc/typeck.c:7820 msgid "no items to ACCEPT found" msgstr "" -#: cobc/typeck.c:7493 +#: cobc/typeck.c:7870 #, fuzzy msgid "no items to DISPLAY found" msgstr "%s: `%s':\n" -#: cobc/typeck.c:7605 +#: cobc/typeck.c:7981 msgid "cannot specify figurative constant ZERO in AT clause" msgstr "" -#: cobc/typeck.c:7609 +#: cobc/typeck.c:7985 #, fuzzy msgid "value in AT clause is not numeric" msgstr "18 ۤܤϵޤ" -#: cobc/typeck.c:7615 +#: cobc/typeck.c:7991 #, fuzzy msgid "value in AT clause must have 4 or 6 digits" msgstr "18 ۤܤϵޤ" -#: cobc/typeck.c:7737 +#: cobc/typeck.c:8168 #, fuzzy msgid "invalid PROMPT literal" msgstr " X Ǥ: %s" -#: cobc/typeck.c:7742 +#: cobc/typeck.c:8173 #, fuzzy msgid "invalid PROMPT identifier" msgstr " VALUE Ǥ" -#: cobc/typeck.c:8032 +#: cobc/typeck.c:8465 #, fuzzy, c-format msgid "'%s' is not an input device" msgstr "`%s' ϿܤǤϤޤ" -#: cobc/typeck.c:8059 cobc/typeck.c:9242 +#: cobc/typeck.c:8492 cobc/typeck.c:9708 #, fuzzy, c-format msgid "'%s' is not defined in SPECIAL-NAMES" msgstr "`%s' SPECIAL-NAMES Ƥޤ" -#: cobc/typeck.c:8064 +#: cobc/typeck.c:8497 #, fuzzy, c-format msgid "invalid input device '%s'" msgstr "`%s' ϥȥ꡼Ǥ" -#: cobc/typeck.c:8069 cobc/typeck.c:9246 +#: cobc/typeck.c:8502 cobc/typeck.c:9712 #, c-format msgid "unknown device '%s'; it may exist in another dialect" msgstr "" -#: cobc/typeck.c:8072 cobc/typeck.c:9249 +#: cobc/typeck.c:8505 cobc/typeck.c:9715 #, fuzzy, c-format msgid "unknown device '%s'; not defined in SPECIAL-NAMES" msgstr "`%s' SPECIAL-NAMES Ƥޤ" -#: cobc/typeck.c:8088 +#: cobc/typeck.c:8524 #, fuzzy msgid "target of RETURNING is not a data pointer" msgstr "SET Τ INDEXED POINTER Ǥ" -#: cobc/typeck.c:8115 cobc/typeck.c:12634 cobc/typeck.c:12700 -#: cobc/typeck.c:12768 +#: cobc/typeck.c:8551 cobc/typeck.c:13410 cobc/typeck.c:13479 +#: cobc/typeck.c:13547 #, c-format msgid "cannot change address of '%s', which is not BASED or a LINKAGE item" msgstr "" -#: cobc/typeck.c:8121 +#: cobc/typeck.c:8557 #, fuzzy msgid "target of ALLOCATE must have BASED clause" msgstr "SET Τ INDEXED POINTER Ǥ" -#: cobc/typeck.c:8155 cobc/typeck.c:8571 +#: cobc/typeck.c:8591 cobc/typeck.c:9023 msgid "amount must be specified as a numeric expression" msgstr "" -#: cobc/typeck.c:8161 +#: cobc/typeck.c:8597 msgid "INITIALIZED TO item is not alphanumeric" msgstr "" -#: cobc/typeck.c:8232 +#: cobc/typeck.c:8667 msgid "only alphanumeric FUNCTION types are allowed here" msgstr "" -#: cobc/typeck.c:8240 +#: cobc/typeck.c:8675 #, fuzzy msgid "invalid RETURNING field" msgstr " VALUE Ǥ" -#: cobc/typeck.c:8259 +#: cobc/typeck.c:8694 msgid "STDCALL not available on this platform" msgstr "" -#: cobc/typeck.c:8263 +#: cobc/typeck.c:8698 msgid "STDCALL used on 64-bit Windows platform" msgstr "" -#: cobc/typeck.c:8268 +#: cobc/typeck.c:8703 msgid "STATIC CALL convention requires a literal program name" msgstr "" -#: cobc/typeck.c:8273 cobc/typeck.c:11975 cobc/typeck.c:12900 -#: cobc/typeck.c:13271 +#: cobc/typeck.c:8708 cobc/typeck.c:12746 cobc/typeck.c:13681 +#: cobc/typeck.c:14077 msgid "HANDLE must be either a generic or a THREAD HANDLE" msgstr "" -#: cobc/typeck.c:8291 +#: cobc/typeck.c:8726 #, fuzzy msgid "numeric literal is negative" msgstr "ͤ礭ܤ礭ۤƤޤ" -#: cobc/typeck.c:8370 +#: cobc/typeck.c:8805 #, fuzzy msgid "numeric literal exceeds size limits" msgstr "ͤ礭ܤ礭ۤƤޤ" -#: cobc/typeck.c:8385 +#: cobc/typeck.c:8820 #, fuzzy, c-format msgid "figurative constant %s invalid here" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/typeck.c:8403 +#: cobc/typeck.c:8840 #, fuzzy, c-format msgid "'%s' is not a 01 or 77 level item" msgstr "`%s' ϥ٥ 01 77 ǤʤФʤޤ" -#: cobc/typeck.c:8407 +#: cobc/typeck.c:8856 #, fuzzy, c-format msgid "'%s' ANY LENGTH item not passed BY REFERENCE" msgstr "`%s' Ͻޤ" -#: cobc/typeck.c:8457 cobc/typeck.c:8462 +#: cobc/typeck.c:8909 cobc/typeck.c:8914 #, fuzzy, c-format msgid "wrong number of CALL parameters for '%s', %d given, %d expected" msgstr "WHEN ΰοǤ" -#: cobc/typeck.c:8529 cobc/typeck.c:8603 cobc/typeck.c:8607 cobc/typeck.c:8637 -#: cobc/typeck.c:11932 cobc/typeck.c:12092 cobc/typeck.c:12281 -#: cobc/typeck.c:12285 cobc/typeck.c:13206 cobc/typeck.c:13539 -#: cobc/typeck.c:13542 +#: cobc/typeck.c:8981 cobc/typeck.c:9055 cobc/typeck.c:9059 cobc/typeck.c:9095 +#: cobc/typeck.c:12703 cobc/typeck.c:12863 cobc/typeck.c:13052 +#: cobc/typeck.c:13056 cobc/typeck.c:14012 cobc/typeck.c:14345 +#: cobc/typeck.c:14348 #, fuzzy, c-format msgid "%s not allowed on %s files" msgstr "`%s' Ͻޤ" -#: cobc/typeck.c:8704 +#: cobc/typeck.c:9172 msgid "positions cannot be specified for main windows" msgstr "" -#: cobc/typeck.c:8714 cobc/typeck.c:8718 cobc/typeck.c:8740 +#: cobc/typeck.c:9183 cobc/typeck.c:9187 cobc/typeck.c:9211 msgid "HANDLE must be either a generic or a WINDOW HANDLE or X(10)" msgstr "" -#: cobc/typeck.c:8849 +#: cobc/typeck.c:9324 #, c-format msgid "'%s' is an invalid type for DISPLAY operand" msgstr "" -#: cobc/typeck.c:8854 +#: cobc/typeck.c:9329 #, fuzzy msgid "invalid type for DISPLAY operand" msgstr "%s: `%s':\n" -#: cobc/typeck.c:9202 cobc/typeck.c:9235 +#: cobc/typeck.c:9668 cobc/typeck.c:9701 #, fuzzy, c-format msgid "'%s' is not an output device" msgstr "`%s' ϿܤǤϤޤ" -#: cobc/typeck.c:9335 +#: cobc/typeck.c:9800 #, fuzzy msgid "invalid use of 88 level in WHEN expression" msgstr "ʼǤ" -#: cobc/typeck.c:9396 +#: cobc/typeck.c:9861 #, fuzzy msgid "wrong number of WHEN parameters" msgstr "WHEN ΰοǤ" -#: cobc/typeck.c:9518 cobc/typeck.c:9530 +#: cobc/typeck.c:9983 cobc/typeck.c:9995 #, fuzzy, c-format msgid "target %d of FREE is not a BASED data item" msgstr "SET Τ INDEXED POINTER Ǥ" -#: cobc/typeck.c:9536 +#: cobc/typeck.c:10001 #, fuzzy, c-format msgid "target %d of FREE must be a data pointer" msgstr "SET Τ INDEXED POINTER Ǥ" -#: cobc/typeck.c:9550 +#: cobc/typeck.c:10015 #, fuzzy msgid "GO TO without procedure-name" msgstr "GO TO ʣμ³̾ꤵƤޤ" -#: cobc/typeck.c:9560 +#: cobc/typeck.c:10023 #, fuzzy msgid "GO TO with multiple procedure-names" msgstr "GO TO ʣμ³̾ꤵƤޤ" -#: cobc/typeck.c:9582 -#, fuzzy -msgid "GO TO ENTRY with multiple entry-names" -msgstr "GO TO ʣμ³̾ꤵƤޤ" - -#: cobc/typeck.c:9646 +#: cobc/typeck.c:10088 #, fuzzy msgid "invalid INITIALIZE statement" msgstr " MOVE ʸǤ" -#: cobc/typeck.c:9752 cobc/typeck.c:9755 +#: cobc/typeck.c:10193 cobc/typeck.c:10196 #, c-format msgid "%s operands differ in size" msgstr "" -#: cobc/typeck.c:9785 +#: cobc/typeck.c:10226 #, fuzzy, c-format msgid "unexpected clause %d" msgstr "ʿǤ" -#: cobc/typeck.c:9860 cobc/typeck.c:9871 cobc/typeck.c:9882 cobc/typeck.c:9893 +#: cobc/typeck.c:10301 cobc/typeck.c:10312 cobc/typeck.c:10323 +#: cobc/typeck.c:10334 #, fuzzy, c-format msgid "data name expected before %s" msgstr "ALL ˥ǡ̾ɬפǤ<" -#: cobc/typeck.c:9903 +#: cobc/typeck.c:10344 #, fuzzy, c-format msgid "ALL, LEADING or TRAILING expected before '%s'" msgstr "`%s' ALL ޤ LEADINGɬפǤ" -#: cobc/typeck.c:9913 +#: cobc/typeck.c:10354 msgid "operand has wrong size" msgstr "" -#: cobc/typeck.c:10007 +#: cobc/typeck.c:10448 #, fuzzy, c-format msgid "'%s' defined here as PIC %s" msgstr "`%s' Ϥ PIC %s Ȥޤ" -#: cobc/typeck.c:10011 +#: cobc/typeck.c:10452 #, fuzzy, c-format msgid "'%s' defined here as a group of length %d" msgstr "`%s' Ϥ礭 %d Υ롼פȤƤޤ" -#: cobc/typeck.c:10017 +#: cobc/typeck.c:10458 #, fuzzy, c-format msgid "internal register '%s' defined as USAGE %s" msgstr "`%s' Ϥ PIC %s Ȥޤ" -#: cobc/typeck.c:10020 +#: cobc/typeck.c:10461 #, fuzzy, c-format msgid "'%s' defined here as USAGE %s" msgstr "`%s' Ϥ PIC %s Ȥޤ" -#: cobc/typeck.c:10045 cobc/typeck.c:10063 +#: cobc/typeck.c:10486 cobc/typeck.c:10504 #, fuzzy, c-format msgid "value size is %d" msgstr "ͤ礭ܤ礭ۤƤޤ" -#: cobc/typeck.c:10059 +#: cobc/typeck.c:10500 #, c-format msgid "value is %s" msgstr "" -#: cobc/typeck.c:10338 -#, fuzzy -msgid "invalid destination for MOVE" -msgstr "ʹϢǤ" - -#: cobc/typeck.c:10380 +#: cobc/typeck.c:10824 #, fuzzy msgid "MOVE of figurative constant SPACE to numeric item" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/typeck.c:10395 +#: cobc/typeck.c:10839 msgid "MOVE of figurative constant QUOTE to numeric item" msgstr "" -#: cobc/typeck.c:10400 cobc/typeck.c:10411 +#: cobc/typeck.c:10844 cobc/typeck.c:10855 #, fuzzy msgid "MOVE of figurative constant to numeric item" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/typeck.c:10469 +#: cobc/typeck.c:10936 msgid "numeric literal in VALUE clause of numeric-edited item" msgstr "" -#: cobc/typeck.c:10494 +#: cobc/typeck.c:10966 msgid "numeric move to ALPHABETIC" msgstr "" -#: cobc/typeck.c:10506 +#: cobc/typeck.c:10978 #, fuzzy msgid "data item not signed" msgstr "ǡܤ椬ޤ" -#: cobc/typeck.c:10509 +#: cobc/typeck.c:10981 #, fuzzy msgid "ignoring sign" msgstr "ޥʥ̵뤵ޤ" -#: cobc/typeck.c:10821 +#: cobc/typeck.c:11381 msgid "overlapping MOVE may occur and produce unpredictable results" msgstr "" -#: cobc/typeck.c:10828 +#: cobc/typeck.c:11388 msgid "overlapping MOVE may produce unpredictable results" msgstr "" -#: cobc/typeck.c:10961 +#: cobc/typeck.c:11593 #, fuzzy msgid "invalid source for MOVE" msgstr "ʹϢǤ" -#: cobc/typeck.c:10982 +#: cobc/typeck.c:11614 msgid "source is non-numeric - substituting zero" msgstr "" -#: cobc/typeck.c:10988 cobc/typeck.c:10999 +#: cobc/typeck.c:11620 cobc/typeck.c:11631 #, fuzzy msgid "invalid VALUE clause" msgstr " VALUE Ǥ" -#: cobc/typeck.c:10991 cobc/typeck.c:12841 cobc/typeck.c:12846 -#: cobc/typeck.c:12873 cobc/typeck.c:12878 +#: cobc/typeck.c:11623 cobc/typeck.c:13622 cobc/typeck.c:13627 +#: cobc/typeck.c:13654 cobc/typeck.c:13659 #, fuzzy msgid "invalid SET statement" msgstr " MOVE ʸǤ" -#: cobc/typeck.c:10993 +#: cobc/typeck.c:11625 #, fuzzy msgid "invalid MOVE statement" msgstr " MOVE ʸǤ" -#: cobc/typeck.c:11000 +#: cobc/typeck.c:11632 #, fuzzy msgid "literal exceeds data size" msgstr "ͤ礭ܤ礭ۤƤޤ" -#: cobc/typeck.c:11004 +#: cobc/typeck.c:11636 #, fuzzy msgid "numeric literal exceeds data size" msgstr "ͤ礭ܤ礭ۤƤޤ" -#: cobc/typeck.c:11013 +#: cobc/typeck.c:11645 #, fuzzy msgid "MOVE of non-integer to alphanumeric" msgstr "ѿܤؤ MOVE Ͻޤ" -#: cobc/typeck.c:11029 +#: cobc/typeck.c:11666 cobc/typeck.c:11671 +#, fuzzy +msgid "national value is expected" +msgstr "ͤɬפǤ" + +#: cobc/typeck.c:11676 #, fuzzy msgid "value does not fit the picture string" msgstr "ͤ PICTURE ˹פޤ" -#: cobc/typeck.c:11035 +#: cobc/typeck.c:11682 #, fuzzy msgid "value size exceeds data size" msgstr "ͤ礭ܤ礭ۤƤޤ" -#: cobc/typeck.c:11040 +#: cobc/typeck.c:11687 msgid "sending field larger than receiving field" msgstr "" -#: cobc/typeck.c:11045 +#: cobc/typeck.c:11692 msgid "some digits may be truncated" msgstr "" -#: cobc/typeck.c:11798 cobc/typeck.c:11848 +#: cobc/typeck.c:12566 cobc/typeck.c:12619 #, fuzzy, c-format msgid "invalid MOVE target: %s" msgstr " MOVE ʸǤ" -#: cobc/typeck.c:12105 +#: cobc/typeck.c:12876 #, fuzzy msgid "READ PREVIOUS not allowed for this file type" msgstr "`%s' Ͻޤ" -#: cobc/typeck.c:12113 +#: cobc/typeck.c:12884 msgid "KEY ignored with sequential READ" msgstr "ɤ߹ߤ READ Ǥ뤿 KEY ̵뤵ޤ" -#: cobc/typeck.c:12209 +#: cobc/typeck.c:12980 #, fuzzy msgid "figurative constants not allowed in FROM clause" msgstr "%s 礬ե `%s' ɬפǤ" -#: cobc/typeck.c:12216 -msgid "literal in FROM clause must be alphanumeric, national or boolean" +#: cobc/typeck.c:12987 +msgid "literal in FROM clause must be alphanumeric, utf-8, national or boolean" msgstr "" -#: cobc/typeck.c:12239 cobc/typeck.c:13499 +#: cobc/typeck.c:13010 cobc/typeck.c:14305 #, fuzzy, c-format msgid "%s FILE requires a FROM clause" msgstr "`%s' ϥե٥å̾ǤϤޤ" -#: cobc/typeck.c:12261 cobc/typeck.c:12345 cobc/typeck.c:13521 +#: cobc/typeck.c:13032 cobc/typeck.c:13116 cobc/typeck.c:14327 #, c-format msgid "%s subject does not refer to a record name" msgstr "" -#: cobc/typeck.c:12351 +#: cobc/typeck.c:13122 #, fuzzy msgid "RELEASE not allowed on this record item" msgstr "`%s' Ͻޤ" -#: cobc/typeck.c:12433 cobc/typeck.c:12454 cobc/typeck.c:12461 +#: cobc/typeck.c:13183 cobc/typeck.c:13209 cobc/typeck.c:13237 #, fuzzy msgid "invalid SEARCH ALL condition" msgstr "SEARCH ALL ξＰǤ" -#: cobc/typeck.c:12578 cobc/typeck.c:12585 +#: cobc/typeck.c:13231 +msgid "SEARCH ALL requires comparision of KEY field" +msgstr "" + +#: cobc/typeck.c:13354 cobc/typeck.c:13361 msgid "SET targets must be PROGRAM-POINTER" msgstr "" -#: cobc/typeck.c:12610 +#: cobc/typeck.c:13386 #, c-format msgid "SET target '%s' is not numeric, an INDEX or a POINTER" msgstr "" -#: cobc/typeck.c:12627 cobc/typeck.c:12696 cobc/typeck.c:12764 +#: cobc/typeck.c:13403 cobc/typeck.c:13475 cobc/typeck.c:13543 #, c-format msgid "cannot change address of '%s', which is not level 1 or 77" msgstr "" -#: cobc/typeck.c:12721 +#: cobc/typeck.c:13500 #, c-format msgid "SET target '%s' is not a POINTER for FCD" msgstr "" -#: cobc/typeck.c:12789 +#: cobc/typeck.c:13569 #, c-format msgid "SET target '%s' is not a POINTER for FCD-KEYDEF" msgstr "" -#: cobc/typeck.c:12882 +#: cobc/typeck.c:13663 #, fuzzy msgid "field does not have a FALSE clause" msgstr "REDEFINES ˴ޤޤܤ VALUE ĤȤޤ" -#: cobc/typeck.c:12913 +#: cobc/typeck.c:13694 msgid "THREAD-priority must be between 1 and 32767" msgstr "" -#: cobc/typeck.c:12933 +#: cobc/typeck.c:13714 msgid "SET ATTRIBUTE requires a screen item as subject" msgstr "" -#: cobc/typeck.c:12939 +#: cobc/typeck.c:13720 msgid "SET ATTRIBUTE subject does not refer to a screen item" msgstr "" -#: cobc/typeck.c:12990 -#, fuzzy -msgid "invalid SORT filename" -msgstr " VALUE Ǥ" - -#: cobc/typeck.c:13051 -#, fuzzy -msgid "invalid SORT USING parameter" -msgstr " MOVE ʸǤ" - -#: cobc/typeck.c:13080 -#, fuzzy -msgid "invalid SORT GIVING parameter" +#: cobc/typeck.c:13835 cobc/typeck.c:13875 +#, fuzzy, c-format +msgid "invalid %s parameter" msgstr " MOVE ʸǤ" -#: cobc/typeck.c:13134 cobc/typeck.c:13161 cobc/typeck.c:13181 +#: cobc/typeck.c:13940 cobc/typeck.c:13967 cobc/typeck.c:13987 #, fuzzy msgid "invalid key item" msgstr " VALUE Ǥ" -#: cobc/typeck.c:13211 +#: cobc/typeck.c:14017 msgid "LENGTH/SIZE clause only allowed on INDEXED files" msgstr "" -#: cobc/typeck.c:13216 +#: cobc/typeck.c:14022 #, fuzzy msgid "START not allowed with ACCESS MODE RANDOM" msgstr "`%s' Ͻޤ" -#: cobc/typeck.c:13305 -#, c-format -msgid "%s item '%s' must be numeric and an integer" -msgstr "" - -#: cobc/typeck.c:13311 +#: cobc/typeck.c:14111 cobc/typeck.c:14117 #, fuzzy, c-format msgid "%s item '%s' must be an integer" msgstr "`%s' ǤϤޤ" -#: cobc/typeck.c:13315 +#: cobc/typeck.c:14121 #, c-format msgid "%s item '%s' may not have PICTURE with P in it" msgstr "" -#: cobc/typeck.c:13331 +#: cobc/typeck.c:14137 #, fuzzy, c-format msgid "'%s' is not an elementary item" msgstr "`%s' ϥե̾ǤϤޤ" -#: cobc/typeck.c:13407 +#: cobc/typeck.c:14213 msgid "STRING items must be all NATIONAL or none" msgstr "" -#: cobc/typeck.c:13555 +#: cobc/typeck.c:14361 #, fuzzy msgid "LOCK clause invalid here" msgstr "`%s' Ͻޤ" -#: cobc/typeck.c:13800 +#: cobc/typeck.c:14606 msgid "data item is not part of a report" msgstr "" -#: cobc/typeck.c:13820 +#: cobc/typeck.c:14626 msgid "improper use of SUPPRESS PRINTING" msgstr "" -#: cobc/typeck.c:13835 +#: cobc/typeck.c:14642 #, fuzzy, c-format msgid "%s must be alphanumeric or national" msgstr "`%s' ϿͤǤϤޤ" -#: cobc/typeck.c:13846 +#: cobc/typeck.c:14652 #, c-format msgid "%s may not be a figurative constant" msgstr "" -#: cobc/typeck.c:13885 +#: cobc/typeck.c:14690 #, c-format msgid "%s must be a child of the input record" msgstr "" -#: cobc/typeck.c:13911 +#: cobc/typeck.c:14715 #, c-format msgid "%s may not be an ignored item in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:13922 +#: cobc/typeck.c:14725 #, c-format msgid "%s must be elementary" msgstr "" -#: cobc/typeck.c:13935 +#: cobc/typeck.c:14737 #, c-format msgid "STRING item '%s' must be USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/typeck.c:13947 +#: cobc/typeck.c:14749 #, fuzzy, c-format msgid "%s must be USAGE DISPLAY or NATIONAL" msgstr "`%s' SPECIAL-NAMES Ƥޤ" -#: cobc/typeck.c:13961 +#: cobc/typeck.c:14761 #, fuzzy, c-format msgid "%s must be an integer" msgstr "`%s' ǤϤޤ" -#: cobc/typeck.c:13977 cobc/typeck.c:13983 +#: cobc/typeck.c:14776 cobc/typeck.c:14782 msgid "JSON/XML GENERATE receiving item" msgstr "" -#: cobc/typeck.c:13980 +#: cobc/typeck.c:14779 msgid "JSON/XML GENERATE receiving item may not have JUSTIFIED clause" msgstr "" -#: cobc/typeck.c:14068 +#: cobc/typeck.c:14867 #, fuzzy msgid "JSON/XML GENERATE input record may not be reference modified" msgstr "`%s' ʬȤǤޤ" -#: cobc/typeck.c:14074 +#: cobc/typeck.c:14873 msgid "JSON/XML GENERATE input record may not have RENAMES clause" msgstr "" -#: cobc/typeck.c:14079 +#: cobc/typeck.c:14878 #, c-format msgid "all the children of '%s' are ignored in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14086 +#: cobc/typeck.c:14885 msgid "JSON/XML GENERATE input record has subrecords with non-unique names" msgstr "" -#: cobc/typeck.c:14091 +#: cobc/typeck.c:14890 msgid "floating-point items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14095 +#: cobc/typeck.c:14894 msgid "OCCURS items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14142 +#: cobc/typeck.c:14941 msgid "NAMESPACE must be a valid URI" msgstr "" -#: cobc/typeck.c:14186 +#: cobc/typeck.c:14985 msgid "NAMESPACE-PREFIX must be a valid XML name" msgstr "" -#: cobc/typeck.c:14215 cobc/typeck.c:14223 +#: cobc/typeck.c:15014 cobc/typeck.c:15022 msgid "NAME OF item" msgstr "" -#: cobc/typeck.c:14220 +#: cobc/typeck.c:15019 msgid "NAME OF item must be the input record or a child of it" msgstr "" -#: cobc/typeck.c:14230 +#: cobc/typeck.c:15029 msgid "NAME OF ... OMITTED only valid for source identifier" msgstr "" -#: cobc/typeck.c:14238 +#: cobc/typeck.c:15037 #, c-format msgid "NAME OF literal must be a valid %s identifier" msgstr "" -#: cobc/typeck.c:14265 cobc/typeck.c:14266 cobc/typeck.c:14269 -#: cobc/typeck.c:14273 +#: cobc/typeck.c:15062 cobc/typeck.c:15063 cobc/typeck.c:15066 +#: cobc/typeck.c:15070 msgid "TYPE OF item" msgstr "" -#: cobc/typeck.c:14291 +#: cobc/typeck.c:15088 msgid "SUPPRESS WHEN SPACE item" msgstr "" -#: cobc/typeck.c:14294 +#: cobc/typeck.c:15091 msgid "SUPPRESS WHEN LOW-VALUE item" msgstr "" -#: cobc/typeck.c:14296 +#: cobc/typeck.c:15093 msgid "SUPPRESS WHEN HIGH-VALUE item" msgstr "" -#: cobc/typeck.c:14325 cobc/typeck.c:14333 cobc/typeck.c:14337 +#: cobc/typeck.c:15122 cobc/typeck.c:15130 cobc/typeck.c:15134 msgid "SUPPRESS item" msgstr "" -#: cobc/typeck.c:14329 +#: cobc/typeck.c:15126 msgid "SUPPRESS item with WHEN clause" msgstr "" -#: cobc/typeck.c:14407 +#: cobc/typeck.c:15204 msgid "WITH ATTRIBUTES specified, but no attributes can be generated" msgstr "" @@ -6148,174 +6255,188 @@ msgid " -Wparentheses warn if parentheses are omitted around AND within msgstr "OR AND ̤ʤ¤Ǥзٹ𤹤" #: cobc/warning.def:70 -msgid " -Wstrict-typing warn strictly about type mismatch" +msgid " -Wstrict-typing warn strictly about type mismatch, even when same size" msgstr "" #: cobc/warning.def:73 -msgid " -Wimplicit-define warn whenever data items are implicitly defined" +msgid " -Wtyping warn about type mismatch" msgstr "" #: cobc/warning.def:76 -msgid " -Wno-corresponding do not warn about CORRESPONDING with no matching items" +msgid " -Wimplicit-define warn whenever data items are implicitly defined" msgstr "" #: cobc/warning.def:79 +msgid " -Wno-corresponding do not warn about CORRESPONDING with no matching items" +msgstr "" + +#: cobc/warning.def:82 #, fuzzy msgid " -Winitial-value warn if initial VALUE clause is ignored" msgstr " VALUE Ǥ" -#: cobc/warning.def:82 +#: cobc/warning.def:85 msgid " -Wprototypes warn about missing FUNCTION prototypes/definitions" msgstr "" -#: cobc/warning.def:85 +#: cobc/warning.def:88 msgid " -Warithmetic-osvs warn if arithmetic expression precision has changed" msgstr "" -#: cobc/warning.def:88 +#: cobc/warning.def:91 msgid " -Wcall-params warn about non 01/77 items for CALL parameters" msgstr "" -#: cobc/warning.def:91 +#: cobc/warning.def:94 msgid " -Wconstant-expression warn about expressions that always resolve to true/false" msgstr "" -#: cobc/warning.def:94 +#: cobc/warning.def:97 msgid " -Wconstant-numlit-expression\twarn about numeric expressions that always resolve to true/false" msgstr "" -#: cobc/warning.def:97 +#: cobc/warning.def:100 msgid " -Wlarger-01-redefines warn about larger redefines allowed by COBOL standards" msgstr "" -#: cobc/warning.def:100 +#: cobc/warning.def:103 #, fuzzy msgid " -Wcolumn-overflow warn about text after program-text area, FIXED format" msgstr "72 ۤƥȤٹ𤹤" -#: cobc/warning.def:103 +#: cobc/warning.def:106 #, fuzzy msgid " -Wterminator warn about lack of scope terminator END-XXX" msgstr "(END-XXX)ʤзٹ𤹤" -#: cobc/warning.def:106 +#: cobc/warning.def:109 msgid " -Wlinkage warn about dangling LINKAGE items" msgstr "" -#: cobc/warning.def:109 +#: cobc/warning.def:112 msgid " -Wunreachable warn about likely unreachable statements" msgstr "" -#: cobc/warning.def:112 +#: cobc/warning.def:115 msgid " -Wno-dialect do not warn about dialect specific issues" msgstr "" -#: cobc/warning.def:115 +#: cobc/warning.def:118 msgid " -Wno-goto-section do not warn about GO TO section-name" msgstr "" -#: cobc/warning.def:118 +#: cobc/warning.def:121 msgid " -Wgoto-different-section\twarn about GO TO a praragraph defined in a different section" msgstr "" -#: cobc/warning.def:121 +#: cobc/warning.def:124 msgid " -Wsuspicious-perform-thru\twarn if PERFORM THRU references procedures not in ascending order or multiple sections" msgstr "" -#: cobc/warning.def:124 +#: cobc/warning.def:127 msgid " -Wdangling-text warn about source text after program-area" msgstr "" -#: cobc/warning.def:127 +#: cobc/warning.def:130 msgid " -Wno-missing-newline do not warn about missing newlines" msgstr "" -#: cobc/warning.def:130 +#: cobc/warning.def:133 msgid " -Wno-others do not warn about different issues" msgstr "" -#: cobc/warning.def:133 +#: cobc/warning.def:136 msgid " -Wno-unsupported do not warn if runtime does not support a feature used" msgstr "" -#: libcob/call.c:94 +#: libcob/call.c:98 #, c-format msgid "LoadLibrary/GetProcAddress error %d" msgstr "" -#: libcob/call.c:841 +#: libcob/call.c:626 +#, c-format +msgid "preloading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:817 #, fuzzy, c-format msgid "%s: PROGRAM name exceeds %d characters" msgstr "쥳Ĺû᤮ޤ `%s'" -#: libcob/call.c:842 +#: libcob/call.c:818 #, fuzzy, c-format msgid "%s: FUNCTION name exceeds %d characters" msgstr "쥳Ĺû᤮ޤ `%s'" -#: libcob/call.c:1067 +#: libcob/call.c:945 libcob/call.c:978 +#, c-format +msgid "loading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:1049 #, fuzzy msgid "indeterminable error in resolve of COBOL CALL" msgstr "³ե륨顼Ǥ" -#: libcob/call.c:1149 +#: libcob/call.c:1145 #, fuzzy, c-format msgid "user-defined FUNCTION '%s' not found" msgstr "'%s' γϰ֤ϰϤĶƤޤ: %d" -#: libcob/call.c:1239 libcob/call.c:1325 libcob/call.c:1445 libcob/call.c:1472 +#: libcob/call.c:1247 libcob/call.c:1328 libcob/call.c:1448 libcob/call.c:1475 #, c-format msgid "NULL parameter passed to '%s'" msgstr "" -#: libcob/call.c:1329 +#: libcob/call.c:1332 #, fuzzy, c-format msgid "invalid number of arguments passed to '%s'" msgstr "WHEN ΰοǤ" -#: libcob/call.c:1449 +#: libcob/call.c:1452 msgid "multiple call to 'cob_setjmp'" msgstr "" -#: libcob/call.c:1476 +#: libcob/call.c:1479 msgid "call to 'cob_longjmp' with no prior 'cob_setjmp'" msgstr "" -#: libcob/call.c:1703 libcob/call.c:1730 libcob/common.c:8144 +#: libcob/call.c:1608 +#, c-format +msgid "preloading of '%s' failed" +msgstr "" + +#: libcob/call.c:1706 libcob/call.c:1733 libcob/common.c:8965 #, fuzzy msgid "cob_init() has not been called" msgstr "cob_resolve() cob_init() ƤФʤФʤޤ" -#: libcob/call.c:1709 +#: libcob/call.c:1712 #, c-format msgid "parameter %d is not within range of %d" msgstr "" -#: libcob/call.c:1715 +#: libcob/call.c:1718 #, c-format msgid "parameter %d is NULL" msgstr "" -#: libcob/call.c:2042 +#: libcob/call.c:2045 msgid "NULL field" msgstr "" -#: libcob/call.c:2050 +#: libcob/call.c:2053 #, fuzzy msgid "field not allocated" msgstr "ե뤬Ƥޤ" -#: libcob/call.c:2116 +#: libcob/call.c:2119 #, c-format msgid "attempt to over-write constant field with '%s'" msgstr "" -#: libcob/call.c:2156 libcob/call.c:2212 -#, c-format -msgid "attempt to over-write constant parameter %d with " -msgstr "" - -#: libcob/call.c:2263 +#: libcob/call.c:2161 libcob/call.c:2219 libcob/call.c:2270 #, c-format msgid "attempt to over-write constant parameter %d with '%s'" msgstr "" @@ -6355,675 +6476,698 @@ msgstr " msgid "%s: option requires an argument -- '%c'" msgstr "`%s' %d ĤźɬפȤޤ" -#: libcob/common.c:1242 +#: libcob/common.c:1074 +#, c-format +msgid "requested coredump creation failed with status %d" +msgstr "" + +#: libcob/common.c:1303 msgid "fatal arithmetic error" msgstr "" -#: libcob/common.c:1245 +#: libcob/common.c:1306 msgid "interrupt from keyboard" msgstr "" -#: libcob/common.c:1249 +#: libcob/common.c:1310 msgid "hangup" msgstr "" -#: libcob/common.c:1253 +#: libcob/common.c:1314 msgid "quit" msgstr "" -#: libcob/common.c:1257 +#: libcob/common.c:1318 #, fuzzy msgid "termination" msgstr "`%s' Ƥޤ" -#: libcob/common.c:1261 +#: libcob/common.c:1322 msgid "emt termination" msgstr "" -#: libcob/common.c:1265 +#: libcob/common.c:1326 msgid "broken pipe" msgstr "" -#: libcob/common.c:1269 +#: libcob/common.c:1330 msgid "I/O signal" msgstr "" -#: libcob/common.c:1273 +#: libcob/common.c:1334 msgid "attempt to reference invalid memory address" msgstr "" -#: libcob/common.c:1277 +#: libcob/common.c:1338 msgid "bus error" msgstr "" -#: libcob/common.c:1281 +#: libcob/common.c:1342 msgid "illegal instruction" msgstr "" -#: libcob/common.c:1285 +#: libcob/common.c:1346 msgid "abort" msgstr "" -#: libcob/common.c:1289 +#: libcob/common.c:1350 msgid "process killed" msgstr "" -#: libcob/common.c:1293 +#: libcob/common.c:1354 msgid "alarm signal" msgstr "" -#: libcob/common.c:1297 +#: libcob/common.c:1358 msgid "stop process" msgstr "" -#: libcob/common.c:1301 libcob/common.c:1305 +#: libcob/common.c:1362 libcob/common.c:1366 msgid "child process stopped" msgstr "" #. TRANSLATORS: This msgid is used for an OS signal like SIGABRT. -#: libcob/common.c:1312 +#: libcob/common.c:1373 msgid "signal" msgstr "" #. TRANSLATORS: This msgid is shown for a requested but not complete stack trace. -#: libcob/common.c:1314 +#: libcob/common.c:1375 msgid "(more COBOL runtime elements follow...)" msgstr "" -#: libcob/common.c:1316 libcob/common.c:8101 +#: libcob/common.c:1377 libcob/common.c:8922 #, c-format msgid "abnormal termination - file contents may be incorrect" msgstr "" -#: libcob/common.c:3145 libcob/common.c:8581 libcob/common.c:8595 +#: libcob/common.c:3441 libcob/common.c:9398 libcob/common.c:9412 msgid "version mismatch" msgstr "" -#: libcob/common.c:3146 libcob/common.c:3148 libcob/common.c:8582 -#: libcob/common.c:8584 +#: libcob/common.c:3442 libcob/common.c:3444 libcob/common.c:9399 +#: libcob/common.c:9401 #, c-format msgid "%s has version %s.%d" msgstr "" -#: libcob/common.c:3158 +#: libcob/common.c:3454 #, fuzzy, c-format msgid "CALL to %s requires %d arguments" msgstr "`%s' %d ĤźɬפȤޤ" -#: libcob/common.c:3779 +#: libcob/common.c:4141 #, c-format msgid "code execution leaving %s" msgstr "" -#: libcob/common.c:3789 +#: libcob/common.c:4151 #, c-format msgid "BASED/LINKAGE item %s has NULL address" msgstr "" -#: libcob/common.c:3802 libcob/common.c:3806 +#: libcob/common.c:4168 +#, c-format +msgid "memory violation detected for '%s' after %s" +msgstr "" + +#: libcob/common.c:4171 +#, c-format +msgid "memory violation detected after %s" +msgstr "" + +#: libcob/common.c:4229 libcob/common.c:4244 libcob/common.c:4283 +#: libcob/common.c:4287 #, c-format msgid "LINKAGE item %s not passed by caller" msgstr "" -#: libcob/common.c:3892 +#: libcob/common.c:4253 +#, c-format +msgid "LINKAGE item %s (size %lu) too small in the caller (size %lu)" +msgstr "" + +#: libcob/common.c:4378 #, fuzzy, c-format msgid "'%s' (Type: %s) not numeric: '%s'" msgstr "`%s' ϿǤϤޤ: `%s'" -#: libcob/common.c:3917 +#: libcob/common.c:4403 #, fuzzy, c-format msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgstr "OCCURS DEPENDING ON `%s' ϰϤۤƤޤ: %d" -#: libcob/common.c:3920 libcob/common.c:3958 +#: libcob/common.c:4406 libcob/common.c:4444 #, fuzzy, c-format msgid "maximum subscript for '%s': %d" msgstr "'%s' źϰϤĶƤޤ: %d" -#: libcob/common.c:3922 +#: libcob/common.c:4408 #, fuzzy, c-format msgid "minimum subscript for '%s': %d" msgstr "'%s' źϰϤĶƤޤ: %d" -#: libcob/common.c:3955 +#: libcob/common.c:4441 #, c-format msgid "current maximum subscript for '%s': %d" msgstr "" -#: libcob/common.c:3979 +#: libcob/common.c:4465 #, fuzzy, c-format msgid "offset of '%s' out of bounds: %d, maximum: %d" msgstr "'%s' γϰ֤ϰϤĶƤޤ: %d" -#: libcob/common.c:3994 +#: libcob/common.c:4480 #, fuzzy, c-format msgid "length of '%s' out of bounds: %d, maximum: %d" msgstr "'%s' ĹϰϤĶƤޤ: %d" -#: libcob/common.c:4005 +#: libcob/common.c:4491 #, fuzzy, c-format msgid "length of '%s' out of bounds: %d, starting at: %d, maximum: %d" msgstr "'%s' ĹϰϤĶƤޤ: %d" -#: libcob/common.c:4093 libcob/common.c:4098 +#: libcob/common.c:4579 libcob/common.c:4584 #, c-format msgid "EXTERNAL item '%s' previously allocated with size %d, requested size is %d" msgstr "" -#: libcob/common.c:4593 +#: libcob/common.c:4961 libcob/common.c:5201 #, fuzzy, c-format msgid "COB_CURRENT_DATE '%s' is invalid" msgstr "`%s' Ͻޤ" -#: libcob/common.c:5641 libcob/common.c:5644 +#: libcob/common.c:6321 libcob/common.c:6324 msgid "Program abandoned at user request" msgstr "" -#: libcob/common.c:5668 +#: libcob/common.c:6348 #, c-format msgid "parameter to SYSTEM call is larger than %d characters" msgstr "" -#: libcob/common.c:6202 +#: libcob/common.c:6998 #, c-format msgid "error '%s' during CBL_GC_FORK" msgstr "" -#: libcob/common.c:6207 libcob/common.c:6304 +#: libcob/common.c:7003 libcob/common.c:7100 #, fuzzy, c-format msgid "'%s' is not supported on this platform" msgstr "`%s' ϼƤޤ" -#: libcob/common.c:6233 +#: libcob/common.c:7029 #, c-format msgid "error '%s' for P%d during CBL_GC_WAITPID" msgstr "" -#: libcob/common.c:6424 -msgid "Call to CBL_GC_GETOPT with wrong longoption size." +#: libcob/common.c:7220 +msgid "call to CBL_GC_GETOPT with wrong longoption size" msgstr "" -#: libcob/common.c:6429 -msgid "Call to CBL_GC_GETOPT with missing longind." +#: libcob/common.c:7225 +msgid "call to CBL_GC_GETOPT with missing longind" msgstr "" -#: libcob/common.c:6856 libcob/common.c:6877 libcob/common.c:6890 -#: libcob/common.c:9107 libcob/common.c:9111 +#: libcob/common.c:7654 libcob/common.c:7675 libcob/common.c:7688 +#: libcob/common.c:9924 libcob/common.c:9928 #, c-format msgid "(default)" msgstr "" -#: libcob/common.c:7143 libcob/common.c:7162 +#: libcob/common.c:7973 libcob/common.c:7992 msgid "should be unsigned" msgstr "" -#: libcob/common.c:7151 libcob/common.c:7200 +#: libcob/common.c:7981 libcob/common.c:8030 msgid "should be numeric" msgstr "" -#: libcob/common.c:7209 +#: libcob/common.c:8039 #, c-format msgid "minimum value: %lu" msgstr "" -#: libcob/common.c:7261 libcob/common.c:7825 libcob/common.c:7839 +#: libcob/common.c:8069 libcob/common.c:8640 libcob/common.c:8654 +#: bin/cobcrun.c:206 #, c-format msgid "should not contain '%c'" msgstr "" -#: libcob/common.c:7342 libcob/common.c:7390 libcob/common.c:7418 -#: libcob/common.c:7427 libcob/common.c:7435 libcob/common.c:7460 +#: libcob/common.c:8150 libcob/common.c:8169 libcob/common.c:8231 +#: libcob/common.c:8240 libcob/common.c:8248 libcob/common.c:8273 #, c-format msgid "not set" msgstr "" -#: libcob/common.c:7410 libcob/common.c:7413 libcob/common.c:7416 +#: libcob/common.c:8223 libcob/common.c:8226 libcob/common.c:8229 #, c-format msgid "set by %s" msgstr "" -#: libcob/common.c:7552 +#: libcob/common.c:8367 #, c-format msgid "WARNING - '%s' without a value - ignored!" msgstr "" -#: libcob/common.c:7555 +#: libcob/common.c:8370 #, fuzzy, c-format msgid "'%s' without a value!" msgstr "`%s' ϿͤǤϤޤ" -#: libcob/common.c:7582 +#: libcob/common.c:8397 #, c-format msgid "WARNING - '%s %s' without a value - ignored!" msgstr "" -#: libcob/common.c:8085 +#: libcob/common.c:8906 msgid "error" msgstr "" -#: libcob/common.c:8127 +#: libcob/common.c:8948 msgid "attempt to CANCEL active program" msgstr "" -#: libcob/common.c:8154 +#: libcob/common.c:8975 msgid "CALL of program with CHAINING clause" msgstr "" -#: libcob/common.c:8158 +#: libcob/common.c:8979 msgid "stack overflow, possible PERFORM depth exceeded" msgstr "" -#: libcob/common.c:8163 +#: libcob/common.c:8984 msgid "invalid entry/exit in GLOBAL USE procedure" msgstr "" -#: libcob/common.c:8167 +#: libcob/common.c:8988 msgid "unable to allocate memory" msgstr "" -#: libcob/common.c:8172 +#: libcob/common.c:8993 #, fuzzy msgid "invalid entry into module" msgstr " VALUE Ǥ" -#: libcob/common.c:8179 +#: libcob/common.c:9000 #, c-format msgid "recursive CALL from '%s' to '%s' which is NOT RECURSIVE" msgstr "" -#: libcob/common.c:8184 +#: libcob/common.c:9005 #, c-format msgid "invalid recursive COBOL CALL to '%s'" msgstr "" -#: libcob/common.c:8199 +#: libcob/common.c:9020 #, fuzzy msgid "end of file" msgstr "եνǤ" -#: libcob/common.c:8202 +#: libcob/common.c:9023 #, fuzzy msgid "key out of range" msgstr "ϰϤǤ" -#: libcob/common.c:8205 +#: libcob/common.c:9026 #, fuzzy msgid "key order not ascending" msgstr "ǤϤޤ" -#: libcob/common.c:8208 +#: libcob/common.c:9029 #, fuzzy msgid "record key already exists" msgstr "쥳ɥ¸ߤޤ" -#: libcob/common.c:8211 +#: libcob/common.c:9032 #, fuzzy msgid "record key does not exist" msgstr "쥳ɥ¸ߤޤ" -#: libcob/common.c:8214 +#: libcob/common.c:9035 #, fuzzy msgid "permanent file error" msgstr "³ե륨顼Ǥ" -#: libcob/common.c:8217 +#: libcob/common.c:9038 #, fuzzy msgid "inconsistent file name" msgstr "ʹϢǤ" -#: libcob/common.c:8220 +#: libcob/common.c:9041 #, fuzzy msgid "file does not exist" msgstr "ե뤬¸ߤޤ" -#: libcob/common.c:8223 +#: libcob/common.c:9044 #, fuzzy msgid "permission denied" msgstr "ѵĤޤ" -#: libcob/common.c:8226 +#: libcob/common.c:9047 msgid "mismatch of fixed file attributes" msgstr "" -#: libcob/common.c:8229 +#: libcob/common.c:9050 #, fuzzy msgid "file already open" msgstr "եϴ˳Ƥޤ" -#: libcob/common.c:8232 +#: libcob/common.c:9053 #, fuzzy msgid "file not open" msgstr "ե뤬Ƥޤ" -#: libcob/common.c:8235 +#: libcob/common.c:9056 msgid "READ must be executed first" msgstr "READ ˼¹ԤʤФʤޤ" -#: libcob/common.c:8238 +#: libcob/common.c:9059 #, fuzzy msgid "record overflow" msgstr "쥳ɤΰĶƤޤ" -#: libcob/common.c:8241 +#: libcob/common.c:9062 msgid "READ after unsuccessful READ/START" msgstr "" -#: libcob/common.c:8244 +#: libcob/common.c:9065 #, fuzzy msgid "READ/START not allowed, file not open for input" msgstr "READSTART ϵĤޤ" -#: libcob/common.c:8247 +#: libcob/common.c:9068 msgid "WRITE not allowed, file not open for output" msgstr "" -#: libcob/common.c:8250 +#: libcob/common.c:9071 #, fuzzy msgid "DELETE/REWRITE not allowed, file not open for I-O" msgstr "DELETEREWRITE ϵĤޤ" -#: libcob/common.c:8253 +#: libcob/common.c:9074 msgid "record locked by another file connector" msgstr "" -#: libcob/common.c:8256 +#: libcob/common.c:9077 #, fuzzy msgid "LINAGE values invalid" msgstr "`%s' Ͻޤ" -#: libcob/common.c:8259 +#: libcob/common.c:9080 msgid "file sharing conflict" msgstr "" -#: libcob/common.c:8262 +#: libcob/common.c:9083 msgid "invalid data in LINE SEQUENTIAL file" msgstr "" -#: libcob/common.c:8266 +#: libcob/common.c:9087 msgid "runtime library is not configured for this operation" msgstr "" -#: libcob/common.c:8271 +#: libcob/common.c:9092 #, fuzzy msgid "unknown file error" msgstr "Υե륨顼Ǥ" -#: libcob/common.c:8278 +#: libcob/common.c:9099 #, fuzzy, c-format msgid "%s (status = %02d) for file %s" msgstr "%s 礬ե `%s' ɬפǤ" -#: libcob/common.c:8281 +#: libcob/common.c:9102 #, fuzzy, c-format msgid "%s (status = %02d) for file %s on %s" msgstr "%s 礬ե `%s' ɬפǤ" -#: libcob/common.c:8288 +#: libcob/common.c:9109 msgid "attempt to use non-implemented function" msgstr "" -#: libcob/common.c:8291 +#: libcob/common.c:9112 msgid "attempt to use non-implemented XML I/O" msgstr "" -#: libcob/common.c:8294 +#: libcob/common.c:9115 msgid "attempt to use non-implemented JSON I/O" msgstr "" -#: libcob/common.c:8341 +#: libcob/common.c:9162 msgid "environment variables" msgstr "" -#: libcob/common.c:8466 libcob/common.c:8539 libcob/common.c:8554 -#: libcob/common.c:8859 libcob/common.c:8893 libcob/common.c:8910 -#: libcob/common.c:8925 +#: libcob/common.c:9283 libcob/common.c:9356 libcob/common.c:9371 +#: libcob/common.c:9676 libcob/common.c:9710 libcob/common.c:9727 +#: libcob/common.c:9742 #, c-format msgid "%s, version %d.%d.%d" msgstr "" -#: libcob/common.c:8468 libcob/common.c:8541 libcob/common.c:8558 -#: libcob/common.c:8862 libcob/common.c:8913 libcob/common.c:8928 +#: libcob/common.c:9285 libcob/common.c:9358 libcob/common.c:9375 +#: libcob/common.c:9679 libcob/common.c:9730 libcob/common.c:9745 #, c-format msgid "%s, version %d.%d.%d (compiled with %d.%d)" msgstr "" -#: libcob/common.c:8471 +#: libcob/common.c:9288 #, c-format msgid "%s, version %s" msgstr "" -#: libcob/common.c:8739 +#: libcob/common.c:9556 #, c-format msgid "License LGPLv3+: GNU LGPL version 3 or later <%s>" msgstr "" -#: libcob/common.c:8803 libcob/common.c:8805 +#: libcob/common.c:9620 libcob/common.c:9622 msgid "dynamic loading" msgstr "" -#: libcob/common.c:8938 +#: libcob/common.c:9755 msgid "mouse support" msgstr "" -#: libcob/common.c:8955 +#: libcob/common.c:9772 msgid "CALL configuration" msgstr "" -#: libcob/common.c:8956 +#: libcob/common.c:9773 #, fuzzy msgid "File I/O configuration" msgstr "ʹϢǤ" -#: libcob/common.c:8957 +#: libcob/common.c:9774 msgid "Screen I/O configuration" msgstr "" -#: libcob/common.c:8958 +#: libcob/common.c:9775 msgid "Miscellaneous" msgstr "" -#: libcob/common.c:8959 +#: libcob/common.c:9776 msgid "System configuration" msgstr "" -#: libcob/common.c:8963 +#: libcob/common.c:9780 #, fuzzy msgid "runtime configuration" msgstr "ʹϢǤ" -#: libcob/common.c:8965 +#: libcob/common.c:9782 msgid "via" msgstr "" -#: libcob/common.c:9040 libcob/common.c:9068 +#: libcob/common.c:9857 libcob/common.c:9885 msgid "... removed from environment" msgstr "" -#: libcob/common.c:9094 libcob/common.c:9096 +#: libcob/common.c:9911 libcob/common.c:9913 #, c-format msgid "(set by %s)" msgstr "" -#: libcob/common.c:9104 +#: libcob/common.c:9921 #, c-format msgid "(reset)" msgstr "" -#: libcob/common.c:9334 +#: libcob/common.c:10151 msgid "compiler was not built with --enable-debug-log; COB_DEBUG_LOG ignored" msgstr "" -#: libcob/common.c:9524 libcob/common.c:9550 +#: libcob/common.c:10338 libcob/common.c:10364 #, c-format msgid "%s called with unknown option: %d" msgstr "" #. TRANSLATORS: This msgid is shown for a requested but empty stack trace. -#: libcob/common.c:9597 +#: libcob/common.c:10411 msgid "No COBOL runtime elements on stack." msgstr "" -#: libcob/common.c:9915 +#: libcob/common.c:10734 #, c-format msgid "Module dump due to %s" msgstr "" -#: libcob/common.c:9943 +#: libcob/common.c:10762 #, c-format msgid "Dump Program-Id %s from %s compiled %s" msgstr "" -#: libcob/common.c:9969 +#: libcob/common.c:10788 #, c-format msgid "dump written to %s" msgstr "" -#: libcob/fileio.c:816 libcob/fileio.c:1628 libcob/fileio.c:1882 -#: libcob/fileio.c:3812 libcob/fileio.c:4396 libcob/fileio.c:9658 -#: libcob/fileio.c:9686 libcob/numeric.c:1583 +#: libcob/fileio.c:784 libcob/fileio.c:1664 libcob/fileio.c:1926 +#: libcob/fileio.c:3938 libcob/fileio.c:4522 libcob/fileio.c:10049 +#: libcob/fileio.c:10077 libcob/numeric.c:1915 #, fuzzy, c-format msgid "invalid internal call of %s" msgstr "ͤ礭ܤ礭ۤƤޤ" -#: libcob/fileio.c:3359 +#: libcob/fileio.c:3486 #, c-format msgid "BDB error: %s" msgstr "" -#: libcob/fileio.c:3369 +#: libcob/fileio.c:3496 #, c-format msgid "BDB error: %s %s" msgstr "" -#: libcob/fileio.c:3383 libcob/fileio.c:3403 +#: libcob/fileio.c:3510 libcob/fileio.c:3530 #, c-format msgid "cannot join BDB environment (%s), error: %d %s" msgstr "" -#: libcob/fileio.c:3458 libcob/fileio.c:3483 libcob/fileio.c:3509 -#: libcob/fileio.c:3528 +#: libcob/fileio.c:3585 libcob/fileio.c:3610 libcob/fileio.c:3636 +#: libcob/fileio.c:3655 #, c-format msgid "BDB (%s), error: %d %s" msgstr "" -#: libcob/fileio.c:6071 +#: libcob/fileio.c:6199 #, c-format msgid "ERROR FILE %s has ASSIGN field is NULL" msgstr "" -#: libcob/fileio.c:6862 +#: libcob/fileio.c:7050 #, c-format msgid "call to CBL_OPEN_FILE with wrong access mode: %d" msgstr "" -#: libcob/fileio.c:6946 +#: libcob/fileio.c:7135 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_lock: %d" msgstr "" -#: libcob/fileio.c:6949 +#: libcob/fileio.c:7138 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_dev: %d" msgstr "" -#: libcob/fileio.c:7174 libcob/fileio.c:7457 +#: libcob/fileio.c:7362 libcob/fileio.c:7645 #, c-format msgid "'%s' - File detail area is too short" msgstr "" -#: libcob/fileio.c:7686 +#: libcob/fileio.c:7871 msgid "SORT is unable to acquire temporary file" msgstr "" #. TRANSLATORS: This msgid is concatenated with a filename; -#. setup translation to allow this to be followed on the right side. -#: libcob/fileio.c:8432 +#. setup translation to allow this to be followed on the right side, +#. if necessary use a colon or hyphen +#: libcob/fileio.c:8777 msgid "implicit CLOSE of " msgstr "" -#: libcob/fileio.c:9617 libcob/fileio.c:9752 +#: libcob/fileio.c:10008 libcob/fileio.c:10193 #, c-format msgid "ERROR: EXTFH called with FCD version %d" msgstr "" -#: libcob/fileio.c:9886 +#: libcob/fileio.c:10310 #, fuzzy, c-format msgid "ERROR: EXTFH called with wrong file organization %d" msgstr "`%s' Ͻޤ" -#: libcob/fileio.c:9893 +#: libcob/fileio.c:10317 #, c-format msgid "ERROR: EXTFH called with no %s pointer" msgstr "" -#: libcob/fileio.c:10029 +#: libcob/fileio.c:10461 #, c-format msgid "ERROR: EXTFH called with no %s pointer; Function %d" msgstr "" -#: libcob/fileio.c:10208 +#: libcob/fileio.c:10683 #, c-format msgid "ERROR: EXTFH called with unknown Function %d" msgstr "" -#: libcob/reportio.c:630 +#: libcob/reportio.c:629 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT %d" msgstr "" -#: libcob/reportio.c:637 libcob/reportio.c:652 +#: libcob/reportio.c:636 libcob/reportio.c:651 #, c-format msgid "INITIATE %s NEXT GROUP %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:645 +#: libcob/reportio.c:644 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:1327 +#: libcob/reportio.c:1336 #, c-format msgid "INITIATE %s was already done" msgstr "" -#: libcob/reportio.c:1343 +#: libcob/reportio.c:1352 #, c-format msgid "INITIATE %s PAGE LIMIT problem" msgstr "" -#: libcob/reportio.c:1420 +#: libcob/reportio.c:1429 #, c-format msgid "TERMINATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1565 +#: libcob/reportio.c:1574 #, c-format msgid "GENERATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1917 +#: libcob/reportio.c:1926 #, c-format msgid "could not find line to SUPPRESS in report %s" msgstr "" -#: libcob/screenio.c:568 +#: libcob/screenio.c:1055 msgid "failed to initialize curses" msgstr "" -#: libcob/screenio.c:4081 +#: libcob/screenio.c:5034 msgid "end of program, please press a key to exit" msgstr "" -#: libcob/termio.c:78 libcob/termio.c:117 +#: libcob/termio.c:76 libcob/termio.c:136 msgid "(Not representable)" msgstr "" -#: libcob/termio.c:354 +#: libcob/termio.c:406 #, c-format msgid "cannot open %s (=%s)" msgstr "" -#: libcob/termio.c:369 +#: libcob/termio.c:421 msgid "COB_DISPLAY_PUNCH_FILE is invalid, output to SYSPUNCH skipped" msgstr "" @@ -7084,32 +7228,22 @@ msgid "" " (COB_LIBRARY_PATH and/or COB_PRELOAD)" msgstr "" -#: bin/cobcrun.c:146 -#, c-format -msgid "GnuCOBOL home page: <%s>" -msgstr "" - -#: bin/cobcrun.c:148 -#, c-format -msgid "General help using GNU software: <%s>" -msgstr "" - -#: bin/cobcrun.c:288 +#: bin/cobcrun.c:286 #, fuzzy msgid "invalid configuration file name" msgstr "ʹϢǤ" -#: bin/cobcrun.c:355 +#: bin/cobcrun.c:353 #, fuzzy, c-format msgid "invalid module argument '%s'" msgstr "ϥȥ꡼Ǥ" -#: bin/cobcrun.c:410 +#: bin/cobcrun.c:408 #, c-format msgid "%s: missing PROGRAM name" msgstr "" -#: bin/cobcrun.c:412 +#: bin/cobcrun.c:410 #, c-format msgid "Try '%s --help' for more information." msgstr "" @@ -7126,10 +7260,6 @@ msgstr "" #~ msgid "invalid parameter -std=%s" #~ msgstr " MOVE ʸǤ" -#, fuzzy -#~ msgid "invalid option detected" -#~ msgstr "ʥץǤ -std=%s\n" - #, fuzzy, c-format #~ msgid "Invalid type for '%s'" #~ msgstr "%s: `%s':\n" @@ -7150,6 +7280,10 @@ msgstr "" #~ msgid "only level 88 items may have multiple values" #~ msgstr "ʣͤϥ٥ 88 ܤΤߤ˵ޤ" +#, fuzzy, c-format +#~ msgid "unexpected USAGE: %d" +#~ msgstr "ʿǤ" + #, fuzzy #~ msgid "88-level cannot be used here" #~ msgstr "`%s' źդޤ" @@ -7170,14 +7304,30 @@ msgstr "" #~ msgid "non-negative integer value expected" #~ msgstr "ͤɬפǤ" +#, fuzzy +#~ msgid "invalid CLASS value" +#~ msgstr " VALUE Ǥ" + #, fuzzy #~ msgid "PROCESS statement ignored" #~ msgstr "PROCESS ʸ̵뤵ޤ" +#, fuzzy, c-format +#~ msgid "FUNCTION %s has invalid/not supported arguments - Tag %d" +#~ msgstr "`%s' ʬȤǤޤ" + #, fuzzy #~ msgid "invalid literal cast" #~ msgstr " H Ǥ: %s" +#, fuzzy, c-format +#~ msgid "'%s' is not a numeric literal" +#~ msgstr "`%s' ϿͤǤϤޤ" + +#, fuzzy, c-format +#~ msgid "'%s' is not unsigned" +#~ msgstr "%s ̤Ǥ" + #, fuzzy, c-format #~ msgid "file '%s': record size (IDX) %d exceeds maximum allowed (%d)" #~ msgstr "쥳Ĺû᤮ޤ `%s'" @@ -7194,10 +7344,38 @@ msgstr "" #~ msgid "invalid use of HANDLE item" #~ msgstr "ʼǤ" +#, fuzzy, c-format +#~ msgid "'%s' is not a numeric value" +#~ msgstr "`%s' ϿͤǤϤޤ" + +#, fuzzy, c-format +#~ msgid "'%s' is not an integer value" +#~ msgstr "`%s' ǤϤޤ" + #, fuzzy #~ msgid "Variable length item not allowed here" #~ msgstr "`%s' Ͻޤ" +#, fuzzy, c-format +#~ msgid "'%s' is not an alphabet name" +#~ msgstr "`%s' ϥե٥å̾ǤϤޤ" + +#, fuzzy +#~ msgid "invalid destination for MOVE" +#~ msgstr "ʹϢǤ" + +#, fuzzy +#~ msgid "invalid SORT filename" +#~ msgstr " VALUE Ǥ" + +#, fuzzy +#~ msgid "invalid SORT USING parameter" +#~ msgstr " MOVE ʸǤ" + +#, fuzzy +#~ msgid "invalid SORT GIVING parameter" +#~ msgstr " MOVE ʸǤ" + #, fuzzy #~ msgid "warn incompatible redefinition of data items" #~ msgstr "ǡܤκٹ𤹤" @@ -7488,9 +7666,6 @@ msgstr "" #~ msgid "Invalid -MF parameter\n" #~ msgstr " MOVE ʸǤ" -#~ msgid "-MT must be given to specify target file\n" -#~ msgstr "åȥե -MT ǻꤷƲ\n" - #, fuzzy #~ msgid "Unexepected tree tag %d" #~ msgstr "ʿǤ" diff --git a/po/nl.po b/po/nl.po index 2687bce10..e6147cf94 100644 --- a/po/nl.po +++ b/po/nl.po @@ -1,5 +1,5 @@ -# Dutch translations for GnuCOBOL package -# Copyright (C) 2002-2020 Free Software Foundation, Inc. +# Dutch translations for GNU Cobol package +# Copyright (C) 2012 Keisuke Nishida / Roger While # This file is distributed under the same license as the GNU Cobol package. # # Ed Borchert <ed@borchert.nl>, @@ -8,7 +8,7 @@ msgid "" msgstr "" "Project-Id-Version: gnu-cobol 2.0\n" "Report-Msgid-Bugs-To: gnucobol-messages@gnu.org\n" -"POT-Creation-Date: 2022-10-23 03:06+0200\n" +"POT-Creation-Date: 2023-07-28 19:20+0200\n" "PO-Revision-Date: 2016-08-13 23:32+0100\n" "Last-Translator: Ed Borchert, Ronald Heirbaut\n" "Language-Team: Dutch <vertaling@vrijschrift.org>\n" @@ -19,180 +19,183 @@ msgstr "" "X-Poedit-Language: Dutch\n" "X-Poedit-Country: NETHERLANDS\n" -#: cobc/cobc.c:98 +#: cobc/cobc.c:116 cobc/codegen.c:2655 cobc/scanner.l:1375 #, fuzzy, c-format msgid "invalid parameter: %s" msgstr "Ongeldige %s parameter" -#: cobc/cobc.c:153 cobc/cobc.c:2233 cobc/cobc.c:2236 cobc/parser.y:802 -#: cobc/reserved.c:4022 libcob/common.c:226 libcob/common.c:1308 -#: libcob/common.c:2384 libcob/common.c:2388 libcob/common.c:2426 -#: libcob/common.c:2464 libcob/common.c:2654 libcob/common.c:7351 -#: libcob/common.c:8370 libcob/common.c:9391 libcob/common.c:9470 -#: libcob/common.c:9912 +#: cobc/cobc.c:171 cobc/cobc.c:2392 cobc/cobc.c:2395 cobc/parser.y:895 +#: cobc/reserved.c:4039 libcob/common.c:235 libcob/common.c:1369 +#: libcob/common.c:2698 libcob/common.c:2702 libcob/common.c:2740 +#: libcob/common.c:2778 libcob/common.c:2939 libcob/common.c:8159 +#: libcob/common.c:9191 libcob/common.c:10209 libcob/common.c:10284 +#: libcob/common.c:10731 #, fuzzy msgid "unknown" msgstr "Onbekend" -#: cobc/cobc.c:855 +#: cobc/cobc.c:905 #, fuzzy msgid "internal compiler error" msgstr "%s:%d Interne compiler fout" -#: cobc/cobc.c:921 cobc/cobc.c:1008 cobc/cobc.c:1070 cobc/cobc.c:1146 -#: cobc/cobc.c:1186 cobc/cobc.c:1262 +#: cobc/cobc.c:971 cobc/cobc.c:1058 cobc/cobc.c:1120 cobc/cobc.c:1196 +#: cobc/cobc.c:1236 cobc/cobc.c:1312 #, fuzzy, c-format msgid "cannot allocate %d bytes of memory" msgstr "Kan geen %d bytes geheugen verkrijgen - Afbreken" -#: cobc/cobc.c:934 cobc/cobc.c:950 cobc/cobc.c:970 cobc/cobc.c:1029 -#: cobc/cobc.c:1048 cobc/cobc.c:1166 cobc/cobc.c:1281 cobc/cobc.c:1323 -#: cobc/field.c:2216 libcob/common.c:8191 +#: cobc/cobc.c:984 cobc/cobc.c:1000 cobc/cobc.c:1020 cobc/cobc.c:1079 +#: cobc/cobc.c:1098 cobc/cobc.c:1216 cobc/cobc.c:1331 cobc/cobc.c:1415 +#: cobc/field.c:2346 libcob/common.c:9012 #, fuzzy, c-format msgid "call to %s with NULL pointer" msgstr "Aanroep van %s met NULL pointer" -#: cobc/cobc.c:991 +#: cobc/cobc.c:1041 #, fuzzy, c-format msgid "cannot reallocate %d bytes of memory" msgstr "Kan geen %d bytes geheugen verkrijgen - Afbreken" -#: cobc/cobc.c:1087 cobc/cobc.c:1203 +#: cobc/cobc.c:1137 cobc/cobc.c:1253 #, fuzzy msgid "attempt to reallocate non-allocated memory" msgstr "Poging om niet geïnitialiseerd geheugen te verkrijgen - Afbreken" -#: cobc/cobc.c:1120 cobc/cobc.c:1236 +#: cobc/cobc.c:1170 cobc/cobc.c:1286 #, c-format msgid "call to %s with invalid pointer, as it is missing in list" msgstr "" -#: cobc/cobc.c:1448 +#: cobc/cobc.c:1540 #, fuzzy, c-format msgid "assuming literal for unquoted '%s'" msgstr "Waarschuwing - Aanname constante voor '%s' zonder aanhalingstekens" -#: cobc/cobc.c:1495 +#: cobc/cobc.c:1587 #, fuzzy #| msgid "Word length exceeds maximum allowed - '%s'" msgid " - length exceeds maximum" msgstr "Woord lengte overschrijdt maximum toegestaan - '%s'" -#: cobc/cobc.c:1499 +#: cobc/cobc.c:1591 msgid " - name cannot be empty" msgstr "" -#: cobc/cobc.c:1502 +#: cobc/cobc.c:1594 #, fuzzy -msgid " - name cannot begin with space or underscore" +msgid " - name cannot begin with space or hyphen" msgstr " - Naam mag niet beginnen met spatie of underscore" -#: cobc/cobc.c:1505 +#: cobc/cobc.c:1597 #, fuzzy msgid " - name cannot begin with 'cob_' or 'COB_'" msgstr " - Naam mag niet beginnen met 'cob_' of 'COB_'" -#: cobc/cobc.c:1508 +#: cobc/cobc.c:1600 #, fuzzy msgid " - name duplicates a 'C' keyword" msgstr " - Naam is een 'C' gereserveerd woord" -#: cobc/cobc.c:1511 +#: cobc/cobc.c:1603 #, fuzzy msgid " - name cannot contain a directory separator" msgstr " - Naam mag geen map scheidingsteken bevatten" -#: cobc/cobc.c:1520 +#: cobc/cobc.c:1612 #, fuzzy, c-format msgid "invalid file base name '%s'%s" msgstr "Ongeldige bestandsnaam '%s'%s" -#: cobc/cobc.c:1524 +#: cobc/cobc.c:1616 #, fuzzy, c-format msgid "invalid ENTRY '%s'%s" msgstr "Ongeldige ENTRY '%s'%s" -#: cobc/cobc.c:1527 +#: cobc/cobc.c:1619 #, fuzzy, c-format msgid "invalid PROGRAM-ID '%s'%s" msgstr "Ongeldige PROGRAM-ID '%s'%s" -#: cobc/cobc.c:1659 +#: cobc/cobc.c:1751 #, fuzzy, c-format msgid "file '%s' does not exist" msgstr "Bestand niet aanwezig" -#: cobc/cobc.c:1685 +#: cobc/cobc.c:1777 #, fuzzy, c-format msgid "duplicate exception '%s'" msgstr "Ongeldig DEFINE/SET statement" -#: cobc/cobc.c:1733 +#: cobc/cobc.c:1825 #, fuzzy, c-format msgid "invalid exception-name: %s" msgstr "Ongeldige %s parameter" -#: cobc/cobc.c:1870 cobc/cobc.c:8780 +#: cobc/cobc.c:1998 cobc/cobc.c:9211 msgid "please check environment variables as noted above" msgstr "" -#: cobc/cobc.c:1882 cobc/error.c:348 cobc/error.c:382 cobc/error.c:408 -#: cobc/error.c:411 cobc/error.c:477 cobc/error.c:631 cobc/error.c:675 -#: cobc/error.c:779 cobc/error.c:782 +#: cobc/cobc.c:2010 cobc/error.c:140 #, fuzzy msgid "error: " msgstr "Fout: " -#: cobc/cobc.c:1905 +#: cobc/cobc.c:2033 #, fuzzy, c-format msgid "duplicate DEFINE '%s' - ignored" msgstr "Dubbele definitie '%s' - Negeren" -#: cobc/cobc.c:1958 +#: cobc/cobc.c:2086 #, c-format msgid "environment variable '%s' is '%s'; should not contain '%c'" msgstr "" -#: cobc/cobc.c:1988 +#: cobc/cobc.c:2116 #, fuzzy msgid "parameter buffer size exceeded" msgstr "Parameter buffer grootte overschreden" -#: cobc/cobc.c:2028 +#: cobc/cobc.c:2156 #, fuzzy, c-format msgid "warning: could not move temporary file to %s" msgstr "Waarschuwing - Kon tijdelijk bestand niet verplaatsen naar %s" -#: cobc/cobc.c:2239 +#: cobc/cobc.c:2329 +#, c-format +msgid "environment variable '%s' has invalid content" +msgstr "" + +#: cobc/cobc.c:2398 #, fuzzy, c-format msgid "aborting compile of %s at line %d (%s: %s)" msgstr "Afbreken compilatie van %s bij regel %d" -#: cobc/cobc.c:2243 +#: cobc/cobc.c:2402 #, fuzzy, c-format msgid "aborting codegen for %s, last statement at line %d (%s: %s)" msgstr "Afbreken compilatie van %s bij regel %d" -#: cobc/cobc.c:2246 +#: cobc/cobc.c:2405 #, fuzzy, c-format msgid "aborting codegen for %s (%s: %s)" msgstr "Afbreken compilatie van %s bij regel %d" -#: cobc/cobc.c:2251 +#: cobc/cobc.c:2410 msgid "aborting" msgstr "" -#: cobc/cobc.c:2329 libcob/common.c:2823 libcob/common.c:8149 bin/cobcrun.c:375 +#: cobc/cobc.c:2488 libcob/common.c:3107 libcob/common.c:8970 bin/cobcrun.c:373 #, fuzzy, c-format msgid "Please report this!" msgstr "Codegen fout - Doorgeven s.v.p." -#: cobc/cobc.c:2346 bin/cobcrun.c:100 +#: cobc/cobc.c:2505 bin/cobcrun.c:100 #, c-format msgid "License GPLv3+: GNU GPL version 3 or later <%s>" msgstr "" -#: cobc/cobc.c:2348 libcob/common.c:8741 bin/cobcrun.c:102 +#: cobc/cobc.c:2507 libcob/common.c:9558 bin/cobcrun.c:102 msgid "" "This is free software; see the source for copying conditions. There is NO\n" "warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." @@ -200,415 +203,419 @@ msgstr "" "Dit is vrij beschikbare software; zie de bron code voor de kopieer condities. Er is GEEN\n" "garantie en geen toestemming voor verkoop. Ook niet voor een bepaalde toepassing." -#: cobc/cobc.c:2350 libcob/common.c:8743 bin/cobcrun.c:104 +#: cobc/cobc.c:2509 libcob/common.c:9560 bin/cobcrun.c:104 #, c-format msgid "Written by %s" msgstr "" #. TRANSLATORS: This msgid is intended as the "Packaged" msgid, %s expands to date and time -#: cobc/cobc.c:2352 cobc/cobc.c:2365 libcob/common.c:8747 bin/cobcrun.c:106 +#: cobc/cobc.c:2511 cobc/cobc.c:2524 libcob/common.c:9564 bin/cobcrun.c:106 #, c-format msgid "Built %s" msgstr "Gebouwd %s" #. TRANSLATORS: This msgid is intended as the "Built" msgid, %s expands to date and time -#: cobc/cobc.c:2354 cobc/cobc.c:2367 libcob/common.c:8750 bin/cobcrun.c:108 +#: cobc/cobc.c:2513 cobc/cobc.c:2526 libcob/common.c:9567 bin/cobcrun.c:108 #, c-format msgid "Packaged %s" msgstr "Verpakt %s" -#: cobc/cobc.c:2356 cobc/cobc.c:2369 cobc/cobc.c:2478 libcob/common.c:8787 +#: cobc/cobc.c:2515 cobc/cobc.c:2528 cobc/cobc.c:2637 libcob/common.c:9604 #, fuzzy #| msgid "C version %s%s" msgid "C version" msgstr "C versie %s%s" -#: cobc/cobc.c:2382 +#: cobc/cobc.c:2541 libcob/common.c:1075 #, fuzzy msgid "executing:" msgstr "Uitvoeren:" -#: cobc/cobc.c:2384 +#: cobc/cobc.c:2543 #, fuzzy msgid "to be executed:" msgstr "READ moet eerst worden uitgevoerd" -#: cobc/cobc.c:2422 cobc/cobc.c:2423 libcob/common.c:6834 libcob/common.c:6835 -#: libcob/common.c:6866 libcob/common.c:6867 +#: cobc/cobc.c:2581 cobc/cobc.c:2582 libcob/common.c:7632 libcob/common.c:7633 +#: libcob/common.c:7664 libcob/common.c:7665 msgid "env" msgstr "" -#: cobc/cobc.c:2474 libcob/common.c:8783 +#: cobc/cobc.c:2633 libcob/common.c:9600 #, fuzzy msgid "build information" msgstr "Bouw informatie" -#: cobc/cobc.c:2475 libcob/common.c:8784 +#: cobc/cobc.c:2634 libcob/common.c:9601 #, fuzzy msgid "build environment" msgstr "Bouw omgeving" -#: cobc/cobc.c:2484 libcob/common.c:8794 +#: cobc/cobc.c:2643 libcob/common.c:9611 msgid "GnuCOBOL information" msgstr "GnuCOBOL informatie" -#: cobc/cobc.c:2492 cobc/cobc.c:2575 cobc/cobc.c:2591 libcob/common.c:8410 -#: libcob/common.c:8777 libcob/common.c:8778 libcob/common.c:8812 -#: libcob/common.c:8878 libcob/common.c:8900 libcob/common.c:8934 +#: cobc/cobc.c:2651 cobc/cobc.c:2739 cobc/cobc.c:2755 libcob/common.c:9233 +#: libcob/common.c:9594 libcob/common.c:9595 libcob/common.c:9629 +#: libcob/common.c:9695 libcob/common.c:9717 libcob/common.c:9751 #, fuzzy msgid "disabled" msgstr "Uitgeschakeld" -#: cobc/cobc.c:2523 cobc/cobc.c:2541 libcob/common.c:7397 libcob/common.c:8400 -#: libcob/common.c:8407 libcob/common.c:8816 libcob/common.c:8834 +#: cobc/cobc.c:2687 cobc/cobc.c:2705 libcob/common.c:8179 libcob/common.c:9221 +#: libcob/common.c:9230 libcob/common.c:9633 libcob/common.c:9651 msgid "yes" msgstr "" -#: cobc/cobc.c:2525 cobc/cobc.c:2543 libcob/common.c:7399 libcob/common.c:8402 -#: libcob/common.c:8818 libcob/common.c:8836 +#: cobc/cobc.c:2689 cobc/cobc.c:2707 libcob/common.c:8181 libcob/common.c:9223 +#: libcob/common.c:9635 libcob/common.c:9653 msgid "no" msgstr "" -#: cobc/cobc.c:2529 libcob/common.c:8822 +#: cobc/cobc.c:2693 libcob/common.c:9639 msgid "8 bytes" msgstr "8 bytes" -#: cobc/cobc.c:2531 libcob/common.c:8824 +#: cobc/cobc.c:2695 libcob/common.c:9641 msgid "4 bytes" msgstr "4 bytes" -#: cobc/cobc.c:2535 cobc/cobc.c:2537 libcob/common.c:8828 libcob/common.c:8830 +#: cobc/cobc.c:2699 cobc/cobc.c:2701 libcob/common.c:9645 libcob/common.c:9647 msgid "endianness" msgstr "" -#: cobc/cobc.c:2535 libcob/common.c:8828 +#: cobc/cobc.c:2699 libcob/common.c:9645 msgid "big-endian" msgstr "" -#: cobc/cobc.c:2537 libcob/common.c:8830 +#: cobc/cobc.c:2701 libcob/common.c:9647 msgid "little-endian" msgstr "" -#: cobc/cobc.c:2541 cobc/cobc.c:2543 libcob/common.c:8834 libcob/common.c:8836 +#: cobc/cobc.c:2705 cobc/cobc.c:2707 libcob/common.c:9651 libcob/common.c:9653 msgid "native EBCDIC" msgstr "" -#: cobc/cobc.c:2546 libcob/common.c:8937 +#: cobc/cobc.c:2710 libcob/common.c:9754 msgid "extended screen I/O" msgstr "" -#: cobc/cobc.c:2549 libcob/common.c:8840 +#: cobc/cobc.c:2713 libcob/common.c:9657 #, fuzzy msgid "variable file format" msgstr "Variabel formaat" -#: cobc/cobc.c:2555 cobc/cobc.c:2557 libcob/common.c:8846 libcob/common.c:8848 +#: cobc/cobc.c:2719 cobc/cobc.c:2721 libcob/common.c:9663 libcob/common.c:9665 #, fuzzy msgid "sequential file handler" msgstr "Sequentiële handler" -#: cobc/cobc.c:2557 libcob/common.c:8848 +#: cobc/cobc.c:2721 libcob/common.c:9665 msgid "built-in" msgstr "" -#: cobc/cobc.c:2561 cobc/cobc.c:2563 cobc/cobc.c:2565 cobc/cobc.c:2567 -#: cobc/cobc.c:2570 cobc/cobc.c:2572 cobc/cobc.c:2575 libcob/common.c:8852 -#: libcob/common.c:8866 libcob/common.c:8868 libcob/common.c:8870 -#: libcob/common.c:8873 libcob/common.c:8875 libcob/common.c:8878 +#: cobc/cobc.c:2725 cobc/cobc.c:2727 cobc/cobc.c:2729 cobc/cobc.c:2731 +#: cobc/cobc.c:2734 cobc/cobc.c:2736 cobc/cobc.c:2739 libcob/common.c:9669 +#: libcob/common.c:9683 libcob/common.c:9685 libcob/common.c:9687 +#: libcob/common.c:9690 libcob/common.c:9692 libcob/common.c:9695 #, fuzzy msgid "indexed file handler" msgstr "Sequentiële handler" -#: cobc/cobc.c:2580 cobc/cobc.c:2582 cobc/cobc.c:2585 libcob/common.c:8884 +#: cobc/cobc.c:2744 cobc/cobc.c:2746 cobc/cobc.c:2749 libcob/common.c:9701 msgid "mathematical library" msgstr "" -#: cobc/cobc.c:2589 cobc/cobc.c:2591 libcob/common.c:8895 libcob/common.c:8900 +#: cobc/cobc.c:2753 cobc/cobc.c:2755 libcob/common.c:9712 libcob/common.c:9717 msgid "XML library" msgstr "" -#: cobc/cobc.c:2594 libcob/common.c:8917 libcob/common.c:8932 -#: libcob/common.c:8934 +#: cobc/cobc.c:2758 libcob/common.c:9734 libcob/common.c:9749 +#: libcob/common.c:9751 msgid "JSON library" msgstr "" -#: cobc/cobc.c:2597 libcob/common.c:8810 libcob/common.c:8941 +#: cobc/cobc.c:2761 libcob/common.c:9627 libcob/common.c:9758 #, fuzzy msgid "enabled" msgstr "Ingeschakeld" -#: cobc/cobc.c:2604 +#: cobc/cobc.c:2768 #, fuzzy msgid "only one of options 'E', 'S', 'C', 'c' may be specified" msgstr "Alleen één van de opties 'E', 'S', 'C', 'c' mag worden opgegeven" -#: cobc/cobc.c:2610 +#: cobc/cobc.c:2774 #, fuzzy msgid "only one of options 'm', 'x', 'b' may be specified" msgstr "Alleen één van de opties 'E', 'S', 'C', 'c' mag worden opgegeven" -#: cobc/cobc.c:2652 +#: cobc/cobc.c:2816 #, c-format msgid "option requires one of 'ALL', 'FD', 'WS', 'LS', 'RD', 'FD', 'SC', 'LO' - not '%s'" msgstr "" -#: cobc/cobc.c:2682 +#: cobc/cobc.c:2846 #, c-format msgid "'%s' is not an intrinsic function" msgstr "'%s' is geen interne compiler functie" -#: cobc/cobc.c:2726 cobc/cobc.c:8094 cobc/cobc.c:8213 cobc/codegen.c:3783 -#: cobc/codegen.c:3884 cobc/codegen.c:5571 cobc/codegen.c:5700 -#: cobc/codegen.c:13034 cobc/tree.c:1391 cobc/tree.c:4497 cobc/tree.c:5067 -#: cobc/tree.c:5316 cobc/typeck.c:4344 cobc/typeck.c:9044 cobc/typeck.c:9079 -#: cobc/typeck.c:9977 cobc/typeck.c:12619 cobc/typeck.c:12690 -#: cobc/typeck.c:12758 cobc/typeck.c:13043 cobc/typeck.c:13086 -#: libcob/fileio.c:9703 libcob/fileio.c:9714 +#: cobc/cobc.c:2889 cobc/cobc.c:8507 cobc/cobc.c:8626 cobc/codegen.c:3761 +#: cobc/codegen.c:3864 cobc/codegen.c:5671 cobc/codegen.c:5816 +#: cobc/codegen.c:13429 cobc/parser.y:391 cobc/tree.c:1397 cobc/tree.c:4565 +#: cobc/tree.c:5135 cobc/tree.c:5392 cobc/typeck.c:4497 cobc/typeck.c:9504 +#: cobc/typeck.c:9541 cobc/typeck.c:10418 cobc/typeck.c:13395 +#: cobc/typeck.c:13469 cobc/typeck.c:13537 cobc/typeck.c:13825 +#: cobc/typeck.c:13887 libcob/fileio.c:10094 libcob/fileio.c:10105 #, fuzzy, c-format msgid "call to '%s' with invalid parameter '%s'" msgstr "FUNCTION '%s' heeft een ongeldige parameter" -#: cobc/cobc.c:3136 +#: cobc/cobc.c:3300 #, fuzzy msgid "loading standard configuration file 'default.conf'" msgstr "Ongeldige regel voortzetting" -#: cobc/cobc.c:3217 +#: cobc/cobc.c:3387 msgid "the used C compiler is known to not be able to generate assembler code" msgstr "" -#: cobc/cobc.c:3299 +#: cobc/cobc.c:3469 #, fuzzy msgid "invalid output file name" msgstr "Ongeldige uitvoer bestandsnaam" -#: cobc/cobc.c:3361 +#: cobc/cobc.c:3531 #, fuzzy, c-format msgid "warning: '%s' is not a directory, defaulting to current directory" msgstr "Waarschuwing - '%s' is geen map, huidige map wordt gebruikt" -#: cobc/cobc.c:3388 +#: cobc/cobc.c:3558 #, c-format msgid "warning: %d lines per listing page specified, using %d" msgstr "" -#: cobc/cobc.c:3438 +#: cobc/cobc.c:3615 #, fuzzy, c-format msgid "warning: assuming '%s' is a DEFINE - did you intend to use -debug?" msgstr "Waarschuwing - aangenomen wordt dat '%s' een DEFINE is - bedoelt u -debug?" -#: cobc/cobc.c:3699 cobc/cobc.c:3724 cobc/cobc.c:3752 +#: cobc/cobc.c:3661 cobc/cobc.c:3702 cobc/cobc.c:4281 +#, fuzzy, c-format +msgid "ignoring nonexistent directory \"%s\"" +msgstr "Ongeldig statement genegeerd - '%s'" + +#: cobc/cobc.c:3943 cobc/cobc.c:3968 cobc/cobc.c:3996 #, fuzzy, c-format msgid "unknown warning option '%s'" msgstr "Onbekend label '%s'" -#: cobc/cobc.c:3813 +#: cobc/cobc.c:4063 #, fuzzy, c-format msgid "%s option requires a listing file" msgstr "%s: optie `%s' verwacht een argument\n" -#: cobc/cobc.c:3820 +#: cobc/cobc.c:4070 msgid "output to stdout only valid for preprocess" msgstr "" -#: cobc/cobc.c:3829 +#: cobc/cobc.c:4085 +msgid "-MT must be given to specify target file" +msgstr "" + +#: cobc/cobc.c:4091 msgid "all runtime checks are enabled" msgstr "" -#: cobc/cobc.c:4030 +#: cobc/cobc.c:4316 msgid "only one stdin input allowed" msgstr "" -#: cobc/cobc.c:4040 +#: cobc/cobc.c:4326 #, fuzzy, c-format msgid "invalid file name parameter (length > %d)" msgstr "Ongeldige bestandsnaam parameter" -#: cobc/cobc.c:4270 +#: cobc/cobc.c:4559 #, fuzzy msgid "return status:" msgstr "Retour status:" -#: cobc/cobc.c:4306 libcob/common.c:5711 +#: cobc/cobc.c:4595 libcob/common.c:6391 #, c-format msgid "external process \"%s\" ended with signal %s (%d)" msgstr "" -#: cobc/cobc.c:4364 +#: cobc/cobc.c:4654 msgid "nothing for -j to run" msgstr "" -#: cobc/cobc.c:4406 cobc/cobc.c:4420 +#: cobc/cobc.c:4697 cobc/cobc.c:4711 #, fuzzy, c-format msgid "%s is resolved by environment as: %s" msgstr "%s is verouderd in %s" -#: cobc/cobc.c:4882 +#: cobc/cobc.c:5175 #, fuzzy msgid "preprocessing:" msgstr "Voorverwerking:" -#: cobc/cobc.c:4952 +#: cobc/cobc.c:5244 msgid "'cobxref' execution unsuccessful" msgstr "Uitvoering 'xcobref' mislukt" -#: cobc/cobc.c:4955 +#: cobc/cobc.c:5247 #, fuzzy, c-format msgid "check that 'cobxref' is in %s" msgstr "Controleer of 'xcobref' voorkomt in %s" -#: cobc/cobc.c:4957 +#: cobc/cobc.c:5249 #, fuzzy msgid "no listing produced" msgstr "Geen lijst gemaakt" -#: cobc/cobc.c:5882 cobc/cobc.c:5921 +#: cobc/cobc.c:6234 cobc/cobc.c:6273 msgid "No fields defined." msgstr "" -#: cobc/cobc.c:5941 +#: cobc/cobc.c:6293 msgid "No labels defined." msgstr "" -#: cobc/cobc.c:5963 +#: cobc/cobc.c:6324 cobc/cobc.c:9292 +#, fuzzy +msgid "command line:" +msgstr "Opdracht regel:" + +#: cobc/cobc.c:6342 msgid "Error/Warning summary:" msgstr "" -#: cobc/cobc.c:6006 +#: cobc/cobc.c:6385 msgid "0 warnings in compilation group" msgstr "" -#: cobc/cobc.c:6010 +#: cobc/cobc.c:6389 msgid "1 warning in compilation group" msgstr "" -#: cobc/cobc.c:6014 +#: cobc/cobc.c:6393 #, c-format msgid "%d warnings in compilation group" msgstr "" -#: cobc/cobc.c:6020 +#: cobc/cobc.c:6399 #, fuzzy msgid "0 errors in compilation group" msgstr "Teveel fouten - Compilatie wordt afgebroken" -#: cobc/cobc.c:6024 +#: cobc/cobc.c:6403 #, fuzzy msgid "1 error in compilation group" msgstr "Teveel fouten - Compilatie wordt afgebroken" -#: cobc/cobc.c:6028 +#: cobc/cobc.c:6407 #, fuzzy, c-format msgid "%d errors in compilation group" msgstr "Teveel fouten - Compilatie wordt afgebroken" -#: cobc/cobc.c:6034 +#: cobc/cobc.c:6413 #, fuzzy, c-format msgid "Too many errors in compilation group: %d maximum errors" msgstr "Teveel fouten - Compilatie wordt afgebroken" -#: cobc/cobc.c:6632 +#: cobc/cobc.c:7028 #, c-format msgid "%s:%d: too many continuation lines" msgstr "" -#: cobc/cobc.c:7552 +#: cobc/cobc.c:7956 #, fuzzy msgid "parsing:" msgstr "Ontleden:" -#: cobc/cobc.c:7612 +#: cobc/cobc.c:8017 #, fuzzy msgid "translating:" msgstr "Vertalen:" -#: cobc/cobc.c:8786 +#: cobc/cobc.c:9217 #, fuzzy msgid "no input files" msgstr "Geen invoer bestanden" -#: cobc/cobc.c:8816 +#: cobc/cobc.c:9248 #, fuzzy, c-format msgid "%s option invalid in this combination" msgstr "-o optie ongeldig bij deze combinatie" -#: cobc/cobc.c:8857 -#, fuzzy -msgid "command line:" -msgstr "Opdracht regel:" - -#: cobc/codegen.c:1041 cobc/codegen.c:4463 cobc/codegen.c:11648 -#: cobc/codegen.c:12186 +#: cobc/codegen.c:1040 cobc/codegen.c:4506 cobc/codegen.c:11910 +#: cobc/codegen.c:12467 #, fuzzy msgid "unexpected CONSTANT item" msgstr "Onverwacht CONSTANT item" -#: cobc/codegen.c:2981 cobc/codegen.c:3261 cobc/codegen.c:8523 cobc/tree.c:1413 +#: cobc/codegen.c:2921 cobc/codegen.c:3207 cobc/codegen.c:8866 cobc/tree.c:1419 #, fuzzy, c-format msgid "unexpected cast type: %d" msgstr "Onverwacht wijzigings type %d" -#: cobc/codegen.c:3713 cobc/codegen.c:4413 +#: cobc/codegen.c:3690 cobc/codegen.c:4455 #, fuzzy, c-format msgid "internal statement stack depth exceeded: %d" msgstr "Interne statement stapel diepte overschreden -> %d" -#: cobc/codegen.c:3785 +#: cobc/codegen.c:3763 #, fuzzy, c-format msgid "%s is not a field" msgstr "'%s' is niet gedefinieerd" -#: cobc/codegen.c:4186 cobc/codegen.c:4257 +#: cobc/codegen.c:4177 cobc/codegen.c:4279 #, fuzzy, c-format msgid "unexpected function: %s" msgstr "Onverwachte functie %s" -#: cobc/codegen.c:5204 +#: cobc/codegen.c:5256 #, fuzzy, c-format msgid "unexpected tree category: %d" msgstr "Onverwachte boom categorie %d" -#: cobc/codegen.c:5971 +#: cobc/codegen.c:6108 #, fuzzy, c-format msgid "unexpected size: %d" msgstr "Onverwachte grootte" -#: cobc/codegen.c:7595 +#: cobc/codegen.c:7894 #, c-format msgid "No ENTRY FOR GO TO '%s'" msgstr "" -#: cobc/codegen.c:7816 cobc/codegen.c:8163 +#: cobc/codegen.c:8283 cobc/codegen.c:8609 #, fuzzy, c-format msgid "unexpected handler type: %d" msgstr "Onverwacht wijzigings type %d" -#: cobc/codegen.c:8254 -#, fuzzy -msgid "unexpected error_node parameter" -msgstr "Onverwachte error_node parameter" - -#: cobc/codegen.c:8544 +#: cobc/codegen.c:8887 #, fuzzy, c-format msgid "unexpected tree type: %d" msgstr "Onverwacht boom type %d" -#: cobc/codegen.c:9520 +#: cobc/codegen.c:9776 msgid "Nested OCCURS in report" msgstr "" -#: cobc/codeoptim.c:2777 +#: cobc/codeoptim.c:2856 #, fuzzy, c-format msgid "unexpected optimization value: %d" msgstr "Onverwachte optimalisatie waarde" -#: cobc/config.c:164 libcob/common.c:7824 libcob/common.c:7838 -#: libcob/common.c:8315 +#: cobc/config.c:164 libcob/common.c:8639 libcob/common.c:8653 +#: libcob/common.c:9136 #, fuzzy, c-format msgid "invalid value '%s' for configuration tag '%s'" msgstr "Ongeldige waarde voor '%s'" -#: cobc/config.c:167 libcob/common.c:7117 libcob/common.c:7234 +#: cobc/config.c:167 libcob/common.c:7915 libcob/common.c:7939 #, c-format msgid "should be one of the following values: %s" msgstr "" @@ -617,7 +624,7 @@ msgstr "" msgid "must be numeric" msgstr "" -#: cobc/config.c:171 libcob/common.c:7215 +#: cobc/config.c:171 libcob/common.c:8045 #, c-format msgid "maximum value: %lu" msgstr "" @@ -632,46 +639,46 @@ msgstr "" msgid "unsupported value '%s' for configuration tag '%s'" msgstr "Ongeldige waarde voor '%s'" -#: cobc/config.c:318 cobc/pplex.l:1185 libcob/common.c:7739 +#: cobc/config.c:319 cobc/pplex.l:1264 libcob/common.c:8554 msgid "recursive inclusion" msgstr "" -#: cobc/config.c:393 libcob/common.c:7791 +#: cobc/config.c:394 libcob/common.c:8606 #, fuzzy msgid "configuration file was included here" msgstr "Ongeldige regel voortzetting" -#: cobc/config.c:422 +#: cobc/config.c:423 #, c-format msgid "The previous loaded configuration '%s' will be discarded." msgstr "" -#: cobc/config.c:458 +#: cobc/config.c:459 msgid "missing definitions:" msgstr "" -#: cobc/config.c:460 +#: cobc/config.c:461 #, fuzzy, c-format msgid "\tno definition of '%s'" msgstr "%s: Geen definitie voor '%s'" -#: cobc/config.c:523 +#: cobc/config.c:524 #, fuzzy, c-format msgid "invalid configuration tag '%s'" msgstr "Ongeldige regel voortzetting" -#: cobc/config.c:536 libcob/common.c:7545 libcob/common.c:7629 -#: libcob/common.c:7657 +#: cobc/config.c:537 libcob/common.c:8360 libcob/common.c:8444 +#: libcob/common.c:8472 #, fuzzy, c-format msgid "unknown configuration tag '%s'" msgstr "Onbekend label '%s'" -#: cobc/config.c:560 +#: cobc/config.c:561 #, fuzzy, c-format msgid "invalid configuration tag '%s' in word-list" msgstr "Ongeldige regel voortzetting" -#: cobc/config.c:622 +#: cobc/config.c:623 #, c-format msgid "Could not access word list for '%s'" msgstr "" @@ -712,11 +719,11 @@ msgstr "Ongeldige numerieke constante" #: cobc/config.def:73 msgid "" "default initialization for fields without VALUE, may be one of\n" -" * character in quotes\n" -" * decimal 0..255 representing a character\n" -" * \"init\" to initialize to PICTURE/USAGE\n" -" * \"none\" to do no explicit initialization\n" -" * default: \"init\"" +" * character in quotes\n" +" * decimal 0..255 representing a character\n" +" * \"init\" to initialize to PICTURE/USAGE\n" +" * \"none\" to do no explicit initialization\n" +" * default: \"init\"" msgstr "" #: cobc/config.def:83 @@ -743,1114 +750,1123 @@ msgstr "" msgid "whether DECIMAL-POINT IS COMMA has effect in XML/JSON GENERATE, may be one of: none, xml, json, all" msgstr "" -#: cobc/config.def:103 -msgid "resolve file names at run time using environment variables" +#: cobc/config.def:101 +msgid "checking for subscript (only done with EC-BOUND-SUBSCRIPT active), may be one of: full, max, record" msgstr "" #: cobc/config.def:106 -msgid "alternate formatting of numeric fields" +msgid "resolve file names at run time using environment variables" msgstr "" #: cobc/config.def:109 -msgid "numeric truncation according to ANSI" +msgid "alternate formatting of numeric fields" msgstr "" #: cobc/config.def:112 -#, fuzzy -#| msgid "'%s' cannot have OCCURS DEPENDING" -msgid "allow complex OCCURS DEPENDING ON" -msgstr "'%s' kan geen OCCURS DEPENDING hebben" +msgid "numeric truncation according to ANSI" +msgstr "" #: cobc/config.def:115 +msgid "allow non-standard OCCURS DEPENDING ON syntax" +msgstr "" + +#: cobc/config.def:118 #, fuzzy msgid "adjust items following OCCURS DEPENDING (implies complex-odo)" msgstr "" "Wijzig items na OCCURS DEPENDING\n" "\t\t\t- Vereist impliciete/expliciete versoepelde syntaxis" -#: cobc/config.def:118 +#: cobc/config.def:121 +#, fuzzy +msgid "applies JUSTIFY with VALUE clause" +msgstr "Waarschuw bij EXTERNAL item met VALUE clausule" + +#: cobc/config.def:124 msgid "allow REDEFINES to other than last equal level number" msgstr "" -#: cobc/config.def:121 +#: cobc/config.def:127 #, fuzzy msgid "allow certain syntax variations (e.g. REDEFINES position)" msgstr "" "Versoepel syntaxis controle\n" "\t\t\t- bv. REDEFINES positie" -#: cobc/config.def:124 +#: cobc/config.def:130 msgid "allow zero length reference-modification (only changed with EC-BOUND-REF-MOD active)" msgstr "" -#: cobc/config.def:127 +#: cobc/config.def:133 msgid "allow non-matching level numbers" msgstr "" -#: cobc/config.def:130 +#: cobc/config.def:136 msgid "require ASSIGN USING items to be in WORKING-STORAGE" msgstr "" -#: cobc/config.def:133 +#: cobc/config.def:139 msgid "LOCAL-STORAGE SECTION implies RECURSIVE attribute" msgstr "" -#: cobc/config.def:136 +#: cobc/config.def:142 msgid "LINKAGE SECTION items remain allocated between invocations" msgstr "" -#: cobc/config.def:139 +#: cobc/config.def:145 msgid "MOVE operates as on IBM (left to right, byte by byte)" msgstr "" -#: cobc/config.def:142 +#: cobc/config.def:148 msgid "exit point of any currently executing perform is recognized if reached" msgstr "" -#: cobc/config.def:145 +#: cobc/config.def:151 msgid "limit precision in intermediate results to precision of final result (less accurate)" msgstr "" -#: cobc/config.def:148 +#: cobc/config.def:154 msgid "evaluate constant expressions at compile time" msgstr "" -#: cobc/config.def:151 +#: cobc/config.def:157 msgid "allow hexadecimal value 'F' for NUMERIC test of signed PACKED DECIMAL field" msgstr "" -#: cobc/config.def:154 +#: cobc/config.def:160 msgid "program names don't lead to a reserved identifier" msgstr "" -#: cobc/config.def:157 +#: cobc/config.def:163 msgid "set WITH UPDATE clause as default for ACCEPT dest-item, instead of WITH NO UPDATE" msgstr "" -#: cobc/config.def:160 +#: cobc/config.def:166 msgid "set WITH AUTO clause as default for ACCEPT dest-item, instead of WITH TAB" msgstr "" -#: cobc/config.def:163 +#: cobc/config.def:169 msgid "assume CONSOLE IS CRT if not set otherwise" msgstr "" -#: cobc/config.def:166 +#: cobc/config.def:172 msgid "NO-ECHO hides input with asterisks like SECURE" msgstr "" -#: cobc/config.def:169 +#: cobc/config.def:175 msgid "assume a field DISPLAY starts at LINE 0 COL 0 (i.e. at the cursor), not LINE 1 COL 1" msgstr "" -#: cobc/config.def:172 +#: cobc/config.def:178 msgid "special behaviour of DISPLAY SPACE/ALL X'01'/ALL X'02'/ALL X'07'" msgstr "" -#: cobc/config.def:175 +#: cobc/config.def:181 msgid "COMP-1 is a 16-bit signed integer" msgstr "" -#: cobc/config.def:178 +#: cobc/config.def:184 msgid "POINTER is a 64-bit unsigned integer" msgstr "" -#: cobc/config.def:181 +#: cobc/config.def:187 msgid "imply zero in move of non-numeric literal to numeric items" msgstr "" -#: cobc/config.def:184 +#: cobc/config.def:190 msgid "implicitly define a variable if an ASSIGN DYNAMIC does not match any data item" msgstr "" -#: cobc/config.def:187 +#: cobc/config.def:193 msgid "specifying device by mnemonic" msgstr "" -#: cobc/config.def:193 +#: cobc/config.def:199 msgid "" "check contents of Area A (when reference format supports Area A enforcement),\n" -" enabled checks include:\n" -" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" -" and toplevel numbers (01 and 77) must start in Area A;\n" -" * statements must not start in Area A; and\n" -" * separator periods must not be within Area A." +" enabled checks include:\n" +" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" +" and toplevel numbers (01 and 77) must start in Area A;\n" +" * statements must not start in Area A; and\n" +" * separator periods must not be within Area A" msgstr "" -#: cobc/config.def:203 +#: cobc/config.def:209 msgid "comment paragraphs in IDENTIFICATION DIVISION (AUTHOR, DATE-WRITTEN, ...)" msgstr "" -#: cobc/config.def:207 -msgid "CONTROL DIVISION" -msgstr "" - -#: cobc/config.def:211 cobc/ppparse.y:101 cobc/ppparse.y:104 -msgid "partial replacing with literal" +#: cobc/config.def:217 +msgid "" +"apply partial replacing with literal source operand even when it replaces with spaces only;\n" +" * \"skip\" prevents such replacements" msgstr "" -#: cobc/config.def:214 +#: cobc/config.def:221 msgid "MEMORY-SIZE clause" msgstr "" -#: cobc/config.def:217 +#: cobc/config.def:224 msgid "MULTIPLE-FILE-TAPE clause" msgstr "" -#: cobc/config.def:220 +#: cobc/config.def:227 #, fuzzy #| msgid "RECORD clause invalid" msgid "LABEL-RECORDS clause" msgstr "RECORD clausule ongeldig" -#: cobc/config.def:223 +#: cobc/config.def:230 #, fuzzy msgid "VALUE-OF clause" msgstr "Ongeldige VALUE clausule" -#: cobc/config.def:226 +#: cobc/config.def:233 #, fuzzy #| msgid "RECORD clause invalid" msgid "DATA-RECORDS clause" msgstr "RECORD clausule ongeldig" -#: cobc/config.def:229 +#: cobc/config.def:236 msgid "OCCURS clause on top-level" msgstr "" -#: cobc/config.def:232 cobc/parser.y:7285 +#: cobc/config.def:239 cobc/parser.y:7566 msgid "SAME AS clause" msgstr "" -#: cobc/config.def:235 cobc/parser.y:7621 +#: cobc/config.def:242 cobc/parser.y:7904 #, fuzzy msgid "TYPE TO clause" msgstr "LOCK clausule ongeldig hier" -#: cobc/config.def:238 cobc/parser.y:7644 +#: cobc/config.def:245 cobc/parser.y:7927 msgid "USAGE type-name" msgstr "" -#: cobc/config.def:241 cobc/parser.y:8190 +#: cobc/config.def:248 cobc/parser.y:8563 msgid "SYNCHRONIZED clause" msgstr "" -#: cobc/config.def:244 cobc/parser.y:8193 +#: cobc/config.def:251 cobc/parser.y:8566 msgid "LEFT/RIGHT phrases in SYNCHRONIZED clause" msgstr "" -#: cobc/config.def:247 +#: cobc/config.def:254 msgid "SPECIAL-NAMES clause" msgstr "" -#: cobc/config.def:250 +#: cobc/config.def:257 #, fuzzy -msgid "GOTO statement without name" -msgstr "%s statement niet afgesloten met END-%s" +msgid "GO TO statement without name" +msgstr "GO TO met meerdere procedure-namen" -#: cobc/config.def:253 +#: cobc/config.def:260 #, fuzzy msgid "STOP-literal statement" msgstr "Ongeldig SET statement" -#: cobc/config.def:256 +#: cobc/config.def:263 #, fuzzy msgid "STOP-identifier statement" msgstr "Ongeldige PROMPT identifier" -#: cobc/config.def:259 +#: cobc/config.def:266 msgid "STOP ERROR statement" msgstr "" -#: cobc/config.def:262 +#: cobc/config.def:269 msgid "DEBUGGING MODE and debugging indicator" msgstr "" -#: cobc/config.def:268 +#: cobc/config.def:275 msgid "PADDING CHARACTER clause" msgstr "" -#: cobc/config.def:271 +#: cobc/config.def:278 msgid "NEXT SENTENCE phrase" msgstr "" -#: cobc/config.def:274 +#: cobc/config.def:281 msgid "listing-directive statements EJECT, SKIP1, SKIP2, SKIP3" msgstr "" -#: cobc/config.def:277 +#: cobc/config.def:284 msgid "listing-directive statement TITLE" msgstr "" -#: cobc/config.def:280 +#: cobc/config.def:287 #, fuzzy msgid "ENTRY statement" msgstr "Ongeldig SET statement" -#: cobc/config.def:283 +#: cobc/config.def:290 #, fuzzy msgid "move noninteger to alphanumeric" msgstr "Move geen heel getal naar alfanumeriek" -#: cobc/config.def:286 +#: cobc/config.def:293 #, fuzzy msgid "move figurative constants to numeric" msgstr "Figuratieve constante ongeldig hier" -#: cobc/config.def:289 +#: cobc/config.def:296 #, fuzzy msgid "move figurative constant SPACE to numeric" msgstr "Figuratieve constante ongeldig hier" -#: cobc/config.def:292 +#: cobc/config.def:299 #, fuzzy msgid "move figurative constant QUOTE to numeric" msgstr "Figuratieve constante ongeldig hier" -#: cobc/config.def:295 +#: cobc/config.def:302 #, fuzzy #| msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgid "OCCURS DEPENDING ON without to" msgstr "OCCURS DEPENDING ON '%s' buiten grens: %d" -#: cobc/config.def:298 cobc/parser.y:11102 +#: cobc/config.def:305 cobc/parser.y:11443 msgid "section segments" msgstr "" -#: cobc/config.def:301 +#: cobc/config.def:308 #, fuzzy msgid "ALTER statement" msgstr "Ongeldig SET statement" -#: cobc/config.def:304 +#: cobc/config.def:311 msgid "OVERFLOW clause for CALL" msgstr "" -#: cobc/config.def:307 +#: cobc/config.def:314 #, fuzzy msgid "boolean literals (B'1010')" msgstr "Ongeldige numerieke constante" -#: cobc/config.def:310 +#: cobc/config.def:317 #, fuzzy msgid "hexadecimal-boolean literals (BX'A')" msgstr "Ongeldige numerieke constante" -#: cobc/config.def:313 +#: cobc/config.def:320 #, fuzzy msgid "national literals (N'UTF-16 string')" msgstr "Ongeldige H constante: %s" -#: cobc/config.def:316 +#: cobc/config.def:323 #, fuzzy msgid "hexadecimal-national literals (NX'265E')" msgstr "Ongeldige X constante: %s" -#: cobc/config.def:319 +#: cobc/config.def:326 msgid "non-standard national literals (NC'UTF-16 string')" msgstr "" -#: cobc/config.def:322 +#: cobc/config.def:329 msgid "HP COBOL octal literals (%377)" msgstr "" -#: cobc/config.def:325 +#: cobc/config.def:332 msgid "ACUCOBOL-GT literals (#B #O #H #X)" msgstr "" -#: cobc/config.def:328 cobc/pplex.l:2199 +#: cobc/config.def:335 +msgid "EBCDIC symbolic characters in literals (\" \"135,151,151\"bar\"195, 194\"Z\" for \" foobarBAZ\")" +msgstr "" + +#: cobc/config.def:338 cobc/pplex.l:2428 msgid "continuation of COBOL words" msgstr "" -#: cobc/config.def:331 +#: cobc/config.def:341 msgid "NOT ON EXCEPTION before ON EXCEPTION" msgstr "" -#: cobc/config.def:334 +#: cobc/config.def:344 msgid "extensions to ACCEPT and DISPLAY" msgstr "" -#: cobc/config.def:337 cobc/field.c:3357 +#: cobc/config.def:347 cobc/field.c:3645 msgid "RENAMES of 01-, 66- and 77-level items" msgstr "" -#: cobc/config.def:341 +#: cobc/config.def:351 msgid "allow larger REDEFINES items" msgstr "" -#: cobc/config.def:344 +#: cobc/config.def:354 #, fuzzy #| msgid "'%s' is not defined in SPECIAL-NAMES" msgid "constants defined in SPECIAL-NAMES" msgstr "'%s' is niet definieerd in SPECIAL-NAMES" -#: cobc/config.def:347 +#: cobc/config.def:357 msgid "constant with level 78 item (note: has left to right precedence in expressions)" msgstr "" -#: cobc/config.def:350 +#: cobc/config.def:360 msgid "constant with level 01 CONSTANT AS/FROM item" msgstr "" -#: cobc/config.def:353 +#: cobc/config.def:363 msgid "PERFORM VARYING without BY phrase (implies BY 1)" msgstr "" -#: cobc/config.def:356 +#: cobc/config.def:366 msgid "references to sections not in DECLARATIVES from within DECLARATIVES" msgstr "" -#: cobc/config.def:359 cobc/parser.y:12225 cobc/parser.y:12521 +#: cobc/config.def:369 cobc/parser.y:12614 cobc/parser.y:12913 msgid "CALL/CANCEL with program-prototype-name" msgstr "" -#: cobc/config.def:362 +#: cobc/config.def:372 msgid "specifying call-convention by mnemonic" msgstr "" -#: cobc/config.def:365 +#: cobc/config.def:375 msgid "specifying call-convention by WITH ... LINKAGE" msgstr "" -#: cobc/config.def:368 +#: cobc/config.def:378 +msgid "support for PROCEDURE DIVISION USING OPTIONAL" +msgstr "" + +#: cobc/config.def:381 msgid "numeric literals in VALUE clause of numeric-edited items" msgstr "" -#: cobc/config.def:371 +#: cobc/config.def:384 msgid "incorrect order of CONFIGURATION SECTION paragraphs" msgstr "" -#: cobc/config.def:374 +#: cobc/config.def:387 msgid "allow >> DEFINE CONSTANT var AS literal" msgstr "" -#: cobc/config.def:377 +#: cobc/config.def:390 #, fuzzy #| msgid "REDEFINES clause must follow entry-name" msgid "REDEFINES clause not following entry-name in definition" msgstr "REDEFINES clausule moet na ENTRY naam komen" -#: cobc/config.def:380 +#: cobc/config.def:393 msgid "record sizes does not match RECORD clause" msgstr "" -#: cobc/config.def:383 cobc/parser.y:5736 cobc/parser.y:5750 cobc/parser.y:5763 -#: cobc/parser.y:5774 +#: cobc/config.def:396 cobc/parser.y:5991 cobc/parser.y:6005 cobc/parser.y:6018 +#: cobc/parser.y:6029 #, fuzzy msgid "RECORD DELIMITER clause" msgstr "LOCK clausule ongeldig hier" -#: cobc/config.def:386 +#: cobc/config.def:399 msgid "BINARY-SEQUENTIAL and LINE-SEQUENTIAL phrases in RECORD DELIMITER" msgstr "" -#: cobc/config.def:389 cobc/tree.c:4805 +#: cobc/config.def:402 cobc/tree.c:4873 msgid "RECORD DELIMITER clause on file with fixed-length records" msgstr "" -#: cobc/config.def:392 +#: cobc/config.def:405 msgid "missing statement (e.g. empty IF / PERFORM)" msgstr "" -#: cobc/config.def:395 +#: cobc/config.def:408 msgid "missing period in PROCEDURE DIVISION (when reference format supports Area A enforcement)" msgstr "" -#: cobc/config.def:398 +#: cobc/config.def:411 msgid "zero-length literals, e.g. '' and \"\"" msgstr "" -#: cobc/config.def:401 +#: cobc/config.def:414 msgid "XML GENERATE's phrases other than COUNT IN" msgstr "" -#: cobc/config.def:404 cobc/typeck.c:8565 +#: cobc/config.def:417 cobc/typeck.c:9017 msgid "AFTER phrase in CONTINUE statement" msgstr "" -#: cobc/config.def:407 -msgid "ENTRY FOR GOTO and GOTO ENTRY statements" +#: cobc/config.def:420 +msgid "ENTRY FOR GO TO and GO TO ENTRY statements" msgstr "" -#: cobc/config.def:410 +#: cobc/config.def:423 cobc/typeck.c:4642 msgid "ASSIGN [TO] variable in SELECT" msgstr "" -#: cobc/config.def:413 +#: cobc/config.def:426 msgid "ASSIGN USING/VARYING variable in SELECT" msgstr "" -#: cobc/config.def:416 +#: cobc/config.def:429 msgid "ASSIGN EXTERNAL/DYNAMIC in SELECT" msgstr "" -#: cobc/config.def:419 +#: cobc/config.def:432 msgid "ASSIGN DISK FROM variable in SELECT" msgstr "" -#: cobc/config.def:422 +#: cobc/config.def:435 msgid "VSAM status in FILE STATUS" msgstr "" -#: cobc/config.def:425 +#: cobc/config.def:438 msgid "CALL to own PROGRAM-ID implies RECURSIVE attribute" msgstr "" -#: cobc/config.def:428 +#: cobc/config.def:441 msgid "DEPENDING clause in RECORD CONTAINS" msgstr "" -#: cobc/config.def:431 cobc/tree.c:3584 +#: cobc/config.def:444 cobc/tree.c:3623 msgid "PICTURE string with 'L' character" msgstr "" -#: cobc/error.c:83 +#: cobc/error.c:141 libcob/common.c:1379 libcob/common.c:8715 +#: libcob/common.c:8766 +#, c-format +msgid "warning: " +msgstr "waarschuwing: " + +#: cobc/error.c:142 libcob/common.c:8784 +msgid "note: " +msgstr "" + +#: cobc/error.c:162 #, fuzzy, c-format #| msgid "in section" msgid "in section '%s':" msgstr "in sectie" -#: cobc/error.c:94 +#: cobc/error.c:173 #, fuzzy, c-format #| msgid "in paragraph" msgid "in paragraph '%s':" msgstr "in paragraaf" -#: cobc/error.c:129 cobc/error.c:133 cobc/error.c:136 +#: cobc/error.c:227 cobc/error.c:231 cobc/error.c:234 msgid "too many errors" msgstr "" -#: cobc/error.c:145 +#: cobc/error.c:243 #, fuzzy, c-format msgid "in file included from " msgstr "Ongeldige regel voortzetting" -#: cobc/error.c:163 libcob/common.c:8325 +#: cobc/error.c:261 libcob/common.c:9146 msgid "configuration error:" msgstr "" -#: cobc/error.c:176 libcob/common.c:861 +#: cobc/error.c:274 libcob/common.c:920 #, c-format msgid "system error %d" msgstr "" -#: cobc/error.c:346 cobc/error.c:413 cobc/error.c:475 cobc/error.c:631 -#: cobc/error.c:675 cobc/error.c:785 libcob/common.c:1318 libcob/common.c:7900 -#: libcob/common.c:7951 -#, c-format -msgid "warning: " -msgstr "waarschuwing: " - -#: cobc/error.c:518 cobc/error.c:534 cobc/error.c:868 cobc/error.c:889 +#: cobc/error.c:616 cobc/error.c:632 cobc/error.c:971 cobc/error.c:992 #, c-format msgid "%s used" msgstr "" -#: cobc/error.c:521 cobc/error.c:871 +#: cobc/error.c:619 cobc/error.c:974 #, c-format msgid "%s is archaic in %s" msgstr "%s is verouderd in %s" -#: cobc/error.c:525 cobc/error.c:875 +#: cobc/error.c:623 cobc/error.c:978 #, c-format msgid "%s is obsolete in %s" msgstr "%s is overbodig in %s" -#: cobc/error.c:531 cobc/error.c:881 cobc/parser.y:5738 +#: cobc/error.c:629 cobc/error.c:984 cobc/parser.y:5993 #, c-format msgid "%s ignored" msgstr "%s genegeerd" -#: cobc/error.c:537 cobc/error.c:891 +#: cobc/error.c:635 cobc/error.c:994 #, c-format msgid "%s does not conform to %s" msgstr "%s is niet in overeenstemming met %s" -#: cobc/error.c:553 +#: cobc/error.c:651 msgid "configuration warning:" msgstr "" -#: cobc/error.c:728 cobc/error.c:731 cobc/error.c:755 cobc/error.c:758 -#: libcob/common.c:7969 -msgid "note: " -msgstr "" - -#: cobc/error.c:933 cobc/error.c:962 +#: cobc/error.c:1040 cobc/error.c:1069 #, c-format msgid "redefinition of '%s'" msgstr "herdefinitie van '%s'" -#: cobc/error.c:939 cobc/error.c:973 +#: cobc/error.c:1046 cobc/error.c:1080 #, c-format msgid "'%s' previously defined here" msgstr "'%s' eerder gedefinieerd hier" -#: cobc/error.c:1017 cobc/error.c:1023 +#: cobc/error.c:1124 cobc/error.c:1130 #, c-format msgid "'%s' is not defined" msgstr "'%s' is niet gedefinieerd" -#: cobc/error.c:1019 +#: cobc/error.c:1126 #, fuzzy, c-format msgid "'%s' cannot be used here" msgstr "'%s' kan hier niet worden geïndexeerd" -#: cobc/error.c:1021 cobc/parser.y:7658 +#: cobc/error.c:1128 cobc/parser.y:7941 #, c-format msgid "'%s' is not defined, but is a reserved word in another dialect" msgstr "" -#: cobc/error.c:1060 +#: cobc/error.c:1167 #, fuzzy, c-format msgid "'%s' is ambiguous; needs qualification" msgstr "%s onduidelijk; specificeer nader" -#: cobc/error.c:1090 +#: cobc/error.c:1197 #, fuzzy, c-format msgid "'%s' is a special register" msgstr "'%s' is geen heel getal" -#: cobc/error.c:1093 +#: cobc/error.c:1200 #, fuzzy, c-format #| msgid "'%s' is not defined" msgid "'%s' internally defined" msgstr "'%s' is niet gedefinieerd" -#: cobc/error.c:1097 cobc/parser.y:18176 cobc/parser.y:18181 cobc/typeck.c:5000 -#: cobc/typeck.c:5047 cobc/typeck.c:5048 +#: cobc/error.c:1204 cobc/parser.y:18772 cobc/parser.y:18777 cobc/typeck.c:5166 +#: cobc/typeck.c:5213 cobc/typeck.c:5214 #, c-format msgid "'%s' defined here" msgstr "'%s' hier gedefinieerd" -#: cobc/error.c:1108 +#: cobc/error.c:1215 #, fuzzy, c-format msgid "fatal error: %s" msgstr "BDB fout: %s" -#: cobc/error.c:1117 +#: cobc/error.c:1224 #, fuzzy, c-format msgid "group item '%s' cannot have %s clause" msgstr "Groeps item '%s' kan geen %s clausule hebben" -#: cobc/error.c:1132 +#: cobc/error.c:1239 #, c-format msgid "constant item '%s' requires a %s clause" msgstr "constante item '%s' verwacht een %s clausule" -#: cobc/error.c:1136 +#: cobc/error.c:1243 #, c-format msgid "level %02d item '%s' requires a %s clause" msgstr "level %02d item '%s' verwacht een %s clausule" -#: cobc/error.c:1151 +#: cobc/error.c:1258 #, c-format msgid "constant item '%s' can only have a %s clause" msgstr "constante item '%s' kan alleen een %s clausule hebben" -#: cobc/error.c:1155 +#: cobc/error.c:1262 #, c-format msgid "level %02d item '%s' can only have a %s clause" msgstr "nivo %02d item '%s' kan alleen een %s clausule hebben" -#: cobc/field.c:136 +#: cobc/field.c:139 msgid "constant expression has Divide by ZERO" msgstr "" -#: cobc/field.c:192 cobc/field.c:329 cobc/field.c:337 +#: cobc/field.c:195 cobc/field.c:332 cobc/field.c:340 msgid "missing right parenthesis" msgstr "" -#: cobc/field.c:221 +#: cobc/field.c:224 #, c-format msgid "expression stack overflow at %d entries for operation '%c'" msgstr "" -#: cobc/field.c:262 +#: cobc/field.c:265 #, c-format msgid "expression stack overflow at %d entries" msgstr "" -#: cobc/field.c:279 +#: cobc/field.c:282 msgid "missing left parenthesis" msgstr "" -#: cobc/field.c:320 +#: cobc/field.c:323 #, fuzzy, c-format msgid "invalid operator '%s' in expression" msgstr "Ongeldige expressie" -#: cobc/field.c:339 +#: cobc/field.c:342 #, c-format msgid "'%c' operator misplaced" msgstr "" -#: cobc/field.c:400 +#: cobc/field.c:403 #, c-format msgid "invalid level number '%s'" msgstr "ongeldig nivo nummer '%s'" -#: cobc/field.c:460 cobc/field.c:498 +#: cobc/field.c:463 cobc/field.c:502 msgid "level number must begin with 01 or 77" msgstr "nivo nummer moet beginnen met 01 of 77" -#: cobc/field.c:558 cobc/field.c:562 +#: cobc/field.c:562 cobc/field.c:566 #, c-format msgid "no previous data item of level %02d" msgstr "geen eerder data item met nivo %02d" -#: cobc/field.c:620 +#: cobc/field.c:631 #, c-format msgid "'%s' cannot be qualified here" msgstr "'%s' kan hier niet worden gespecificeerd" -#: cobc/field.c:626 +#: cobc/field.c:637 #, c-format msgid "'%s' cannot be subscripted here" msgstr "'%s' kan hier niet worden geïndexeerd" -#: cobc/field.c:642 cobc/field.c:653 +#: cobc/field.c:653 cobc/field.c:664 #, c-format msgid "'%s' is not defined in '%s'" msgstr "'%s' is niet gedefinieerd in '%s'" -#: cobc/field.c:660 +#: cobc/field.c:671 #, fuzzy msgid "level number of REDEFINES entries must be identical" msgstr "Nivo nummer van REDEFINES beschrijvingen moet gelijk zijn" -#: cobc/field.c:665 +#: cobc/field.c:676 #, fuzzy, c-format msgid "'%s' is not the original definition" msgstr "'%s' niet de originele definitie" -#: cobc/field.c:826 cobc/parser.y:659 +#: cobc/field.c:720 cobc/parser.y:1051 +#, fuzzy, c-format +msgid "duplicate %s" +msgstr "Dubbele %s clausule" + +#: cobc/field.c:878 cobc/parser.y:733 #, fuzzy, c-format msgid "duplicate %s clause" msgstr "Dubbele %s clausule" -#: cobc/field.c:906 +#: cobc/field.c:988 #, fuzzy, c-format #| msgid "%s clause not compatible with USAGE %d" msgid "%s clause not compatible with PIC %s" msgstr "%s clausule niet compatibel met USAGE %d" -#: cobc/field.c:917 cobc/field.c:953 +#: cobc/field.c:999 cobc/field.c:1036 #, fuzzy, c-format #| msgid "%s clause not compatible with USAGE %d" msgid "%s clause not compatible with USAGE %s" msgstr "%s clausule niet compatibel met USAGE %d" -#: cobc/field.c:1053 cobc/field.c:1069 cobc/field.c:1131 cobc/field.c:1142 +#: cobc/field.c:1140 cobc/field.c:1159 cobc/field.c:1227 cobc/field.c:1238 #, c-format msgid "PICTURE clause required for '%s'" msgstr "PICTURE clausule verplicht voor '%s'" -#: cobc/field.c:1138 +#: cobc/field.c:1234 #, fuzzy, c-format msgid "a non-numeric literal is expected for '%s'" msgstr "Een niet numerieke constante is verwacht voor '%s'" -#: cobc/field.c:1150 +#: cobc/field.c:1247 #, fuzzy, c-format msgid "defining implicit picture size %d for '%s'" msgstr "Aannemen impliciete opmaak grootte %d voor '%s'" -#: cobc/field.c:1171 +#: cobc/field.c:1271 #, c-format msgid "'%s' ANY LENGTH only allowed in LINKAGE" msgstr "'%s' ANY LENGTH alleen toegestaan in LINKAGE" -#: cobc/field.c:1175 +#: cobc/field.c:1275 #, c-format msgid "'%s' ANY LENGTH must be 01 level" msgstr "'%s' ANY LENGTH moet 01 nivo zijn" -#: cobc/field.c:1179 +#: cobc/field.c:1279 #, fuzzy, c-format msgid "'%s' ANY LENGTH cannot be BASED/EXTERNAL" msgstr "'%s' ANY LENGTH kan niet in BASED/EXTERNAL" -#: cobc/field.c:1184 cobc/field.c:1210 +#: cobc/field.c:1283 cobc/field.c:1313 #, c-format msgid "'%s' ANY LENGTH has invalid definition" msgstr "'%s' ANY LENGTH heeft ongeldige definitie" -#: cobc/field.c:1192 +#: cobc/field.c:1295 #, fuzzy, c-format msgid "'%s' ANY NUMERIC must be PIC 9" msgstr "'%s' ANY LENGTH moet een PICTURE hebben" -#: cobc/field.c:1198 +#: cobc/field.c:1301 #, fuzzy, c-format -msgid "'%s' ANY LENGTH must be PIC X, PIC N or PIC 1" +msgid "'%s' ANY LENGTH must be PIC X, PIC U, PIC N or PIC 1" msgstr "'%s' ANY LENGTH moet een PICTURE hebben" -#: cobc/field.c:1208 +#: cobc/field.c:1311 #, fuzzy, c-format msgid "'%s' ANY NUMERIC has invalid definition" msgstr "'%s' ANY LENGTH heeft ongeldige definitie" -#: cobc/field.c:1224 +#: cobc/field.c:1327 #, c-format msgid "'%s' EXTERNAL must be specified at 01/77 level" msgstr "'%s' EXTERNAL moet op 01/77 nivo worden gespecificeerd" -#: cobc/field.c:1228 +#: cobc/field.c:1331 #, c-format msgid "'%s' EXTERNAL can only be specified in WORKING-STORAGE section" msgstr "'%s' EXTERNAL kan alleen in WORKING-STORAGE sectie worden gespecificeerd" -#: cobc/field.c:1232 +#: cobc/field.c:1335 #, c-format msgid "'%s' EXTERNAL and BASED are mutually exclusive" msgstr "'%s' EXTERNAL en BASED sluiten elkaar uit" -#: cobc/field.c:1235 +#: cobc/field.c:1338 #, c-format msgid "'%s' EXTERNAL not allowed with REDEFINES" msgstr "'%s' EXTERNAL niet toegestaan met REDEFINES" -#: cobc/field.c:1247 +#: cobc/field.c:1350 #, c-format msgid "'%s' BASED not allowed here" msgstr "'%s' BASED niet toegestaan hier" -#: cobc/field.c:1250 +#: cobc/field.c:1353 #, c-format msgid "'%s' BASED not allowed with REDEFINES" msgstr "'%s' BASED niet toegestaan met REDEFINES" -#: cobc/field.c:1253 +#: cobc/field.c:1356 #, c-format msgid "'%s' BASED only allowed at the 01 and 77 levels" msgstr "'%s' BASED alleen toegestaan op 01 en 77 nivo's" -#: cobc/field.c:1279 +#: cobc/field.c:1383 #, fuzzy, c-format #| msgid "'%s' cannot have the OCCURS clause due to '%s'" msgid "'%s' cannot have an OCCURS clause due to '%s'" msgstr "'%s' OCCURS clausule kan niet vanwege '%s'" -#: cobc/field.c:1298 +#: cobc/field.c:1402 #, fuzzy, c-format #| msgid "the original definition '%s' should not have OCCURS clause" msgid "the original definition '%s' should not have an OCCURS clause" msgstr "de originele definitie '%s' mag geen OCCURS hebben" -#: cobc/field.c:1305 +#: cobc/field.c:1408 +#, fuzzy, c-format +#| msgid "the original definition '%s' should not have OCCURS clause" +msgid "the original definition '%s' should not have an ANY LENGTH clause" +msgstr "de originele definitie '%s' mag geen OCCURS hebben" + +#: cobc/field.c:1415 msgid "REDEFINES must follow the original definition" msgstr "REDEFINES moet na de originele definitie" -#: cobc/field.c:1313 +#: cobc/field.c:1423 #, c-format msgid "'%s' cannot be variable length" msgstr "'%s' kan geen variabele lengte zijn" -#: cobc/field.c:1316 +#: cobc/field.c:1426 #, c-format msgid "the original definition '%s' cannot be variable length" msgstr "de originele definitie '%s' kan geen variabele lengte zijn" -#: cobc/field.c:1335 +#: cobc/field.c:1445 cobc/field.c:1708 #, fuzzy, c-format #| msgid "'%s' cannot have JUSTIFIED RIGHT" msgid "'%s' cannot have JUSTIFIED RIGHT clause" msgstr "'%s' kan geen JUSTIFIED RIGHT zijn" -#: cobc/field.c:1342 +#: cobc/field.c:1453 #, fuzzy, c-format #| msgid "'%s' cannot have PICTURE clause" msgid "'%s' cannot have BLANK WHEN ZERO clause" msgstr "'%s' kan geen PICTURE clausule hebben" -#: cobc/field.c:1348 +#: cobc/field.c:1460 #, c-format msgid "SCREEN group item '%s' has invalid clause" msgstr "SCREEN groeps item '%s' heeft ongeldige clausule" -#: cobc/field.c:1436 +#: cobc/field.c:1548 #, fuzzy, c-format #| msgid "%s clause not compatible with USAGE %d" msgid "%s USAGE %s incompatible with %s USAGE %s" msgstr "%s clausule niet compatibel met USAGE %d" -#: cobc/field.c:1516 +#: cobc/field.c:1629 #, c-format msgid "'%s' cannot have PICTURE clause" msgstr "'%s' kan geen PICTURE clausule hebben" -#: cobc/field.c:1533 -#, fuzzy, c-format -msgid "%s item '%s' should be USAGE DISPLAY" -msgstr "'%s' is niet in LINKAGE SECTION" - -#: cobc/field.c:1556 +#: cobc/field.c:1662 #, fuzzy, c-format msgid "'%s' COMP-6 with sign - changing to COMP-3" msgstr "'%s' COMP-6 met teken - Gewijzigd naar COMP-3" -#: cobc/field.c:1582 +#: cobc/field.c:1688 msgid "elementary items with SIGN clause must have S in PICTURE" msgstr "" -#: cobc/field.c:1585 +#: cobc/field.c:1691 msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/field.c:1602 -#, c-format -msgid "'%s' cannot have JUSTIFIED RIGHT" -msgstr "'%s' kan geen JUSTIFIED RIGHT zijn" - -#: cobc/field.c:1614 +#: cobc/field.c:1720 #, fuzzy, c-format msgid "'%s' cannot have S in PICTURE string and BLANK WHEN ZERO" msgstr "'%s' kan geen BLANK WHEN ZERO zijn" -#: cobc/field.c:1619 +#: cobc/field.c:1725 #, c-format msgid "'%s' cannot have BLANK WHEN ZERO without being USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/field.c:1631 +#: cobc/field.c:1737 #, fuzzy, c-format msgid "'%s' cannot have * in PICTURE string and BLANK WHEN ZERO" msgstr "'%s' kan geen BLANK WHEN ZERO zijn" -#: cobc/field.c:1638 +#: cobc/field.c:1744 #, fuzzy, c-format msgid "'%s' is not numeric, so cannot have BLANK WHEN ZERO" msgstr "'%s' kan geen BLANK WHEN ZERO zijn" -#: cobc/field.c:1691 +#: cobc/field.c:1798 #, c-format msgid "elements in VALUE clause for '%s' (%d) exceed max amount (%d)" msgstr "" -#: cobc/field.c:1708 cobc/field.c:1712 +#: cobc/field.c:1822 +msgid "unexpected VALUES ARE for elementary item" +msgstr "" + +#: cobc/field.c:1836 cobc/field.c:1840 #, fuzzy, c-format msgid "initial VALUE clause ignored for %s item '%s'" msgstr "Eerste VALUE clausule genegeerd voor EXTERNAL item" -#: cobc/field.c:1725 +#: cobc/field.c:1853 msgid "FULL has no effect on numeric items; you may want REQUIRED or PIC Z" msgstr "" -#: cobc/field.c:1755 +#: cobc/field.c:1884 msgid "VALUE may not contain a figurative constant" msgstr "" -#: cobc/field.c:1763 -msgid "cannot specify both FULL and JUSTIFIED" +#: cobc/field.c:1893 cobc/field.c:1935 cobc/parser.y:750 cobc/parser.y:1823 +#: cobc/parser.y:1826 +#, c-format +msgid "cannot specify both %s and %s" msgstr "" -#: cobc/field.c:1775 +#: cobc/field.c:1905 #, c-format msgid "'%s' has FROM, TO or USING without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1792 +#: cobc/field.c:1922 #, c-format msgid "'%s' has numeric VALUE without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1805 -msgid "cannot specify both PIC and VALUE" -msgstr "" - -#: cobc/field.c:1813 +#: cobc/field.c:1943 msgid "cannot have PIC without FROM, TO or USING" msgstr "" -#: cobc/field.c:1822 +#: cobc/field.c:1952 msgid "cannot have numeric VALUE without PIC" msgstr "" -#: cobc/field.c:1831 +#: cobc/field.c:1961 msgid "cannot have FROM, TO or USING without PIC" msgstr "" -#: cobc/field.c:1841 +#: cobc/field.c:1971 #, fuzzy #| msgid "INITIALIZED TO item is not alphanumeric" msgid "VALUE item may not be numeric" msgstr "INITIALIZED TO item is niet alfanumeriek" -#: cobc/field.c:1856 +#: cobc/field.c:1986 #, c-format msgid "'%s' needs a PIC, COL, LINE, VALUE, BELL or BLANK clause" msgstr "" -#: cobc/field.c:1868 +#: cobc/field.c:1998 #, c-format msgid "'%s' cannot have PIC without FROM, TO, USING or numeric VALUE" msgstr "" -#: cobc/field.c:1876 +#: cobc/field.c:2006 #, c-format msgid "'%s' needs a PIC, FROM, TO, USING, VALUE, BELL, BLANK or ERASE clause" msgstr "" -#: cobc/field.c:1912 +#: cobc/field.c:2042 msgid "cannot use AUTO, FULL, PROMPT, REQUIRED or SECURE on elementary item without TO or USING" msgstr "" -#: cobc/field.c:1919 +#: cobc/field.c:2049 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED, OCCURS or SIGN on item without FROM, TO or USING" msgstr "" -#: cobc/field.c:1938 +#: cobc/field.c:2068 msgid "cannot use AUTO, FULL, REQUIRED or SECURE on elementary item without FROM, TO or USING" msgstr "" -#: cobc/field.c:1943 +#: cobc/field.c:2073 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED or SIGN without FROM, TO or USING" msgstr "" -#: cobc/field.c:1960 +#: cobc/field.c:2090 #, fuzzy msgid "cannot have BLANK WHEN ZERO without PIC" msgstr "'%s' kan geen BLANK WHEN ZERO zijn" -#: cobc/field.c:1963 +#: cobc/field.c:2093 #, fuzzy #| msgid "'%s' cannot have JUSTIFIED RIGHT" msgid "cannot have JUSTIFIED without PIC" msgstr "'%s' kan geen JUSTIFIED RIGHT zijn" -#: cobc/field.c:1983 +#: cobc/field.c:2113 msgid "cannot have AUTO without FROM, TO or USING" msgstr "" -#: cobc/field.c:1988 +#: cobc/field.c:2118 msgid "cannot use FULL or REQUIRED on item without TO or USING" msgstr "" -#: cobc/field.c:1995 +#: cobc/field.c:2125 msgid "SECURE can be used with TO only" msgstr "" -#: cobc/field.c:1997 +#: cobc/field.c:2127 #, fuzzy #| msgid "READ must be executed first" msgid "SECURE must be used with TO" msgstr "READ moet eerst worden uitgevoerd" -#: cobc/field.c:2016 +#: cobc/field.c:2146 #, fuzzy, c-format #| msgid "'%s' is not defined" msgid "'%s' does nothing" msgstr "'%s' is niet gedefinieerd" -#: cobc/field.c:2235 +#: cobc/field.c:2361 #, fuzzy, c-format #| msgid "'%s' 77 level not allowed here" msgid "'%s' 77 level is not allowed here" msgstr "'%s' 77 nivo hier niet toegestaan" -#: cobc/field.c:2627 +#: cobc/field.c:2399 msgid "OCCURS and multi COLUMNs is not allowed" msgstr "" -#: cobc/field.c:2655 +#: cobc/field.c:2419 #, fuzzy, c-format msgid "duplicate LINE %d ignored" msgstr "Dubbele definitie '%s' - Negeren" -#: cobc/field.c:2672 +#: cobc/field.c:2870 #, fuzzy, c-format msgid "ignoring SYNCHRONIZED for group item '%s'" msgstr "SYNCHRONIZED genegeerd voor groep item '%s'" -#: cobc/field.c:2686 cobc/field.c:2954 +#: cobc/field.c:2884 cobc/field.c:3219 msgid "larger REDEFINES" msgstr "" -#: cobc/field.c:2699 cobc/field.c:2957 cobc/field.c:2962 +#: cobc/field.c:2898 cobc/field.c:3222 cobc/field.c:3227 #, fuzzy, c-format msgid "size of '%s' larger than size of '%s'" msgstr "Lengte van '%s' groter dan lengte van '%s'" -#: cobc/field.c:2812 cobc/field.c:2879 +#: cobc/field.c:3045 cobc/field.c:3129 cobc/parser.y:832 #, fuzzy, c-format msgid "'%s' cannot be larger than %d bytes" msgstr "'%s' kan niet groter zijn dan %d bytes" -#: cobc/field.c:2850 cobc/field.c:2858 +#: cobc/field.c:3086 cobc/field.c:3094 #, c-format msgid "'%s' binary field cannot be larger than %d digits" msgstr "'%s' binair veld kan niet groter zijn dan %d cijfers" -#: cobc/field.c:2940 cobc/field.c:3522 -#, c-format -msgid "unexpected USAGE: %d" -msgstr "onbekende USAGE: %d" - -#: cobc/field.c:3067 cobc/parser.y:710 cobc/parser.y:712 cobc/parser.y:6274 -#: cobc/parser.y:6284 cobc/parser.y:7344 cobc/parser.y:7347 cobc/parser.y:7349 -#: cobc/parser.y:7351 cobc/parser.y:7386 cobc/parser.y:8237 cobc/parser.y:8239 -#: cobc/parser.y:8241 cobc/parser.y:8243 cobc/parser.y:8558 cobc/parser.y:8567 -#: cobc/parser.y:10564 cobc/parser.y:12075 cobc/parser.y:13492 -#: cobc/parser.y:14902 cobc/typeck.c:5034 +#: cobc/field.c:3353 cobc/parser.y:791 cobc/parser.y:793 cobc/parser.y:6529 +#: cobc/parser.y:6539 cobc/parser.y:7625 cobc/parser.y:7628 cobc/parser.y:7630 +#: cobc/parser.y:7632 cobc/parser.y:7667 cobc/parser.y:8610 cobc/parser.y:8612 +#: cobc/parser.y:8614 cobc/parser.y:8616 cobc/parser.y:8958 cobc/parser.y:8967 +#: cobc/parser.y:10897 cobc/parser.y:12460 cobc/parser.y:13920 +#: cobc/parser.y:15390 cobc/typeck.c:5200 #, c-format msgid "%s and %s are mutually exclusive" msgstr "%s and %s sluiten elkaar uit" -#: cobc/field.c:3068 cobc/parser.y:7529 cobc/parser.y:7566 +#: cobc/field.c:3354 cobc/parser.y:7810 cobc/parser.y:7847 msgid "variable-length PICTURE" msgstr "" -#: cobc/field.c:3187 +#: cobc/field.c:3475 #, fuzzy msgid "literal type does not match numeric data type" msgstr "Constante type komt niet overeen met data type" -#: cobc/field.c:3261 +#: cobc/field.c:3549 #, c-format msgid "THRU item '%s' may not come before '%s'" msgstr "" -#: cobc/field.c:3284 +#: cobc/field.c:3572 #, c-format msgid "RENAMES cannot start/end at the OCCURS item '%s'" msgstr "" -#: cobc/field.c:3292 +#: cobc/field.c:3580 #, c-format msgid "cannot use RENAMES on part of the table '%s'" msgstr "" -#: cobc/field.c:3330 +#: cobc/field.c:3618 #, c-format msgid "RENAMES may not contain '%s' as it is a pointer or object reference" msgstr "" -#: cobc/field.c:3335 +#: cobc/field.c:3623 #, c-format msgid "RENAMES may not contain '%s' as it is an OCCURS DEPENDING table" msgstr "" -#: cobc/field.c:3359 +#: cobc/field.c:3647 #, fuzzy msgid "RENAMES may not reference a level 88" msgstr "RENAMES mag niet verwijzen naar een 01 of > 50 nivo" -#: cobc/field.c:3383 +#: cobc/field.c:3671 #, c-format msgid "'%s' must immediately follow the record '%s'" msgstr "" -#: cobc/field.c:3391 +#: cobc/field.c:3679 #, c-format msgid "THRU item must be different to '%s'" msgstr "" -#: cobc/field.c:3397 +#: cobc/field.c:3685 #, c-format msgid "'%s' and '%s' must be in the same record" msgstr "" -#: cobc/field.c:3408 +#: cobc/field.c:3696 #, c-format msgid "THRU item '%s' may not be subordinate to '%s'" msgstr "" @@ -1904,83 +1920,81 @@ msgid "" " intrinsics to be used without FUNCTION keyword" msgstr "" -#: cobc/flag.def:78 -msgid "" -" -fec=<exception-name>\tenable code generation for <exception-name>,\n" -" sets -fsource-location" -msgstr "" - -#: cobc/flag.def:81 cobc/help.c:96 -msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" -msgstr "" - -#: cobc/flag.def:84 +#: cobc/flag.def:85 msgid "" " -fdump=<scope> dump data fields on abort, <scope> may be\n" " a combination of: ALL, WS, LS, RD, FD, SC, LO" msgstr "" -#: cobc/flag.def:87 +#: cobc/flag.def:88 msgid "" " -fno-dump=<scope> exclude data fields from dumping on abort, <scope> may\n" -" be a combination of: ALL, WS, LS, RD, FD, SC, LO" +" be a combination of: ALL, WS, LS, RD, FD, SC, LO\n" +" default if no scope specified: ALL" msgstr "" -#: cobc/flag.def:92 +#: cobc/flag.def:94 msgid "" " -fcallfh=<name> specifies <name> to be used for I/O\n" " as external provided EXTFH interface module" msgstr "" -#: cobc/flag.def:96 +#: cobc/flag.def:98 +msgid "" +" -febcdic-table=<cconv-table>/<file>\tEBCDIC/ASCII translation table\n" +" * e.g. default, ebcdic500_latin1..." +msgstr "" + +#: cobc/flag.def:102 msgid "" -" -febcdic-table=[DEFAULT|RESTRICTED-GC|IBM|GCOS]\tdefine EBCDIC translation table:\n" -" * default: translation to extended ASCII as per MF\n" -" * restricted-gc: translation from restricted ASCII only\n" -" * ibm: translation to restricted ASCII as per IBM\n" -" * gcos: translation to extended ASCII as per GCOS7" +" -fdefault-colseq=[ASCII|EBCDIC|NATIVE]\tdefine default collating sequence\n" +" * default: NATIVE" msgstr "" -#: cobc/flag.def:107 +#: cobc/flag.def:110 #, fuzzy msgid "" " -fwinmain generate WinMain instead of main when compiling\n" " as executable" msgstr " -i, -info Toont compiler bouw informatie" -#: cobc/flag.def:111 +#: cobc/flag.def:114 #, fuzzy msgid " -fcomputed-goto generate computed goto C statements" msgstr "Genereer berekende goto C statements" -#: cobc/flag.def:114 +#: cobc/flag.def:117 msgid " -fextra-brace generate extra braces in C source" msgstr "" -#: cobc/flag.def:117 +#: cobc/flag.def:120 #, fuzzy msgid " -fcorrect-numeric attempt correction of invalid numeric display items" msgstr "Probeer fouten in numerieke display items te corrigeren" -#: cobc/flag.def:120 +#: cobc/flag.def:123 #, fuzzy #| msgid "PERFORM stack allocated on heap" msgid " -fstack-on-heap PERFORM stack allocated on heap" msgstr "PERFORM stapel gealloceerd in dynamisch geheugen" -#: cobc/flag.def:123 +#: cobc/flag.def:126 msgid "" " -fstack-extended store origin of entrypoints and PERFORM\n" -" * turned on by -debug/-dump" +" * turned on by --debug/-fdump" msgstr "" -#: cobc/flag.def:128 +#: cobc/flag.def:130 +msgid " -fno-fast-compare disables inline comparisions" +msgstr "" + +#: cobc/flag.def:135 msgid "" " -fno-remove-unreachable\tdisable remove of unreachable code\n" " * turned off by -g" msgstr "" -#: cobc/flag.def:132 +#: cobc/flag.def:139 #, fuzzy msgid "" " -ftrace generate trace code\n" @@ -1989,18 +2003,18 @@ msgstr "" " -Xref Genereer kruisverwijzing door 'cobxref'\n" " (V. Coen's 'cobxref' moet in het pad staan" -#: cobc/flag.def:136 +#: cobc/flag.def:143 msgid "" " -ftraceall generate trace code\n" " * scope: executed SECTION/PARAGRAPH/STATEMENTS" msgstr "" -#: cobc/flag.def:140 +#: cobc/flag.def:147 #, fuzzy msgid " -fsyntax-only syntax error checking only; don't emit any output" msgstr "Alleen syntaxis fout controle; maak geen uitvoer" -#: cobc/flag.def:143 +#: cobc/flag.def:150 #, fuzzy msgid "" " -fdebugging-line enable debugging lines\n" @@ -2009,44 +2023,51 @@ msgstr "" "Inschakelen debugging regels\n" "\t\t\t- 'D' in indicator kolom of zwervende >>D" -#: cobc/flag.def:147 +#: cobc/flag.def:154 #, fuzzy msgid "" " -fsource-location generate source location code\n" -" * turned on by -debug/-ftraceall/-fec/-dump" +" * turned on by --debug/-ftraceall/-fec/-fdump" msgstr "" "Genereer bron locatie code\n" "\t\t\t- Ingeschakeld door -debug/-g/-ftraceall" -#: cobc/flag.def:151 +#: cobc/flag.def:158 #, fuzzy msgid " -fimplicit-init automatic initialization of the COBOL runtime system" msgstr "Automatische initialisatie van het Cobol runtime systeem" -#: cobc/flag.def:154 +#: cobc/flag.def:161 msgid "" " -fno-recursive-check disable check of recursive program call;\n" " effectively compiling as RECURSIVE program" msgstr "" -#: cobc/flag.def:158 +#: cobc/flag.def:165 #, fuzzy msgid "" " -fstack-check PERFORM stack checking\n" -" * turned on by -debug/-g" +" * turned on by --debug/-g" msgstr "" "Doe stapel controle\n" "\t\t\t- Ingeschakeld door -debug of -g" -#: cobc/flag.def:162 +#: cobc/flag.def:169 +msgid "" +" -fmemory-check=<scope> checks for invalid writes to internal storage,\n" +" <scope> may be one of: all, pointer, using, none\n" +" * default: none, set to all by --debug" +msgstr "" + +#: cobc/flag.def:174 msgid " -fsection-exit-check check that code execution does not leave the scope of SECTIONs" msgstr "" -#: cobc/flag.def:165 +#: cobc/flag.def:177 msgid " -fimplicit-goback-check\tcheck that code execution does not end implicit at end of PROCEDURE DIVISION" msgstr "" -#: cobc/flag.def:168 +#: cobc/flag.def:180 #, fuzzy msgid "" " -fwrite-after use AFTER 1 for WRITE of LINE SEQUENTIAL\n" @@ -2055,25 +2076,19 @@ msgstr "" "Gebruik AFTER 1 voor WRITE bij LINE SEQUENTIAL\n" "\t\t\t- Standaard : BEFORE 1" -#: cobc/flag.def:172 -#, fuzzy -#| msgid "" -#| "'*' or '/' in column 1 treated as comment\n" -#| "\t\t\t- FIXED format only" +#: cobc/flag.def:184 msgid "" -" -fmfcomment '*' or '/' in column 1 treated as comment\n" -" * FIXED format only" +" -fmfcomment '*' in column 1 treated as comment with listing suppression\n" +" * FIXED/COBOL85/VARIABLE format only" msgstr "" -"Zie '*' of '/' in kolom 1 als commentaar\n" -"\t\t\t- Alleen bij vast formaat" -#: cobc/flag.def:176 +#: cobc/flag.def:188 msgid "" " -facucomment '$' in indicator area treated as '*',\n" " '|' treated as floating comment" msgstr "" -#: cobc/flag.def:181 +#: cobc/flag.def:193 #, fuzzy msgid "" " -fno-trunc allow numeric field overflow\n" @@ -2082,7 +2097,7 @@ msgstr "" "Sta overloop toe in numerieke velden\n" "\t\t\t- Non-ANSI gedrag" -#: cobc/flag.def:185 +#: cobc/flag.def:197 #, fuzzy msgid "" " -fsingle-quote use a single quote (apostrophe) for QUOTE\n" @@ -2091,7 +2106,7 @@ msgstr "" "Gebruik een enkel aanhalingsteken (apostrof) voor QUOTE\n" "\t\t\t- Standaard : dubbel aanhalingsteken" -#: cobc/flag.def:195 +#: cobc/flag.def:207 #, fuzzy msgid "" " -foptional-file treat all files as OPTIONAL\n" @@ -2100,106 +2115,131 @@ msgstr "" "Behandel alle bestanden als OPTIONAL\n" "\t\t\t- tenzij NOT OPTIONAL is gespecificeerd" -#: cobc/flag.def:199 +#: cobc/flag.def:211 #, fuzzy msgid " -fstatic-call output static function calls for the CALL statement" msgstr "Uitvoer statische functie roept een CALL statement aan" -#: cobc/flag.def:202 +#: cobc/flag.def:214 msgid "" " -fno-gen-c-decl-static-call\tdisable generation of C function declarations\n" " for subroutines with static CALL" msgstr "" -#: cobc/flag.def:206 +#: cobc/flag.def:218 msgid "" " -fgen-c-line-directives\tgenerate source location directives in C code;\n" -" * turned on by -g" +" * turned on by -g/--coverage" msgstr "" -#: cobc/flag.def:210 +#: cobc/flag.def:222 msgid "" " -fgen-c-labels generate extra labels in C sources;\n" " * turned on by -g" msgstr "" -#: cobc/flag.def:214 +#: cobc/flag.def:226 msgid "" -" -fno-theaders suppress all headers and output of compilation\n" -" options from listing while keeping page breaks" +" -fno-theaders suppress all headers from listing while keeping\n" +" page breaks" msgstr "" -#: cobc/flag.def:218 +#: cobc/flag.def:230 #, fuzzy msgid " -fno-tsource suppress source from listing" msgstr " -free Gebruik vrij bron formaat" -#: cobc/flag.def:221 +#: cobc/flag.def:233 msgid " -fno-tmessages suppress warning and error summary from listing" msgstr "" -#: cobc/flag.def:224 +#: cobc/flag.def:236 #, fuzzy msgid " -ftsymbols specify symbols in listing" msgstr " -free Gebruik vrij bron formaat" -#: cobc/flag.def:227 +#: cobc/flag.def:239 +#, fuzzy +msgid " -ftcmd specify command line in listing" +msgstr " -free Gebruik vrij bron formaat" + +#: cobc/flag.def:242 +msgid " -fno-ttimestamp suppress timestamp in listing headers" +msgstr "" + +#: cobc/flag.def:245 +msgid "" +" -fttitle=<title> set listing title with '_' replaced by spaces;\n" +" defaults to package name and version" +msgstr "" + +#: cobc/flag.def:249 msgid "" " -fno-diagnostics-show-option\tsuppress output of option that directly\n" " controls the diagnostic" msgstr "" -#: cobc/help.c:32 +#: cobc/flag.def:253 +msgid " -fno-diagnostics-show-caret\tdo not display source context on warning/error diagnostic" +msgstr "" + +#: cobc/flag.def:256 +msgid " -fno-diagnostics-show-line-numbers\tsuppress display of line numbers in diagnostics" +msgstr "" + +#: cobc/help.c:33 msgid "GnuCOBOL compiler for most COBOL dialects with lots of extensions" msgstr "" -#: cobc/help.c:34 +#: cobc/help.c:35 #, fuzzy, c-format msgid "Usage: %s [options]... file..." msgstr "Gebruik: cobc [opties] bestand ..." -#: cobc/help.c:47 bin/cobcrun.c:143 +#: cobc/help.c:48 bin/cobcrun.c:143 #, c-format msgid "" "Report bugs to: %s\n" "or (preferably) use the issue tracker via the home page." msgstr "" -#: cobc/help.c:51 -msgid "GnuCOBOL home page: <https://www.gnu.org/software/gnucobol/>" +#: cobc/help.c:52 bin/cobcrun.c:146 +#, c-format +msgid "GnuCOBOL home page: <%s>" msgstr "" -#: cobc/help.c:52 -msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" +#: cobc/help.c:54 bin/cobcrun.c:148 +#, c-format +msgid "General help using GNU software: <%s>" msgstr "" -#: cobc/help.c:58 bin/cobcrun.c:125 +#: cobc/help.c:61 bin/cobcrun.c:125 msgid "Options:" msgstr "Opties:" -#: cobc/help.c:59 +#: cobc/help.c:62 #, fuzzy msgid " -h, --help display this help and exit" msgstr " -h, -help Toont deze boodschap" -#: cobc/help.c:60 +#: cobc/help.c:63 #, fuzzy msgid " -V, --version display compiler version information and exit" msgstr " -V, -version Toont compiler verse" -#: cobc/help.c:61 +#: cobc/help.c:64 #, fuzzy msgid " -dumpversion display compiler version and exit" msgstr " -V, -version Toont compiler verse" -#: cobc/help.c:62 +#: cobc/help.c:65 #, fuzzy msgid "" " -i, --info display compiler information (build/environment)\n" " and exit" msgstr " -i, -info Toont compiler bouw informatie" -#: cobc/help.c:64 +#: cobc/help.c:67 msgid "" " -v, --verbose verbose mode, display additional information;\n" " multiple -v options increase the verbosity,\n" @@ -2210,31 +2250,31 @@ msgid "" " (3) pass verbose option to linker" msgstr "" -#: cobc/help.c:71 +#: cobc/help.c:74 #, fuzzy msgid " -q, --brief reduced displays, commands invoked not shown" msgstr " -v Toont de opdrachten uitgevoerd door de compiler" -#: cobc/help.c:72 +#: cobc/help.c:75 #, fuzzy msgid " -### like -v but commands not executed" msgstr " -x Bouw een uitvoerbaar programma" -#: cobc/help.c:73 +#: cobc/help.c:76 #, fuzzy msgid " -x build an executable program" msgstr " -x Bouw een uitvoerbaar programma" -#: cobc/help.c:74 +#: cobc/help.c:77 #, fuzzy msgid " -m build a dynamically loadable module (default)" msgstr " -m Bouw een dynamisch laadbare module (standaard)" -#: cobc/help.c:75 +#: cobc/help.c:78 msgid " -j [<args>], --job[=<args>]\trun program after build, passing <args>" msgstr "" -#: cobc/help.c:76 +#: cobc/help.c:79 msgid "" " -std=<dialect> warnings/features for a specific dialect\n" " <dialect> can be one of:\n" @@ -2246,53 +2286,57 @@ msgid "" " see configuration files in directory config" msgstr "" -#: cobc/help.c:84 +#: cobc/help.c:87 #, fuzzy msgid " -F, --free use free source format (alias for -fformat=free)" msgstr " -free Gebruik vrij bron formaat" -#: cobc/help.c:85 +#: cobc/help.c:88 #, fuzzy msgid "" " --fixed use fixed source format (default; alias for\n" " -fformat=fixed)" msgstr " -fixed Gebruik vast bron formaat (standaard)" -#: cobc/help.c:87 +#: cobc/help.c:90 #, fuzzy msgid " -O, -O2, -O3, -Os enable optimization" msgstr " -O, -O2, -Os Inschakelen optimalisatie" -#: cobc/help.c:88 +#: cobc/help.c:91 #, fuzzy msgid " -O0 disable optimization" msgstr " -W Inschakelen alle waarschuwingen" -#: cobc/help.c:89 +#: cobc/help.c:92 #, fuzzy msgid " -g enable C compiler debug and stack check" msgstr " -g Inschakelen C compiler debug / stack check / trace" -#: cobc/help.c:90 +#: cobc/help.c:93 #, fuzzy msgid "" " -d, --debug enable all run-time error checking,\n" " equal to -fstack-check -fec=EC-ALL" msgstr " -debug Inschakelen alle run-time fout controles" -#: cobc/help.c:93 +#: cobc/help.c:97 msgid "" " -fec=<exception-name>\tenable code generation for <exception-name>,\n" " see --list-exceptions for the possible values,\n" " sets -fsource-location" msgstr "" -#: cobc/help.c:97 +#: cobc/help.c:100 +msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" +msgstr "" + +#: cobc/help.c:101 #, fuzzy msgid " -o <file> place the output into <file>" msgstr " -o <bestand> Plaats de uitvoer in <file>" -#: cobc/help.c:98 +#: cobc/help.c:102 #, fuzzy msgid "" " -b combine all input files into a single\n" @@ -2301,51 +2345,46 @@ msgstr "" " -b Combineer alle invoer bestanden in één bestand\n" " dynamisch laadbare module" -#: cobc/help.c:100 +#: cobc/help.c:104 #, fuzzy msgid " -E preprocess only; do not compile or link" msgstr " -E Alleen voorbewerken; niet compileren of linken" -#: cobc/help.c:101 +#: cobc/help.c:105 #, fuzzy msgid " -C translation only; convert COBOL to C" msgstr " -C Alleen vertalen; converteer COBOL naar C" -#: cobc/help.c:102 +#: cobc/help.c:106 #, fuzzy msgid " -S compile only; output assembly file" msgstr " -S Alleen compileren; uitvoer assembler bestand" -#: cobc/help.c:103 +#: cobc/help.c:107 #, fuzzy msgid " -c compile and assemble, but do not link" msgstr " -c Compileer en assembleer, maar niet linken" -#: cobc/help.c:104 +#: cobc/help.c:108 #, fuzzy msgid " -T <file> generate and place a wide program listing into <file>" msgstr " -o <bestand> Plaats de uitvoer in <file>" -#: cobc/help.c:105 +#: cobc/help.c:109 #, fuzzy msgid " -t <file> generate and place a program listing into <file>" msgstr " -o <bestand> Plaats de uitvoer in <file>" -#: cobc/help.c:106 +#: cobc/help.c:110 msgid " --tlines=<lines> specify lines per page in listing, default = 55" msgstr "" -#: cobc/help.c:108 -#, fuzzy -msgid " --tsymbols specify symbols in listing, use -ftsymbols instead" -msgstr " -free Gebruik vrij bron formaat" - -#: cobc/help.c:110 +#: cobc/help.c:111 #, fuzzy msgid " -P[=<dir or file>] generate preprocessed program listing (.lst)" msgstr " -P(=<map of bestand>) Genereer voorbewerkte programma lijst (.lst)" -#: cobc/help.c:112 +#: cobc/help.c:113 #, fuzzy msgid "" " -X, --Xref generate cross reference through 'cobxref'\n" @@ -2354,35 +2393,30 @@ msgstr "" " -Xref Genereer kruisverwijzing door 'cobxref'\n" " (V. Coen's 'cobxref' moet in het pad staan" -#: cobc/help.c:115 +#: cobc/help.c:116 #, fuzzy msgid " -X, --Xref specify cross reference in listing" msgstr " -free Gebruik vrij bron formaat" -#: cobc/help.c:117 +#: cobc/help.c:118 #, fuzzy msgid " -I <directory> add <directory> to copy/include search path" msgstr " -I <map> Voeg <map> toe aan copy/include zoek pad" -#: cobc/help.c:118 +#: cobc/help.c:119 #, fuzzy msgid " -L <directory> add <directory> to library search path" msgstr " -L <map> Voeg <map> toe aan library zoek pad" -#: cobc/help.c:119 +#: cobc/help.c:120 #, fuzzy msgid " -l <lib> link the library <lib>" msgstr " -l <bibliotheek> Link de bibliotheek <lib>" -#: cobc/help.c:120 -#, fuzzy -msgid " -A <options> add <options> to the C compile phase" -msgstr " -A <opties> Voeg <opties> toe aan de C compileer fase" - #: cobc/help.c:121 #, fuzzy -msgid " -Q <options> add <options> to the C link phase" -msgstr " -Q <opties> Voeg <opties> toe aan de C link fase" +msgid " -K <entry> generate CALL to <entry> as static" +msgstr " -K <ingang> Genereer aanroep van <ingang> als statisch" #: cobc/help.c:122 #, fuzzy @@ -2391,3929 +2425,3995 @@ msgstr " -D <woord> Maak <woord> bekend bij de COBOL compiler" #: cobc/help.c:123 #, fuzzy -msgid " -K <entry> generate CALL to <entry> as static" -msgstr " -K <ingang> Genereer aanroep van <ingang> als statisch" +msgid " -A <options> add <options> to the C compile phase" +msgstr " -A <opties> Voeg <opties> toe aan de C compileer fase" #: cobc/help.c:124 #, fuzzy +msgid " -Q <options> add <options> to the C link phase" +msgstr " -Q <opties> Voeg <opties> toe aan de C link fase" + +#: cobc/help.c:125 +msgid " --coverage instrument generated binaries for coverage" +msgstr "" + +#: cobc/help.c:126 +#, fuzzy msgid " --conf=<file> user-defined dialect configuration; see -std" msgstr " -conf=<bestand> Gebruiker gedefinieerde dialect configuratie - Zie -std=" -#: cobc/help.c:125 +#: cobc/help.c:127 #, fuzzy msgid " --list-reserved display reserved words" msgstr " -list-reserved Toon gereserveerde woorden" -#: cobc/help.c:126 +#: cobc/help.c:128 #, fuzzy msgid " --list-intrinsics display intrinsic functions" msgstr " -list-intrinsics Toon intrinsieke functies" -#: cobc/help.c:127 +#: cobc/help.c:129 #, fuzzy msgid " --list-mnemonics display mnemonic names" msgstr " -list-mnemonics Toon mnemonic namen" -#: cobc/help.c:128 +#: cobc/help.c:130 #, fuzzy msgid " --list-exceptions display exception names" msgstr " -list-mnemonics Toon mnemonic namen" -#: cobc/help.c:129 +#: cobc/help.c:131 #, fuzzy msgid " --list-system display system routines" msgstr " -list-system Toon systeem routines" -#: cobc/help.c:130 +#: cobc/help.c:132 msgid "" " --save-temps[=<dir>] save intermediate files\n" " * default: current directory" msgstr "" -#: cobc/help.c:132 +#: cobc/help.c:134 +msgid " -MT <target> set/add target file used in dependency list" +msgstr "" + +#: cobc/help.c:135 +#, fuzzy +msgid " -MF <file> place dependency list into <file>" +msgstr " -o <bestand> Plaats de uitvoer in <file>" + +#: cobc/help.c:136 #, fuzzy msgid " -ext <extension> add file extension for resolving COPY" msgstr " -ext <suffix> Voeg standaard bestands suffix toe" -#: cobc/help.c:139 +#: cobc/help.c:143 #, fuzzy msgid "Warning options:" msgstr "Opties:" -#: cobc/help.c:140 +#: cobc/help.c:144 #, fuzzy msgid " -Wall enable most warnings (all except as noted below)" msgstr " -Wall Inschakelen alle waarschuwingen behalve zoals vermeld hieronder" -#: cobc/help.c:141 +#: cobc/help.c:145 #, fuzzy msgid " -Wextra like -Wall but enable some extra warning flags" msgstr " -W Inschakelen alle waarschuwingen" -#: cobc/help.c:142 +#: cobc/help.c:146 #, fuzzy msgid " -w disable all warnings" msgstr " -W Inschakelen alle waarschuwingen" -#: cobc/help.c:143 +#: cobc/help.c:147 msgid " -Wno-<warning> disable warning enabled by default, -Wall or -Wextra" msgstr "" #. TRANSLATORS: This msgid is appended to msgid for -Wno-pending and others -#: cobc/help.c:149 +#: cobc/help.c:153 #, fuzzy msgid " * ALWAYS active" msgstr " -W Inschakelen alle waarschuwingen" #. TRANSLATORS: This msgid is appended to msgid for -Wpossible-truncate and others -#: cobc/help.c:153 +#: cobc/help.c:157 #, fuzzy msgid " * NOT set with -Wall" msgstr " -W Inschakelen alle waarschuwingen" -#: cobc/help.c:161 +#: cobc/help.c:165 +msgid " -fdiagnostics-plain-output\tmake diagnostic output as plain as possible" +msgstr "" + +#: cobc/help.c:166 #, fuzzy msgid " -Werror treat all warnings as errors" msgstr " -W Inschakelen alle waarschuwingen" -#: cobc/help.c:162 +#: cobc/help.c:167 #, fuzzy msgid " -Wno-error don't treat warnings as errors" msgstr " -W Inschakelen alle waarschuwingen" -#: cobc/help.c:163 +#: cobc/help.c:168 msgid " -Werror=<warning> treat specified <warning> as error" msgstr "" -#: cobc/help.c:164 +#: cobc/help.c:169 #, fuzzy msgid " -Wno-error=<warning> don't treat specified <warning> as error" msgstr " -W Inschakelen alle waarschuwingen" -#: cobc/help.c:180 +#: cobc/help.c:185 #, fuzzy msgid "Compiler options:" msgstr "Opties:" -#: cobc/help.c:198 +#: cobc/help.c:203 msgid "" " -fibmcomp sets -fbinary-size=2-4-8 -fsynchronized-clause=ok\n" " -fno-ibmcomp sets -fbinary-size=1--8 -fsynchronized-clause=ignore" msgstr "" -#: cobc/help.c:201 +#: cobc/help.c:206 msgid "" " -falternate-ebcdic use restricted ASCII to EBCDIC translate\n" " -fno-alternate-ebcdic use extended ASCII to EBCDIC translate" msgstr "" -#: cobc/help.c:230 +#: cobc/help.c:235 msgid "Compiler dialect configuration options:" msgstr "" -#: cobc/help.c:232 cobc/help.c:238 +#: cobc/help.c:237 cobc/help.c:243 msgid "<value>" msgstr "" -#: cobc/help.c:242 +#: cobc/help.c:247 msgid "<support>" msgstr "" -#: cobc/help.c:251 +#: cobc/help.c:256 msgid "where <support> is one of the following:" msgstr "" #. TRANSLATORS: This msgid is used when a variable name #. or label is referenced in a compiler message. -#: cobc/help.c:254 cobc/help.c:257 cobc/help.c:260 cobc/help.c:263 -#: cobc/help.c:266 cobc/help.c:269 cobc/help.c:272 cobc/help.c:275 -#: cobc/typeck.c:2361 +#: cobc/help.c:259 cobc/help.c:262 cobc/help.c:265 cobc/help.c:268 +#: cobc/help.c:271 cobc/help.c:274 cobc/help.c:277 cobc/help.c:280 +#: cobc/typeck.c:2378 #, c-format msgid "'%s'" msgstr "" -#: cobc/help.c:277 +#: cobc/help.c:282 msgid "word to be taken out of the reserved words list" msgstr "" -#: cobc/help.c:277 cobc/help.c:278 cobc/help.c:280 +#: cobc/help.c:282 cobc/help.c:283 cobc/help.c:285 msgid "<word>" msgstr "" -#: cobc/help.c:278 +#: cobc/help.c:283 msgid "word to be added to reserved words list" msgstr "" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "word to be added to reserved words list as alias" msgstr "" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "<word>:<alias>" msgstr "" -#: cobc/help.c:280 +#: cobc/help.c:285 msgid "special register to disable" msgstr "" -#: cobc/help.c:281 +#: cobc/help.c:286 msgid "special register to enable" msgstr "" -#: cobc/help.c:282 +#: cobc/help.c:287 msgid "<word> or <word>:<definition>, where definition uses backslash escaped spaces" msgstr "" -#: cobc/parser.y:315 cobc/parser.y:323 +#: cobc/parser.y:307 #, c-format msgid "'%s' should start in Area A" msgstr "" -#: cobc/parser.y:331 cobc/parser.y:333 +#: cobc/parser.y:315 +#, c-format +msgid "%s should start in Area A" +msgstr "" + +#: cobc/parser.y:322 +#, c-format +msgid "%s should not start in Area A" +msgstr "" + +#: cobc/parser.y:330 cobc/parser.y:332 msgid "start of statement in Area A" msgstr "" -#: cobc/parser.y:344 cobc/parser.y:379 +#: cobc/parser.y:428 #, fuzzy, c-format msgid "unreachable statement '%s'" msgstr "Statement wordt niet bereikt '%s'" -#: cobc/parser.y:470 +#: cobc/parser.y:542 #, c-format msgid "ENTRY '%s' duplicated" msgstr "ENTRY '%s' dubbel" -#: cobc/parser.y:520 +#: cobc/parser.y:594 #, fuzzy, c-format #| msgid "ENTRY '%s' duplicated" msgid "ENTRY FOR GO TO '%s' duplicated" msgstr "ENTRY '%s' dubbel" -#: cobc/parser.y:536 +#: cobc/parser.y:610 #, fuzzy, c-format msgid "maximum nested program depth exceeded (%d)" msgstr "Maximum aantal insluitende programma's overschreden (%d)" -#: cobc/parser.y:562 cobc/parser.y:589 +#: cobc/parser.y:636 cobc/parser.y:663 #, fuzzy, c-format msgid "%s statement not terminated by %s" msgstr "%s statement niet afgesloten met END-%s" -#: cobc/parser.y:592 +#: cobc/parser.y:666 #, fuzzy, c-format msgid "%s statement not terminated" msgstr "%s statement niet afgesloten met END-%s" -#: cobc/parser.y:634 -msgid "USE statement invalid for SORT file" +#: cobc/parser.y:708 +#, fuzzy +#| msgid "USE statement invalid for SORT file" +msgid "USE statement invalid for SD file" msgstr "USE statement ongeldig voor SORT bestand" -#: cobc/parser.y:676 cobc/parser.y:1670 cobc/parser.y:1673 -#, c-format -msgid "cannot specify both %s and %s" -msgstr "" - -#: cobc/parser.y:677 +#: cobc/parser.y:751 #, fuzzy, c-format #| msgid "%s ignored" msgid "%s is ignored" msgstr "%s genegeerd" -#: cobc/parser.y:686 +#: cobc/parser.y:760 #, c-format -msgid "Cannot specify %s without number of lines on page" +msgid "cannot specify %s without number of lines on page" msgstr "" -#: cobc/parser.y:696 +#: cobc/parser.y:770 #, c-format msgid "maximum OCCURS depth exceeded (%d)" msgstr "maximum OCCURS diepte overschreden (%d)" -#: cobc/parser.y:704 cobc/typeck.c:3037 +#: cobc/parser.y:785 cobc/typeck.c:3127 #, c-format msgid "'%s' is not in LINKAGE SECTION" msgstr "'%s' is niet in LINKAGE SECTION" -#: cobc/parser.y:725 +#: cobc/parser.y:806 msgid "TO phrase without DEPENDING phrase" msgstr "" -#: cobc/parser.y:727 +#: cobc/parser.y:808 msgid "maximum number of occurrences assumed to be exact number" msgstr "" -#: cobc/parser.y:732 cobc/parser.y:8032 +#: cobc/parser.y:813 cobc/parser.y:8398 msgid "OCCURS TO must be greater than OCCURS FROM" msgstr "" -#: cobc/parser.y:741 +#: cobc/parser.y:823 #, fuzzy msgid "OCCURS DEPENDING ON without TO phrase" msgstr "GO TO met meerdere procedure-namen" -#: cobc/parser.y:806 +#: cobc/parser.y:899 #, c-format msgid "%s header missing" msgstr "%s kop ontbreekt" -#: cobc/parser.y:807 +#: cobc/parser.y:900 #, fuzzy, c-format #| msgid "%s header missing - assumed" msgid "%s header assumed" msgstr "%s kop ontbreekt - veronderstelt" -#: cobc/parser.y:939 -#, fuzzy, c-format -msgid "duplicate %s" -msgstr "Dubbele %s clausule" - -#: cobc/parser.y:941 +#: cobc/parser.y:1053 #, c-format msgid "%s incorrectly after %s" msgstr "" -#: cobc/parser.y:1078 +#: cobc/parser.y:1208 #, fuzzy, c-format msgid "redefinition of program name '%s'" msgstr "Herdefinitie van '%s'" -#: cobc/parser.y:1083 +#: cobc/parser.y:1213 #, fuzzy, c-format msgid "redefinition of program ID '%s'" msgstr "Herdefinitie van '%s'" -#: cobc/parser.y:1117 +#: cobc/parser.y:1247 #, c-format msgid "FUNCTION '%s' has no PROCEDURE DIVISION" msgstr "" -#: cobc/parser.y:1228 +#: cobc/parser.y:1372 msgid "functions may not be defined within a program/function" msgstr "" -#: cobc/parser.y:1278 +#: cobc/parser.y:1426 #, fuzzy, c-format msgid "END FUNCTION '%s' is different from FUNCTION-ID '%s'" msgstr "END FUNCTION '%s' verschilt met FUNCTION-ID '%s'" -#: cobc/parser.y:1292 +#: cobc/parser.y:1440 #, fuzzy, c-format msgid "END PROGRAM '%s' is different from PROGRAM-ID '%s'" msgstr "END PROGRAM '%s' verschilt met PROGRAM-ID '%s'" -#: cobc/parser.y:1341 +#: cobc/parser.y:1489 #, fuzzy msgid "currency symbol must be one character long" msgstr "'%s' CURSOR is niet 4 of 6 karakters lang" -#: cobc/parser.y:1398 +#: cobc/parser.y:1546 #, fuzzy, c-format msgid "invalid character '%c' in currency symbol" msgstr "Ongeldige expressie" -#: cobc/parser.y:1414 +#: cobc/parser.y:1562 msgid "prototype has same name as current function and will be ignored" msgstr "" -#: cobc/parser.y:1441 +#: cobc/parser.y:1589 #, c-format msgid "duplicate REPOSITORY entries for '%s' do not match" msgstr "" -#: cobc/parser.y:1445 +#: cobc/parser.y:1593 #, c-format msgid "duplicate REPOSITORY entry for '%s'" msgstr "" -#: cobc/parser.y:1510 +#: cobc/parser.y:1658 #, c-format msgid "ORGANIZATION %s is incompatible with RECORD DELIMITER" msgstr "" -#: cobc/parser.y:1548 cobc/parser.y:1939 cobc/typeck.c:829 +#: cobc/parser.y:1694 cobc/parser.y:2142 cobc/typeck.c:835 #, fuzzy, c-format msgid "condition-name not allowed here: '%s'" msgstr "Verwijzingsmodificatie hier niet toegestaan" -#: cobc/parser.y:1554 cobc/parser.y:2127 +#: cobc/parser.y:1700 cobc/parser.y:2345 #, fuzzy msgid "SCREEN item cannot be used here" msgstr "'%s' kan hier niet worden geïndexeerd" -#: cobc/parser.y:1557 +#: cobc/parser.y:1703 #, fuzzy msgid "REPORT item cannot be used here" msgstr "'%s' kan hier niet worden geïndexeerd" -#: cobc/parser.y:1563 +#: cobc/parser.y:1709 #, fuzzy msgid "TYPEDEF item cannot be used here" msgstr "'%s' kan hier niet worden geïndexeerd" -#: cobc/parser.y:1572 +#: cobc/parser.y:1718 #, fuzzy msgid "elementary item expected" msgstr "Geheel getal waarde" -#: cobc/parser.y:1579 +#: cobc/parser.y:1725 #, fuzzy msgid "item may not reference itself" msgstr "RENAMES mag niet verwijzen naar een 01 of > 50 nivo" -#: cobc/parser.y:1586 +#: cobc/parser.y:1733 msgid "item may not be subordinate to any item with USAGE clause" msgstr "" -#: cobc/parser.y:1588 +#: cobc/parser.y:1735 msgid "item may not be subordinate to any item with SIGN clause" msgstr "" -#: cobc/parser.y:1631 +#: cobc/parser.y:1780 #, c-format msgid "illegal combination of %s with other clauses" msgstr "" -#: cobc/parser.y:1641 +#: cobc/parser.y:1794 #, c-format msgid "entry following %s may not be subordinate to it" msgstr "" -#: cobc/parser.y:1859 +#: cobc/parser.y:2042 +msgid "INITIAL specified on non-input field" +msgstr "INITIAL gespecificeerd op een niet-invoer veld" + +#: cobc/parser.y:2054 +msgid "relative LINE/COLUMN clause required with OCCURS" +msgstr "" + +#: cobc/parser.y:2072 msgid "FOR phrase cannot immediately follow ALL/LEADING/TRAILING" msgstr "" -#: cobc/parser.y:1861 +#: cobc/parser.y:2074 msgid "missing CHARACTERS/ALL/LEADING/TRAILING phrase after FOR phrase" msgstr "" -#: cobc/parser.y:1868 +#: cobc/parser.y:2081 #, fuzzy msgid "missing value between ALL/LEADING/TRAILING words" msgstr "ALL, LEADING of TRAILING verwacht voor '%s'" -#: cobc/parser.y:1873 +#: cobc/parser.y:2086 msgid "missing FOR phrase before CHARACTERS/ALL/LEADING/TRAILING phrase" msgstr "" -#: cobc/parser.y:1880 +#: cobc/parser.y:2093 #, fuzzy msgid "missing ALL/LEADING/TRAILING before value" msgstr "ALL, LEADING of TRAILING verwacht voor '%s'" -#: cobc/parser.y:1935 +#: cobc/parser.y:2138 msgid "use of condition-name in place of data-name" msgstr "" -#: cobc/parser.y:1966 +#: cobc/parser.y:2169 msgid "cannot specify NO ADVANCING in screen DISPLAY" msgstr "" -#: cobc/parser.y:2029 cobc/parser.y:2046 +#: cobc/parser.y:2232 cobc/parser.y:2249 msgid "non-standard DISPLAY" msgstr "" -#: cobc/parser.y:2033 +#: cobc/parser.y:2236 msgid "screens may only be displayed on CRT" msgstr "" -#: cobc/parser.y:2038 cobc/parser.y:2081 +#: cobc/parser.y:2241 cobc/parser.y:2284 msgid "cannot mix screens and fields in the same DISPLAY statement" msgstr "" -#: cobc/parser.y:2042 +#: cobc/parser.y:2245 msgid "screen clauses may only be used for DISPLAY on CRT" msgstr "" -#: cobc/parser.y:2087 +#: cobc/parser.y:2290 msgid "ambiguous DISPLAY; put items to display on device in separate DISPLAY" msgstr "" -#: cobc/parser.y:2103 +#: cobc/parser.y:2301 #, fuzzy, c-format msgid "%s is not an alphanumeric literal" msgstr "'%s' is geen numerieke waarde" -#: cobc/parser.y:2105 +#: cobc/parser.y:2305 #, fuzzy, c-format msgid "'%s' is not USAGE DISPLAY" msgstr "'%s' is niet in LINKAGE SECTION" -#: cobc/parser.y:2120 cobc/typeck.c:9790 +#: cobc/parser.y:2322 cobc/parser.y:19534 +#, fuzzy, c-format +msgid "'%s' is not a field" +msgstr "'%s' is niet gedefinieerd" + +#: cobc/parser.y:2338 cobc/typeck.c:10231 #, fuzzy, c-format msgid "invalid target for %s" msgstr "Ongeldig type voor '%s'" -#: cobc/parser.y:2129 +#: cobc/parser.y:2347 #, fuzzy msgid "RENAMES item may not be used here" msgstr "Hier mag geen constante worden gebruikt - '%s'" -#: cobc/parser.y:2131 cobc/typeck.c:2737 cobc/typeck.c:2828 +#: cobc/parser.y:2349 cobc/typeck.c:2822 cobc/typeck.c:2913 msgid "ANY LENGTH item not allowed here" msgstr "ANY LENGTH item hier niet toegestaan" -#: cobc/parser.y:2135 +#: cobc/parser.y:2353 #, c-format msgid "item '%s' has wrong class for VALIDATE" msgstr "" -#: cobc/parser.y:2144 +#: cobc/parser.y:2362 #, fuzzy #| msgid "REDEFINES clause must follow entry-name" msgid "WHEN clause must follow EVERY clause" msgstr "REDEFINES clausule moet na ENTRY naam komen" -#: cobc/parser.y:2229 cobc/parser.y:18631 +#: cobc/parser.y:2447 cobc/parser.y:19251 #, fuzzy msgid "non-zero value expected" msgstr "Geheel getal waarde" -#: cobc/parser.y:2235 cobc/tree.c:4735 +#: cobc/parser.y:2453 cobc/tree.c:4803 #, fuzzy, c-format #| msgid "RECORD size exceeds maximum allowed (%d)" msgid "RECORD size (IDX) exceeds maximum allowed (%d)" msgstr "RECORD grootte overschrijdt het toegestane maximum (%d)" -#: cobc/parser.y:2239 cobc/tree.c:4739 +#: cobc/parser.y:2457 cobc/tree.c:4807 #, c-format msgid "RECORD size exceeds maximum allowed (%d)" msgstr "RECORD grootte overschrijdt het toegestane maximum (%d)" -#: cobc/parser.y:2244 +#: cobc/parser.y:2462 msgid "RECORD clause invalid" msgstr "RECORD clausule ongeldig" -#: cobc/parser.y:3368 +#: cobc/parser.y:3595 #, fuzzy msgid "multiple PROGRAM-ID's without matching END PROGRAM" msgstr "Meerdere PROGRAM-ID's zonder bijbehorend END PROGRAM" -#: cobc/parser.y:3371 +#: cobc/parser.y:3598 #, fuzzy msgid "executable requested but no program found" msgstr "Uitvoerbaar programma gevraagd maar geen programma gevonden" -#: cobc/parser.y:3488 +#: cobc/parser.y:3717 msgid "prototypes must be come before any program/function definitions" msgstr "" -#: cobc/parser.y:3691 +#: cobc/parser.y:3930 msgid "COMMON may only be used in a contained program" msgstr "COMMON mag alleen worden gebruikt in een bijgesloten programma" -#: cobc/parser.y:3778 +#: cobc/parser.y:4017 msgid "CALL prototypes" msgstr "" -#: cobc/parser.y:3953 cobc/parser.y:4235 cobc/parser.y:4281 cobc/parser.y:4394 -#: cobc/parser.y:4608 cobc/parser.y:4705 cobc/parser.y:4744 cobc/parser.y:4803 -#: cobc/parser.y:4824 cobc/parser.y:4867 cobc/parser.y:4946 cobc/parser.y:4965 -#: cobc/parser.y:4981 cobc/parser.y:4999 cobc/parser.y:5017 cobc/parser.y:5034 -#: cobc/parser.y:5052 cobc/parser.y:7404 cobc/parser.y:8628 +#: cobc/parser.y:4192 cobc/parser.y:4471 cobc/parser.y:4517 cobc/parser.y:4632 +#: cobc/parser.y:4846 cobc/parser.y:4943 cobc/parser.y:4982 cobc/parser.y:5041 +#: cobc/parser.y:5062 cobc/parser.y:5105 cobc/parser.y:5184 cobc/parser.y:5203 +#: cobc/parser.y:5219 cobc/parser.y:5237 cobc/parser.y:5255 cobc/parser.y:5272 +#: cobc/parser.y:5290 cobc/parser.y:7685 cobc/parser.y:9028 #, c-format msgid "%s not allowed in nested programs" msgstr "%s niet toegestaan in ingesloten programma's" -#: cobc/parser.y:4109 +#: cobc/parser.y:4345 msgid "segment-number must be in range of values 1 to 49" msgstr "" -#: cobc/parser.y:4121 +#: cobc/parser.y:4357 #, fuzzy msgid "duplicate CLASSIFICATION clause" msgstr "Dubbele CLASSIFICATION clausule" -#: cobc/parser.y:4200 +#: cobc/parser.y:4436 msgid "PROGRAM phrase" msgstr "" -#: cobc/parser.y:4302 cobc/parser.y:4313 cobc/parser.y:4657 +#: cobc/parser.y:4538 cobc/parser.y:4549 cobc/parser.y:4895 #, fuzzy, c-format msgid "invalid %s clause" msgstr "Ongeldige CRT clausule" -#: cobc/parser.y:4616 cobc/parser.y:4754 +#: cobc/parser.y:4854 cobc/parser.y:4992 #, fuzzy msgid "type does not match alphabet" msgstr "Constante type komt niet overeen met data type" -#: cobc/parser.y:4760 +#: cobc/parser.y:4998 #, fuzzy msgid "CLASS IS integer IN alphabet-name" msgstr "'%s' is geen alfabet naam" -#: cobc/parser.y:4780 cobc/parser.y:4784 +#: cobc/parser.y:5018 cobc/parser.y:5022 msgid "CLASS literal with THRU must have size 1" msgstr "CLASS constante met THRU moet een grootte van 1 zijn" -#: cobc/parser.y:4879 +#: cobc/parser.y:5117 msgid "separate currency symbol and currency string" msgstr "" -#: cobc/parser.y:4912 +#: cobc/parser.y:5150 #, fuzzy, c-format msgid "invalid CURRENCY SIGN '%s'" msgstr "Ongeldige ENTRY '%s'%s" -#: cobc/parser.y:5139 +#: cobc/parser.y:5377 msgid "cannot use RELATIVE KEY clause on INDEXED files" msgstr "" -#: cobc/parser.y:5143 +#: cobc/parser.y:5381 msgid "cannot use RECORD KEY clause on RELATIVE files" msgstr "" -#: cobc/parser.y:5215 +#: cobc/parser.y:5453 msgid "EXTERNAL/DYNAMIC cannot be used with literals" msgstr "" -#: cobc/parser.y:5235 +#: cobc/parser.y:5473 msgid "EXTERNAL/DYNAMIC cannot be used with USING/VARYING" msgstr "" -#: cobc/parser.y:5246 +#: cobc/parser.y:5484 msgid "EXTERNAL/DYNAMIC cannot be used with DISK FROM" msgstr "" -#: cobc/parser.y:5248 -msgid "ASSIGN DISK FROM" -msgstr "" - -#: cobc/parser.y:5370 +#: cobc/parser.y:5608 msgid "ASSIGN EXTERNAL/DYNAMIC" msgstr "" -#: cobc/parser.y:5486 cobc/parser.y:5666 +#: cobc/parser.y:5724 cobc/parser.y:5921 #, c-format msgid "%s only valid with ORGANIZATION %s" msgstr "" -#: cobc/parser.y:5583 +#: cobc/parser.y:5818 cobc/typeck.c:3818 #, fuzzy, c-format msgid "'%s' is not an alphabet-name" msgstr "'%s' is geen alfabet naam" -#: cobc/parser.y:5599 +#: cobc/parser.y:5854 msgid "VSAM status" msgstr "" -#: cobc/parser.y:5733 cobc/parser.y:5758 +#: cobc/parser.y:5988 cobc/parser.y:6013 #, fuzzy, c-format #| msgid "START not allowed on SEQUENTIAL files" msgid "RECORD DELIMITER %s only allowed with SEQUENTIAL files" msgstr "START niet toegestaan bij SEQUENTIAL bestanden" -#: cobc/parser.y:5745 +#: cobc/parser.y:6000 #, fuzzy, c-format #| msgid "OPEN I-O not allowed on LINE SEQUENTIAL files" msgid "RECORD DELIMITER %s only allowed with (LINE) SEQUENTIAL files" msgstr "OPEN I-O niet toegestaan bij LINE SEQUENTIAL bestanden" -#: cobc/parser.y:5751 +#: cobc/parser.y:6006 msgid "LINE-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5764 +#: cobc/parser.y:6019 msgid "BINARY-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5772 +#: cobc/parser.y:6027 #, fuzzy #| msgid "RECORD clause ignored for LINE SEQUENTIAL" msgid "RECORD DELIMITER clause only allowed with (LINE) SEQUENTIAL files" msgstr "RECORD clausule genegeerd voor LINE SEQUENTIAL" -#: cobc/parser.y:5776 +#: cobc/parser.y:6031 #, c-format msgid "RECORD DELIMITER %s not recognized; will be ignored" msgstr "" -#: cobc/parser.y:5814 +#: cobc/parser.y:6069 msgid "DUPLICATES for primary keys" msgstr "" -#: cobc/parser.y:6058 +#: cobc/parser.y:6313 msgid "DOS/VS APPLY phrase" msgstr "" -#: cobc/parser.y:6212 +#: cobc/parser.y:6467 msgid "RECORD description missing or invalid" msgstr "RECORD beschrijving ontbreekt of ongeldig" -#: cobc/parser.y:6239 +#: cobc/parser.y:6494 #, fuzzy, c-format msgid "duplicate file description for %s" msgstr "Dubbele waarden in class '%s'" -#: cobc/parser.y:6288 cobc/parser.y:6893 cobc/parser.y:7389 cobc/parser.y:13485 -#: cobc/parser.y:16686 +#: cobc/parser.y:6543 cobc/parser.y:7170 cobc/parser.y:7670 cobc/parser.y:13913 +#: cobc/parser.y:17210 #, fuzzy, c-format msgid "%s is invalid in a user FUNCTION" msgstr "%s is ongeldig in FUNCTION" -#: cobc/parser.y:6326 cobc/parser.y:6336 +#: cobc/parser.y:6581 cobc/parser.y:6591 msgid "RECORD clause ignored for LINE SEQUENTIAL" msgstr "RECORD clausule genegeerd voor LINE SEQUENTIAL" -#: cobc/parser.y:6433 +#: cobc/parser.y:6688 msgid "LINAGE clause with wrong file type" msgstr "LINAGE clausule met incorrect bestandstype" -#: cobc/parser.y:6495 +#: cobc/parser.y:6750 msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgstr "" -#: cobc/parser.y:6532 +#: cobc/parser.y:6787 #, c-format msgid "ignoring CODE-SET '%s'" msgstr "CODE-SET '%s' genegeerd" -#: cobc/parser.y:6541 +#: cobc/parser.y:6796 msgid "CODE-SET clause invalid for file type" msgstr "CODE-SET clausule ongeldig voor bestandstype" -#: cobc/parser.y:6562 +#: cobc/parser.y:6817 msgid "REPORT clause with wrong file type" msgstr "REPORT clausule met incorrect bestandstype" -#: cobc/parser.y:6641 +#: cobc/parser.y:6899 #, fuzzy msgid "CD record missing" msgstr "%s kop ontbreekt" -#: cobc/parser.y:7091 +#: cobc/parser.y:7372 msgid "CONSTANT item not at 01 level" msgstr "CONSTANT item niet op 01 nivo" -#: cobc/parser.y:7236 +#: cobc/parser.y:7517 #, fuzzy #| msgid "REDEFINES clause must follow entry-name" msgid "REDEFINES clause not following entry-name" msgstr "REDEFINES clausule moet na ENTRY naam komen" -#: cobc/parser.y:7309 cobc/parser.y:7339 cobc/parser.y:7381 cobc/parser.y:7470 -#: cobc/parser.y:8233 +#: cobc/parser.y:7590 cobc/parser.y:7620 cobc/parser.y:7662 cobc/parser.y:7751 +#: cobc/parser.y:8606 #, c-format msgid "%s only allowed at 01/77 level" msgstr "%s alleen toegestaan op 01/77 nivo" -#: cobc/parser.y:7312 cobc/parser.y:7341 cobc/parser.y:7383 cobc/parser.y:8235 -#: cobc/parser.y:8587 cobc/parser.y:8609 +#: cobc/parser.y:7593 cobc/parser.y:7622 cobc/parser.y:7664 cobc/parser.y:8608 +#: cobc/parser.y:8987 cobc/parser.y:9009 #, c-format msgid "%s requires a data name" msgstr "Item %s vereist een veld naam" -#: cobc/parser.y:7316 cobc/parser.y:7565 +#: cobc/parser.y:7597 cobc/parser.y:7846 #, fuzzy, c-format msgid "%s not allowed in %s" msgstr "%s niet toegestaan bij %s bestanden" -#: cobc/parser.y:7337 cobc/parser.y:7391 cobc/parser.y:8231 cobc/parser.y:8583 -#: cobc/parser.y:8607 +#: cobc/parser.y:7618 cobc/parser.y:7672 cobc/parser.y:8604 cobc/parser.y:8983 +#: cobc/parser.y:9007 #, c-format msgid "%s not allowed here" msgstr "%s niet toegestaan hier" -#: cobc/parser.y:7528 +#: cobc/parser.y:7809 #, fuzzy, c-format msgid "%s requires DEPENDING clause" msgstr "Item %s vereist een veld naam" -#: cobc/parser.y:7544 +#: cobc/parser.y:7825 msgid "a locale-format PICTURE string must only consist of '9', '.', '+', 'Z' and the currency-sign" msgstr "" -#: cobc/parser.y:7554 +#: cobc/parser.y:7835 msgid "DEPENDING clause needs either an OCCURS clause or a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7560 +#: cobc/parser.y:7841 msgid "only USAGE DISPLAY may specify a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7610 cobc/typeck.c:4752 +#: cobc/parser.y:7893 cobc/typeck.c:4916 #, fuzzy, c-format #| msgid "'%s' is not a locale name" msgid "'%s' is not a locale-name" msgstr "'%s' is niet een LOCALE naam" -#: cobc/parser.y:7656 +#: cobc/parser.y:7939 #, fuzzy, c-format #| msgid "'%s' is not a valid data name" msgid "'%s' is not a valid USAGE" msgstr "'%s' is geen geldige data naam" -#: cobc/parser.y:7661 +#: cobc/parser.y:7944 #, fuzzy, c-format msgid "unknown USAGE: %s" msgstr "Onbekende storing : %d" -#: cobc/parser.y:7808 +#: cobc/parser.y:8139 #, c-format msgid "unknown HANDLE type: %s" msgstr "" -#: cobc/parser.y:8082 +#: cobc/parser.y:8347 +#, fuzzy, c-format +msgid "'%s' is not USAGE UTF-8" +msgstr "'%s' is niet in LINKAGE SECTION" + +#: cobc/parser.y:8448 msgid "INDEXED should follow ASCENDING/DESCENDING" msgstr "" -#: cobc/parser.y:8317 +#: cobc/parser.y:8658 cobc/parser.y:8660 +#, fuzzy, c-format +msgid "unexpected %s" +msgstr "Onverwachte grootte" + +#: cobc/parser.y:8709 msgid "amount of entries in FROM and TO must match" msgstr "" -#: cobc/parser.y:8326 +#: cobc/parser.y:8718 #, c-format msgid "entry in FROM (%d) must be <= entry in TO (%d)" msgstr "" -#: cobc/parser.y:8585 +#: cobc/parser.y:8985 #, fuzzy, c-format #| msgid "%s only allowed at 01/77 level" msgid "%s only allowed at 01 level" msgstr "%s alleen toegestaan op 01/77 nivo" -#: cobc/parser.y:8589 cobc/parser.y:8611 +#: cobc/parser.y:8989 cobc/parser.y:9011 #, c-format msgid "%s and %s combination not allowed" msgstr "" -#: cobc/parser.y:8723 +#: cobc/parser.y:9127 msgid "GLOBAL is not allowed with RD" msgstr "GLOBAL is niet toegestaan met RD" -#: cobc/parser.y:9247 +#: cobc/parser.y:9650 #, fuzzy, c-format msgid "%s is not valid for VARYING" msgstr "'%s' is geen bestandsnaam" -#: cobc/parser.y:9283 +#: cobc/parser.y:9686 msgid "LINE with OCCURS is not supported" msgstr "" -#: cobc/parser.y:9323 +#: cobc/parser.y:9726 msgid "PLUS is not recommended with LEFT, RIGHT or CENTER" msgstr "" -#: cobc/parser.y:9325 +#: cobc/parser.y:9728 #, fuzzy #| msgid "GLOBAL is not allowed with RD" msgid "PLUS is not allowed with LEFT, RIGHT or CENTER" msgstr "GLOBAL is niet toegestaan met RD" -#: cobc/parser.y:9363 +#: cobc/parser.y:9766 msgid "PLUS is ignored on first field of line" msgstr "" -#: cobc/parser.y:9394 +#: cobc/parser.y:9797 msgid "invalid COLUMN integer; must be > 0" msgstr "" -#: cobc/parser.y:9396 +#: cobc/parser.y:9799 msgid "COLUMN numbers should increase" msgstr "" -#: cobc/parser.y:9492 cobc/parser.y:9547 -msgid "INITIAL specified on non-input field" -msgstr "INITIAL gespecificeerd op een niet-invoer veld" - -#: cobc/parser.y:9504 cobc/parser.y:9559 -msgid "relative LINE/COLUMN clause required with OCCURS" -msgstr "" - -#: cobc/parser.y:9661 cobc/parser.y:9665 +#: cobc/parser.y:9990 cobc/parser.y:9994 msgid "screen positions from data-item" msgstr "" -#: cobc/parser.y:9821 +#: cobc/parser.y:10153 #, c-format msgid "missing %s" msgstr "" -#: cobc/parser.y:10508 +#: cobc/parser.y:10840 #, fuzzy msgid "OCCURS screen items" msgstr "GLOBAL is niet toegestaan met scherm items" -#: cobc/parser.y:10520 +#: cobc/parser.y:10852 #, fuzzy msgid "GLOBAL screen items" msgstr "GLOBAL is niet toegestaan met scherm items" -#: cobc/parser.y:10571 +#: cobc/parser.y:10904 msgid "overriding convention specified in ENTRY-CONVENTION" msgstr "" -#: cobc/parser.y:10586 +#: cobc/parser.y:10917 #, fuzzy msgid "executable program requested but PROCEDURE/ENTRY has USING clause" msgstr "Uitvoerbaar programma gevraagd maar PROCEDURE/ENTRY heeft USING clausule" -#: cobc/parser.y:10654 cobc/parser.y:10671 cobc/parser.y:12278 +#: cobc/parser.y:10987 cobc/parser.y:11004 cobc/parser.y:12667 #, fuzzy, c-format msgid "number of arguments exceeds maximum %d" msgstr "Aantal parameters overschrijdt maximum %d" -#: cobc/parser.y:10663 +#: cobc/parser.y:10996 msgid "CHAINING invalid in user FUNCTION" msgstr "CHAINING ongeldig in een FUNCTION" -#: cobc/parser.y:10699 +#: cobc/parser.y:11032 #, fuzzy msgid "ANY LENGTH items may only be BY REFERENCE formal parameters" msgstr "'%s' ANY LENGTH item niet doorgegeven BY REFERENCE" -#: cobc/parser.y:10716 cobc/parser.y:12337 cobc/parser.y:12350 +#: cobc/parser.y:11049 cobc/parser.y:12728 cobc/parser.y:12741 #, c-format msgid "%s not allowed in CHAINED programs" msgstr "%s niet toegestaan in CHAINED programma" -#: cobc/parser.y:10718 +#: cobc/parser.y:11051 #, fuzzy msgid "parameters passed BY VALUE" msgstr "NULL parameter doorgegeven aan '%s'" -#: cobc/parser.y:10733 cobc/parser.y:10742 cobc/parser.y:10750 -#: cobc/parser.y:10771 +#: cobc/parser.y:11066 cobc/parser.y:11075 cobc/parser.y:11083 +#: cobc/parser.y:11104 msgid "SIZE only allowed for BY VALUE items" msgstr "SIZE alleen toegestaan voor BY VALUE items" -#: cobc/parser.y:10773 cobc/parser.y:10798 +#: cobc/parser.y:11106 cobc/parser.y:11131 #, fuzzy msgid "invalid value for SIZE" msgstr "Ongeldige waarde voor SIZE" -#: cobc/parser.y:10813 +#: cobc/parser.y:11146 msgid "MEMORY SIZE phrase in CALL statement" msgstr "" -#: cobc/parser.y:10825 +#: cobc/parser.y:11162 msgid "OPTIONAL only allowed for BY REFERENCE items" msgstr "OPTIONAL alleen toegestaan voor BY REFERENCE items" -#: cobc/parser.y:10837 +#: cobc/parser.y:11177 msgid "RETURNING clause is required for a FUNCTION" msgstr "RETURNING clausule is verplicht voor FUNCTION" -#: cobc/parser.y:10843 +#: cobc/parser.y:11183 msgid "RETURNING clause cannot be OMITTED for main program" msgstr "" -#: cobc/parser.y:10846 +#: cobc/parser.y:11186 #, fuzzy msgid "RETURNING clause cannot be OMITTED for a FUNCTION" msgstr "RETURNING clausule is verplicht voor FUNCTION" -#: cobc/parser.y:10859 +#: cobc/parser.y:11199 #, fuzzy msgid "RETURNING item is not defined in LINKAGE SECTION" msgstr "'%s' is niet in LINKAGE SECTION" -#: cobc/parser.y:10861 +#: cobc/parser.y:11201 msgid "RETURNING item must have level 01" msgstr "RETURNING item moet nivo 01" -#: cobc/parser.y:10863 +#: cobc/parser.y:11203 #, fuzzy msgid "RETURNING item should not have OCCURS" msgstr "RETURNING item moet nivo 01" -#: cobc/parser.y:10867 +#: cobc/parser.y:11207 msgid "function RETURNING item may not be ANY LENGTH" msgstr "" -#: cobc/parser.y:11080 +#: cobc/parser.y:11421 #, fuzzy, c-format msgid "'%s' is not a statement" msgstr "'%s' is geen report naam" -#: cobc/parser.y:11083 +#: cobc/parser.y:11424 #, c-format msgid "unknown statement '%s'; it may exist in another dialect" msgstr "" -#: cobc/parser.y:11087 +#: cobc/parser.y:11428 #, fuzzy, c-format msgid "unknown statement '%s'" msgstr "Onbekend statement '%s'" -#: cobc/parser.y:11105 +#: cobc/parser.y:11446 #, fuzzy msgid "SECTION segment-number must be less than or equal to 99" msgstr "SECTION segment ongeldig binnen DECLARATIVE" -#: cobc/parser.y:11108 +#: cobc/parser.y:11449 #, fuzzy msgid "SECTION segment-number in DECLARATIVES must be less than 50" msgstr "SECTION segment ongeldig binnen DECLARATIVE" -#: cobc/parser.y:11116 +#: cobc/parser.y:11457 #, fuzzy msgid "SECTION segment within DECLARATIVES" msgstr "SECTION segment ongeldig binnen DECLARATIVE" -#: cobc/parser.y:11313 cobc/parser.y:11448 +#: cobc/parser.y:11667 cobc/parser.y:11806 msgid "non-standard ACCEPT" msgstr "" -#: cobc/parser.y:11325 +#: cobc/parser.y:11679 #, fuzzy msgid "PROMPT clause" msgstr "LOCK clausule ongeldig hier" -#: cobc/parser.y:11329 +#: cobc/parser.y:11683 msgid "SIZE IS clause" msgstr "" -#: cobc/parser.y:11549 cobc/parser.y:11842 +#: cobc/parser.y:11907 cobc/parser.y:12226 msgid "TIME-OUT or BEFORE TIME clauses" msgstr "" -#: cobc/parser.y:11575 cobc/parser.y:11591 cobc/parser.y:11606 +#: cobc/parser.y:11937 cobc/parser.y:11960 cobc/parser.y:11978 msgid "AT screen-location" msgstr "" -#: cobc/parser.y:11607 +#: cobc/parser.y:11979 msgid "LINE or COLUMN" msgstr "" -#: cobc/parser.y:11972 +#: cobc/parser.y:12358 msgid "ALLOCATE CHARACTERS requires RETURNING clause" msgstr "ALLOCATE CHARACTERS vereist RETURNING clausule" -#: cobc/parser.y:11987 cobc/parser.y:13289 +#: cobc/parser.y:12373 #, fuzzy, c-format msgid "ignoring %s phrase" msgstr "Teken genegeerd" -#: cobc/parser.y:11989 +#: cobc/parser.y:12375 msgid "addressing mode should be either 24 or 31 bit" msgstr "" -#: cobc/parser.y:12061 +#: cobc/parser.y:12446 msgid "CALL to own PROGRAM-ID" msgstr "" -#: cobc/parser.y:12062 +#: cobc/parser.y:12447 #, fuzzy msgid "assuming RECURSIVE attribute" msgstr "Recursieve programma aanroep - RECURSIVE attribute aangenomen" -#: cobc/parser.y:12082 +#: cobc/parser.y:12467 msgid "STATIC CALL convention ignored because of ON EXCEPTION" msgstr "" -#: cobc/parser.y:12091 +#: cobc/parser.y:12476 msgid "ON EXCEPTION ignored because of STATIC CALL" msgstr "" -#: cobc/parser.y:12205 cobc/typeck.c:13644 +#: cobc/parser.y:12594 cobc/typeck.c:14450 #, fuzzy msgid "invalid mnemonic name" msgstr "Ongeldige mnemonic naam" -#: cobc/parser.y:12229 +#: cobc/parser.y:12618 msgid "id/literal ignored, using prototype name" msgstr "" -#: cobc/parser.y:12235 +#: cobc/parser.y:12624 #, fuzzy msgid "NESTED phrase is only valid with literal" msgstr "EXIT PERFORM is alleen geldig in een ingesloten PERFORM" -#: cobc/parser.y:12296 +#: cobc/parser.y:12685 #, fuzzy, c-format msgid "%s only allowed when arguments are passed %s" msgstr "OMITTED alleen toegestaan met BY REFERENCE" -#: cobc/parser.y:12385 +#: cobc/parser.y:12776 msgid "RETURNING item must have level 01 or 77" msgstr "RETURNING item moet nivo 01 of 77 zijn" -#: cobc/parser.y:12389 +#: cobc/parser.y:12780 #, fuzzy msgid "RETURNING item must be a LINKAGE SECTION item or have BASED clause" msgstr "RETURNING item is niet in LINKAGE SECTION en niet BASED" -#: cobc/parser.y:12423 cobc/parser.y:17409 cobc/parser.y:17464 +#: cobc/parser.y:12814 cobc/parser.y:17937 cobc/parser.y:18000 msgid "NOT EXCEPTION before EXCEPTION" msgstr "" -#: cobc/parser.y:13162 +#: cobc/parser.y:13572 #, c-format msgid "HANDLE must be a %s HANDLE" msgstr "" -#: cobc/parser.y:13174 +#: cobc/parser.y:13584 msgid "HANDLE must be a generic HANDLE" msgstr "" -#: cobc/parser.y:13251 +#: cobc/parser.y:13661 #, fuzzy, c-format msgid "HANDLE clause invalid for %s" msgstr "%s clausule is verplicht voor bestand '%s'" -#: cobc/parser.y:13483 cobc/parser.y:16876 +#: cobc/parser.y:13911 cobc/parser.y:17400 #, fuzzy, c-format msgid "%s is invalid in nested program" msgstr "%s is ongeldig in ingesloten programma" -#: cobc/parser.y:13521 cobc/parser.y:13564 cobc/parser.y:13575 -#: cobc/parser.y:13586 +#: cobc/parser.y:13940 cobc/parser.y:13983 cobc/parser.y:13994 +#: cobc/parser.y:14005 #, fuzzy, c-format msgid "maximum evaluate depth exceeded (%d)" msgstr "Maximum evaluate diepte overschreden (%d)" -#: cobc/parser.y:13627 cobc/parser.y:13637 +#: cobc/parser.y:14048 cobc/parser.y:14089 cobc/parser.y:14633 +#: cobc/parser.y:14644 cobc/parser.y:14653 cobc/parser.y:17959 +#: cobc/parser.y:17981 cobc/parser.y:18022 cobc/parser.y:18038 +#: cobc/parser.y:18078 cobc/parser.y:18095 cobc/parser.y:18132 +#: cobc/parser.y:18149 cobc/parser.y:18199 cobc/parser.y:18216 +#: cobc/parser.y:18252 cobc/parser.y:18269 cobc/parser.y:18310 +#: cobc/parser.y:18327 +#, fuzzy, c-format +msgid "%s without imperative statement" +msgstr "'%s' is geen report naam" + +#: cobc/parser.y:14056 cobc/parser.y:14066 msgid "WHEN without imperative statement" msgstr "" -#: cobc/parser.y:13655 cobc/parser.y:13665 +#: cobc/parser.y:14097 cobc/parser.y:14107 msgid "WHEN OTHER without imperative statement" msgstr "" -#: cobc/parser.y:13745 +#: cobc/parser.y:14191 #, fuzzy msgid "invalid THROUGH usage" msgstr "Ongeldig THROUGH gebruik" -#: cobc/parser.y:13909 +#: cobc/parser.y:14372 msgid "EXIT PROGRAM is not allowed within a USE GLOBAL procedure" msgstr "EXIT PROGRAM is niet toegestaan in een USE GLOBAL procedure" -#: cobc/parser.y:13913 +#: cobc/parser.y:14376 #, fuzzy msgid "EXIT PROGRAM not allowed within a FUNCTION" msgstr "EXIT FUNCTION is alleen toegestaan in FUNCTION type" -#: cobc/parser.y:13927 +#: cobc/parser.y:14390 msgid "EXIT FUNCTION is not allowed within a USE GLOBAL procedure" msgstr "EXIT FUNCTION is niet toegestaan in een USE GLOBAL procedure" -#: cobc/parser.y:13931 +#: cobc/parser.y:14394 #, fuzzy msgid "EXIT FUNCTION only allowed within a FUNCTION" msgstr "EXIT FUNCTION is alleen toegestaan in FUNCTION type" -#: cobc/parser.y:13945 cobc/parser.y:13968 +#: cobc/parser.y:14408 cobc/parser.y:14431 msgid "EXIT PERFORM is only valid with inline PERFORM" msgstr "EXIT PERFORM is alleen geldig in een ingesloten PERFORM" -#: cobc/parser.y:13990 +#: cobc/parser.y:14453 msgid "EXIT SECTION is only valid with an active SECTION" msgstr "EXIT SECTION is alleen geldig in een SECTION" -#: cobc/parser.y:14011 +#: cobc/parser.y:14474 msgid "EXIT PARAGRAPH is only valid with an active PARAGRAPH" msgstr "EXIT PARAGRAPH is alleen geldig in een PARAGRAPH" -#: cobc/parser.y:14034 +#: cobc/parser.y:14497 msgid "RETURNING/GIVING not allowed for non-returning runtime elements" msgstr "" -#: cobc/parser.y:14166 +#: cobc/parser.y:14640 msgid "IF without imperative statement" msgstr "" -#: cobc/parser.y:14497 cobc/parser.y:14506 +#: cobc/parser.y:14983 cobc/parser.y:14992 msgid "single-character literal or data item expected" msgstr "" -#: cobc/parser.y:14524 +#: cobc/parser.y:15010 #, fuzzy msgid "TALLYING clause is incomplete" msgstr "LINAGE clausule met incorrect bestandstype" -#: cobc/parser.y:14640 +#: cobc/parser.y:15126 msgid "INSPECT missing ALL/FIRST/LEADING/TRAILING" msgstr "" -#: cobc/parser.y:14902 +#: cobc/parser.y:15390 #, fuzzy msgid "LOCK clauses" msgstr "LOCK clausule ongeldig hier" -#: cobc/parser.y:15059 +#: cobc/parser.y:15547 msgid "inline PERFORM without imperative statement" msgstr "" -#: cobc/parser.y:15180 cobc/parser.y:15188 cobc/parser.y:15196 +#: cobc/parser.y:15670 cobc/parser.y:15678 cobc/parser.y:15686 #, c-format msgid "PERFORM VARYING '%s' (line %d of %s) is not a numeric field" msgstr "" -#: cobc/parser.y:15212 +#: cobc/parser.y:15702 #, fuzzy msgid "PERFORM VARYING without BY phrase" msgstr "GO TO met meerdere procedure-namen" -#: cobc/parser.y:15252 +#: cobc/parser.y:15742 #, fuzzy, c-format msgid "'%s' is not an object-reference" msgstr "'%s' is geen heel getal" -#: cobc/parser.y:15292 cobc/typeck.c:12295 cobc/typeck.c:13552 +#: cobc/parser.y:15782 cobc/typeck.c:13066 cobc/typeck.c:14358 msgid "LOCK clause invalid with file LOCK AUTOMATIC" msgstr "LOCK clausule ongeldig met LOCK AUTOMATIC bestand" -#: cobc/parser.y:15297 +#: cobc/parser.y:15787 msgid "KEY clause invalid with this file type" msgstr "KEY clausule ongeldig met dit bestandstype" -#: cobc/parser.y:15302 cobc/typeck.c:12291 cobc/typeck.c:13548 +#: cobc/parser.y:15792 cobc/typeck.c:13062 cobc/typeck.c:14354 msgid "INVALID KEY clause invalid with this file type" msgstr "INVALID KEY clausule ongeldig met dit bestandstype" -#: cobc/parser.y:15986 +#: cobc/parser.y:16494 #, fuzzy -msgid "file sort requires KEY phrase" +msgid "MERGE requires KEY phrase" msgstr "Bestands sort vereist KEY beschrijving" -#: cobc/parser.y:16010 +#: cobc/parser.y:16498 +#, fuzzy +msgid "file SORT requires KEY phrase" +msgstr "Bestands sort vereist KEY beschrijving" + +#: cobc/parser.y:16522 #, fuzzy msgid "table SORT requires KEY phrase" msgstr "Bestands sort vereist KEY beschrijving" -#: cobc/parser.y:16072 +#: cobc/parser.y:16527 +#, fuzzy +#| msgid "'%s' is not a file name" +msgid "must be an SD filename" +msgstr "'%s' is geen bestandsnaam" + +#: cobc/parser.y:16585 +msgid "MERGE requires USING files" +msgstr "" + +#: cobc/parser.y:16587 #, fuzzy -msgid "file sort requires USING or INPUT PROCEDURE" +msgid "file SORT requires USING or INPUT PROCEDURE" msgstr "Bestands sort vereist USING of INPUT PROCEDURE" -#: cobc/parser.y:16079 +#: cobc/parser.y:16595 msgid "USING invalid with table SORT" msgstr "USING ongeldig met tabel SORT" -#: cobc/parser.y:16089 +#: cobc/parser.y:16605 msgid "INPUT PROCEDURE invalid with table SORT" msgstr "INPUT PROCEDURE ongeldig met tabel SORT" -#: cobc/parser.y:16091 +#: cobc/parser.y:16607 msgid "INPUT PROCEDURE invalid with MERGE" msgstr "INPUT PROCEDURE ongeldig met MERGE" -#: cobc/parser.y:16104 +#: cobc/parser.y:16621 +#, fuzzy +msgid "MERGE requires GIVING or OUTPUT PROCEDURE" +msgstr "Bestands sort vereist GIVING of OUTPUT PROCEDURE" + +#: cobc/parser.y:16623 #, fuzzy -msgid "file sort requires GIVING or OUTPUT PROCEDURE" +msgid "file SORT requires GIVING or OUTPUT PROCEDURE" msgstr "Bestands sort vereist GIVING of OUTPUT PROCEDURE" -#: cobc/parser.y:16111 +#: cobc/parser.y:16631 msgid "GIVING invalid with table SORT" msgstr "GIVING ongeldig met tabel SORT" -#: cobc/parser.y:16121 +#: cobc/parser.y:16641 msgid "OUTPUT PROCEDURE invalid with table SORT" msgstr "OUTPUT PROCEDURE ongeldig met tabel SORT" -#: cobc/parser.y:16148 +#: cobc/parser.y:16668 msgid "SIZE/LENGTH invalid here" msgstr "SIZE/LENGTH ongeldig hier" -#: cobc/parser.y:16197 +#: cobc/parser.y:16717 #, fuzzy msgid "NOT EQUAL condition not allowed on START statement" msgstr "NOT EQUAL conditie niet toegestaan bij START statement" -#: cobc/parser.y:16255 +#: cobc/parser.y:16776 #, fuzzy, c-format msgid "%s is replaced by %s" msgstr "%s is verouderd in %s" -#: cobc/parser.y:16304 +#: cobc/parser.y:16825 msgid "STOP literal" msgstr "" -#: cobc/parser.y:16308 +#: cobc/parser.y:16829 #, fuzzy msgid "STOP identifier" msgstr "Ongeldige PROMPT identifier" -#: cobc/parser.y:16446 +#: cobc/parser.y:16969 msgid "SUPPRESS statement must be within DECLARATIVES" msgstr "SUPPRESS statement moet binnen DECLARATIVES" -#: cobc/parser.y:16520 -msgid "UNLOCK invalid for SORT files" +#: cobc/parser.y:17043 +#, fuzzy +#| msgid "UNLOCK invalid for SORT files" +msgid "UNLOCK invalid for SD files" msgstr "UNLOCK ongeldig voor SORT bestanden" -#: cobc/parser.y:16656 cobc/parser.y:16736 +#: cobc/parser.y:17180 cobc/parser.y:17260 msgid "USE statement must be within DECLARATIVES" msgstr "USE statement moet binnen DECLARATIVES" -#: cobc/parser.y:16658 +#: cobc/parser.y:17182 msgid "SECTION header missing before USE statement" msgstr "SECTION kop ontbreekt voorafgaand aan USE statement" -#: cobc/parser.y:16738 +#: cobc/parser.y:17262 msgid "USE DEBUGGING not supported in contained program" msgstr "USE DEBUGGING niet ondersteund in bijgesloten programma" -#: cobc/parser.y:16786 cobc/parser.y:16795 cobc/parser.y:16813 -#: cobc/parser.y:16849 cobc/typeck.c:4886 +#: cobc/parser.y:17310 cobc/parser.y:17319 cobc/parser.y:17337 +#: cobc/parser.y:17373 cobc/typeck.c:5050 #, fuzzy, c-format msgid "duplicate DEBUGGING target: '%s'" msgstr "Ongeldig DEFINE/SET statement" -#: cobc/parser.y:16811 +#: cobc/parser.y:17335 #, fuzzy msgid "constant item cannot be used here" msgstr "Hier mag geen constante worden gebruikt - '%s'" -#: cobc/parser.y:16837 +#: cobc/parser.y:17361 #, fuzzy msgid "duplicate USE DEBUGGING ON ALL PROCEDURES" msgstr "Dubbele USE DEBUGGING ON ALL PROCEDURES" -#: cobc/parser.y:17089 +#: cobc/parser.y:17614 msgid "ENCODING clause must come before XML-DECLARATION" msgstr "" -#: cobc/parser.y:17091 +#: cobc/parser.y:17616 msgid "ENCODING clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17094 +#: cobc/parser.y:17619 msgid "XML GENERATE ENCODING clause" msgstr "" -#: cobc/parser.y:17101 +#: cobc/parser.y:17626 msgid "XML-DECLARATION clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17104 +#: cobc/parser.y:17629 msgid "XML GENERATE XML-DECLARATION clause" msgstr "" -#: cobc/parser.y:17110 +#: cobc/parser.y:17635 msgid "XML GENERATE WITH ATTRIBUTES clause" msgstr "" -#: cobc/parser.y:17123 +#: cobc/parser.y:17648 msgid "XML GENERATE NAMESPACE clause" msgstr "" -#: cobc/parser.y:17147 +#: cobc/parser.y:17672 msgid "XML GENERATE NAME OF clause" msgstr "" -#: cobc/parser.y:17211 +#: cobc/parser.y:17736 msgid "XML GENERATE TYPE OF clause" msgstr "" -#: cobc/parser.y:17252 +#: cobc/parser.y:17777 msgid "XML GENERATE SUPPRESS clause" msgstr "" -#: cobc/parser.y:17392 +#: cobc/parser.y:17920 #, fuzzy, c-format #| msgid "'%s' is not a locale name" msgid "'%s' is not a schema name" msgstr "'%s' is niet een LOCALE naam" -#: cobc/parser.y:17510 +#: cobc/parser.y:18055 msgid "NOT SIZE ERROR before SIZE ERROR" msgstr "" -#: cobc/parser.y:17556 +#: cobc/parser.y:18109 msgid "NOT OVERFLOW before OVERFLOW" msgstr "" -#: cobc/parser.y:17655 +#: cobc/parser.y:18161 cobc/parser.y:18176 +msgid "NOT AT END before AT END" +msgstr "" + +#: cobc/parser.y:18229 msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" msgstr "" -#: cobc/parser.y:17705 +#: cobc/parser.y:18287 msgid "NOT INVALID KEY before INVALID KEY" msgstr "" -#: cobc/parser.y:18048 +#: cobc/parser.y:18644 msgid "LINAGE-COUNTER must be qualified here" msgstr "LINAGE-COUNTER moet hier gespecificeerd worden" -#: cobc/parser.y:18051 +#: cobc/parser.y:18647 #, fuzzy msgid "invalid LINAGE-COUNTER usage" msgstr "Ongeldig LINAGE-COUNTER gebruik" -#: cobc/parser.y:18062 cobc/parser.y:18158 cobc/parser.y:18247 +#: cobc/parser.y:18658 cobc/parser.y:18754 cobc/parser.y:18843 #, c-format msgid "'%s' is not a file name" msgstr "'%s' is geen bestandsnaam" -#: cobc/parser.y:18072 +#: cobc/parser.y:18668 msgid "LINE-COUNTER must be qualified here" msgstr "LINE-COUNTER moet hier gespecificeerd worden" -#: cobc/parser.y:18076 +#: cobc/parser.y:18672 #, fuzzy msgid "invalid LINE-COUNTER usage" msgstr "Ongeldig LINE-COUNTER gebruik" -#: cobc/parser.y:18087 cobc/parser.y:18112 +#: cobc/parser.y:18683 cobc/parser.y:18708 #, c-format msgid "'%s' is not a report name" msgstr "'%s' is geen report naam" -#: cobc/parser.y:18097 +#: cobc/parser.y:18693 msgid "PAGE-COUNTER must be qualified here" msgstr "PAGE-COUNTER moet hier gespecificeerd worden" -#: cobc/parser.y:18101 +#: cobc/parser.y:18697 #, fuzzy msgid "invalid PAGE-COUNTER usage" msgstr "Ongeldig PAGE-COUNTER gebruik" -#: cobc/parser.y:18148 cobc/typeck.c:12256 cobc/typeck.c:12339 -#: cobc/typeck.c:13516 +#: cobc/parser.y:18744 cobc/typeck.c:13027 cobc/typeck.c:13110 +#: cobc/typeck.c:14322 #, fuzzy, c-format msgid "%s requires a record name as subject" msgstr "%s vereist een record naam" -#: cobc/parser.y:18175 +#: cobc/parser.y:18771 #, c-format msgid "'%s' not indexed" msgstr "'%s' niet geïndexeerd" -#: cobc/parser.y:18180 +#: cobc/parser.y:18776 #, fuzzy msgid "SEARCH ALL requires KEY phrase" msgstr "Bestands sort vereist KEY beschrijving" -#: cobc/parser.y:18204 cobc/parser.y:18229 +#: cobc/parser.y:18800 cobc/parser.y:18825 #, fuzzy, c-format msgid "multiple reference to '%s' " msgstr "Meerdere verwijzingen naar '%s' " -#: cobc/parser.y:18259 +#: cobc/parser.y:18855 #, fuzzy, c-format msgid "'%s' is not a CD name" msgstr "'%s' is geen bestandsnaam" -#: cobc/parser.y:18273 +#: cobc/parser.y:18869 #, fuzzy, c-format #| msgid "'%s' is not a report name" msgid "'%s' is not a valid report name" msgstr "'%s' is geen report naam" -#: cobc/parser.y:18526 +#: cobc/parser.y:19134 #, fuzzy msgid "invalid mnemonic identifier" msgstr "Ongeldige mnemonic identifier" -#: cobc/parser.y:18606 +#: cobc/parser.y:19214 +#, fuzzy +msgid "an alphanumeric literal is expected here" +msgstr "Alanumerieke waarde verwacht" + +#: cobc/parser.y:19226 #, fuzzy msgid "a numeric literal is expected here" msgstr "Een niet numerieke constante is verwacht voor '%s'" -#: cobc/parser.y:18618 cobc/parser.y:19366 +#: cobc/parser.y:19238 cobc/parser.y:19979 #, fuzzy msgid "a non-numeric literal is expected here" msgstr "Een niet numerieke constante is verwacht voor '%s'" -#: cobc/parser.y:18784 cobc/typeck.c:7302 cobc/typeck.c:7309 +#: cobc/parser.y:19404 cobc/typeck.c:993 cobc/typeck.c:4825 cobc/typeck.c:7679 +#: cobc/typeck.c:7686 #, fuzzy, c-format msgid "'%s' is not numeric" msgstr "'%s' is geen numerieke naam" -#: cobc/parser.y:18800 +#: cobc/parser.y:19420 #, fuzzy, c-format msgid "'%s' is not a field or file" msgstr "'%s' is geen bestandsnaam" -#: cobc/parser.y:18820 cobc/parser.y:18859 cobc/parser.y:18935 -#, fuzzy, c-format -msgid "'%s' is not a field" -msgstr "'%s' is niet gedefinieerd" - -#: cobc/parser.y:18841 +#: cobc/parser.y:19446 #, fuzzy, c-format #| msgid "'%s' is not a file name" msgid "'%s' is not a type-name" msgstr "'%s' is geen bestandsnaam" -#: cobc/parser.y:18927 cobc/typeck.c:2328 cobc/typeck.c:2407 +#: cobc/parser.y:19526 cobc/typeck.c:2345 cobc/typeck.c:2401 cobc/typeck.c:2550 #, c-format msgid "'%s' cannot be reference modified" msgstr "'%s' accepteert geen verwijzingsmodificatie" -#: cobc/parser.y:19015 +#: cobc/parser.y:19627 #, fuzzy, c-format msgid "'%s' is not a field or alphabet" msgstr "'%s' is geen bestandsnaam" -#: cobc/parser.y:19041 +#: cobc/parser.y:19653 #, fuzzy msgid "a subscripted data-item cannot be used here" msgstr "'%s' kan hier niet worden geïndexeerd" -#: cobc/parser.y:19089 +#: cobc/parser.y:19701 #, fuzzy msgid "unsigned integer value expected" msgstr "Geheel getal waarde" -#: cobc/parser.y:19101 cobc/parser.y:19105 cobc/parser.y:19155 +#: cobc/parser.y:19713 cobc/parser.y:19717 cobc/parser.y:19767 #, fuzzy msgid "integer value expected" msgstr "Geheel getal waarde" -#: cobc/parser.y:19110 +#: cobc/parser.y:19722 #, fuzzy msgid "invalid symbolic integer" msgstr "Ongeldig geheel getal" -#: cobc/parser.y:19126 cobc/parser.y:19130 +#: cobc/parser.y:19738 cobc/parser.y:19742 #, fuzzy msgid "unsigned positive integer value expected" msgstr "Geheel getal waarde" -#: cobc/parser.y:19159 -#, fuzzy -msgid "invalid CLASS value" -msgstr "Ongeldige CLASS waarde" +#: cobc/parser.y:19772 +#, c-format +msgid "CLASS value %d outside of range for the used character set" +msgstr "" -#: cobc/parser.y:19246 +#: cobc/parser.y:19859 msgid "PHYSICAL argument for LENGTH functions" msgstr "" -#: cobc/parser.y:19418 cobc/parser.y:19435 +#: cobc/parser.y:20031 cobc/parser.y:20048 msgid "cannot specify offset and SYSTEM-OFFSET at the same time" msgstr "" -#: cobc/parser.y:19702 cobc/parser.y:19711 cobc/parser.y:19721 -#: cobc/parser.y:19731 cobc/parser.y:19751 cobc/parser.y:19771 -#: cobc/parser.y:19777 +#: cobc/parser.y:20228 +msgid "terminator" +msgstr "" + +#: cobc/parser.y:20317 cobc/parser.y:20327 cobc/parser.y:20338 +#: cobc/parser.y:20348 cobc/parser.y:20369 cobc/parser.y:20389 +#: cobc/parser.y:20396 msgid "optional period" msgstr "" -#: cobc/pplex.l:257 cobc/pplex.l:2219 cobc/pplex.l:2233 +#: cobc/pplex.l:261 cobc/pplex.l:2448 cobc/pplex.l:2462 msgid "debugging indicator" msgstr "" -#: cobc/pplex.l:334 +#: cobc/pplex.l:348 #, fuzzy msgid "ignoring empty directive" msgstr "Leeg statement genegeerd" -#: cobc/pplex.l:344 cobc/pplex.l:411 +#: cobc/pplex.l:358 cobc/pplex.l:431 #, fuzzy, c-format msgid "ignoring invalid directive: '%s'" msgstr "Ongeldig statement genegeerd - '%s'" -#: cobc/pplex.l:351 +#: cobc/pplex.l:365 #, fuzzy msgid "ignoring invalid directive" msgstr "Ongeldig statement genegeerd" -#: cobc/pplex.l:358 +#: cobc/pplex.l:372 #, fuzzy msgid "VCS directive" msgstr "Ongeldig SOURCE statement" -#: cobc/pplex.l:420 cobc/pplex.l:441 +#: cobc/pplex.l:440 cobc/pplex.l:461 #, fuzzy, c-format msgid "ignoring unknown directive: '%s'" msgstr "Ongeldig statement genegeerd - '%s'" -#: cobc/pplex.l:1065 +#: cobc/pplex.l:1164 #, fuzzy msgid "IF/ELIF/ELSE directive without matching END-IF" msgstr "ELSE statement zonder bijbehorende IF/ELIF" -#: cobc/pplex.l:1409 +#: cobc/pplex.l:1332 +msgid "free format detected" +msgstr "" + +#: cobc/pplex.l:1608 #, c-format msgid "copybook not found in library '%s', library-name ignored" msgstr "" -#: cobc/pplex.l:1469 +#: cobc/pplex.l:1667 #, fuzzy, c-format msgid "ignoring %s directive because of %s" msgstr "Ongeldig statement genegeerd - '%s'" -#: cobc/pplex.l:1645 +#: cobc/pplex.l:1854 #, fuzzy, c-format msgid "directive nest depth exceeded: %d" msgstr "Ingesloten richtlijn diepte overschreden - %d" -#: cobc/pplex.l:1663 +#: cobc/pplex.l:1872 msgid "ELSE directive without matching IF/ELIF" msgstr "ELSE statement zonder bijbehorende IF/ELIF" -#: cobc/pplex.l:1679 +#: cobc/pplex.l:1888 msgid "END-IF directive without matching IF/ELIF/ELSE" msgstr "END-IF statement zonder bijbehorende IF/ELIF/ELSE" -#: cobc/pplex.l:1695 +#: cobc/pplex.l:1904 msgid "ELIF directive without matching IF/ELIF" msgstr "ELIF statement zonder bijbehorende IF/ELIF" -#: cobc/pplex.l:1717 +#: cobc/pplex.l:1926 #, fuzzy, c-format msgid "invalid internal case: %u" msgstr "Ongeldige interne case - %u" -#: cobc/pplex.l:1914 +#: cobc/pplex.l:2139 msgid "buffer overrun - too many continuation lines" msgstr "" -#: cobc/pplex.l:2009 cobc/pplex.l:2019 +#: cobc/pplex.l:2236 cobc/pplex.l:2246 #, fuzzy msgid "line not terminated by a newline" msgstr "Regel niet afgesloten met een newline" -#: cobc/pplex.l:2013 cobc/pplex.l:2023 +#: cobc/pplex.l:2240 cobc/pplex.l:2250 #, c-format msgid "source text exceeds %d bytes, will be truncated" msgstr "" -#: cobc/pplex.l:2042 +#: cobc/pplex.l:2269 msgid "version control conflict marker in file" msgstr "" -#: cobc/pplex.l:2194 +#: cobc/pplex.l:2423 #, fuzzy msgid "invalid continuation in comment entry" msgstr "Ongeldige voortzetting in commentaar gebied" -#: cobc/pplex.l:2241 +#: cobc/pplex.l:2470 #, fuzzy, c-format msgid "invalid indicator '\\' at column %d" msgstr "Ongeldige indicator '%c' in kolom 7" -#: cobc/pplex.l:2253 +#: cobc/pplex.l:2482 #, fuzzy, c-format msgid "invalid indicator '%c' at column %d" msgstr "Ongeldige indicator '%c' in kolom 7" -#: cobc/pplex.l:2312 cobc/pplex.l:2323 +#: cobc/pplex.l:2541 cobc/pplex.l:2552 #, fuzzy msgid "invalid line continuation" msgstr "Ongeldige regel voortzetting" -#: cobc/pplex.l:2331 +#: cobc/pplex.l:2560 #, fuzzy msgid "continuation character expected" msgstr "Voortzettings teken verwacht" -#: cobc/pplex.l:2399 +#: cobc/pplex.l:2628 #, fuzzy, c-format msgid "source text after program-text area (column %d)" msgstr "Bron tekst na kolom %d" -#: cobc/ppparse.y:107 +#: cobc/ppparse.y:102 cobc/ppparse.y:106 +msgid "partial replacing with literal" +msgstr "" + +#: cobc/ppparse.y:109 msgid "unexpected COBOL word in partial replacement phrase" msgstr "" -#: cobc/ppparse.y:256 +#: cobc/ppparse.y:176 +#, fuzzy +msgid "invalid partial replacing operand" +msgstr "Ongeldige X constante: %s" + +#: cobc/ppparse.y:291 #, fuzzy msgid "directive comparison on different types" msgstr "Statement vergelijking met verschillende types" -#: cobc/ppparse.y:324 +#: cobc/ppparse.y:359 #, fuzzy, c-format msgid "duplicate DEFINE directive '%s'" msgstr "Ongeldig DEFINE/SET statement" -#: cobc/ppparse.y:331 cobc/ppparse.y:341 +#: cobc/ppparse.y:366 cobc/ppparse.y:376 #, fuzzy, c-format msgid "invalid constant %s in DEFINE directive" msgstr "Ongeldig DEFINE/SET statement" -#: cobc/ppparse.y:439 +#: cobc/ppparse.y:474 #, c-format msgid "compiler flag '%s' unknown" msgstr "" -#: cobc/ppparse.y:486 +#: cobc/ppparse.y:521 #, fuzzy, c-format msgid "invalid %s directive option '%s'" msgstr "Ongeldig SOURCE statement" -#: cobc/ppparse.y:488 +#: cobc/ppparse.y:523 #, fuzzy, c-format msgid "invalid %s directive option" msgstr "Ongeldig SOURCE statement" -#: cobc/ppparse.y:839 cobc/ppparse.y:848 cobc/ppparse.y:1258 +#: cobc/ppparse.y:875 cobc/ppparse.y:884 cobc/ppparse.y:1294 #, fuzzy, c-format msgid "invalid %s directive" msgstr "Ongeldig SOURCE statement" -#: cobc/ppparse.y:1330 +#: cobc/ppparse.y:1366 #, fuzzy msgid "LEAP-SECOND ON directive" msgstr "LEAP-SECOND statement genegeerd" -#: cobc/ppparse.y:1439 cobc/ppparse.y:1471 +#: cobc/ppparse.y:1475 cobc/ppparse.y:1507 #, fuzzy msgid "invalid constant" msgstr "Ongeldige constante" -#: cobc/reserved.c:4012 +#: cobc/reserved.c:4029 #, fuzzy msgid "device name" msgstr "Apparaat naam" -#: cobc/reserved.c:4015 +#: cobc/reserved.c:4032 #, fuzzy msgid "switch name" msgstr "Switch naam" -#: cobc/reserved.c:4018 +#: cobc/reserved.c:4035 #, fuzzy msgid "feature name" msgstr "Kenmerk naam" -#: cobc/reserved.c:4129 +#: cobc/reserved.c:4146 #, fuzzy, c-format msgid "reserved word (%s) must have less than %d characters" msgstr "Parameter voor SYSTEM call is groter dan 8192 karakters" -#: cobc/reserved.c:4149 +#: cobc/reserved.c:4166 #, c-format msgid "reserved word (%s) may not contain '%c'" msgstr "" -#: cobc/reserved.c:4166 +#: cobc/reserved.c:4183 msgid "ignored asterisk at end of alias target" msgstr "" -#: cobc/reserved.c:4229 +#: cobc/reserved.c:4248 #, c-format msgid "alias target '%s' is not a default reserved word" msgstr "" -#: cobc/reserved.c:4719 +#: cobc/reserved.c:4738 #, fuzzy, c-format msgid "invalid system-name '%s'" msgstr "Ongeldige systeem-naam '%s'" -#: cobc/reserved.c:4883 +#: cobc/reserved.c:4902 #, fuzzy, c-format msgid "'%s' is a reserved word, but isn't supported" msgstr "'%s' gereserveerd woord, maar niet ondersteund" -#: cobc/reserved.c:4988 +#: cobc/reserved.c:5005 #, fuzzy, c-format msgid "intrinsic function %s is unknown" msgstr "'%s' is geen interne compiler functie" -#: cobc/reserved.c:5016 +#: cobc/reserved.c:5033 #, fuzzy msgid "Intrinsic Function" msgstr "'%s' is geen interne compiler functie" -#: cobc/reserved.c:5016 cobc/reserved.c:5249 cobc/reserved.c:5386 +#: cobc/reserved.c:5033 cobc/reserved.c:5266 cobc/reserved.c:5403 #, fuzzy msgid "Implemented" msgstr "'%s' niet geïmplementeerd" -#: cobc/reserved.c:5016 cobc/typeck.c:1163 +#: cobc/reserved.c:5033 cobc/typeck.c:1178 msgid "Parameters" msgstr "" -#: cobc/reserved.c:5020 cobc/reserved.c:5253 cobc/reserved.c:5400 -#: cobc/reserved.c:5406 +#: cobc/reserved.c:5037 cobc/reserved.c:5270 cobc/reserved.c:5417 +#: cobc/reserved.c:5423 msgid "Yes" msgstr "" -#: cobc/reserved.c:5023 cobc/reserved.c:5256 cobc/reserved.c:5410 +#: cobc/reserved.c:5040 cobc/reserved.c:5273 cobc/reserved.c:5427 #, fuzzy msgid "No" msgstr "N" -#: cobc/reserved.c:5029 +#: cobc/reserved.c:5046 msgid "Unlimited" msgstr "" -#: cobc/reserved.c:5046 +#: cobc/reserved.c:5063 msgid "Exception Name" msgstr "" -#: cobc/reserved.c:5148 +#: cobc/reserved.c:5165 #, c-format msgid "special register '%s' is unknown, needs a definition" msgstr "" -#: cobc/reserved.c:5155 +#: cobc/reserved.c:5172 #, c-format msgid "special register '%s' has a bad definition: %s" msgstr "" -#: cobc/reserved.c:5159 +#: cobc/reserved.c:5176 #, c-format msgid "special register '%s' is unknown" msgstr "" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 #, fuzzy msgid "Internal registers" msgstr "Extra interne registers\tDefinitie" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 #, fuzzy msgid "Definition" msgstr "Herdefinitie van '%s'" -#: cobc/reserved.c:5337 +#: cobc/reserved.c:5354 #, fuzzy, c-format msgid "unknown system-name '%s'" msgstr "Onbekend statement '%s'" -#: cobc/reserved.c:5363 +#: cobc/reserved.c:5380 #, fuzzy msgid "System names" msgstr "GNU Cobol Bouw omgeving" -#: cobc/reserved.c:5386 +#: cobc/reserved.c:5403 msgid "Reserved Words" msgstr "" -#: cobc/reserved.c:5398 +#: cobc/reserved.c:5415 #, fuzzy msgid "Yes (Context sensitive)" msgstr "Y (Context gevoelig)" -#: cobc/reserved.c:5408 +#: cobc/reserved.c:5425 #, fuzzy msgid "No (Context sensitive)" msgstr "N (Context gevoelig)" -#: cobc/scanner.l:272 +#: cobc/scanner.l:281 #, fuzzy, c-format msgid "'%s' is not a reserved word, so cannot be removed" msgstr "'%s' gereserveerd woord, maar niet ondersteund" -#: cobc/scanner.l:320 +#: cobc/scanner.l:329 msgid "separator period in Area A" msgstr "" -#: cobc/scanner.l:1067 +#: cobc/scanner.l:1096 #, fuzzy, c-format msgid "a constant may not be used here - '%s'" msgstr "Hier mag geen constante worden gebruikt - '%s'" -#: cobc/scanner.l:1137 +#: cobc/scanner.l:1170 msgid "ignoring redundant ." msgstr "" -#: cobc/scanner.l:1195 +#: cobc/scanner.l:1249 #, fuzzy, c-format msgid "invalid symbol '%s' - skipping word" msgstr "Ongeldig symbool: %s - Woord overgeslagen" -#: cobc/scanner.l:1289 +#: cobc/scanner.l:1323 #, fuzzy msgid "invalid national literal" msgstr "Ongeldige X constante: %s" -#: cobc/scanner.l:1293 cobc/tree.c:2800 +#: cobc/scanner.l:1327 cobc/tree.c:2822 #, fuzzy, c-format msgid "invalid literal: '%s'" msgstr "Ongeldige H constante: %s" -#: cobc/scanner.l:1295 +#: cobc/scanner.l:1329 #, fuzzy, c-format msgid "invalid hexadecimal literal: '%s'" msgstr "Ongeldige X constante: %s" -#: cobc/scanner.l:1297 cobc/tree.c:1779 +#: cobc/scanner.l:1331 cobc/tree.c:1803 #, fuzzy, c-format msgid "invalid numeric literal: '%s'" msgstr "Ongeldige numerieke constante" -#: cobc/scanner.l:1299 +#: cobc/scanner.l:1333 #, fuzzy, c-format msgid "invalid floating-point literal: '%s'" msgstr "Ongeldige drijvende komma constante" -#: cobc/scanner.l:1301 +#: cobc/scanner.l:1335 cobc/scanner.l:1337 #, fuzzy, c-format msgid "invalid %s literal: '%s'" msgstr "Ongeldige X constante: %s" -#: cobc/scanner.l:1350 +#: cobc/scanner.l:1365 +#, c-format +msgid "character code %s out of encoding range %s" +msgstr "" + +#: cobc/scanner.l:1422 +msgid "extraneous separator ',' at end of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1435 +msgid "extraneous character ',' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1440 +#, c-format +msgid "invalid character '%c' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1470 #, fuzzy, c-format msgid "literal length exceeds %u characters" msgstr "Woord lengte overschrijdt 31 karakters - '%s'" -#: cobc/scanner.l:1365 +#: cobc/scanner.l:1485 #, c-format msgid "missing terminating %c character" msgstr "" -#: cobc/scanner.l:1382 cobc/scanner.l:1444 cobc/scanner.l:1729 +#: cobc/scanner.l:1502 cobc/scanner.l:1569 cobc/scanner.l:1868 #, fuzzy msgid "zero-length literal" msgstr "Ongeldige numerieke constante" -#: cobc/scanner.l:1385 +#: cobc/scanner.l:1505 #, fuzzy msgid "national literal has zero length; a SPACE will be assumed" msgstr "Alfanumerieke constante heeft lengte nul" -#: cobc/scanner.l:1386 +#: cobc/scanner.l:1506 #, fuzzy msgid "alphanumeric literal has zero length; a SPACE will be assumed" msgstr "Alfanumerieke constante heeft lengte nul" -#: cobc/scanner.l:1412 cobc/scanner.l:1413 cobc/scanner.l:1417 -#: cobc/scanner.l:1494 +#: cobc/scanner.l:1519 +msgid "UTF-8 literal" +msgstr "" + +#: cobc/scanner.l:1536 cobc/scanner.l:1537 cobc/scanner.l:1541 +#: cobc/scanner.l:1624 #, fuzzy msgid "national literal" msgstr "Ongeldige H constante: %s" -#: cobc/scanner.l:1416 +#: cobc/scanner.l:1540 #, fuzzy msgid "national-character literal" msgstr "Ongeldige H constante: %s" -#: cobc/scanner.l:1447 +#: cobc/scanner.l:1571 #, fuzzy msgid "hexadecimal literal has zero length; X'00' will be assumed" msgstr "Alfanumerieke constante heeft lengte nul" -#: cobc/scanner.l:1472 +#: cobc/scanner.l:1575 cobc/scanner.l:1601 #, fuzzy msgid "hexadecimal-boolean literal" msgstr "Ongeldige numerieke constante" -#: cobc/scanner.l:1480 cobc/scanner.l:1499 cobc/scanner.l:1608 -#: cobc/scanner.l:1659 cobc/scanner.l:1754 cobc/scanner.l:1824 -#, fuzzy, c-format -msgid "literal length %lu exceeds %u characters" -msgstr "Woord lengte overschrijdt 31 karakters - '%s'" - -#: cobc/scanner.l:1490 +#: cobc/scanner.l:1579 cobc/scanner.l:1619 #, fuzzy msgid "hexadecimal-national literal" msgstr "Ongeldige X constante: %s" -#: cobc/scanner.l:1521 cobc/scanner.l:1551 cobc/scanner.l:1674 -#: cobc/scanner.l:1771 cobc/scanner.l:1835 +#: cobc/scanner.l:1609 cobc/scanner.l:1629 cobc/scanner.l:1744 +#: cobc/scanner.l:1798 cobc/scanner.l:1893 cobc/scanner.l:1963 +#, fuzzy, c-format +msgid "literal length %lu exceeds %u characters" +msgstr "Woord lengte overschrijdt 31 karakters - '%s'" + +#: cobc/scanner.l:1651 cobc/scanner.l:1680 cobc/scanner.l:1813 +#: cobc/scanner.l:1910 cobc/scanner.l:1974 #, fuzzy, c-format msgid "literal contains invalid character '%c'" msgstr "Figuratieve constante ongeldig hier" -#: cobc/scanner.l:1573 +#: cobc/scanner.l:1704 #, fuzzy, c-format msgid "literal does not have an even number of digits" msgstr "Woord lengte overschrijdt 31 karakters - '%s'" -#: cobc/scanner.l:1599 +#: cobc/scanner.l:1735 cobc/scanner.l:1788 #, fuzzy, c-format msgid "%s literals must contain at least one character" msgstr "Figuratieve constante ongeldig hier" -#: cobc/scanner.l:1639 cobc/scanner.l:1739 cobc/scanner.l:1813 +#: cobc/scanner.l:1775 cobc/scanner.l:1878 cobc/scanner.l:1952 #, fuzzy msgid "ACUCOBOL numeric literal" msgstr "Ongeldige numerieke constante" -#: cobc/scanner.l:1651 -#, fuzzy -msgid "H literals must contain at least one character" -msgstr "Figuratieve constante ongeldig hier" - -#: cobc/scanner.l:1690 cobc/scanner.l:1783 cobc/scanner.l:1846 +#: cobc/scanner.l:1829 cobc/scanner.l:1922 cobc/scanner.l:1985 #, fuzzy, c-format msgid "literal exceeds limit %u" msgstr "Numerieke constante overschrijdt data grootte" -#: cobc/scanner.l:1724 +#: cobc/scanner.l:1863 #, fuzzy msgid "numeric boolean literal" msgstr "Ongeldige numerieke constante" -#: cobc/scanner.l:1731 +#: cobc/scanner.l:1870 #, fuzzy -msgid "Boolean literal has zero length; B'0' will be assumed" +msgid "boolean literal has zero length; B'0' will be assumed" msgstr "Alfanumerieke constante heeft lengte nul" -#: cobc/scanner.l:1807 +#: cobc/scanner.l:1946 #, fuzzy msgid "HP COBOL octal literal" msgstr "Ongeldige numerieke constante" -#: cobc/scanner.l:1921 +#: cobc/scanner.l:2059 #, fuzzy, c-format msgid "literal length %lu exceeds maximum of %u digits" msgstr "Woord lengte overschrijdt 31 karakters - '%s'" -#: cobc/scanner.l:1927 +#: cobc/scanner.l:2065 #, fuzzy, c-format msgid "literal length %lu exceeds %u digits" msgstr "Woord lengte overschrijdt 31 karakters - '%s'" -#: cobc/scanner.l:2039 cobc/tree.c:3845 +#: cobc/scanner.l:2177 cobc/tree.c:3888 #, fuzzy, c-format msgid "significand has more than %d digits" msgstr "Numeriek veld mag niet groter zijn dan %d cijfers" -#: cobc/scanner.l:2044 +#: cobc/scanner.l:2182 #, c-format msgid "exponent has decimal point" msgstr "" -#: cobc/scanner.l:2050 cobc/tree.c:3853 +#: cobc/scanner.l:2188 cobc/tree.c:3896 #, c-format msgid "exponent has more than 4 digits" msgstr "" -#: cobc/scanner.l:2080 +#: cobc/scanner.l:2218 #, c-format msgid "exponent not between -6143 and 6144" msgstr "" -#: cobc/scanner.l:2089 +#: cobc/scanner.l:2227 #, c-format msgid "significand of 0 must be positive" msgstr "" -#: cobc/scanner.l:2094 +#: cobc/scanner.l:2232 #, c-format msgid "exponent of 0 must be 0" msgstr "" -#: cobc/scanner.l:2099 +#: cobc/scanner.l:2237 #, c-format msgid "exponent of 0 must be positive" msgstr "" -#: cobc/scanner.l:2261 +#: cobc/scanner.l:2399 #, fuzzy, c-format msgid "invalid CONSTANT: %s" msgstr "Ongeldige CONSTANT - %s" -#: cobc/scanner.l:2271 +#: cobc/scanner.l:2409 #, fuzzy, c-format msgid "invalid alphanumeric CONSTANT: %s" msgstr "Ongeldige alfanumerieke CONSTANT - %s" -#: cobc/scanner.l:2275 +#: cobc/scanner.l:2413 #, fuzzy, c-format msgid "empty alphanumeric CONSTANT: %s" msgstr "Lege alfanumerieke CONSTANT - %s" -#: cobc/scanner.l:2292 cobc/scanner.l:2300 cobc/scanner.l:2305 +#: cobc/scanner.l:2430 cobc/scanner.l:2438 cobc/scanner.l:2443 #, fuzzy, c-format msgid "invalid numeric CONSTANT: %s" msgstr "Ongeldige numerieke CONSTANT - %s" -#: cobc/scanner.l:2384 cobc/scanner.l:2411 +#: cobc/scanner.l:2522 cobc/scanner.l:2549 #, fuzzy, c-format msgid "'%s' is not a default reserved word, so cannot be aliased" msgstr "'%s' gereserveerd woord, maar niet ondersteund" -#: cobc/scanner.l:2387 +#: cobc/scanner.l:2525 #, c-format msgid "'%s' is already reserved" msgstr "" -#: cobc/scanner.l:2389 +#: cobc/scanner.l:2527 msgid "you may want MAKESYN instead" msgstr "" -#: cobc/scanner.l:2414 +#: cobc/scanner.l:2552 #, fuzzy, c-format msgid "'%s' is not a reserved word" msgstr "'%s' is geen bestandsnaam" -#: cobc/scanner.l:2415 +#: cobc/scanner.l:2553 msgid "you may want ADDSYN or OVERRIDE instead" msgstr "" -#: cobc/tree.c:391 +#: cobc/tree.c:392 #, c-format msgid "%s clause is required for file '%s'" msgstr "%s clausule is verplicht voor bestand '%s'" -#: cobc/tree.c:395 +#: cobc/tree.c:396 #, fuzzy, c-format msgid "%s clause is invalid for file '%s' (file type)" msgstr "RECORD clausule ongeldig voor dit bestandstype" -#: cobc/tree.c:399 +#: cobc/tree.c:400 #, fuzzy, c-format msgid "%s clause is invalid for file '%s'" msgstr "%s clausule is verplicht voor bestand '%s'" -#: cobc/tree.c:426 +#: cobc/tree.c:427 #, c-format msgid "FOR item '%s' is a record" msgstr "" -#: cobc/tree.c:435 +#: cobc/tree.c:436 #, fuzzy, c-format msgid "FOR item '%s' is in different record to '%s'" msgstr "END PROGRAM '%s' verschilt met PROGRAM-ID '%s'" -#: cobc/tree.c:444 +#: cobc/tree.c:445 #, c-format msgid "FOR item '%s' is not in a record associated with '%s'" msgstr "" -#: cobc/tree.c:558 +#: cobc/tree.c:559 #, fuzzy msgid "internal error node" msgstr "Interne fout knooppunt" -#: cobc/tree.c:560 +#: cobc/tree.c:561 #, fuzzy msgid "unknown constant" msgstr "Onbekende constante" -#: cobc/tree.c:571 +#: cobc/tree.c:572 #, fuzzy, c-format msgid "literal \"%s\"" msgstr "Ongeldige H constante: %s" -#: cobc/tree.c:842 -#, fuzzy, c-format -#| msgid "FUNCTION %s has invalid/not supported arguments - Tag %d" -msgid "FUNCTION %s has invalid/not supported arguments - tag %d" -msgstr "FUNCTION %s heeft ongeldige/niet ondersteunde argumenten - Label %d" - -#: cobc/tree.c:963 +#: cobc/tree.c:969 #, fuzzy, c-format msgid "invalid date/time function: '%d'" msgstr "Ongeldige opmaak string - '%s'" -#: cobc/tree.c:995 +#: cobc/tree.c:1001 #, fuzzy, c-format msgid "FUNCTION '%s' has invalid date/time format" msgstr "FUNCTION '%s' heeft een ongeldige parameter" -#: cobc/tree.c:1002 +#: cobc/tree.c:1008 #, fuzzy, c-format msgid "FUNCTION '%s' has format in variable" msgstr "FUNCTION '%s' heeft een ongeldige parameter" -#: cobc/tree.c:1482 +#: cobc/tree.c:1488 #, fuzzy, c-format msgid "unknown tree tag: %d, category: %d" msgstr "Onbekende boom label %d Categorie %d" -#: cobc/tree.c:1577 +#: cobc/tree.c:1590 #, fuzzy, c-format msgid "unexpected numeric USAGE: %d" msgstr "Onbekende USAGE - %d" -#: cobc/tree.c:1591 +#: cobc/tree.c:1604 #, fuzzy, c-format msgid "unexpected category: %d" msgstr "Onverwachte categorie -> %d" -#: cobc/tree.c:1790 +#: cobc/tree.c:1814 #, fuzzy, c-format msgid "literal length %d exceeds maximum of %d digits" msgstr "Woord lengte overschrijdt 31 karakters - '%s'" -#: cobc/tree.c:1795 +#: cobc/tree.c:1819 #, fuzzy, c-format msgid "literal length %d exceeds %d digits" msgstr "Woord lengte overschrijdt 31 karakters - '%s'" -#: cobc/tree.c:1844 cobc/tree.c:1856 cobc/tree.c:1913 cobc/tree.c:1963 +#: cobc/tree.c:1868 cobc/tree.c:1880 cobc/tree.c:1937 cobc/tree.c:1987 #, fuzzy, c-format msgid "numeric literal '%s' exceeds limit '%s'" msgstr "Numerieke constante overschrijdt de maximum grootte" -#: cobc/tree.c:2655 +#: cobc/tree.c:2676 #, fuzzy msgid "invalid LOCALE literal" msgstr "Ongeldige LOCALE constante" -#: cobc/tree.c:2782 +#: cobc/tree.c:2803 #, fuzzy msgid "only literals with the same category can be concatenated" msgstr "Alfanumerieke constante heeft lengte nul" -#: cobc/tree.c:2789 +#: cobc/tree.c:2811 #, fuzzy -msgid "only alphanumeric, national or boolean literals may be concatenated" +msgid "only alphanumeric, utf-8, national or boolean literals may be concatenated" msgstr "Alfanumerieke constante heeft lengte nul" -#: cobc/tree.c:2801 +#: cobc/tree.c:2823 #, fuzzy, c-format msgid "literal length %d exceeds %d characters" msgstr "Woord lengte overschrijdt 31 karakters - '%s'" -#: cobc/tree.c:3078 +#: cobc/tree.c:3103 msgid "B, 0 or /" msgstr "" -#: cobc/tree.c:3092 +#: cobc/tree.c:3117 msgid "the sign of the floating-point exponent" msgstr "" -#: cobc/tree.c:3094 +#: cobc/tree.c:3119 msgid "a leading +/- sign" msgstr "" -#: cobc/tree.c:3096 +#: cobc/tree.c:3121 msgid "a trailing +/- sign" msgstr "" -#: cobc/tree.c:3098 +#: cobc/tree.c:3123 msgid "CR or DB" msgstr "" -#: cobc/tree.c:3100 +#: cobc/tree.c:3125 msgid "a leading currency symbol" msgstr "" -#: cobc/tree.c:3102 +#: cobc/tree.c:3127 msgid "a trailing currency symbol" msgstr "" -#: cobc/tree.c:3104 +#: cobc/tree.c:3129 msgid "a Z or * which is before the decimal point" msgstr "" -#: cobc/tree.c:3106 +#: cobc/tree.c:3131 msgid "a Z or * which is after the decimal point" msgstr "" -#: cobc/tree.c:3108 +#: cobc/tree.c:3133 msgid "a floating +/- string which is before the decimal point" msgstr "" -#: cobc/tree.c:3110 +#: cobc/tree.c:3135 msgid "a floating +/- string which is after the decimal point" msgstr "" -#: cobc/tree.c:3112 +#: cobc/tree.c:3137 msgid "a floating currency symbol string which is before the decimal point" msgstr "" -#: cobc/tree.c:3114 +#: cobc/tree.c:3139 msgid "a floating currency symbol string which is after the decimal point" msgstr "" -#: cobc/tree.c:3118 +#: cobc/tree.c:3143 msgid "A or X" msgstr "" -#: cobc/tree.c:3126 +#: cobc/tree.c:3151 msgid "a P which is before the decimal point" msgstr "" -#: cobc/tree.c:3128 +#: cobc/tree.c:3153 msgid "a P which is after the decimal point" msgstr "" -#: cobc/tree.c:3149 cobc/tree.c:3599 +#: cobc/tree.c:3176 cobc/tree.c:3638 #, c-format msgid "%s may only occur once in a PICTURE string" msgstr "" -#: cobc/tree.c:3151 cobc/tree.c:3541 +#: cobc/tree.c:3178 cobc/tree.c:3570 #, fuzzy, c-format msgid "%s cannot follow %s" msgstr "%s niet toegestaan hier" -#: cobc/tree.c:3154 +#: cobc/tree.c:3181 #, fuzzy msgid "invalid PICTURE string detected" msgstr "Ongeldige optie gevonden" -#: cobc/tree.c:3271 +#: cobc/tree.c:3299 msgid "number or constant in parentheses is not an unsigned integer" msgstr "" -#: cobc/tree.c:3280 +#: cobc/tree.c:3308 #, c-format msgid "only up to %d significant digits are permitted within parentheses" msgstr "" -#: cobc/tree.c:3288 +#: cobc/tree.c:3316 msgid "number or constant in parentheses must be greater than zero" msgstr "" -#: cobc/tree.c:3299 +#: cobc/tree.c:3327 msgid "parentheses must be preceded by a picture symbol" msgstr "" -#: cobc/tree.c:3329 +#: cobc/tree.c:3353 msgid "unbalanced parentheses" msgstr "" -#: cobc/tree.c:3337 +#: cobc/tree.c:3361 msgid "parentheses must contain an unsigned integer" msgstr "" -#: cobc/tree.c:3375 +#: cobc/tree.c:3409 #, fuzzy, c-format msgid "'%s' is not a constant-name" msgstr "'%s' is geen report naam" -#: cobc/tree.c:3382 +#: cobc/tree.c:3422 #, fuzzy, c-format -msgid "'%s' is not a numeric literal" -msgstr "'%s' is geen numerieke waarde" - -#: cobc/tree.c:3386 -#, fuzzy, c-format -msgid "'%s' is not an integer" +msgid "'%s' is not an unsigned positive integer" msgstr "'%s' is geen heel getal" -#: cobc/tree.c:3390 -#, fuzzy, c-format -msgid "'%s' is not unsigned" -msgstr "'%s' is niet gedefinieerd" - -#: cobc/tree.c:3450 +#: cobc/tree.c:3479 msgid "missing PICTURE string" msgstr "" -#: cobc/tree.c:3479 +#: cobc/tree.c:3508 msgid "C must be followed by R" msgstr "" -#: cobc/tree.c:3482 +#: cobc/tree.c:3511 msgid "D must be followed by B" msgstr "" -#: cobc/tree.c:3497 cobc/tree.c:3596 cobc/tree.c:3622 cobc/tree.c:3733 +#: cobc/tree.c:3526 cobc/tree.c:3635 cobc/tree.c:3661 cobc/tree.c:3773 msgid "uncommon parentheses" msgstr "" -#: cobc/tree.c:3541 +#: cobc/tree.c:3570 msgid "exponent" msgstr "" -#: cobc/tree.c:3586 +#: cobc/tree.c:3625 msgid "L must be at start of PICTURE string" msgstr "" -#: cobc/tree.c:3604 +#: cobc/tree.c:3643 msgid "S must be at start of PICTURE string" msgstr "" -#: cobc/tree.c:3660 +#: cobc/tree.c:3699 msgid "P must be at start or end of PICTURE string" msgstr "" -#: cobc/tree.c:3690 +#: cobc/tree.c:3730 msgid "cannot have both Z and * in PICTURE string" msgstr "" -#: cobc/tree.c:3768 +#: cobc/tree.c:3808 #, fuzzy, c-format msgid "invalid PICTURE character '%c'" msgstr "Figuratieve constante ongeldig hier" -#: cobc/tree.c:3798 +#: cobc/tree.c:3841 #, c-format msgid "PICTURE string may not contain more than %d characters; contains %d characters" msgstr "" -#: cobc/tree.c:3803 -msgid "PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" +#: cobc/tree.c:3846 +msgid "PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" msgstr "" -#: cobc/tree.c:3830 +#: cobc/tree.c:3873 #, fuzzy, c-format msgid "numeric field cannot be larger than %d digits" msgstr "Numeriek veld mag niet groter zijn dan %d cijfers" -#: cobc/tree.c:4267 +#: cobc/tree.c:4333 #, fuzzy, c-format #| msgid "PICTURE clause required for '%s'" msgid "needs PICTURE clause for SUM %s" msgstr "PICTURE clausule verplicht voor '%s'" -#: cobc/tree.c:4274 +#: cobc/tree.c:4340 #, fuzzy, c-format #| msgid "PICTURE clause required for '%s'" msgid "non-numeric PICTURE clause for SUM %s" msgstr "PICTURE clausule verplicht voor '%s'" -#: cobc/tree.c:4346 cobc/tree.c:4359 +#: cobc/tree.c:4412 cobc/tree.c:4425 #, c-format msgid "no DETAIL line defined in report %s" msgstr "" -#: cobc/tree.c:4361 +#: cobc/tree.c:4427 msgid "PAGE LIMIT FIRST DETAIL should be >= HEADING" msgstr "" -#: cobc/tree.c:4364 +#: cobc/tree.c:4430 msgid "PAGE LIMIT FOOTING should be >= HEADING" msgstr "" -#: cobc/tree.c:4366 +#: cobc/tree.c:4432 msgid "PAGE LIMIT LAST DETAIL should be >= FIRST DETAIL" msgstr "" -#: cobc/tree.c:4368 +#: cobc/tree.c:4434 msgid "PAGE LIMIT FOOTING should be >= LAST DETAIL" msgstr "" -#: cobc/tree.c:4370 +#: cobc/tree.c:4436 msgid "PAGE LIMIT LINES should be >= FOOTING" msgstr "" -#: cobc/tree.c:4563 libcob/fileio.c:8999 +#: cobc/tree.c:4631 libcob/fileio.c:9358 #, c-format msgid "maximum keys (%d/%d) exceeded for file '%s'" msgstr "" -#: cobc/tree.c:4627 cobc/tree.c:4650 +#: cobc/tree.c:4695 cobc/tree.c:4718 #, fuzzy, c-format msgid "invalid KEY item '%s', not in file '%s'" msgstr "Ongeldig KEY item '%s'" -#: cobc/tree.c:4661 +#: cobc/tree.c:4729 #, c-format msgid "minimal record length %d can not hold the key item '%s'; needs to be at least %d" msgstr "" -#: cobc/tree.c:4696 +#: cobc/tree.c:4764 #, c-format msgid "missing file description for %s" msgstr "" -#: cobc/tree.c:4745 +#: cobc/tree.c:4813 #, fuzzy, c-format msgid "size of record '%s' (%d) smaller than minimum of file '%s' (%d)" msgstr "Lengte van '%s' groter dan lengte van '%s'" -#: cobc/tree.c:4748 cobc/tree.c:4765 +#: cobc/tree.c:4816 cobc/tree.c:4833 msgid "file size adjusted" msgstr "" -#: cobc/tree.c:4760 +#: cobc/tree.c:4828 #, fuzzy, c-format msgid "size of record '%s' (%d) larger than maximum of file '%s' (%d)" msgstr "Lengte van '%s' groter dan lengte van '%s'" -#: cobc/tree.c:4793 +#: cobc/tree.c:4861 msgid "RECORD VARYING specified without limits, but implied limits are equal" msgstr "" -#: cobc/tree.c:4795 +#: cobc/tree.c:4863 #, fuzzy, c-format #| msgid "%s ignored" msgid "%s clause ignored" msgstr "%s genegeerd" -#: cobc/tree.c:4890 cobc/typeck.c:7695 cobc/typeck.c:14389 cobc/typeck.c:14441 -#: cobc/typeck.c:14477 libcob/fileio.c:4598 libcob/screenio.c:3720 -#: libcob/screenio.c:3750 +#: cobc/tree.c:4958 cobc/typeck.c:8128 cobc/typeck.c:15186 cobc/typeck.c:15238 +#: cobc/typeck.c:15275 libcob/fileio.c:4724 libcob/screenio.c:4613 +#: libcob/screenio.c:4639 #, fuzzy, c-format msgid "runtime is not configured to support %s" msgstr "Runtime library is niet geconfigureerd voor deze operatie" -#: cobc/tree.c:5395 +#: cobc/tree.c:5474 #, fuzzy, c-format msgid "literal '%.38s' is longer than '%s'" msgstr "Lengte van '%s' groter dan lengte van '%s'" -#: cobc/tree.c:5399 +#: cobc/tree.c:5478 #, c-format msgid "literal '%.38s' is longer than reference-modification of '%s'" msgstr "" -#: cobc/tree.c:5424 +#: cobc/tree.c:5508 #, c-format msgid "literal '%s' is alphanumeric but '%s' is numeric" msgstr "" -#: cobc/tree.c:5466 +#: cobc/tree.c:5550 #, c-format msgid "literal '%s' has more decimals than '%s'" msgstr "" -#: cobc/tree.c:5508 +#: cobc/tree.c:5598 #, c-format msgid "literal '%s' has more digits than '%s'" msgstr "" -#: cobc/tree.c:5548 cobc/tree.c:5572 +#: cobc/tree.c:5646 cobc/tree.c:5676 #, c-format msgid "unsigned '%s' may not be %s %s" msgstr "" -#: cobc/tree.c:5558 cobc/tree.c:5581 +#: cobc/tree.c:5658 cobc/tree.c:5689 #, c-format msgid "unsigned '%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5614 cobc/tree.c:5639 +#: cobc/tree.c:5726 cobc/tree.c:5756 #, fuzzy, c-format msgid "'%s' may not be %s %s" msgstr "'%s' kan hier niet worden geïndexeerd" -#: cobc/tree.c:5625 cobc/tree.c:5650 +#: cobc/tree.c:5738 cobc/tree.c:5768 #, c-format msgid "'%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5795 +#: cobc/tree.c:5917 #, fuzzy msgid "divide by constant ZERO" msgstr "Ongeldige constante" -#: cobc/tree.c:5879 cobc/tree.c:5886 +#: cobc/tree.c:6001 cobc/tree.c:6008 #, c-format msgid "%s should be COMP-X/COMP-5 for logical operator" msgstr "" -#: cobc/tree.c:5927 cobc/tree.c:5932 cobc/tree.c:6151 cobc/typeck.c:5675 -#: cobc/typeck.c:5684 cobc/typeck.c:5691 cobc/typeck.c:6772 cobc/typeck.c:6913 -#, fuzzy -msgid "invalid expression" -msgstr "Ongeldige expressie" - -#: cobc/tree.c:6148 +#: cobc/tree.c:6283 #, fuzzy, c-format msgid "invalid expression: %s %s %s" msgstr "Ongeldige expressie" -#: cobc/tree.c:6195 +#: cobc/tree.c:6286 +msgid "invalid expression: boolean expected with logical operator" +msgstr "" + +#: cobc/tree.c:6330 #, fuzzy, c-format msgid "unexpected operator: %d" msgstr "Onverwachte operator -> %d" -#: cobc/tree.c:6206 +#: cobc/tree.c:6341 #, c-format msgid "expression '%.38s' %s '%.38s' is always TRUE" msgstr "" -#: cobc/tree.c:6212 +#: cobc/tree.c:6347 msgid "expression is always TRUE" msgstr "" -#: cobc/tree.c:6225 +#: cobc/tree.c:6360 #, c-format msgid "expression '%.38s' %s '%.38s' is always FALSE" msgstr "" -#: cobc/tree.c:6231 +#: cobc/tree.c:6366 msgid "expression is always FALSE" msgstr "" -#: cobc/tree.c:6443 +#: cobc/tree.c:6588 #, fuzzy msgid "invalid file name reference" msgstr "Ongeldige bestandsnaam verwijzing" -#: cobc/tree.c:6451 +#: cobc/tree.c:6596 #, fuzzy, c-format #| msgid "BY CONTENT assumed for alphanumeric item" msgid "BY CONTENT assumed for alphanumeric item '%s'" msgstr "BY CONTENT aangenomen voor alfanumeriek item" -#: cobc/tree.c:6456 +#: cobc/tree.c:6601 #, fuzzy, c-format #| msgid "BY CONTENT assumed for alphanumeric item" msgid "BY CONTENT assumed for national item '%s'" msgstr "BY CONTENT aangenomen voor alfanumeriek item" -#: cobc/tree.c:6595 +#: cobc/tree.c:6740 msgid "PERFORM FOREVER since UNTIL is always FALSE" msgstr "" -#: cobc/tree.c:6599 +#: cobc/tree.c:6744 msgid "PERFORM ONCE since UNTIL is always TRUE" msgstr "" -#: cobc/tree.c:6602 +#: cobc/tree.c:6747 msgid "PERFORM NEVER since UNTIL is always TRUE" msgstr "" -#: cobc/tree.c:6726 +#: cobc/tree.c:6871 #, fuzzy, c-format msgid "no definition/prototype seen for FUNCTION '%s'" msgstr "%s: Geen definitie voor '%s'" -#: cobc/tree.c:6728 +#: cobc/tree.c:6873 #, fuzzy, c-format msgid "no definition/prototype seen for PROGRAM '%s'" msgstr "%s: Geen definitie voor '%s'" -#: cobc/tree.c:6737 +#: cobc/tree.c:6882 #, fuzzy, c-format msgid "no definition/prototype seen for FUNCTION with external name '%s'" msgstr "%s: Geen definitie voor '%s'" -#: cobc/tree.c:6739 +#: cobc/tree.c:6884 #, fuzzy, c-format msgid "no definition/prototype seen for PROGRAM with external name '%s'" msgstr "%s: Geen definitie voor '%s'" -#: cobc/tree.c:6831 +#: cobc/tree.c:6976 cobc/tree.c:7158 cobc/tree.c:7233 cobc/tree.c:7239 +#: cobc/tree.c:7247 cobc/tree.c:7255 cobc/tree.c:7277 cobc/tree.c:7287 +#: cobc/tree.c:7292 #, fuzzy, c-format #| msgid "FUNCTION '%s' has invalid parameter" -msgid "FUNCTION %s has invalid argument" +msgid "FUNCTION '%s' has invalid argument" msgstr "FUNCTION '%s' heeft een ongeldige parameter" -#: cobc/tree.c:6833 +#: cobc/tree.c:6978 #, c-format -msgid "either all arguments or none should be if type %s" +msgid "either all arguments or none should be of type %s" msgstr "" -#: cobc/tree.c:6863 cobc/tree.c:6869 cobc/tree.c:6911 cobc/tree.c:6916 +#: cobc/tree.c:7010 cobc/tree.c:7016 cobc/tree.c:7057 cobc/tree.c:7063 #, c-format msgid "FUNCTION '%s' has invalid reference modification" msgstr "FUNCTION '%s' heeft ongeldige verwijzingsmodificatie" -#: cobc/tree.c:6880 cobc/tree.c:7194 +#: cobc/tree.c:7027 cobc/tree.c:7344 #, c-format msgid "FUNCTION '%s' unknown" msgstr "FUNCTION '%s' onbekend" -#: cobc/tree.c:6884 +#: cobc/tree.c:7031 #, fuzzy, c-format msgid "FUNCTION '%s' is not implemented" msgstr "FUNCTION '%s' niet geïmplementeerd" -#: cobc/tree.c:6891 cobc/tree.c:6898 cobc/tree.c:7179 +#: cobc/tree.c:7037 cobc/tree.c:7044 cobc/tree.c:7329 #, c-format msgid "FUNCTION '%s' has wrong number of arguments" msgstr "FUNCTION '%s' aantal argumenten incorrect" -#: cobc/tree.c:6905 +#: cobc/tree.c:7051 #, fuzzy, c-format msgid "FUNCTION '%s' cannot have reference modification" msgstr "FUNCTION '%s' kan geen verwijzingsmodificatie hebben" -#: cobc/tree.c:7008 cobc/tree.c:7083 cobc/tree.c:7089 cobc/tree.c:7097 -#: cobc/tree.c:7105 cobc/tree.c:7127 cobc/tree.c:7137 cobc/tree.c:7142 -#, fuzzy, c-format -#| msgid "FUNCTION '%s' has invalid parameter" -msgid "FUNCTION '%s' has invalid argument" -msgstr "FUNCTION '%s' heeft een ongeldige parameter" - -#: cobc/tree.c:7185 +#: cobc/tree.c:7335 #, fuzzy, c-format #| msgid "FUNCTION '%s' has invalid first parameter" msgid "FUNCTION '%s' has invalid first argument" msgstr "FUNCTION '%s' heeft een ongeldige eerste parameter" -#: cobc/typeck.c:584 +#: cobc/typeck.c:590 #, c-format msgid "%s should be COMP-5/COMP-X for logical operator" msgstr "" -#: cobc/typeck.c:850 +#: cobc/typeck.c:856 #, fuzzy, c-format #| msgid "%s not allowed here" msgid "%s item not allowed here: '%s'" msgstr "%s niet toegestaan hier" -#: cobc/typeck.c:892 +#: cobc/typeck.c:898 #, fuzzy, c-format msgid "'%s' is not a group name" msgstr "'%s' is geen groep naam" -#: cobc/typeck.c:911 +#: cobc/typeck.c:921 #, c-format msgid "'%s' is not a numeric name" msgstr "'%s' is geen numerieke naam" -#: cobc/typeck.c:934 +#: cobc/typeck.c:944 #, fuzzy, c-format msgid "'%s' is not a numeric or numeric-edited name" msgstr "'%s' is niet numeriek of numeriek-opmaak naam" -#: cobc/typeck.c:974 -#, fuzzy, c-format -#| msgid "'%s' is not a numeric value" -msgid "'%s' is Alpha, instead of a numeric value" -msgstr "'%s' is geen numerieke waarde" - -#: cobc/typeck.c:977 +#: cobc/typeck.c:1043 #, fuzzy, c-format -#| msgid "'%s' is not a numeric value" -msgid "'%s' is Alpha Edited, instead of a numeric value" -msgstr "'%s' is geen numerieke waarde" - -#: cobc/typeck.c:990 -#, c-format -msgid "'%s' is not a numeric value" -msgstr "'%s' is geen numerieke waarde" - -#: cobc/typeck.c:1040 -#, c-format -msgid "'%s' is not an integer value" +msgid "'%s' is not an integer" msgstr "'%s' is geen heel getal" -#: cobc/typeck.c:1044 +#: cobc/typeck.c:1047 #, fuzzy msgid "positive numeric integer is required here" msgstr "Een positief numeriek heel getal is hier verplicht" -#: cobc/typeck.c:1163 +#: cobc/typeck.c:1178 #, fuzzy msgid "System routine" msgstr "GNU Cobol Bouw omgeving" -#: cobc/typeck.c:2054 libcob/call.c:1180 +#: cobc/typeck.c:2037 libcob/call.c:1172 #, c-format msgid "'%s' literal includes leading spaces which are omitted" msgstr "" -#: cobc/typeck.c:2058 +#: cobc/typeck.c:2041 #, c-format msgid "'%s' literal includes trailing spaces which are omitted" msgstr "" -#: cobc/typeck.c:2125 +#: cobc/typeck.c:2108 msgid "ON/OFF usage requires a SWITCH name" msgstr "ON/OFF gebruik vereist een SWITCH naam" -#: cobc/typeck.c:2143 +#: cobc/typeck.c:2126 #, fuzzy, c-format msgid "word length exceeds maximum of %d characters: '%s'" msgstr "Woord lengte overschrijdt 31 karakters - '%s'" -#: cobc/typeck.c:2146 +#: cobc/typeck.c:2129 #, fuzzy, c-format msgid "word length exceeds %d characters: '%s'" msgstr "Woord lengte overschrijdt 31 karakters - '%s'" -#: cobc/typeck.c:2223 +#: cobc/typeck.c:2206 #, fuzzy, c-format #| msgid "ASSIGN interpreted as %s" msgid "ASSIGN %s interpreted as '%s'" msgstr "ASSIGN geïnterpreteerd als %s" -#: cobc/typeck.c:2315 cobc/typeck.c:2487 +#: cobc/typeck.c:2332 cobc/typeck.c:2631 #, fuzzy, c-format msgid "subscript missing for '%s' - defaulting to 1" msgstr "Index ontbreekt voor '%s' - Standaard 1" -#: cobc/typeck.c:2338 cobc/typeck.c:2403 cobc/typeck.c:2659 +#: cobc/typeck.c:2355 cobc/typeck.c:2546 cobc/typeck.c:2746 #, c-format msgid "'%s' cannot be subscripted" msgstr "'%s' accepteert geen index" -#: cobc/typeck.c:2342 cobc/typeck.c:2663 +#: cobc/typeck.c:2359 cobc/typeck.c:2750 #, fuzzy, c-format msgid "'%s' requires one subscript" msgstr "'%s' vereist 1 index" -#: cobc/typeck.c:2345 cobc/typeck.c:2666 +#: cobc/typeck.c:2362 cobc/typeck.c:2753 #, c-format msgid "'%s' requires %d subscripts" msgstr "'%s' vereist %d indices" -#: cobc/typeck.c:2363 +#: cobc/typeck.c:2380 #, c-format msgid "'%s' (accessed by '%s')" msgstr "" -#: cobc/typeck.c:2471 -#, c-format -msgid "'%s' has no OCCURS clause" -msgstr "'%s' heeft geen OCCURS clausule" +#: cobc/typeck.c:2399 cobc/typeck.c:4987 +#, fuzzy, c-format +#| msgid "'%s' cannot be reference modified" +msgid "%s may not be reference modified" +msgstr "'%s' accepteert geen verwijzingsmodificatie" -#: cobc/typeck.c:2537 libcob/common.c:3941 libcob/common.c:3952 +#: cobc/typeck.c:2437 cobc/typeck.c:2442 cobc/typeck.c:2466 +#: libcob/common.c:4477 libcob/common.c:4521 #, fuzzy, c-format -msgid "subscript of '%s' out of bounds: %d" -msgstr "Index van '%s' buiten grens: %d" +msgid "length of '%s' out of bounds: %d" +msgstr "Lengte van '%s' buiten grens: %d" -#: cobc/typeck.c:2587 cobc/typeck.c:2598 libcob/common.c:3976 -#: libcob/common.c:4027 +#: cobc/typeck.c:2453 cobc/typeck.c:2462 libcob/common.c:4462 +#: libcob/common.c:4513 #, fuzzy, c-format msgid "offset of '%s' out of bounds: %d" msgstr "Start positie van '%s' buiten grens: %d" -#: cobc/typeck.c:2592 cobc/typeck.c:2603 cobc/typeck.c:2612 -#: libcob/common.c:3991 libcob/common.c:4035 +#: cobc/typeck.c:2458 +msgid "suspicious reference-modification: always using max. position" +msgstr "" + +#: cobc/typeck.c:2475 +msgid "suspicious reference-modification: always using max. length" +msgstr "" + +#: cobc/typeck.c:2615 +#, c-format +msgid "'%s' has no OCCURS clause" +msgstr "'%s' heeft geen OCCURS clausule" + +#: cobc/typeck.c:2694 libcob/common.c:4427 libcob/common.c:4438 #, fuzzy, c-format -msgid "length of '%s' out of bounds: %d" -msgstr "Lengte van '%s' buiten grens: %d" +msgid "subscript of '%s' out of bounds: %d" +msgstr "Index van '%s' buiten grens: %d" -#: cobc/typeck.c:2727 cobc/typeck.c:2806 +#: cobc/typeck.c:2812 cobc/typeck.c:2891 #, fuzzy msgid "reference modification not allowed here" msgstr "Verwijzingsmodificatie hier niet toegestaan" -#: cobc/typeck.c:2741 cobc/typeck.c:2832 +#: cobc/typeck.c:2826 cobc/typeck.c:2917 msgid "88 level item not allowed here" msgstr "88 nivo item hier niet toegestaan" -#: cobc/typeck.c:2745 cobc/typeck.c:2836 cobc/typeck.c:2844 cobc/typeck.c:2906 +#: cobc/typeck.c:2830 cobc/typeck.c:2921 cobc/typeck.c:2929 cobc/typeck.c:2991 #, fuzzy msgid "variable length item not allowed here" msgstr "Variabele lengte hier niet toegestaan here" -#: cobc/typeck.c:2774 +#: cobc/typeck.c:2859 #, fuzzy, c-format msgid "'%s' has not been DEFINEd" msgstr "'%s' is niet in DECLARATIVES" -#: cobc/typeck.c:2810 +#: cobc/typeck.c:2895 #, fuzzy msgid "only field names allowed here" msgstr "88 nivo item hier niet toegestaan" -#: cobc/typeck.c:2821 +#: cobc/typeck.c:2906 #, c-format msgid "VALUE of '%s': %s target '%s' is invalid" msgstr "" -#: cobc/typeck.c:2823 cobc/typeck.c:2889 +#: cobc/typeck.c:2908 cobc/typeck.c:2974 #, fuzzy msgid "target must be in FILE SECTION or LINKAGE SECTION or have the EXTERNAL clause" msgstr "RETURNING item is niet in LINKAGE SECTION en niet BASED" -#: cobc/typeck.c:2879 cobc/typeck.c:2888 +#: cobc/typeck.c:2964 cobc/typeck.c:2973 #, fuzzy, c-format msgid "VALUE of '%s': %s target is invalid" msgstr "SET doel is omgeldig - '%s'" -#: cobc/typeck.c:2881 +#: cobc/typeck.c:2966 #, fuzzy msgid "no previous data-item found" msgstr "geen eerder data item met nivo %02d" -#: cobc/typeck.c:3040 cobc/typeck.c:4799 +#: cobc/typeck.c:3130 cobc/typeck.c:4963 #, fuzzy, c-format msgid "'%s' cannot be BASED/EXTERNAL" msgstr "'%s' mag niet BASED/EXTERNAL zijn" -#: cobc/typeck.c:3045 +#: cobc/typeck.c:3135 #, c-format msgid "'%s' is not in WORKING-STORAGE SECTION" msgstr "'%s' is niet in WORKING-STORAGE SECTION" -#: cobc/typeck.c:3052 cobc/typeck.c:4796 +#: cobc/typeck.c:3142 cobc/typeck.c:4960 #, c-format msgid "'%s' not level 01 or 77" msgstr "'%s' niet nivo 01 of 77" -#: cobc/typeck.c:3055 cobc/typeck.c:3090 cobc/typeck.c:4802 +#: cobc/typeck.c:3145 cobc/typeck.c:3180 cobc/typeck.c:4966 #, c-format msgid "'%s' REDEFINES field not allowed here" msgstr "'%s' REDEFINES veld hier niet toegestaan" -#: cobc/typeck.c:3075 cobc/typeck.c:8423 +#: cobc/typeck.c:3165 cobc/typeck.c:8876 #, fuzzy, c-format msgid "duplicate USING BY REFERENCE item '%s'" msgstr "Ongeldig DEFINE/SET statement" -#: cobc/typeck.c:3103 +#: cobc/typeck.c:3193 #, c-format msgid "'%s' USING item duplicates RETURNING item" msgstr "'%s' USING item multipliceert RETURNING item" -#: cobc/typeck.c:3177 +#: cobc/typeck.c:3268 #, fuzzy, c-format #| msgid "redefinition of '%s'" msgid "prototype and definition of '%s' do not match" msgstr "herdefinitie van '%s'" -#: cobc/typeck.c:3256 +#: cobc/typeck.c:3389 cobc/typeck.c:3486 #, c-format msgid "parameters #%d ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3259 +#: cobc/typeck.c:3393 #, c-format msgid "returning items ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3295 +#: cobc/typeck.c:3429 #, fuzzy msgid "definition is a program but the prototype is a function" msgstr "%s: Geen definitie voor '%s'" -#: cobc/typeck.c:3299 +#: cobc/typeck.c:3433 #, fuzzy msgid "definition is a function but the prototype is a program" msgstr "%s: Geen definitie voor '%s'" -#: cobc/typeck.c:3306 -msgid "DECIMAL-POINT IS COMMA clauses differ" -msgstr "" - -#: cobc/typeck.c:3312 -msgid "CURRENCY clauses differ" -msgstr "" - -#: cobc/typeck.c:3348 +#: cobc/typeck.c:3496 #, fuzzy msgid "number of parameters differ" msgstr "Aantal parameters overschrijdt maximum %d" -#: cobc/typeck.c:3358 +#: cobc/typeck.c:3506 msgid "definition has a RETURNING item but prototype does not" msgstr "" -#: cobc/typeck.c:3362 +#: cobc/typeck.c:3510 msgid "definition does not have a RETURNING item but prototype does" msgstr "" -#: cobc/typeck.c:3411 +#: cobc/typeck.c:3560 #, fuzzy, c-format msgid "unexpected tree tag: %d" msgstr "Onverwacht boom label %d" -#: cobc/typeck.c:3433 +#: cobc/typeck.c:3584 #, fuzzy, c-format msgid "expected argument #%d, %s, to be passed BY VALUE" msgstr "NULL parameter doorgegeven aan '%s'" -#: cobc/typeck.c:3437 +#: cobc/typeck.c:3589 #, c-format msgid "expected argument #%d, %s, to be passed BY REFERENCE/CONTENT" msgstr "" -#: cobc/typeck.c:3455 cobc/typeck.c:3580 cobc/typeck.c:3583 +#: cobc/typeck.c:3608 cobc/typeck.c:3733 cobc/typeck.c:3736 #, c-format msgid "argument #%d is not optional" msgstr "" -#: cobc/typeck.c:3468 +#: cobc/typeck.c:3622 #, c-format msgid "argument #%d must be at least %d bytes long" msgstr "" -#: cobc/typeck.c:3483 +#: cobc/typeck.c:3637 #, c-format msgid "argument #%d is a different type of pointer than the parameter" msgstr "" -#: cobc/typeck.c:3490 +#: cobc/typeck.c:3644 #, c-format msgid "argument #%d is ANY LENGTH, but expecting a fixed size item" msgstr "" -#: cobc/typeck.c:3518 +#: cobc/typeck.c:3672 #, c-format msgid "argument #%d, %s, does not conform to the parameter definition" msgstr "" -#: cobc/typeck.c:3566 +#: cobc/typeck.c:3719 #, c-format msgid "expecting up to %d arguments, but found %d" msgstr "" -#: cobc/typeck.c:3598 +#: cobc/typeck.c:3752 #, fuzzy msgid "the RETURNING item is of a fixed size, not ANY LENGTH" msgstr "'%s' is niet in LINKAGE SECTION" -#: cobc/typeck.c:3603 +#: cobc/typeck.c:3758 #, fuzzy, c-format #| msgid "RETURNING item must have level 01" msgid "RETURNING item %s is not a valid type" msgstr "RETURNING item moet nivo 01" -#: cobc/typeck.c:3609 +#: cobc/typeck.c:3764 #, fuzzy msgid "unexpected RETURNING item" msgstr "Onverwacht CONSTANT item" -#: cobc/typeck.c:3612 +#: cobc/typeck.c:3767 msgid "expecting a RETURNING item, but none provided" msgstr "" -#: cobc/typeck.c:3663 -#, c-format -msgid "'%s' is not an alphabet name" -msgstr "'%s' is geen alfabet naam" - -#: cobc/typeck.c:3939 +#: cobc/typeck.c:4091 #, fuzzy, c-format msgid "duplicate character values in alphabet '%s': %s" msgstr "Dubbele karakter waarde in alfabet '%s'" -#: cobc/typeck.c:3944 +#: cobc/typeck.c:4096 #, fuzzy, c-format msgid "invalid character values in alphabet '%s', starting at position %d" msgstr "Ongeldige karakter waarde in alfabet '%s'" -#: cobc/typeck.c:4045 +#: cobc/typeck.c:4198 #, fuzzy, c-format msgid "duplicate character values in class '%s'" msgstr "Dubbele waarden in class '%s'" -#: cobc/typeck.c:4074 +#: cobc/typeck.c:4227 #, fuzzy msgid "invalid ALPHABET name" msgstr "Ongeldige ALPHABET naam" -#: cobc/typeck.c:4103 +#: cobc/typeck.c:4256 #, c-format msgid "'%s' is not a locale name" msgstr "'%s' is niet een LOCALE naam" -#: cobc/typeck.c:4257 +#: cobc/typeck.c:4410 #, fuzzy msgid "invalid RECORD DEPENDING item" msgstr "Ongeldig RECORD DEPENDING item" -#: cobc/typeck.c:4262 +#: cobc/typeck.c:4415 msgid "RECORD DEPENDING must reference a data-item" msgstr "" -#: cobc/typeck.c:4285 +#: cobc/typeck.c:4438 #, fuzzy, c-format msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgstr "RECORD DEPENDING item moet in WORKING/LOCAL/LINKAGE sectie" -#: cobc/typeck.c:4298 +#: cobc/typeck.c:4451 #, fuzzy, c-format msgid "file %s: RELATIVE KEY %s is not numeric" msgstr "Numeriek veld mag niet groter zijn dan %d cijfers" -#: cobc/typeck.c:4307 +#: cobc/typeck.c:4460 #, c-format msgid "file %s: RELATIVE KEY %s must be integer" msgstr "" -#: cobc/typeck.c:4312 +#: cobc/typeck.c:4465 #, c-format msgid "file %s: RELATIVE KEY %s must be unsigned" msgstr "" -#: cobc/typeck.c:4319 +#: cobc/typeck.c:4472 #, c-format msgid "file %s: RELATIVE KEY %s cannot have OCCURS" msgstr "" -#: cobc/typeck.c:4325 +#: cobc/typeck.c:4478 #, c-format msgid "RELATIVE KEY %s cannot be in file record belonging to %s" msgstr "" -#: cobc/typeck.c:4334 +#: cobc/typeck.c:4487 #, c-format msgid "file %s: RELATIVE KEY %s declared outside WORKING-STORAGE" msgstr "" -#: cobc/typeck.c:4356 cobc/typeck.c:8396 +#: cobc/typeck.c:4509 cobc/typeck.c:8833 #, c-format msgid "'%s' is not a valid data name" msgstr "'%s' is geen geldige data naam" -#: cobc/typeck.c:4363 +#: cobc/typeck.c:4516 #, fuzzy, c-format msgid "CRT STATUS item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "RECORD DEPENDING item moet in WORKING/LOCAL/LINKAGE sectie" -#: cobc/typeck.c:4369 +#: cobc/typeck.c:4522 #, fuzzy, c-format msgid "'%s' numeric CRT STATUS must have at least 4 digits" msgstr "'%s' CRT STATUS is niet 4 karakters lang" -#: cobc/typeck.c:4375 +#: cobc/typeck.c:4528 #, fuzzy, c-format msgid "'%s' CRT STATUS must be 3 or 4 characters long" msgstr "'%s' CRT STATUS is niet 4 karakters lang" -#: cobc/typeck.c:4397 +#: cobc/typeck.c:4550 #, fuzzy, c-format msgid "FILE STATUS '%s' is not a field" msgstr "'%s' is niet gedefinieerd" -#: cobc/typeck.c:4409 +#: cobc/typeck.c:4562 #, c-format msgid "FILE STATUS '%s' may not be a decimal or have a PIC with a P" msgstr "" -#: cobc/typeck.c:4414 +#: cobc/typeck.c:4567 #, c-format msgid "FILE STATUS '%s' is a numeric field, but I-O status codes are not numeric in general" msgstr "" -#: cobc/typeck.c:4418 +#: cobc/typeck.c:4571 #, fuzzy, c-format msgid "FILE STATUS '%s' must be an alphanumeric or numeric field" msgstr "'%s' is niet numeriek of numeriek-opmaak naam" -#: cobc/typeck.c:4425 +#: cobc/typeck.c:4578 #, fuzzy, c-format msgid "FILE STATUS '%s' must be USAGE DISPLAY" msgstr "'%s' is niet in LINKAGE SECTION" -#: cobc/typeck.c:4432 +#: cobc/typeck.c:4585 #, fuzzy, c-format msgid "FILE STATUS '%s' must be 2 characters long" msgstr "'%s' CRT STATUS is niet 4 karakters lang" -#: cobc/typeck.c:4440 +#: cobc/typeck.c:4593 #, fuzzy, c-format msgid "FILE STATUS '%s' must be in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE" msgstr "RECORD DEPENDING item moet in WORKING/LOCAL/LINKAGE sectie" -#: cobc/typeck.c:4446 +#: cobc/typeck.c:4599 #, c-format msgid "FILE STATUS '%s' may not be located after an OCCURS DEPENDING field" msgstr "" -#: cobc/typeck.c:4460 +#: cobc/typeck.c:4613 #, fuzzy, c-format #| msgid "'%s' will be implicitly defined" msgid "variable '%s' will be implicitly defined" msgstr "'%s' wordt impliciet gedefinieerd" -#: cobc/typeck.c:4489 cobc/typeck.c:4550 +#: cobc/typeck.c:4703 msgid "ASSIGN variable" msgstr "" -#: cobc/typeck.c:4555 +#: cobc/typeck.c:4708 #, fuzzy, c-format #| msgid "ASSIGN data item '%s' invalid" msgid "ASSIGN data item '%s' is invalid" msgstr "ASSIGN data item '%s' ongeldig" -#: cobc/typeck.c:4619 +#: cobc/typeck.c:4773 #, fuzzy, c-format msgid "'%s' CURSOR must be 4 or 6 characters long" msgstr "'%s' CURSOR is niet 4 of 6 karakters lang" -#: cobc/typeck.c:4680 +#: cobc/typeck.c:4844 #, fuzzy, c-format #| msgid "'%s' cannot have OCCURS DEPENDING" msgid "'%s' cannot have nested OCCURS DEPENDING" msgstr "'%s' kan geen OCCURS DEPENDING hebben" -#: cobc/typeck.c:4694 +#: cobc/typeck.c:4858 #, fuzzy, c-format #| msgid "'%s' ODO field item invalid here" msgid "'%s' OCCURS DEPENDING ON field item invalid here" msgstr "'%s' ODO veld item is hier ongeldig" -#: cobc/typeck.c:4704 +#: cobc/typeck.c:4868 #, fuzzy, c-format #| msgid "'%s' cannot have OCCURS DEPENDING" msgid "'%s' cannot have OCCURS DEPENDING because of '%s'" msgstr "'%s' kan geen OCCURS DEPENDING hebben" -#: cobc/typeck.c:4716 +#: cobc/typeck.c:4880 #, fuzzy, c-format #| msgid "'%s' ODO item must have GLOBAL attribute" msgid "'%s' OCCURS DEPENDING ON item must have GLOBAL attribute" msgstr "'%s' ODO item moet GLOBAL attribute hebben" -#: cobc/typeck.c:4730 +#: cobc/typeck.c:4894 #, c-format msgid "PASSWORD '%s' for EXTERNAL file '%s' must have EXTERNAL attribute" msgstr "" -#: cobc/typeck.c:4768 +#: cobc/typeck.c:4932 #, fuzzy, c-format msgid "duplicate APPLY COMMIT target: '%s'" msgstr "Ongeldig DEFINE/SET statement" -#: cobc/typeck.c:4782 +#: cobc/typeck.c:4946 #, fuzzy #| msgid "USE statement invalid for SORT file" msgid "APPLY COMMIT statement invalid for SORT file" msgstr "USE statement ongeldig voor SORT bestand" -#: cobc/typeck.c:4785 +#: cobc/typeck.c:4949 #, fuzzy #| msgid "USE statement invalid for SORT file" msgid "APPLY COMMIT statement invalid for REPORT file" msgstr "USE statement ongeldig voor SORT bestand" -#: cobc/typeck.c:4792 +#: cobc/typeck.c:4956 #, fuzzy, c-format msgid "APPLY COMMIT item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "RECORD DEPENDING item moet in WORKING/LOCAL/LINKAGE sectie" -#: cobc/typeck.c:4806 +#: cobc/typeck.c:4970 #, fuzzy, c-format #| msgid "%s not allowed here" msgid "item not allowed here: '%s'" msgstr "%s niet toegestaan hier" -#: cobc/typeck.c:4819 +#: cobc/typeck.c:4983 #, fuzzy, c-format #| msgid "'%s' cannot be subscripted" msgid "%s may not be subscripted" msgstr "'%s' accepteert geen index" -#: cobc/typeck.c:4823 -#, fuzzy, c-format -#| msgid "'%s' cannot be reference modified" -msgid "%s may not be reference modified" -msgstr "'%s' accepteert geen verwijzingsmodificatie" - -#: cobc/typeck.c:4883 +#: cobc/typeck.c:5047 #, fuzzy, c-format msgid "DEBUGGING target invalid: '%s'" msgstr "'%s' - DEBUGGING doel ongeldig" -#: cobc/typeck.c:4889 +#: cobc/typeck.c:5053 #, fuzzy, c-format msgid "DEBUGGING target already specified with ALL PROCEDURES: '%s'" msgstr "'%s' - DEBUGGING doel ongeldig met ALL PROCEDURES" -#: cobc/typeck.c:4909 +#: cobc/typeck.c:5073 #, fuzzy msgid "DEBUGGING target" msgstr "'%s' - DEBUGGING doel ongeldig" -#: cobc/typeck.c:4916 +#: cobc/typeck.c:5080 #, c-format msgid "'%s' is not a valid DEBUGGING target" msgstr "'%s' is geen geldig DEBUGGING doel" -#: cobc/typeck.c:4962 cobc/typeck.c:4970 +#: cobc/typeck.c:5126 cobc/typeck.c:5134 #, c-format msgid "'%s' is not in DECLARATIVES" msgstr "'%s' is niet in DECLARATIVES" -#: cobc/typeck.c:4984 +#: cobc/typeck.c:5148 #, fuzzy, c-format msgid "invalid reference to '%s' (in DECLARATIVES)" msgstr "Ongeldige verwijzing naar '%s' (In DECLARATIVES)" -#: cobc/typeck.c:4996 +#: cobc/typeck.c:5162 #, c-format msgid "GO TO paragraph '%s' which is defined in another SECTION" msgstr "" -#: cobc/typeck.c:5006 +#: cobc/typeck.c:5172 #, fuzzy, c-format msgid "'%s' is not a procedure name" msgstr "'%s' geen procedure naam" -#: cobc/typeck.c:5041 +#: cobc/typeck.c:5207 #, c-format msgid "%s and %s are not in the same SECTION" msgstr "" -#: cobc/typeck.c:5046 +#: cobc/typeck.c:5212 #, fuzzy, c-format #| msgid "'%s' defined here" msgid "%s is defined before %s" msgstr "'%s' hier gedefinieerd" -#: cobc/typeck.c:5088 +#: cobc/typeck.c:5254 #, fuzzy, c-format msgid "'%s' ANY LENGTH item must be a formal parameter" msgstr "'%s' ANY LENGTH item niet doorgegeven BY REFERENCE" -#: cobc/typeck.c:5136 +#: cobc/typeck.c:5302 #, c-format msgid "LINKAGE item '%s' is not a PROCEDURE USING parameter" msgstr "LINKAGE item '%s' is niet een PROCEDURE USING parameter" -#: cobc/typeck.c:5192 +#: cobc/typeck.c:5358 #, c-format msgid "'%s' is not an alterable paragraph" msgstr "'%s' is te wijzigen paragraaf" -#: cobc/typeck.c:5802 cobc/typeck.c:5806 +#: cobc/typeck.c:5852 +#, fuzzy +msgid "invalid expression: unfinished expression" +msgstr "Ongeldige expressie" + +#: cobc/typeck.c:5858 cobc/typeck.c:5865 +#, fuzzy +msgid "invalid expression" +msgstr "Ongeldige expressie" + +#: cobc/typeck.c:5990 cobc/typeck.c:5994 #, fuzzy, c-format msgid "suggest parentheses around %s within %s" msgstr "Suggestie haken om AND binnen OR" -#: cobc/typeck.c:5815 +#: cobc/typeck.c:6003 #, fuzzy msgid "invalid conditional expression" msgstr "Ongeldige expressie" -#: cobc/typeck.c:5932 +#: cobc/typeck.c:6120 #, fuzzy, c-format msgid "internal decimal structure size exceeded: %d" msgstr "Interne decimal structuur grootte overschrijdt - %d" -#: cobc/typeck.c:5935 +#: cobc/typeck.c:6123 msgid "Try to minimize the number of parentheses or split into multiple computations." msgstr "" -#: cobc/typeck.c:5959 +#: cobc/typeck.c:6147 #, c-format msgid "more than %d nested expressions" msgstr "" -#: cobc/typeck.c:6000 +#: cobc/typeck.c:6188 msgid "precision of result may change with arithmetic-osvs" msgstr "" -#: cobc/typeck.c:6080 +#: cobc/typeck.c:6268 #, fuzzy, c-format msgid "unexpected operation: %c (%d)" msgstr "Onverwachte operatie %d" -#: cobc/typeck.c:6085 +#: cobc/typeck.c:6273 #, c-format msgid "%s operator may be misplaced" msgstr "" -#: cobc/typeck.c:6160 +#: cobc/typeck.c:6349 #, fuzzy msgid "unexpected constant expansion" msgstr "Onverwachte constante expansie" -#: cobc/typeck.c:6882 cobc/typeck.c:11024 +#: cobc/typeck.c:7106 cobc/typeck.c:11656 cobc/typeck.c:11661 #, fuzzy msgid "alphanumeric value is expected" msgstr "Alanumerieke waarde verwacht" -#: cobc/typeck.c:6884 cobc/typeck.c:11019 +#: cobc/typeck.c:7109 cobc/typeck.c:11651 #, fuzzy msgid "numeric value is expected" msgstr "Numerieke waarde verwacht" -#: cobc/typeck.c:6954 +#: cobc/typeck.c:7203 +#, fuzzy +msgid "invalid expression: condition expected" +msgstr "Ongeldige optie gevonden" + +#: cobc/typeck.c:7271 +#, fuzzy +msgid "incomplete expression" +msgstr "Ongeldige expressie" + +#: cobc/typeck.c:7312 #, c-format msgid "more than %d nested conditions" msgstr "" -#: cobc/typeck.c:7290 cobc/typeck.c:7371 +#: cobc/typeck.c:7667 cobc/typeck.c:7748 #, fuzzy msgid "no CORRESPONDING items found" msgstr "Geen CORRESPONDING items gevonden" -#: cobc/typeck.c:7443 +#: cobc/typeck.c:7820 msgid "no items to ACCEPT found" msgstr "" -#: cobc/typeck.c:7493 +#: cobc/typeck.c:7870 #, fuzzy msgid "no items to DISPLAY found" msgstr "Ongeldig type voor DISPLAY operand" -#: cobc/typeck.c:7605 +#: cobc/typeck.c:7981 msgid "cannot specify figurative constant ZERO in AT clause" msgstr "" -#: cobc/typeck.c:7609 +#: cobc/typeck.c:7985 #, fuzzy msgid "value in AT clause is not numeric" msgstr "Numeriek veld mag niet groter zijn dan %d cijfers" -#: cobc/typeck.c:7615 +#: cobc/typeck.c:7991 #, fuzzy msgid "value in AT clause must have 4 or 6 digits" msgstr "Numeriek veld mag niet groter zijn dan %d cijfers" -#: cobc/typeck.c:7737 +#: cobc/typeck.c:8168 #, fuzzy msgid "invalid PROMPT literal" msgstr "Ongeldige PROMPT constante" -#: cobc/typeck.c:7742 +#: cobc/typeck.c:8173 #, fuzzy msgid "invalid PROMPT identifier" msgstr "Ongeldige PROMPT identifier" -#: cobc/typeck.c:8032 +#: cobc/typeck.c:8465 #, fuzzy, c-format msgid "'%s' is not an input device" msgstr "'%s' is geen uitvoer apparaat" -#: cobc/typeck.c:8059 cobc/typeck.c:9242 +#: cobc/typeck.c:8492 cobc/typeck.c:9708 #, c-format msgid "'%s' is not defined in SPECIAL-NAMES" msgstr "'%s' is niet definieerd in SPECIAL-NAMES" -#: cobc/typeck.c:8064 +#: cobc/typeck.c:8497 #, fuzzy, c-format msgid "invalid input device '%s'" msgstr "Ongeldige invoer apparaat '%s'" -#: cobc/typeck.c:8069 cobc/typeck.c:9246 +#: cobc/typeck.c:8502 cobc/typeck.c:9712 #, c-format msgid "unknown device '%s'; it may exist in another dialect" msgstr "" -#: cobc/typeck.c:8072 cobc/typeck.c:9249 +#: cobc/typeck.c:8505 cobc/typeck.c:9715 #, fuzzy, c-format msgid "unknown device '%s'; not defined in SPECIAL-NAMES" msgstr "'%s' is niet definieerd in SPECIAL-NAMES" -#: cobc/typeck.c:8088 +#: cobc/typeck.c:8524 #, fuzzy msgid "target of RETURNING is not a data pointer" msgstr "Doel van RETURNING is geen data pointer" -#: cobc/typeck.c:8115 cobc/typeck.c:12634 cobc/typeck.c:12700 -#: cobc/typeck.c:12768 +#: cobc/typeck.c:8551 cobc/typeck.c:13410 cobc/typeck.c:13479 +#: cobc/typeck.c:13547 #, c-format msgid "cannot change address of '%s', which is not BASED or a LINKAGE item" msgstr "" -#: cobc/typeck.c:8121 +#: cobc/typeck.c:8557 #, fuzzy msgid "target of ALLOCATE must have BASED clause" msgstr "Doel van ALLOCATE is geen BASED item" -#: cobc/typeck.c:8155 cobc/typeck.c:8571 +#: cobc/typeck.c:8591 cobc/typeck.c:9023 msgid "amount must be specified as a numeric expression" msgstr "" -#: cobc/typeck.c:8161 +#: cobc/typeck.c:8597 msgid "INITIALIZED TO item is not alphanumeric" msgstr "INITIALIZED TO item is niet alfanumeriek" -#: cobc/typeck.c:8232 +#: cobc/typeck.c:8667 #, fuzzy msgid "only alphanumeric FUNCTION types are allowed here" msgstr "Alleen alphanumerieke FUNCTION types zijn hier toegestaan" -#: cobc/typeck.c:8240 +#: cobc/typeck.c:8675 #, fuzzy msgid "invalid RETURNING field" msgstr "Ongeldig RETURNING veld" -#: cobc/typeck.c:8259 +#: cobc/typeck.c:8694 msgid "STDCALL not available on this platform" msgstr "STDCALL niet beschikbaar op dit platform" -#: cobc/typeck.c:8263 +#: cobc/typeck.c:8698 msgid "STDCALL used on 64-bit Windows platform" msgstr "STDCALL gebruikt op 64-bit Windows platform" -#: cobc/typeck.c:8268 +#: cobc/typeck.c:8703 msgid "STATIC CALL convention requires a literal program name" msgstr "STATIC CALL conventie vereist een constante als programma naam" -#: cobc/typeck.c:8273 cobc/typeck.c:11975 cobc/typeck.c:12900 -#: cobc/typeck.c:13271 +#: cobc/typeck.c:8708 cobc/typeck.c:12746 cobc/typeck.c:13681 +#: cobc/typeck.c:14077 msgid "HANDLE must be either a generic or a THREAD HANDLE" msgstr "" -#: cobc/typeck.c:8291 +#: cobc/typeck.c:8726 #, fuzzy msgid "numeric literal is negative" msgstr "Numerieke constante is negatief" -#: cobc/typeck.c:8370 +#: cobc/typeck.c:8805 #, fuzzy msgid "numeric literal exceeds size limits" msgstr "Numerieke constante overschrijdt de maximum grootte" -#: cobc/typeck.c:8385 +#: cobc/typeck.c:8820 #, fuzzy, c-format msgid "figurative constant %s invalid here" msgstr "Figuratieve constante ongeldig hier" -#: cobc/typeck.c:8403 +#: cobc/typeck.c:8840 #, c-format msgid "'%s' is not a 01 or 77 level item" msgstr "'%s' is geen 01 of 77 nivo item" -#: cobc/typeck.c:8407 +#: cobc/typeck.c:8856 #, c-format msgid "'%s' ANY LENGTH item not passed BY REFERENCE" msgstr "'%s' ANY LENGTH item niet doorgegeven BY REFERENCE" -#: cobc/typeck.c:8457 cobc/typeck.c:8462 +#: cobc/typeck.c:8909 cobc/typeck.c:8914 #, fuzzy, c-format msgid "wrong number of CALL parameters for '%s', %d given, %d expected" msgstr "Verkeerd aantal CALL parameters voor '%s'" -#: cobc/typeck.c:8529 cobc/typeck.c:8603 cobc/typeck.c:8607 cobc/typeck.c:8637 -#: cobc/typeck.c:11932 cobc/typeck.c:12092 cobc/typeck.c:12281 -#: cobc/typeck.c:12285 cobc/typeck.c:13206 cobc/typeck.c:13539 -#: cobc/typeck.c:13542 +#: cobc/typeck.c:8981 cobc/typeck.c:9055 cobc/typeck.c:9059 cobc/typeck.c:9095 +#: cobc/typeck.c:12703 cobc/typeck.c:12863 cobc/typeck.c:13052 +#: cobc/typeck.c:13056 cobc/typeck.c:14012 cobc/typeck.c:14345 +#: cobc/typeck.c:14348 #, fuzzy, c-format msgid "%s not allowed on %s files" msgstr "%s niet toegestaan bij %s bestanden" -#: cobc/typeck.c:8704 +#: cobc/typeck.c:9172 msgid "positions cannot be specified for main windows" msgstr "" -#: cobc/typeck.c:8714 cobc/typeck.c:8718 cobc/typeck.c:8740 +#: cobc/typeck.c:9183 cobc/typeck.c:9187 cobc/typeck.c:9211 msgid "HANDLE must be either a generic or a WINDOW HANDLE or X(10)" msgstr "" -#: cobc/typeck.c:8849 +#: cobc/typeck.c:9324 #, c-format msgid "'%s' is an invalid type for DISPLAY operand" msgstr "'%s' is een ongeldig type voor DISPLAY operand" -#: cobc/typeck.c:8854 +#: cobc/typeck.c:9329 #, fuzzy msgid "invalid type for DISPLAY operand" msgstr "Ongeldig type voor DISPLAY operand" -#: cobc/typeck.c:9202 cobc/typeck.c:9235 +#: cobc/typeck.c:9668 cobc/typeck.c:9701 #, c-format msgid "'%s' is not an output device" msgstr "'%s' is geen uitvoer apparaat" -#: cobc/typeck.c:9335 +#: cobc/typeck.c:9800 #, fuzzy msgid "invalid use of 88 level in WHEN expression" msgstr "Ongeldig gebruik van 88 nivo in WHEN expressie" -#: cobc/typeck.c:9396 +#: cobc/typeck.c:9861 #, fuzzy msgid "wrong number of WHEN parameters" msgstr "Verkeerd aantal WHEN parameters" -#: cobc/typeck.c:9518 cobc/typeck.c:9530 +#: cobc/typeck.c:9983 cobc/typeck.c:9995 #, fuzzy, c-format msgid "target %d of FREE is not a BASED data item" msgstr "Doel %d van FREE is geen BASED data item" -#: cobc/typeck.c:9536 +#: cobc/typeck.c:10001 #, fuzzy, c-format msgid "target %d of FREE must be a data pointer" msgstr "Doel %d van FREE moet een data pointer zijn" -#: cobc/typeck.c:9550 +#: cobc/typeck.c:10015 #, fuzzy msgid "GO TO without procedure-name" msgstr "GO TO met meerdere procedure-namen" -#: cobc/typeck.c:9560 +#: cobc/typeck.c:10023 msgid "GO TO with multiple procedure-names" msgstr "GO TO met meerdere procedure-namen" -#: cobc/typeck.c:9582 -#, fuzzy -#| msgid "GO TO with multiple procedure-names" -msgid "GO TO ENTRY with multiple entry-names" -msgstr "GO TO met meerdere procedure-namen" - -#: cobc/typeck.c:9646 +#: cobc/typeck.c:10088 #, fuzzy msgid "invalid INITIALIZE statement" msgstr "Ongeldig SET statement" -#: cobc/typeck.c:9752 cobc/typeck.c:9755 +#: cobc/typeck.c:10193 cobc/typeck.c:10196 #, fuzzy, c-format msgid "%s operands differ in size" msgstr "%s operands verschillen in grootte" -#: cobc/typeck.c:9785 +#: cobc/typeck.c:10226 #, fuzzy, c-format msgid "unexpected clause %d" msgstr "Onverwachte grootte" -#: cobc/typeck.c:9860 cobc/typeck.c:9871 cobc/typeck.c:9882 cobc/typeck.c:9893 +#: cobc/typeck.c:10301 cobc/typeck.c:10312 cobc/typeck.c:10323 +#: cobc/typeck.c:10334 #, fuzzy, c-format msgid "data name expected before %s" msgstr "Data naam verwacht voor %s" -#: cobc/typeck.c:9903 +#: cobc/typeck.c:10344 #, c-format msgid "ALL, LEADING or TRAILING expected before '%s'" msgstr "ALL, LEADING of TRAILING verwacht voor '%s'" -#: cobc/typeck.c:9913 +#: cobc/typeck.c:10354 #, fuzzy msgid "operand has wrong size" msgstr "Operand heeft verkeerde grootte" -#: cobc/typeck.c:10007 +#: cobc/typeck.c:10448 #, c-format msgid "'%s' defined here as PIC %s" msgstr "'%s' hier gedefinieerd als PIC %s" -#: cobc/typeck.c:10011 +#: cobc/typeck.c:10452 #, c-format msgid "'%s' defined here as a group of length %d" msgstr "'%s' hier gedefinieerd als een groep met lengte %d" -#: cobc/typeck.c:10017 +#: cobc/typeck.c:10458 #, fuzzy, c-format msgid "internal register '%s' defined as USAGE %s" msgstr "Intern register '%s' gedefinieerd als BINARY-LONG" -#: cobc/typeck.c:10020 +#: cobc/typeck.c:10461 #, c-format msgid "'%s' defined here as USAGE %s" msgstr "'%s' hier gedefinieerd als USAGE %s" -#: cobc/typeck.c:10045 cobc/typeck.c:10063 +#: cobc/typeck.c:10486 cobc/typeck.c:10504 #, fuzzy, c-format msgid "value size is %d" msgstr "Grootte van de waarde overschrijdt de data grootte" -#: cobc/typeck.c:10059 +#: cobc/typeck.c:10500 #, c-format msgid "value is %s" msgstr "" -#: cobc/typeck.c:10338 -#, fuzzy -msgid "invalid destination for MOVE" -msgstr "Ongeldige bestemming voor MOVE" - -#: cobc/typeck.c:10380 +#: cobc/typeck.c:10824 #, fuzzy msgid "MOVE of figurative constant SPACE to numeric item" msgstr "Figuratieve constante ongeldig hier" -#: cobc/typeck.c:10395 +#: cobc/typeck.c:10839 msgid "MOVE of figurative constant QUOTE to numeric item" msgstr "" -#: cobc/typeck.c:10400 cobc/typeck.c:10411 +#: cobc/typeck.c:10844 cobc/typeck.c:10855 #, fuzzy msgid "MOVE of figurative constant to numeric item" msgstr "Figuratieve constante ongeldig hier" -#: cobc/typeck.c:10469 +#: cobc/typeck.c:10936 msgid "numeric literal in VALUE clause of numeric-edited item" msgstr "" -#: cobc/typeck.c:10494 +#: cobc/typeck.c:10966 #, fuzzy msgid "numeric move to ALPHABETIC" msgstr "Numerieke move naar ALPHABETIC" -#: cobc/typeck.c:10506 +#: cobc/typeck.c:10978 #, fuzzy msgid "data item not signed" msgstr "Data item kent geen teken" -#: cobc/typeck.c:10509 +#: cobc/typeck.c:10981 #, fuzzy msgid "ignoring sign" msgstr "Teken genegeerd" -#: cobc/typeck.c:10821 +#: cobc/typeck.c:11381 #, fuzzy msgid "overlapping MOVE may occur and produce unpredictable results" msgstr "Overlappende MOVE kan onvoorspelbare resultaten geven" -#: cobc/typeck.c:10828 +#: cobc/typeck.c:11388 #, fuzzy msgid "overlapping MOVE may produce unpredictable results" msgstr "Overlappende MOVE kan onvoorspelbare resultaten geven" -#: cobc/typeck.c:10961 +#: cobc/typeck.c:11593 #, fuzzy msgid "invalid source for MOVE" msgstr "Ongeldige bron voor MOVE" -#: cobc/typeck.c:10982 +#: cobc/typeck.c:11614 #, fuzzy msgid "source is non-numeric - substituting zero" msgstr "Bron is niet-numeriek - vervangen door nul" -#: cobc/typeck.c:10988 cobc/typeck.c:10999 +#: cobc/typeck.c:11620 cobc/typeck.c:11631 #, fuzzy msgid "invalid VALUE clause" msgstr "Ongeldige VALUE clausule" -#: cobc/typeck.c:10991 cobc/typeck.c:12841 cobc/typeck.c:12846 -#: cobc/typeck.c:12873 cobc/typeck.c:12878 +#: cobc/typeck.c:11623 cobc/typeck.c:13622 cobc/typeck.c:13627 +#: cobc/typeck.c:13654 cobc/typeck.c:13659 #, fuzzy msgid "invalid SET statement" msgstr "Ongeldig SET statement" -#: cobc/typeck.c:10993 +#: cobc/typeck.c:11625 #, fuzzy msgid "invalid MOVE statement" msgstr "Ongeldig MOVE statement" -#: cobc/typeck.c:11000 +#: cobc/typeck.c:11632 #, fuzzy msgid "literal exceeds data size" msgstr "Numerieke constante overschrijdt data grootte" -#: cobc/typeck.c:11004 +#: cobc/typeck.c:11636 #, fuzzy msgid "numeric literal exceeds data size" msgstr "Numerieke constante overschrijdt data grootte" -#: cobc/typeck.c:11013 +#: cobc/typeck.c:11645 #, fuzzy msgid "MOVE of non-integer to alphanumeric" msgstr "Move geen heel getal naar alfanumeriek" -#: cobc/typeck.c:11029 +#: cobc/typeck.c:11666 cobc/typeck.c:11671 +#, fuzzy +msgid "national value is expected" +msgstr "Numerieke waarde verwacht" + +#: cobc/typeck.c:11676 #, fuzzy msgid "value does not fit the picture string" msgstr "Waarde past niet in de opmaak string" -#: cobc/typeck.c:11035 +#: cobc/typeck.c:11682 #, fuzzy msgid "value size exceeds data size" msgstr "Grootte van de waarde overschrijdt de data grootte" -#: cobc/typeck.c:11040 +#: cobc/typeck.c:11687 #, fuzzy msgid "sending field larger than receiving field" msgstr "Zendende veld groter dan ontvangende veld" -#: cobc/typeck.c:11045 +#: cobc/typeck.c:11692 #, fuzzy msgid "some digits may be truncated" msgstr "Some cijfers worden mogelijk afgekapt" -#: cobc/typeck.c:11798 cobc/typeck.c:11848 +#: cobc/typeck.c:12566 cobc/typeck.c:12619 #, fuzzy, c-format msgid "invalid MOVE target: %s" msgstr "Ongeldig MOVE doel - %s" -#: cobc/typeck.c:12105 +#: cobc/typeck.c:12876 msgid "READ PREVIOUS not allowed for this file type" msgstr "READ PREVIOUS niet toegestaan bij dit bestands type" -#: cobc/typeck.c:12113 +#: cobc/typeck.c:12884 msgid "KEY ignored with sequential READ" msgstr "KEY genegeerd bij sequentiële READ" -#: cobc/typeck.c:12209 +#: cobc/typeck.c:12980 #, fuzzy msgid "figurative constants not allowed in FROM clause" msgstr "Figuratieve constante ongeldig hier" -#: cobc/typeck.c:12216 -msgid "literal in FROM clause must be alphanumeric, national or boolean" +#: cobc/typeck.c:12987 +msgid "literal in FROM clause must be alphanumeric, utf-8, national or boolean" msgstr "" -#: cobc/typeck.c:12239 cobc/typeck.c:13499 +#: cobc/typeck.c:13010 cobc/typeck.c:14305 #, fuzzy, c-format msgid "%s FILE requires a FROM clause" msgstr "Item %s vereist een veld naam" -#: cobc/typeck.c:12261 cobc/typeck.c:12345 cobc/typeck.c:13521 +#: cobc/typeck.c:13032 cobc/typeck.c:13116 cobc/typeck.c:14327 #, fuzzy, c-format msgid "%s subject does not refer to a record name" msgstr "%s onderwerp verwijst niet naar een record naam" -#: cobc/typeck.c:12351 +#: cobc/typeck.c:13122 msgid "RELEASE not allowed on this record item" msgstr "RELEASE niet toegestaan bij this record item" -#: cobc/typeck.c:12433 cobc/typeck.c:12454 cobc/typeck.c:12461 +#: cobc/typeck.c:13183 cobc/typeck.c:13209 cobc/typeck.c:13237 #, fuzzy msgid "invalid SEARCH ALL condition" msgstr "Ongeldige SEARCH ALL conditie" -#: cobc/typeck.c:12578 cobc/typeck.c:12585 +#: cobc/typeck.c:13231 +msgid "SEARCH ALL requires comparision of KEY field" +msgstr "" + +#: cobc/typeck.c:13354 cobc/typeck.c:13361 msgid "SET targets must be PROGRAM-POINTER" msgstr "SET doelen moeten PROGRAM-POINTER zijn" -#: cobc/typeck.c:12610 +#: cobc/typeck.c:13386 #, c-format msgid "SET target '%s' is not numeric, an INDEX or a POINTER" msgstr "" -#: cobc/typeck.c:12627 cobc/typeck.c:12696 cobc/typeck.c:12764 +#: cobc/typeck.c:13403 cobc/typeck.c:13475 cobc/typeck.c:13543 #, c-format msgid "cannot change address of '%s', which is not level 1 or 77" msgstr "" -#: cobc/typeck.c:12721 +#: cobc/typeck.c:13500 #, fuzzy, c-format #| msgid "SET targets must be PROGRAM-POINTER" msgid "SET target '%s' is not a POINTER for FCD" msgstr "SET doelen moeten PROGRAM-POINTER zijn" -#: cobc/typeck.c:12789 +#: cobc/typeck.c:13569 #, c-format msgid "SET target '%s' is not a POINTER for FCD-KEYDEF" msgstr "" -#: cobc/typeck.c:12882 +#: cobc/typeck.c:13663 #, fuzzy msgid "field does not have a FALSE clause" msgstr "Veld heeft geen FALSE clausule" -#: cobc/typeck.c:12913 +#: cobc/typeck.c:13694 msgid "THREAD-priority must be between 1 and 32767" msgstr "" -#: cobc/typeck.c:12933 +#: cobc/typeck.c:13714 msgid "SET ATTRIBUTE requires a screen item as subject" msgstr "SET ATTRIBUTE vereist een screen item als onderwerp" -#: cobc/typeck.c:12939 +#: cobc/typeck.c:13720 msgid "SET ATTRIBUTE subject does not refer to a screen item" msgstr "SET ATTRIBUTE onderwerp verwijst niet naar een screen item" -#: cobc/typeck.c:12990 -#, fuzzy -msgid "invalid SORT filename" -msgstr "Ongeldige SORT bestandsnaam" - -#: cobc/typeck.c:13051 -#, fuzzy -msgid "invalid SORT USING parameter" -msgstr "Ongeldige SORT USING parameter" - -#: cobc/typeck.c:13080 -#, fuzzy -msgid "invalid SORT GIVING parameter" -msgstr "Ongeldige SORT GIVING parameter" +#: cobc/typeck.c:13835 cobc/typeck.c:13875 +#, fuzzy, c-format +msgid "invalid %s parameter" +msgstr "Ongeldige %s parameter" -#: cobc/typeck.c:13134 cobc/typeck.c:13161 cobc/typeck.c:13181 +#: cobc/typeck.c:13940 cobc/typeck.c:13967 cobc/typeck.c:13987 #, fuzzy msgid "invalid key item" msgstr "Ongeldig key item" -#: cobc/typeck.c:13211 +#: cobc/typeck.c:14017 msgid "LENGTH/SIZE clause only allowed on INDEXED files" msgstr "LENGTH/SIZE clausule alleen mogelijk bij INDEXED bestanden" -#: cobc/typeck.c:13216 +#: cobc/typeck.c:14022 msgid "START not allowed with ACCESS MODE RANDOM" msgstr "START niet toegestaan bij ACCESS MODE RANDOM" -#: cobc/typeck.c:13305 -#, c-format -msgid "%s item '%s' must be numeric and an integer" -msgstr "" - -#: cobc/typeck.c:13311 +#: cobc/typeck.c:14111 cobc/typeck.c:14117 #, fuzzy, c-format msgid "%s item '%s' must be an integer" msgstr "'%s' is geen heel getal" -#: cobc/typeck.c:13315 +#: cobc/typeck.c:14121 #, c-format msgid "%s item '%s' may not have PICTURE with P in it" msgstr "" -#: cobc/typeck.c:13331 +#: cobc/typeck.c:14137 #, fuzzy, c-format msgid "'%s' is not an elementary item" msgstr "'%s' is geen report naam" -#: cobc/typeck.c:13407 +#: cobc/typeck.c:14213 #, fuzzy #| msgid "RETURNING item must have level 01 or 77" msgid "STRING items must be all NATIONAL or none" msgstr "RETURNING item moet nivo 01 of 77 zijn" -#: cobc/typeck.c:13555 +#: cobc/typeck.c:14361 msgid "LOCK clause invalid here" msgstr "LOCK clausule ongeldig hier" -#: cobc/typeck.c:13800 +#: cobc/typeck.c:14606 msgid "data item is not part of a report" msgstr "" -#: cobc/typeck.c:13820 +#: cobc/typeck.c:14626 msgid "improper use of SUPPRESS PRINTING" msgstr "" -#: cobc/typeck.c:13835 +#: cobc/typeck.c:14642 #, fuzzy, c-format msgid "%s must be alphanumeric or national" msgstr "'%s' is geen numerieke waarde" -#: cobc/typeck.c:13846 +#: cobc/typeck.c:14652 #, c-format msgid "%s may not be a figurative constant" msgstr "" -#: cobc/typeck.c:13885 +#: cobc/typeck.c:14690 #, c-format msgid "%s must be a child of the input record" msgstr "" -#: cobc/typeck.c:13911 +#: cobc/typeck.c:14715 #, c-format msgid "%s may not be an ignored item in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:13922 +#: cobc/typeck.c:14725 #, c-format msgid "%s must be elementary" msgstr "" -#: cobc/typeck.c:13935 +#: cobc/typeck.c:14737 #, c-format msgid "STRING item '%s' must be USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/typeck.c:13947 +#: cobc/typeck.c:14749 #, fuzzy, c-format msgid "%s must be USAGE DISPLAY or NATIONAL" msgstr "'%s' is niet in LINKAGE SECTION" -#: cobc/typeck.c:13961 +#: cobc/typeck.c:14761 #, fuzzy, c-format msgid "%s must be an integer" msgstr "'%s' is geen heel getal" -#: cobc/typeck.c:13977 cobc/typeck.c:13983 +#: cobc/typeck.c:14776 cobc/typeck.c:14782 msgid "JSON/XML GENERATE receiving item" msgstr "" -#: cobc/typeck.c:13980 +#: cobc/typeck.c:14779 msgid "JSON/XML GENERATE receiving item may not have JUSTIFIED clause" msgstr "" -#: cobc/typeck.c:14068 +#: cobc/typeck.c:14867 #, fuzzy #| msgid "'%s' cannot be reference modified" msgid "JSON/XML GENERATE input record may not be reference modified" msgstr "'%s' accepteert geen verwijzingsmodificatie" -#: cobc/typeck.c:14074 +#: cobc/typeck.c:14873 msgid "JSON/XML GENERATE input record may not have RENAMES clause" msgstr "" -#: cobc/typeck.c:14079 +#: cobc/typeck.c:14878 #, c-format msgid "all the children of '%s' are ignored in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14086 +#: cobc/typeck.c:14885 msgid "JSON/XML GENERATE input record has subrecords with non-unique names" msgstr "" -#: cobc/typeck.c:14091 +#: cobc/typeck.c:14890 msgid "floating-point items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14095 +#: cobc/typeck.c:14894 msgid "OCCURS items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14142 +#: cobc/typeck.c:14941 msgid "NAMESPACE must be a valid URI" msgstr "" -#: cobc/typeck.c:14186 +#: cobc/typeck.c:14985 msgid "NAMESPACE-PREFIX must be a valid XML name" msgstr "" -#: cobc/typeck.c:14215 cobc/typeck.c:14223 +#: cobc/typeck.c:15014 cobc/typeck.c:15022 msgid "NAME OF item" msgstr "" -#: cobc/typeck.c:14220 +#: cobc/typeck.c:15019 msgid "NAME OF item must be the input record or a child of it" msgstr "" -#: cobc/typeck.c:14230 +#: cobc/typeck.c:15029 msgid "NAME OF ... OMITTED only valid for source identifier" msgstr "" -#: cobc/typeck.c:14238 +#: cobc/typeck.c:15037 #, c-format msgid "NAME OF literal must be a valid %s identifier" msgstr "" -#: cobc/typeck.c:14265 cobc/typeck.c:14266 cobc/typeck.c:14269 -#: cobc/typeck.c:14273 +#: cobc/typeck.c:15062 cobc/typeck.c:15063 cobc/typeck.c:15066 +#: cobc/typeck.c:15070 msgid "TYPE OF item" msgstr "" -#: cobc/typeck.c:14291 +#: cobc/typeck.c:15088 msgid "SUPPRESS WHEN SPACE item" msgstr "" -#: cobc/typeck.c:14294 +#: cobc/typeck.c:15091 msgid "SUPPRESS WHEN LOW-VALUE item" msgstr "" -#: cobc/typeck.c:14296 +#: cobc/typeck.c:15093 msgid "SUPPRESS WHEN HIGH-VALUE item" msgstr "" -#: cobc/typeck.c:14325 cobc/typeck.c:14333 cobc/typeck.c:14337 +#: cobc/typeck.c:15122 cobc/typeck.c:15130 cobc/typeck.c:15134 msgid "SUPPRESS item" msgstr "" -#: cobc/typeck.c:14329 +#: cobc/typeck.c:15126 #, fuzzy msgid "SUPPRESS item with WHEN clause" msgstr "Waarschuw bij EXTERNAL item met VALUE clausule" -#: cobc/typeck.c:14407 +#: cobc/typeck.c:15204 msgid "WITH ATTRIBUTES specified, but no attributes can be generated" msgstr "" @@ -6377,180 +6477,194 @@ msgid " -Wparentheses warn if parentheses are omitted around AND within msgstr "Waarschuw bij ontbrekende haken rond AND binnen OR" #: cobc/warning.def:70 -msgid " -Wstrict-typing warn strictly about type mismatch" +msgid " -Wstrict-typing warn strictly about type mismatch, even when same size" msgstr "" #: cobc/warning.def:73 -msgid " -Wimplicit-define warn whenever data items are implicitly defined" +msgid " -Wtyping warn about type mismatch" msgstr "" #: cobc/warning.def:76 +msgid " -Wimplicit-define warn whenever data items are implicitly defined" +msgstr "" + +#: cobc/warning.def:79 #, fuzzy msgid " -Wno-corresponding do not warn about CORRESPONDING with no matching items" msgstr "Waarschuw bij CORRESPONDING met geen bijbehorende items" -#: cobc/warning.def:79 +#: cobc/warning.def:82 #, fuzzy msgid " -Winitial-value warn if initial VALUE clause is ignored" msgstr "Eerste VALUE clausule genegeerd voor EXTERNAL item" -#: cobc/warning.def:82 +#: cobc/warning.def:85 msgid " -Wprototypes warn about missing FUNCTION prototypes/definitions" msgstr "" -#: cobc/warning.def:85 +#: cobc/warning.def:88 msgid " -Warithmetic-osvs warn if arithmetic expression precision has changed" msgstr "" -#: cobc/warning.def:88 +#: cobc/warning.def:91 #, fuzzy msgid " -Wcall-params warn about non 01/77 items for CALL parameters" msgstr "Waarschuw bij niet 01/77 items als CALL parameter" -#: cobc/warning.def:91 +#: cobc/warning.def:94 msgid " -Wconstant-expression warn about expressions that always resolve to true/false" msgstr "" -#: cobc/warning.def:94 +#: cobc/warning.def:97 msgid " -Wconstant-numlit-expression\twarn about numeric expressions that always resolve to true/false" msgstr "" -#: cobc/warning.def:97 +#: cobc/warning.def:100 msgid " -Wlarger-01-redefines warn about larger redefines allowed by COBOL standards" msgstr "" -#: cobc/warning.def:100 +#: cobc/warning.def:103 #, fuzzy msgid " -Wcolumn-overflow warn about text after program-text area, FIXED format" msgstr "Waarschuw bij text na kolom 72, FIXED formaat" -#: cobc/warning.def:103 +#: cobc/warning.def:106 #, fuzzy msgid " -Wterminator warn about lack of scope terminator END-XXX" msgstr "Waarschuw bij ontbreken van scope terminator END-XXX" -#: cobc/warning.def:106 +#: cobc/warning.def:109 #, fuzzy msgid " -Wlinkage warn about dangling LINKAGE items" msgstr "Waarschuw bij zwevende LINKAGE items" -#: cobc/warning.def:109 +#: cobc/warning.def:112 msgid " -Wunreachable warn about likely unreachable statements" msgstr "" -#: cobc/warning.def:112 +#: cobc/warning.def:115 msgid " -Wno-dialect do not warn about dialect specific issues" msgstr "" -#: cobc/warning.def:115 +#: cobc/warning.def:118 msgid " -Wno-goto-section do not warn about GO TO section-name" msgstr "" -#: cobc/warning.def:118 +#: cobc/warning.def:121 msgid " -Wgoto-different-section\twarn about GO TO a praragraph defined in a different section" msgstr "" -#: cobc/warning.def:121 +#: cobc/warning.def:124 msgid " -Wsuspicious-perform-thru\twarn if PERFORM THRU references procedures not in ascending order or multiple sections" msgstr "" -#: cobc/warning.def:124 +#: cobc/warning.def:127 msgid " -Wdangling-text warn about source text after program-area" msgstr "" -#: cobc/warning.def:127 +#: cobc/warning.def:130 msgid " -Wno-missing-newline do not warn about missing newlines" msgstr "" -#: cobc/warning.def:130 +#: cobc/warning.def:133 msgid " -Wno-others do not warn about different issues" msgstr "" -#: cobc/warning.def:133 +#: cobc/warning.def:136 msgid " -Wno-unsupported do not warn if runtime does not support a feature used" msgstr "" -#: libcob/call.c:94 +#: libcob/call.c:98 #, c-format msgid "LoadLibrary/GetProcAddress error %d" msgstr "LoadLibrary/GetProcAddress fout %d" -#: libcob/call.c:841 +#: libcob/call.c:626 +#, c-format +msgid "preloading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:817 #, fuzzy, c-format #| msgid "PROGRAM name exceeds 31 characters" msgid "%s: PROGRAM name exceeds %d characters" msgstr "PROGRAM naam overschrijdt 31 karakters" -#: libcob/call.c:842 +#: libcob/call.c:818 #, fuzzy, c-format #| msgid "PROGRAM name exceeds 31 characters" msgid "%s: FUNCTION name exceeds %d characters" msgstr "PROGRAM naam overschrijdt 31 karakters" -#: libcob/call.c:1067 +#: libcob/call.c:945 libcob/call.c:978 +#, c-format +msgid "loading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:1049 #, fuzzy msgid "indeterminable error in resolve of COBOL CALL" msgstr "Onbepaalbare fout" -#: libcob/call.c:1149 +#: libcob/call.c:1145 #, fuzzy, c-format msgid "user-defined FUNCTION '%s' not found" msgstr "User FUNCTION '%s' niet gevonden" -#: libcob/call.c:1239 libcob/call.c:1325 libcob/call.c:1445 libcob/call.c:1472 +#: libcob/call.c:1247 libcob/call.c:1328 libcob/call.c:1448 libcob/call.c:1475 #, c-format msgid "NULL parameter passed to '%s'" msgstr "NULL parameter doorgegeven aan '%s'" -#: libcob/call.c:1329 +#: libcob/call.c:1332 #, fuzzy, c-format msgid "invalid number of arguments passed to '%s'" msgstr "Ongeldig aantal argumenten voor %s'" -#: libcob/call.c:1449 +#: libcob/call.c:1452 #, fuzzy msgid "multiple call to 'cob_setjmp'" msgstr "Meerdere aanroepen van 'cob_setjmp'" -#: libcob/call.c:1476 +#: libcob/call.c:1479 #, fuzzy msgid "call to 'cob_longjmp' with no prior 'cob_setjmp'" msgstr "Aanroep van 'cob_longjmp' zonder voorafgaande 'cob_setjmp'" -#: libcob/call.c:1703 libcob/call.c:1730 libcob/common.c:8144 +#: libcob/call.c:1608 +#, c-format +msgid "preloading of '%s' failed" +msgstr "" + +#: libcob/call.c:1706 libcob/call.c:1733 libcob/common.c:8965 msgid "cob_init() has not been called" msgstr "cob_init() is niet aangeroepen" -#: libcob/call.c:1709 +#: libcob/call.c:1712 #, c-format msgid "parameter %d is not within range of %d" msgstr "" -#: libcob/call.c:1715 +#: libcob/call.c:1718 #, fuzzy, c-format msgid "parameter %d is NULL" msgstr "NULL parameter doorgegeven aan '%s'" -#: libcob/call.c:2042 +#: libcob/call.c:2045 msgid "NULL field" msgstr "" -#: libcob/call.c:2050 +#: libcob/call.c:2053 #, fuzzy msgid "field not allocated" msgstr "Bestand nog niet geopend" -#: libcob/call.c:2116 +#: libcob/call.c:2119 #, c-format msgid "attempt to over-write constant field with '%s'" msgstr "" -#: libcob/call.c:2156 libcob/call.c:2212 -#, c-format -msgid "attempt to over-write constant parameter %d with " -msgstr "" - -#: libcob/call.c:2263 +#: libcob/call.c:2161 libcob/call.c:2219 libcob/call.c:2270 #, c-format msgid "attempt to over-write constant parameter %d with '%s'" msgstr "" @@ -6590,705 +6704,728 @@ msgstr "%s: ongeldige optie -- %c\n" msgid "%s: option requires an argument -- '%c'" msgstr "%s: optie verwacht een argument -- %c\n" -#: libcob/common.c:1242 +#: libcob/common.c:1074 +#, c-format +msgid "requested coredump creation failed with status %d" +msgstr "" + +#: libcob/common.c:1303 msgid "fatal arithmetic error" msgstr "" -#: libcob/common.c:1245 +#: libcob/common.c:1306 msgid "interrupt from keyboard" msgstr "" -#: libcob/common.c:1249 +#: libcob/common.c:1310 msgid "hangup" msgstr "" -#: libcob/common.c:1253 +#: libcob/common.c:1314 msgid "quit" msgstr "" -#: libcob/common.c:1257 +#: libcob/common.c:1318 #, fuzzy msgid "termination" msgstr "Herdefinitie van '%s'" -#: libcob/common.c:1261 +#: libcob/common.c:1322 msgid "emt termination" msgstr "" -#: libcob/common.c:1265 +#: libcob/common.c:1326 msgid "broken pipe" msgstr "" -#: libcob/common.c:1269 +#: libcob/common.c:1330 msgid "I/O signal" msgstr "" -#: libcob/common.c:1273 +#: libcob/common.c:1334 #, fuzzy msgid "attempt to reference invalid memory address" msgstr "Poging om te verwijzen naar niet toegewezen geheugen" -#: libcob/common.c:1277 +#: libcob/common.c:1338 #, fuzzy msgid "bus error" msgstr "Fout: " -#: libcob/common.c:1281 +#: libcob/common.c:1342 msgid "illegal instruction" msgstr "" -#: libcob/common.c:1285 +#: libcob/common.c:1346 msgid "abort" msgstr "" -#: libcob/common.c:1289 +#: libcob/common.c:1350 msgid "process killed" msgstr "" -#: libcob/common.c:1293 +#: libcob/common.c:1354 msgid "alarm signal" msgstr "" -#: libcob/common.c:1297 +#: libcob/common.c:1358 #, fuzzy msgid "stop process" msgstr "Voorverwerking:" -#: libcob/common.c:1301 libcob/common.c:1305 +#: libcob/common.c:1362 libcob/common.c:1366 msgid "child process stopped" msgstr "" #. TRANSLATORS: This msgid is used for an OS signal like SIGABRT. -#: libcob/common.c:1312 +#: libcob/common.c:1373 msgid "signal" msgstr "" #. TRANSLATORS: This msgid is shown for a requested but not complete stack trace. -#: libcob/common.c:1314 +#: libcob/common.c:1375 msgid "(more COBOL runtime elements follow...)" msgstr "" -#: libcob/common.c:1316 libcob/common.c:8101 +#: libcob/common.c:1377 libcob/common.c:8922 #, fuzzy, c-format msgid "abnormal termination - file contents may be incorrect" msgstr "Abnormaal einde - Bestandsinhoud kan incorrect zijn" -#: libcob/common.c:3145 libcob/common.c:8581 libcob/common.c:8595 +#: libcob/common.c:3441 libcob/common.c:9398 libcob/common.c:9412 #, fuzzy msgid "version mismatch" msgstr "Fout - Versie conflict" -#: libcob/common.c:3146 libcob/common.c:3148 libcob/common.c:8582 -#: libcob/common.c:8584 +#: libcob/common.c:3442 libcob/common.c:3444 libcob/common.c:9399 +#: libcob/common.c:9401 #, fuzzy, c-format #| msgid "%s has version/patch level %s/%d" msgid "%s has version %s.%d" msgstr "%s heeft versie/patch nivo %s/%d" -#: libcob/common.c:3158 +#: libcob/common.c:3454 #, fuzzy, c-format #| msgid "CALL to %s requires %d parameters" msgid "CALL to %s requires %d arguments" msgstr "CALL naar %s vereist %d parameters" -#: libcob/common.c:3779 +#: libcob/common.c:4141 #, c-format msgid "code execution leaving %s" msgstr "" -#: libcob/common.c:3789 +#: libcob/common.c:4151 #, fuzzy, c-format msgid "BASED/LINKAGE item %s has NULL address" msgstr "BASED/LINKAGE item '%s' heeft een NULL adres" -#: libcob/common.c:3802 libcob/common.c:3806 +#: libcob/common.c:4168 +#, c-format +msgid "memory violation detected for '%s' after %s" +msgstr "" + +#: libcob/common.c:4171 +#, c-format +msgid "memory violation detected after %s" +msgstr "" + +#: libcob/common.c:4229 libcob/common.c:4244 libcob/common.c:4283 +#: libcob/common.c:4287 #, c-format msgid "LINKAGE item %s not passed by caller" msgstr "" -#: libcob/common.c:3892 +#: libcob/common.c:4253 +#, c-format +msgid "LINKAGE item %s (size %lu) too small in the caller (size %lu)" +msgstr "" + +#: libcob/common.c:4378 #, fuzzy, c-format #| msgid "'%s' not numeric: '%s'" msgid "'%s' (Type: %s) not numeric: '%s'" msgstr "'%s' niet numeriek: '%s'" -#: libcob/common.c:3917 +#: libcob/common.c:4403 #, c-format msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgstr "OCCURS DEPENDING ON '%s' buiten grens: %d" -#: libcob/common.c:3920 libcob/common.c:3958 +#: libcob/common.c:4406 libcob/common.c:4444 #, fuzzy, c-format msgid "maximum subscript for '%s': %d" msgstr "Index van '%s' buiten grens: %d" -#: libcob/common.c:3922 +#: libcob/common.c:4408 #, fuzzy, c-format msgid "minimum subscript for '%s': %d" msgstr "Index van '%s' buiten grens: %d" -#: libcob/common.c:3955 +#: libcob/common.c:4441 #, c-format msgid "current maximum subscript for '%s': %d" msgstr "" -#: libcob/common.c:3979 +#: libcob/common.c:4465 #, fuzzy, c-format msgid "offset of '%s' out of bounds: %d, maximum: %d" msgstr "Start positie van '%s' buiten grens: %d" -#: libcob/common.c:3994 +#: libcob/common.c:4480 #, fuzzy, c-format msgid "length of '%s' out of bounds: %d, maximum: %d" msgstr "Lengte van '%s' buiten grens: %d" -#: libcob/common.c:4005 +#: libcob/common.c:4491 #, fuzzy, c-format msgid "length of '%s' out of bounds: %d, starting at: %d, maximum: %d" msgstr "Lengte van '%s' buiten grens: %d" -#: libcob/common.c:4093 libcob/common.c:4098 +#: libcob/common.c:4579 libcob/common.c:4584 #, c-format msgid "EXTERNAL item '%s' previously allocated with size %d, requested size is %d" msgstr "EXTERNAL item '%s' eerder gemaakt met grootte %d, gevraagde grootte is %d" -#: libcob/common.c:4593 +#: libcob/common.c:4961 libcob/common.c:5201 #, c-format msgid "COB_CURRENT_DATE '%s' is invalid" msgstr "" -#: libcob/common.c:5641 libcob/common.c:5644 +#: libcob/common.c:6321 libcob/common.c:6324 msgid "Program abandoned at user request" msgstr "" -#: libcob/common.c:5668 +#: libcob/common.c:6348 #, fuzzy, c-format msgid "parameter to SYSTEM call is larger than %d characters" msgstr "Parameter voor SYSTEM call is groter dan 8192 karakters" -#: libcob/common.c:6202 +#: libcob/common.c:6998 #, c-format msgid "error '%s' during CBL_GC_FORK" msgstr "" -#: libcob/common.c:6207 libcob/common.c:6304 +#: libcob/common.c:7003 libcob/common.c:7100 #, fuzzy, c-format msgid "'%s' is not supported on this platform" msgstr "'%s' niet ondersteund" -#: libcob/common.c:6233 +#: libcob/common.c:7029 #, c-format msgid "error '%s' for P%d during CBL_GC_WAITPID" msgstr "" -#: libcob/common.c:6424 -msgid "Call to CBL_GC_GETOPT with wrong longoption size." +#: libcob/common.c:7220 +msgid "call to CBL_GC_GETOPT with wrong longoption size" msgstr "" -#: libcob/common.c:6429 -msgid "Call to CBL_GC_GETOPT with missing longind." +#: libcob/common.c:7225 +msgid "call to CBL_GC_GETOPT with missing longind" msgstr "" -#: libcob/common.c:6856 libcob/common.c:6877 libcob/common.c:6890 -#: libcob/common.c:9107 libcob/common.c:9111 +#: libcob/common.c:7654 libcob/common.c:7675 libcob/common.c:7688 +#: libcob/common.c:9924 libcob/common.c:9928 #, c-format msgid "(default)" msgstr "" -#: libcob/common.c:7143 libcob/common.c:7162 +#: libcob/common.c:7973 libcob/common.c:7992 msgid "should be unsigned" msgstr "" -#: libcob/common.c:7151 libcob/common.c:7200 +#: libcob/common.c:7981 libcob/common.c:8030 msgid "should be numeric" msgstr "" -#: libcob/common.c:7209 +#: libcob/common.c:8039 #, c-format msgid "minimum value: %lu" msgstr "" -#: libcob/common.c:7261 libcob/common.c:7825 libcob/common.c:7839 +#: libcob/common.c:8069 libcob/common.c:8640 libcob/common.c:8654 +#: bin/cobcrun.c:206 #, c-format msgid "should not contain '%c'" msgstr "" -#: libcob/common.c:7342 libcob/common.c:7390 libcob/common.c:7418 -#: libcob/common.c:7427 libcob/common.c:7435 libcob/common.c:7460 +#: libcob/common.c:8150 libcob/common.c:8169 libcob/common.c:8231 +#: libcob/common.c:8240 libcob/common.c:8248 libcob/common.c:8273 #, c-format msgid "not set" msgstr "" -#: libcob/common.c:7410 libcob/common.c:7413 libcob/common.c:7416 +#: libcob/common.c:8223 libcob/common.c:8226 libcob/common.c:8229 #, c-format msgid "set by %s" msgstr "" -#: libcob/common.c:7552 +#: libcob/common.c:8367 #, c-format msgid "WARNING - '%s' without a value - ignored!" msgstr "" -#: libcob/common.c:7555 +#: libcob/common.c:8370 #, fuzzy, c-format msgid "'%s' without a value!" msgstr "'%s' is geen numerieke waarde" -#: libcob/common.c:7582 +#: libcob/common.c:8397 #, c-format msgid "WARNING - '%s %s' without a value - ignored!" msgstr "" -#: libcob/common.c:8085 +#: libcob/common.c:8906 #, fuzzy msgid "error" msgstr "Fout: " -#: libcob/common.c:8127 +#: libcob/common.c:8948 #, fuzzy msgid "attempt to CANCEL active program" msgstr "CANCEL poging op een actief programma" -#: libcob/common.c:8154 +#: libcob/common.c:8975 msgid "CALL of program with CHAINING clause" msgstr "" -#: libcob/common.c:8158 +#: libcob/common.c:8979 #, fuzzy msgid "stack overflow, possible PERFORM depth exceeded" msgstr "Stack overloop, mogelijke PERFORM diepte overschrijding" -#: libcob/common.c:8163 +#: libcob/common.c:8984 #, fuzzy msgid "invalid entry/exit in GLOBAL USE procedure" msgstr "Ongeldige entry/exit in GLOBAL USE procedure" -#: libcob/common.c:8167 +#: libcob/common.c:8988 #, fuzzy msgid "unable to allocate memory" msgstr "Onmogelijk om geheugen te verkrijgen" -#: libcob/common.c:8172 +#: libcob/common.c:8993 #, fuzzy msgid "invalid entry into module" msgstr "ongeldige ingang in module" -#: libcob/common.c:8179 +#: libcob/common.c:9000 #, c-format msgid "recursive CALL from '%s' to '%s' which is NOT RECURSIVE" msgstr "" -#: libcob/common.c:8184 +#: libcob/common.c:9005 #, fuzzy, c-format msgid "invalid recursive COBOL CALL to '%s'" msgstr "Ongeldige recursieve COBOL CALL" -#: libcob/common.c:8199 +#: libcob/common.c:9020 #, fuzzy msgid "end of file" msgstr "Einde bestand" -#: libcob/common.c:8202 +#: libcob/common.c:9023 #, fuzzy msgid "key out of range" msgstr "Key buiten bereik" -#: libcob/common.c:8205 +#: libcob/common.c:9026 #, fuzzy msgid "key order not ascending" msgstr "Key volgorde niet oplopend" -#: libcob/common.c:8208 +#: libcob/common.c:9029 #, fuzzy msgid "record key already exists" msgstr "Record key bestaat al" -#: libcob/common.c:8211 +#: libcob/common.c:9032 #, fuzzy msgid "record key does not exist" msgstr "Record key niet aanwezig" -#: libcob/common.c:8214 +#: libcob/common.c:9035 #, fuzzy msgid "permanent file error" msgstr "Permanente bestands fout" -#: libcob/common.c:8217 +#: libcob/common.c:9038 #, fuzzy msgid "inconsistent file name" msgstr "Ongeldige regel voortzetting" -#: libcob/common.c:8220 +#: libcob/common.c:9041 #, fuzzy msgid "file does not exist" msgstr "Bestand niet aanwezig" -#: libcob/common.c:8223 +#: libcob/common.c:9044 #, fuzzy msgid "permission denied" msgstr "Toestemming geweigerd" -#: libcob/common.c:8226 +#: libcob/common.c:9047 msgid "mismatch of fixed file attributes" msgstr "" -#: libcob/common.c:8229 +#: libcob/common.c:9050 #, fuzzy msgid "file already open" msgstr "Bestand is al geopend" -#: libcob/common.c:8232 +#: libcob/common.c:9053 #, fuzzy msgid "file not open" msgstr "Bestand nog niet geopend" -#: libcob/common.c:8235 +#: libcob/common.c:9056 msgid "READ must be executed first" msgstr "READ moet eerst worden uitgevoerd" -#: libcob/common.c:8238 +#: libcob/common.c:9059 #, fuzzy msgid "record overflow" msgstr "Record overflow" -#: libcob/common.c:8241 +#: libcob/common.c:9062 msgid "READ after unsuccessful READ/START" msgstr "" -#: libcob/common.c:8244 +#: libcob/common.c:9065 #, fuzzy msgid "READ/START not allowed, file not open for input" msgstr "READ/START niet toegestaan" -#: libcob/common.c:8247 +#: libcob/common.c:9068 msgid "WRITE not allowed, file not open for output" msgstr "" -#: libcob/common.c:8250 +#: libcob/common.c:9071 #, fuzzy msgid "DELETE/REWRITE not allowed, file not open for I-O" msgstr "DELETE/REWRITE niet toegestaan" -#: libcob/common.c:8253 +#: libcob/common.c:9074 #, fuzzy msgid "record locked by another file connector" msgstr "Record geblokkeerd door een andere bestands connector" -#: libcob/common.c:8256 +#: libcob/common.c:9077 msgid "LINAGE values invalid" msgstr "LINAGE waarden ongeldig" -#: libcob/common.c:8259 +#: libcob/common.c:9080 #, fuzzy msgid "file sharing conflict" msgstr "Bestands deling conflict" -#: libcob/common.c:8262 +#: libcob/common.c:9083 #, fuzzy #| msgid "Operation not allowed on LINE SEQUENTIAL files" msgid "invalid data in LINE SEQUENTIAL file" msgstr "Operatie niet toegestaan bij LINE SEQUENTIAL bestanden" -#: libcob/common.c:8266 +#: libcob/common.c:9087 #, fuzzy msgid "runtime library is not configured for this operation" msgstr "Runtime library is niet geconfigureerd voor deze operatie" -#: libcob/common.c:8271 +#: libcob/common.c:9092 #, fuzzy msgid "unknown file error" msgstr "Onbekende bestands fout" -#: libcob/common.c:8278 +#: libcob/common.c:9099 #, fuzzy, c-format msgid "%s (status = %02d) for file %s" msgstr "%s (Status = %02d) Bestand : '%s'" -#: libcob/common.c:8281 +#: libcob/common.c:9102 #, fuzzy, c-format msgid "%s (status = %02d) for file %s on %s" msgstr "%s (Status = %02d) Bestand : '%s'" -#: libcob/common.c:8288 +#: libcob/common.c:9109 #, fuzzy msgid "attempt to use non-implemented function" msgstr "Poging om een niet geïmplementeerde functie te gebruiken" -#: libcob/common.c:8291 +#: libcob/common.c:9112 #, fuzzy msgid "attempt to use non-implemented XML I/O" msgstr "Poging om een niet geïmplementeerde functie te gebruiken" -#: libcob/common.c:8294 +#: libcob/common.c:9115 #, fuzzy msgid "attempt to use non-implemented JSON I/O" msgstr "Poging om een niet geïmplementeerde functie te gebruiken" -#: libcob/common.c:8341 +#: libcob/common.c:9162 msgid "environment variables" msgstr "" -#: libcob/common.c:8466 libcob/common.c:8539 libcob/common.c:8554 -#: libcob/common.c:8859 libcob/common.c:8893 libcob/common.c:8910 -#: libcob/common.c:8925 +#: libcob/common.c:9283 libcob/common.c:9356 libcob/common.c:9371 +#: libcob/common.c:9676 libcob/common.c:9710 libcob/common.c:9727 +#: libcob/common.c:9742 #, fuzzy, c-format #| msgid "C version %s%s" msgid "%s, version %d.%d.%d" msgstr "C versie %s%s" -#: libcob/common.c:8468 libcob/common.c:8541 libcob/common.c:8558 -#: libcob/common.c:8862 libcob/common.c:8913 libcob/common.c:8928 +#: libcob/common.c:9285 libcob/common.c:9358 libcob/common.c:9375 +#: libcob/common.c:9679 libcob/common.c:9730 libcob/common.c:9745 #, c-format msgid "%s, version %d.%d.%d (compiled with %d.%d)" msgstr "" -#: libcob/common.c:8471 +#: libcob/common.c:9288 #, fuzzy, c-format #| msgid "C version %s%s" msgid "%s, version %s" msgstr "C versie %s%s" -#: libcob/common.c:8739 +#: libcob/common.c:9556 #, c-format msgid "License LGPLv3+: GNU LGPL version 3 or later <%s>" msgstr "" -#: libcob/common.c:8803 libcob/common.c:8805 +#: libcob/common.c:9620 libcob/common.c:9622 #, fuzzy msgid "dynamic loading" msgstr "Dynamisch laden" -#: libcob/common.c:8938 +#: libcob/common.c:9755 msgid "mouse support" msgstr "" -#: libcob/common.c:8955 +#: libcob/common.c:9772 #, fuzzy msgid "CALL configuration" msgstr "GNU Cobol Bouw omgeving" -#: libcob/common.c:8956 +#: libcob/common.c:9773 #, fuzzy msgid "File I/O configuration" msgstr "GNU Cobol Bouw omgeving" -#: libcob/common.c:8957 +#: libcob/common.c:9774 #, fuzzy msgid "Screen I/O configuration" msgstr "GNU Cobol Bouw omgeving" -#: libcob/common.c:8958 +#: libcob/common.c:9775 msgid "Miscellaneous" msgstr "" -#: libcob/common.c:8959 +#: libcob/common.c:9776 #, fuzzy msgid "System configuration" msgstr "GNU Cobol Bouw omgeving" -#: libcob/common.c:8963 +#: libcob/common.c:9780 #, fuzzy msgid "runtime configuration" msgstr "GNU Cobol Bouw omgeving" -#: libcob/common.c:8965 +#: libcob/common.c:9782 msgid "via" msgstr "" -#: libcob/common.c:9040 libcob/common.c:9068 +#: libcob/common.c:9857 libcob/common.c:9885 msgid "... removed from environment" msgstr "" -#: libcob/common.c:9094 libcob/common.c:9096 +#: libcob/common.c:9911 libcob/common.c:9913 #, c-format msgid "(set by %s)" msgstr "" -#: libcob/common.c:9104 +#: libcob/common.c:9921 #, c-format msgid "(reset)" msgstr "" -#: libcob/common.c:9334 +#: libcob/common.c:10151 msgid "compiler was not built with --enable-debug-log; COB_DEBUG_LOG ignored" msgstr "" -#: libcob/common.c:9524 libcob/common.c:9550 +#: libcob/common.c:10338 libcob/common.c:10364 #, c-format msgid "%s called with unknown option: %d" msgstr "" #. TRANSLATORS: This msgid is shown for a requested but empty stack trace. -#: libcob/common.c:9597 +#: libcob/common.c:10411 #, fuzzy msgid "No COBOL runtime elements on stack." msgstr "'cobcommandline' - Runtime is niet geïnitialiseerd" -#: libcob/common.c:9915 +#: libcob/common.c:10734 #, c-format msgid "Module dump due to %s" msgstr "" -#: libcob/common.c:9943 +#: libcob/common.c:10762 #, c-format msgid "Dump Program-Id %s from %s compiled %s" msgstr "" -#: libcob/common.c:9969 +#: libcob/common.c:10788 #, c-format msgid "dump written to %s" msgstr "" -#: libcob/fileio.c:816 libcob/fileio.c:1628 libcob/fileio.c:1882 -#: libcob/fileio.c:3812 libcob/fileio.c:4396 libcob/fileio.c:9658 -#: libcob/fileio.c:9686 libcob/numeric.c:1583 +#: libcob/fileio.c:784 libcob/fileio.c:1664 libcob/fileio.c:1926 +#: libcob/fileio.c:3938 libcob/fileio.c:4522 libcob/fileio.c:10049 +#: libcob/fileio.c:10077 libcob/numeric.c:1915 #, fuzzy, c-format msgid "invalid internal call of %s" msgstr "Ongeldige interne case - %u" -#: libcob/fileio.c:3359 +#: libcob/fileio.c:3486 #, c-format msgid "BDB error: %s" msgstr "BDB fout: %s" -#: libcob/fileio.c:3369 +#: libcob/fileio.c:3496 #, c-format msgid "BDB error: %s %s" msgstr "BDB fout: %s %s" -#: libcob/fileio.c:3383 libcob/fileio.c:3403 +#: libcob/fileio.c:3510 libcob/fileio.c:3530 #, fuzzy, c-format msgid "cannot join BDB environment (%s), error: %d %s" msgstr "Kan niet verbinden met BDB omgeving, fout: %d %s" -#: libcob/fileio.c:3458 libcob/fileio.c:3483 libcob/fileio.c:3509 -#: libcob/fileio.c:3528 +#: libcob/fileio.c:3585 libcob/fileio.c:3610 libcob/fileio.c:3636 +#: libcob/fileio.c:3655 #, fuzzy, c-format #| msgid "BDB error: %s %s" msgid "BDB (%s), error: %d %s" msgstr "BDB fout: %s %s" -#: libcob/fileio.c:6071 +#: libcob/fileio.c:6199 #, c-format msgid "ERROR FILE %s has ASSIGN field is NULL" msgstr "" -#: libcob/fileio.c:6862 +#: libcob/fileio.c:7050 #, c-format msgid "call to CBL_OPEN_FILE with wrong access mode: %d" msgstr "" -#: libcob/fileio.c:6946 +#: libcob/fileio.c:7135 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_lock: %d" msgstr "" -#: libcob/fileio.c:6949 +#: libcob/fileio.c:7138 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_dev: %d" msgstr "" -#: libcob/fileio.c:7174 libcob/fileio.c:7457 +#: libcob/fileio.c:7362 libcob/fileio.c:7645 #, fuzzy, c-format msgid "'%s' - File detail area is too short" msgstr "'C$FILEINFO' - Bestandsadministratie geheugen is te klein" -#: libcob/fileio.c:7686 +#: libcob/fileio.c:7871 msgid "SORT is unable to acquire temporary file" msgstr "SORT kan geen tijdelijk bestand maken" #. TRANSLATORS: This msgid is concatenated with a filename; -#. setup translation to allow this to be followed on the right side. -#: libcob/fileio.c:8432 +#. setup translation to allow this to be followed on the right side, +#. if necessary use a colon or hyphen +#: libcob/fileio.c:8777 #, fuzzy msgid "implicit CLOSE of " msgstr "WAARSCHUWING - Impliciete CLOSE van %s ('%s')" -#: libcob/fileio.c:9617 libcob/fileio.c:9752 +#: libcob/fileio.c:10008 libcob/fileio.c:10193 #, c-format msgid "ERROR: EXTFH called with FCD version %d" msgstr "" -#: libcob/fileio.c:9886 +#: libcob/fileio.c:10310 #, fuzzy, c-format #| msgid "REPORT clause with wrong file type" msgid "ERROR: EXTFH called with wrong file organization %d" msgstr "REPORT clausule met incorrect bestandstype" -#: libcob/fileio.c:9893 +#: libcob/fileio.c:10317 #, c-format msgid "ERROR: EXTFH called with no %s pointer" msgstr "" -#: libcob/fileio.c:10029 +#: libcob/fileio.c:10461 #, c-format msgid "ERROR: EXTFH called with no %s pointer; Function %d" msgstr "" -#: libcob/fileio.c:10208 +#: libcob/fileio.c:10683 #, c-format msgid "ERROR: EXTFH called with unknown Function %d" msgstr "" -#: libcob/reportio.c:630 +#: libcob/reportio.c:629 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT %d" msgstr "" -#: libcob/reportio.c:637 libcob/reportio.c:652 +#: libcob/reportio.c:636 libcob/reportio.c:651 #, c-format msgid "INITIATE %s NEXT GROUP %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:645 +#: libcob/reportio.c:644 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:1327 +#: libcob/reportio.c:1336 #, c-format msgid "INITIATE %s was already done" msgstr "" -#: libcob/reportio.c:1343 +#: libcob/reportio.c:1352 #, c-format msgid "INITIATE %s PAGE LIMIT problem" msgstr "" -#: libcob/reportio.c:1420 +#: libcob/reportio.c:1429 #, c-format msgid "TERMINATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1565 +#: libcob/reportio.c:1574 #, c-format msgid "GENERATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1917 +#: libcob/reportio.c:1926 #, c-format msgid "could not find line to SUPPRESS in report %s" msgstr "" -#: libcob/screenio.c:568 +#: libcob/screenio.c:1055 #, fuzzy msgid "failed to initialize curses" msgstr "Kan curses niet initialiseren" -#: libcob/screenio.c:4081 +#: libcob/screenio.c:5034 msgid "end of program, please press a key to exit" msgstr "" -#: libcob/termio.c:78 libcob/termio.c:117 +#: libcob/termio.c:76 libcob/termio.c:136 msgid "(Not representable)" msgstr "(Niet representeerbaar)" -#: libcob/termio.c:354 +#: libcob/termio.c:406 #, c-format msgid "cannot open %s (=%s)" msgstr "" -#: libcob/termio.c:369 +#: libcob/termio.c:421 msgid "COB_DISPLAY_PUNCH_FILE is invalid, output to SYSPUNCH skipped" msgstr "" @@ -7357,32 +7494,22 @@ msgid "" " (COB_LIBRARY_PATH and/or COB_PRELOAD)" msgstr "" -#: bin/cobcrun.c:146 -#, c-format -msgid "GnuCOBOL home page: <%s>" -msgstr "" - -#: bin/cobcrun.c:148 -#, c-format -msgid "General help using GNU software: <%s>" -msgstr "" - -#: bin/cobcrun.c:288 +#: bin/cobcrun.c:286 #, fuzzy msgid "invalid configuration file name" msgstr "Ongeldige regel voortzetting" -#: bin/cobcrun.c:355 +#: bin/cobcrun.c:353 #, fuzzy, c-format msgid "invalid module argument '%s'" msgstr "Ongeldige uitvoer bestandsnaam" -#: bin/cobcrun.c:410 +#: bin/cobcrun.c:408 #, c-format msgid "%s: missing PROGRAM name" msgstr "" -#: bin/cobcrun.c:412 +#: bin/cobcrun.c:410 #, c-format msgid "Try '%s --help' for more information." msgstr "" @@ -7415,14 +7542,14 @@ msgstr "" #~ msgid "invalid parameter -std=%s" #~ msgstr "Ongeldige %s parameter" -#, fuzzy -#~ msgid "invalid option detected" -#~ msgstr "Ongeldige optie gevonden" - #, fuzzy, c-format #~ msgid "unknown option ignored:\t%s" #~ msgstr "Onbekende optie genegeerd:\t%s" +#, fuzzy +#~ msgid "unexpected error_node parameter" +#~ msgstr "Onverwachte error_node parameter" + #, fuzzy, c-format #~ msgid "Invalid type for '%s'" #~ msgstr "Ongeldig type voor '%s'" @@ -7447,6 +7574,10 @@ msgstr "" #~ msgid "only level 88 items may have multiple values" #~ msgstr "Alleen nivo 88 item mag meerdere waarden hebben" +#, c-format +#~ msgid "unexpected USAGE: %d" +#~ msgstr "onbekende USAGE: %d" + #~ msgid "define PERFORM stack size" #~ msgstr "definieer PERFORM stapel grootte" @@ -7496,6 +7627,13 @@ msgstr "" #~ "Genereer trace code\n" #~ "\t\t\t- SECTIE/PARAGRAAF/STATEMENTS uitgevoerd\t\t\t- Ingeschakeld door -debug" +#~ msgid "" +#~ "'*' or '/' in column 1 treated as comment\n" +#~ "\t\t\t- FIXED format only" +#~ msgstr "" +#~ "Zie '*' of '/' in kolom 1 als commentaar\n" +#~ "\t\t\t- Alleen bij vast formaat" + #, fuzzy #~ msgid "check recursive program call" #~ msgstr "Controleer recursieve programma aanroep" @@ -7537,6 +7675,10 @@ msgstr "" #~ msgid "non-negative integer value expected" #~ msgstr "Geheel getal waarde" +#, fuzzy +#~ msgid "invalid CLASS value" +#~ msgstr "Ongeldige CLASS waarde" + #, fuzzy #~ msgid "spurious '$' detected - ignored" #~ msgstr "Valse '$' ontdekt - genegeerd" @@ -7547,10 +7689,22 @@ msgstr "" #~ msgid "Extra (obsolete) context sensitive words" #~ msgstr "Extra (niet meer in gebruik) context gevoelige woorden" +#, c-format +#~ msgid "FUNCTION %s has invalid/not supported arguments - Tag %d" +#~ msgstr "FUNCTION %s heeft ongeldige/niet ondersteunde argumenten - Label %d" + #, fuzzy #~ msgid "invalid literal cast" #~ msgstr "Ongeldige H constante: %s" +#, fuzzy, c-format +#~ msgid "'%s' is not a numeric literal" +#~ msgstr "'%s' is geen numerieke waarde" + +#, fuzzy, c-format +#~ msgid "'%s' is not unsigned" +#~ msgstr "'%s' is niet gedefinieerd" + #, fuzzy, c-format #~ msgid "file '%s': record size (IDX) %d exceeds maximum allowed (%d)" #~ msgstr "Record grootte overschrijdt maximum toegestaan (%d) - Bestand '%s'" @@ -7571,14 +7725,42 @@ msgstr "" #~ msgid "invalid use of HANDLE item" #~ msgstr "Ongeldige gebruik van 88 nivo item" +#, c-format +#~ msgid "'%s' is not a numeric value" +#~ msgstr "'%s' is geen numerieke waarde" + +#, c-format +#~ msgid "'%s' is not an integer value" +#~ msgstr "'%s' is geen heel getal" + #, fuzzy #~ msgid "Variable length item not allowed here" #~ msgstr "Variabele lengte hier niet toegestaan here" +#, c-format +#~ msgid "'%s' is not an alphabet name" +#~ msgstr "'%s' is geen alfabet naam" + #, fuzzy #~ msgid "the CHARACTERS field of ALLOCATE must be numeric" #~ msgstr "Het CHARACTERS veld van ALLOCATE moet numeriek zijn" +#, fuzzy +#~ msgid "invalid destination for MOVE" +#~ msgstr "Ongeldige bestemming voor MOVE" + +#, fuzzy +#~ msgid "invalid SORT filename" +#~ msgstr "Ongeldige SORT bestandsnaam" + +#, fuzzy +#~ msgid "invalid SORT USING parameter" +#~ msgstr "Ongeldige SORT USING parameter" + +#, fuzzy +#~ msgid "invalid SORT GIVING parameter" +#~ msgstr "Ongeldige SORT GIVING parameter" + #, fuzzy #~ msgid "warn incompatible redefinition of data items" #~ msgstr "Waarschuw bij incompatibele herdefinitie van data items" diff --git a/po/pt.po b/po/pt.po index 17f68316e..f7ae5cfe3 100644 --- a/po/pt.po +++ b/po/pt.po @@ -1,5 +1,5 @@ # Portuguese (Portugal) translations for GnuCOBOL package -# Copyright (C) 2002-2020 Free Software Foundation, Inc. +# Copyright (C) 2017 Free Software Foundation, Inc. # This file is distributed under the same license as the GnuCOBOL package. # Mário Matos <matosma.gnucobol@gmail.com>, 2017. # @@ -7,7 +7,7 @@ msgid "" msgstr "" "Project-Id-Version: gnucobol 2.2\n" "Report-Msgid-Bugs-To: gnucobol-messages@gnu.org\n" -"POT-Creation-Date: 2022-10-23 03:06+0200\n" +"POT-Creation-Date: 2023-07-28 19:20+0200\n" "PO-Revision-Date: 2017-05-09 21:17+0200\n" "Last-Translator: Mário Matos <matosma.gnucobol@gmail.com>\n" "Language-Team: Portuguese <translation-team-pt@lists.sourceforge.net>\n" @@ -17,183 +17,187 @@ msgstr "" "Content-Transfer-Encoding: 8bit\n" "X-Generator: Poedit 2.0.1\n" -#: cobc/cobc.c:98 +#: cobc/cobc.c:116 cobc/codegen.c:2655 cobc/scanner.l:1375 #, fuzzy, c-format msgid "invalid parameter: %s" msgstr "parâmetro inválido %s" -#: cobc/cobc.c:153 cobc/cobc.c:2233 cobc/cobc.c:2236 cobc/parser.y:802 -#: cobc/reserved.c:4022 libcob/common.c:226 libcob/common.c:1308 -#: libcob/common.c:2384 libcob/common.c:2388 libcob/common.c:2426 -#: libcob/common.c:2464 libcob/common.c:2654 libcob/common.c:7351 -#: libcob/common.c:8370 libcob/common.c:9391 libcob/common.c:9470 -#: libcob/common.c:9912 +#: cobc/cobc.c:171 cobc/cobc.c:2392 cobc/cobc.c:2395 cobc/parser.y:895 +#: cobc/reserved.c:4039 libcob/common.c:235 libcob/common.c:1369 +#: libcob/common.c:2698 libcob/common.c:2702 libcob/common.c:2740 +#: libcob/common.c:2778 libcob/common.c:2939 libcob/common.c:8159 +#: libcob/common.c:9191 libcob/common.c:10209 libcob/common.c:10284 +#: libcob/common.c:10731 #, fuzzy msgid "unknown" msgstr "Desconhecid(o(s)/a(s))" -#: cobc/cobc.c:855 +#: cobc/cobc.c:905 #, fuzzy msgid "internal compiler error" msgstr "%s: %d: erro interno do compilador" -#: cobc/cobc.c:921 cobc/cobc.c:1008 cobc/cobc.c:1070 cobc/cobc.c:1146 -#: cobc/cobc.c:1186 cobc/cobc.c:1262 +#: cobc/cobc.c:971 cobc/cobc.c:1058 cobc/cobc.c:1120 cobc/cobc.c:1196 +#: cobc/cobc.c:1236 cobc/cobc.c:1312 #, fuzzy, c-format msgid "cannot allocate %d bytes of memory" msgstr "não é possível alocar %d octetos (bytes) de memória" -#: cobc/cobc.c:934 cobc/cobc.c:950 cobc/cobc.c:970 cobc/cobc.c:1029 -#: cobc/cobc.c:1048 cobc/cobc.c:1166 cobc/cobc.c:1281 cobc/cobc.c:1323 -#: cobc/field.c:2216 libcob/common.c:8191 +#: cobc/cobc.c:984 cobc/cobc.c:1000 cobc/cobc.c:1020 cobc/cobc.c:1079 +#: cobc/cobc.c:1098 cobc/cobc.c:1216 cobc/cobc.c:1331 cobc/cobc.c:1415 +#: cobc/field.c:2346 libcob/common.c:9012 #, fuzzy, c-format msgid "call to %s with NULL pointer" msgstr "chamada (call) a %s com um ponteiro nulo (NULL pointer)" -#: cobc/cobc.c:991 +#: cobc/cobc.c:1041 #, fuzzy, c-format msgid "cannot reallocate %d bytes of memory" msgstr "não é possível realocar %d octetos (bytes) de memória" -#: cobc/cobc.c:1087 cobc/cobc.c:1203 +#: cobc/cobc.c:1137 cobc/cobc.c:1253 #, fuzzy msgid "attempt to reallocate non-allocated memory" msgstr "tentativa de realocação de memória não alocada" -#: cobc/cobc.c:1120 cobc/cobc.c:1236 +#: cobc/cobc.c:1170 cobc/cobc.c:1286 #, c-format msgid "call to %s with invalid pointer, as it is missing in list" msgstr "chamada (call) a %s com ponteiro inválido, uma vez que este não se encontra na lista" -#: cobc/cobc.c:1448 +#: cobc/cobc.c:1540 #, fuzzy, c-format msgid "assuming literal for unquoted '%s'" msgstr "assumindo literal para '%s' sem aspas (unquoted)" -#: cobc/cobc.c:1495 +#: cobc/cobc.c:1587 #, fuzzy #| msgid "Word length exceeds maximum allowed - '%s'" msgid " - length exceeds maximum" msgstr "Comprimento de palavra excede o máximo permitido - '%s'" -#: cobc/cobc.c:1499 +#: cobc/cobc.c:1591 msgid " - name cannot be empty" msgstr "" -#: cobc/cobc.c:1502 +#: cobc/cobc.c:1594 #, fuzzy -msgid " - name cannot begin with space or underscore" +msgid " - name cannot begin with space or hyphen" msgstr " - nome não pode começar com o caratere 'espaço' (' ') ou 'sublinhado' ('_')" -#: cobc/cobc.c:1505 +#: cobc/cobc.c:1597 #, fuzzy msgid " - name cannot begin with 'cob_' or 'COB_'" msgstr " - nome não pode começar com 'cob_' ou 'COB_'" -#: cobc/cobc.c:1508 +#: cobc/cobc.c:1600 #, fuzzy msgid " - name duplicates a 'C' keyword" msgstr " - nome duplica uma palavra-chave da linguagem 'C'" -#: cobc/cobc.c:1511 +#: cobc/cobc.c:1603 #, fuzzy msgid " - name cannot contain a directory separator" msgstr " - nome não pode conter um separador de diretório (e.g. '/' em sistemas tipo Unix ou '\\' em sistemas Windows)" -#: cobc/cobc.c:1520 +#: cobc/cobc.c:1612 #, fuzzy, c-format msgid "invalid file base name '%s'%s" msgstr "nome base de ficheiro inválido '%s'%s" -#: cobc/cobc.c:1524 +#: cobc/cobc.c:1616 #, fuzzy, c-format msgid "invalid ENTRY '%s'%s" msgstr "ENTRY inválida '%s'%s" -#: cobc/cobc.c:1527 +#: cobc/cobc.c:1619 #, fuzzy, c-format msgid "invalid PROGRAM-ID '%s'%s" msgstr "PROGRAM-ID inválida '%s'%s" -#: cobc/cobc.c:1659 +#: cobc/cobc.c:1751 #, fuzzy, c-format msgid "file '%s' does not exist" msgstr "o ficheiro não existe" -#: cobc/cobc.c:1685 +#: cobc/cobc.c:1777 #, fuzzy, c-format msgid "duplicate exception '%s'" msgstr "Diretiva DEFINE/SET inválida" -#: cobc/cobc.c:1733 +#: cobc/cobc.c:1825 #, fuzzy, c-format msgid "invalid exception-name: %s" msgstr "parâmetro inválido %s" -#: cobc/cobc.c:1870 cobc/cobc.c:8780 +#: cobc/cobc.c:1998 cobc/cobc.c:9211 #, fuzzy #| msgid "environment variables" msgid "please check environment variables as noted above" msgstr "variáveis de ambiente" -#: cobc/cobc.c:1882 cobc/error.c:348 cobc/error.c:382 cobc/error.c:408 -#: cobc/error.c:411 cobc/error.c:477 cobc/error.c:631 cobc/error.c:675 -#: cobc/error.c:779 cobc/error.c:782 +#: cobc/cobc.c:2010 cobc/error.c:140 #, fuzzy msgid "error: " msgstr "erro: " -#: cobc/cobc.c:1905 +#: cobc/cobc.c:2033 #, fuzzy, c-format msgid "duplicate DEFINE '%s' - ignored" msgstr "definição (define) duplicada '%s' - ignorado" -#: cobc/cobc.c:1958 +#: cobc/cobc.c:2086 #, c-format msgid "environment variable '%s' is '%s'; should not contain '%c'" msgstr "variável de ambiente '%s' é '%s'; não deverá conter '%c'" -#: cobc/cobc.c:1988 +#: cobc/cobc.c:2116 #, fuzzy msgid "parameter buffer size exceeded" msgstr "excedido o espaço de memória física temporária ou retentor (buffer) do parâmetro" -#: cobc/cobc.c:2028 +#: cobc/cobc.c:2156 #, fuzzy, c-format msgid "warning: could not move temporary file to %s" msgstr "aviso: não foi possível mover o ficheiro temporário para %s" -#: cobc/cobc.c:2239 +#: cobc/cobc.c:2329 +#, fuzzy, c-format +#| msgid "environment variable '%s' is '%s'; should not contain '%c'" +msgid "environment variable '%s' has invalid content" +msgstr "variável de ambiente '%s' é '%s'; não deverá conter '%c'" + +#: cobc/cobc.c:2398 #, fuzzy, c-format msgid "aborting compile of %s at line %d (%s: %s)" msgstr "a abortar a compilação de %s na linha %d" -#: cobc/cobc.c:2243 +#: cobc/cobc.c:2402 #, fuzzy, c-format msgid "aborting codegen for %s, last statement at line %d (%s: %s)" msgstr "a abortar a compilação de %s na linha %d" -#: cobc/cobc.c:2246 +#: cobc/cobc.c:2405 #, fuzzy, c-format msgid "aborting codegen for %s (%s: %s)" msgstr "a abortar a compilação de %s na linha %d" -#: cobc/cobc.c:2251 +#: cobc/cobc.c:2410 msgid "aborting" msgstr "a abortar" -#: cobc/cobc.c:2329 libcob/common.c:2823 libcob/common.c:8149 bin/cobcrun.c:375 +#: cobc/cobc.c:2488 libcob/common.c:3107 libcob/common.c:8970 bin/cobcrun.c:373 #, fuzzy, c-format msgid "Please report this!" msgstr "Erro de geração de código (codegen) - Por favor informe esta situação!" -#: cobc/cobc.c:2346 bin/cobcrun.c:100 +#: cobc/cobc.c:2505 bin/cobcrun.c:100 #, fuzzy, c-format #| msgid "License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>" msgid "License GPLv3+: GNU GPL version 3 or later <%s>" msgstr "Licença GPLv3+: GNU GPL versão 3 ou superior <http://gnu.org/licenses/gpl.html>" -#: cobc/cobc.c:2348 libcob/common.c:8741 bin/cobcrun.c:102 +#: cobc/cobc.c:2507 libcob/common.c:9558 bin/cobcrun.c:102 msgid "" "This is free software; see the source for copying conditions. There is NO\n" "warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." @@ -201,420 +205,424 @@ msgstr "" "Este programa é livre; ver a origem para condições de cópia. NÃO existe\n" "garantia; nem sequer para COMERCIALIZAÇÃO ou ADEQUAÇÃO A UM DETERMINADO FIM." -#: cobc/cobc.c:2350 libcob/common.c:8743 bin/cobcrun.c:104 +#: cobc/cobc.c:2509 libcob/common.c:9560 bin/cobcrun.c:104 #, fuzzy, c-format #| msgid "Written by %s\n" msgid "Written by %s" msgstr "Escrito por %s\n" #. TRANSLATORS: This msgid is intended as the "Packaged" msgid, %s expands to date and time -#: cobc/cobc.c:2352 cobc/cobc.c:2365 libcob/common.c:8747 bin/cobcrun.c:106 +#: cobc/cobc.c:2511 cobc/cobc.c:2524 libcob/common.c:9564 bin/cobcrun.c:106 #, c-format msgid "Built %s" msgstr "Compilado em: %s" #. TRANSLATORS: This msgid is intended as the "Built" msgid, %s expands to date and time -#: cobc/cobc.c:2354 cobc/cobc.c:2367 libcob/common.c:8750 bin/cobcrun.c:108 +#: cobc/cobc.c:2513 cobc/cobc.c:2526 libcob/common.c:9567 bin/cobcrun.c:108 #, c-format msgid "Packaged %s" msgstr "Empacotado em: %s" -#: cobc/cobc.c:2356 cobc/cobc.c:2369 cobc/cobc.c:2478 libcob/common.c:8787 +#: cobc/cobc.c:2515 cobc/cobc.c:2528 cobc/cobc.c:2637 libcob/common.c:9604 #, fuzzy #| msgid "C version %s%s" msgid "C version" msgstr "Versão de 'C': %s%s" -#: cobc/cobc.c:2382 +#: cobc/cobc.c:2541 libcob/common.c:1075 #, fuzzy msgid "executing:" msgstr "a executar:" -#: cobc/cobc.c:2384 +#: cobc/cobc.c:2543 #, fuzzy msgid "to be executed:" msgstr "READ tem de ser executado primeiro" # @@@ ??? -#: cobc/cobc.c:2422 cobc/cobc.c:2423 libcob/common.c:6834 libcob/common.c:6835 -#: libcob/common.c:6866 libcob/common.c:6867 +#: cobc/cobc.c:2581 cobc/cobc.c:2582 libcob/common.c:7632 libcob/common.c:7633 +#: libcob/common.c:7664 libcob/common.c:7665 msgid "env" msgstr "env" -#: cobc/cobc.c:2474 libcob/common.c:8783 +#: cobc/cobc.c:2633 libcob/common.c:9600 #, fuzzy msgid "build information" msgstr "informação de compilação" -#: cobc/cobc.c:2475 libcob/common.c:8784 +#: cobc/cobc.c:2634 libcob/common.c:9601 #, fuzzy msgid "build environment" msgstr "ambiente de compilação" -#: cobc/cobc.c:2484 libcob/common.c:8794 +#: cobc/cobc.c:2643 libcob/common.c:9611 #, fuzzy msgid "GnuCOBOL information" msgstr "informação GnuCOBOL" -#: cobc/cobc.c:2492 cobc/cobc.c:2575 cobc/cobc.c:2591 libcob/common.c:8410 -#: libcob/common.c:8777 libcob/common.c:8778 libcob/common.c:8812 -#: libcob/common.c:8878 libcob/common.c:8900 libcob/common.c:8934 +#: cobc/cobc.c:2651 cobc/cobc.c:2739 cobc/cobc.c:2755 libcob/common.c:9233 +#: libcob/common.c:9594 libcob/common.c:9595 libcob/common.c:9629 +#: libcob/common.c:9695 libcob/common.c:9717 libcob/common.c:9751 #, fuzzy msgid "disabled" msgstr "desabilitado" -#: cobc/cobc.c:2523 cobc/cobc.c:2541 libcob/common.c:7397 libcob/common.c:8400 -#: libcob/common.c:8407 libcob/common.c:8816 libcob/common.c:8834 +#: cobc/cobc.c:2687 cobc/cobc.c:2705 libcob/common.c:8179 libcob/common.c:9221 +#: libcob/common.c:9230 libcob/common.c:9633 libcob/common.c:9651 #, fuzzy msgid "yes" msgstr "sim" -#: cobc/cobc.c:2525 cobc/cobc.c:2543 libcob/common.c:7399 libcob/common.c:8402 -#: libcob/common.c:8818 libcob/common.c:8836 +#: cobc/cobc.c:2689 cobc/cobc.c:2707 libcob/common.c:8181 libcob/common.c:9223 +#: libcob/common.c:9635 libcob/common.c:9653 msgid "no" msgstr "não" -#: cobc/cobc.c:2529 libcob/common.c:8822 +#: cobc/cobc.c:2693 libcob/common.c:9639 msgid "8 bytes" msgstr "8 octetos (bytes)" -#: cobc/cobc.c:2531 libcob/common.c:8824 +#: cobc/cobc.c:2695 libcob/common.c:9641 msgid "4 bytes" msgstr "4 octetos (bytes)" -#: cobc/cobc.c:2535 cobc/cobc.c:2537 libcob/common.c:8828 libcob/common.c:8830 +#: cobc/cobc.c:2699 cobc/cobc.c:2701 libcob/common.c:9645 libcob/common.c:9647 msgid "endianness" msgstr "" -#: cobc/cobc.c:2535 libcob/common.c:8828 +#: cobc/cobc.c:2699 libcob/common.c:9645 msgid "big-endian" msgstr "" -#: cobc/cobc.c:2537 libcob/common.c:8830 +#: cobc/cobc.c:2701 libcob/common.c:9647 msgid "little-endian" msgstr "" -#: cobc/cobc.c:2541 cobc/cobc.c:2543 libcob/common.c:8834 libcob/common.c:8836 +#: cobc/cobc.c:2705 cobc/cobc.c:2707 libcob/common.c:9651 libcob/common.c:9653 msgid "native EBCDIC" msgstr "" -#: cobc/cobc.c:2546 libcob/common.c:8937 +#: cobc/cobc.c:2710 libcob/common.c:9754 msgid "extended screen I/O" msgstr "entrada/saída de ecrã (screen I/O) estendida" -#: cobc/cobc.c:2549 libcob/common.c:8840 +#: cobc/cobc.c:2713 libcob/common.c:9657 #, fuzzy msgid "variable file format" msgstr "formato da variável" -#: cobc/cobc.c:2555 cobc/cobc.c:2557 libcob/common.c:8846 libcob/common.c:8848 +#: cobc/cobc.c:2719 cobc/cobc.c:2721 libcob/common.c:9663 libcob/common.c:9665 #, fuzzy msgid "sequential file handler" msgstr "manipulador sequencial" -#: cobc/cobc.c:2557 libcob/common.c:8848 +#: cobc/cobc.c:2721 libcob/common.c:9665 msgid "built-in" msgstr "integrado" -#: cobc/cobc.c:2561 cobc/cobc.c:2563 cobc/cobc.c:2565 cobc/cobc.c:2567 -#: cobc/cobc.c:2570 cobc/cobc.c:2572 cobc/cobc.c:2575 libcob/common.c:8852 -#: libcob/common.c:8866 libcob/common.c:8868 libcob/common.c:8870 -#: libcob/common.c:8873 libcob/common.c:8875 libcob/common.c:8878 +#: cobc/cobc.c:2725 cobc/cobc.c:2727 cobc/cobc.c:2729 cobc/cobc.c:2731 +#: cobc/cobc.c:2734 cobc/cobc.c:2736 cobc/cobc.c:2739 libcob/common.c:9669 +#: libcob/common.c:9683 libcob/common.c:9685 libcob/common.c:9687 +#: libcob/common.c:9690 libcob/common.c:9692 libcob/common.c:9695 #, fuzzy msgid "indexed file handler" msgstr "manipulador sequencial" -#: cobc/cobc.c:2580 cobc/cobc.c:2582 cobc/cobc.c:2585 libcob/common.c:8884 +#: cobc/cobc.c:2744 cobc/cobc.c:2746 cobc/cobc.c:2749 libcob/common.c:9701 msgid "mathematical library" msgstr "" -#: cobc/cobc.c:2589 cobc/cobc.c:2591 libcob/common.c:8895 libcob/common.c:8900 +#: cobc/cobc.c:2753 cobc/cobc.c:2755 libcob/common.c:9712 libcob/common.c:9717 msgid "XML library" msgstr "" -#: cobc/cobc.c:2594 libcob/common.c:8917 libcob/common.c:8932 -#: libcob/common.c:8934 +#: cobc/cobc.c:2758 libcob/common.c:9734 libcob/common.c:9749 +#: libcob/common.c:9751 msgid "JSON library" msgstr "" -#: cobc/cobc.c:2597 libcob/common.c:8810 libcob/common.c:8941 +#: cobc/cobc.c:2761 libcob/common.c:9627 libcob/common.c:9758 #, fuzzy msgid "enabled" msgstr "ativad(o/a)" -#: cobc/cobc.c:2604 +#: cobc/cobc.c:2768 #, fuzzy msgid "only one of options 'E', 'S', 'C', 'c' may be specified" msgstr "apenas uma das opções 'E', 'S', 'C', 'c' podem ser especificadas" -#: cobc/cobc.c:2610 +#: cobc/cobc.c:2774 #, fuzzy msgid "only one of options 'm', 'x', 'b' may be specified" msgstr "apenas uma das opções 'm', 'x', 'b' podem ser especificadas" -#: cobc/cobc.c:2652 +#: cobc/cobc.c:2816 #, c-format msgid "option requires one of 'ALL', 'FD', 'WS', 'LS', 'RD', 'FD', 'SC', 'LO' - not '%s'" msgstr "" -#: cobc/cobc.c:2682 +#: cobc/cobc.c:2846 #, c-format msgid "'%s' is not an intrinsic function" msgstr "'%s' não é uma função intrínseca" -#: cobc/cobc.c:2726 cobc/cobc.c:8094 cobc/cobc.c:8213 cobc/codegen.c:3783 -#: cobc/codegen.c:3884 cobc/codegen.c:5571 cobc/codegen.c:5700 -#: cobc/codegen.c:13034 cobc/tree.c:1391 cobc/tree.c:4497 cobc/tree.c:5067 -#: cobc/tree.c:5316 cobc/typeck.c:4344 cobc/typeck.c:9044 cobc/typeck.c:9079 -#: cobc/typeck.c:9977 cobc/typeck.c:12619 cobc/typeck.c:12690 -#: cobc/typeck.c:12758 cobc/typeck.c:13043 cobc/typeck.c:13086 -#: libcob/fileio.c:9703 libcob/fileio.c:9714 +#: cobc/cobc.c:2889 cobc/cobc.c:8507 cobc/cobc.c:8626 cobc/codegen.c:3761 +#: cobc/codegen.c:3864 cobc/codegen.c:5671 cobc/codegen.c:5816 +#: cobc/codegen.c:13429 cobc/parser.y:391 cobc/tree.c:1397 cobc/tree.c:4565 +#: cobc/tree.c:5135 cobc/tree.c:5392 cobc/typeck.c:4497 cobc/typeck.c:9504 +#: cobc/typeck.c:9541 cobc/typeck.c:10418 cobc/typeck.c:13395 +#: cobc/typeck.c:13469 cobc/typeck.c:13537 cobc/typeck.c:13825 +#: cobc/typeck.c:13887 libcob/fileio.c:10094 libcob/fileio.c:10105 #, fuzzy, c-format msgid "call to '%s' with invalid parameter '%s'" msgstr "chamada (CALL) a '%s' com parâmetro inválido '%s'" -#: cobc/cobc.c:3136 +#: cobc/cobc.c:3300 msgid "loading standard configuration file 'default.conf'" msgstr "carregando o ficheiro de configuração padronizado 'default.conf'" -#: cobc/cobc.c:3217 +#: cobc/cobc.c:3387 msgid "the used C compiler is known to not be able to generate assembler code" msgstr "" -#: cobc/cobc.c:3299 +#: cobc/cobc.c:3469 #, fuzzy msgid "invalid output file name" msgstr "nome de ficheiro de saída inválido" -#: cobc/cobc.c:3361 +#: cobc/cobc.c:3531 #, fuzzy, c-format msgid "warning: '%s' is not a directory, defaulting to current directory" msgstr "aviso: '%s' não é um diretório, a padronizar para o diretório actual" -#: cobc/cobc.c:3388 +#: cobc/cobc.c:3558 #, c-format msgid "warning: %d lines per listing page specified, using %d" msgstr "" -#: cobc/cobc.c:3438 +#: cobc/cobc.c:3615 #, fuzzy, c-format msgid "warning: assuming '%s' is a DEFINE - did you intend to use -debug?" msgstr "aviso: a assumir que '%s' é uma definição (DEFINE) - pretendia usar '-debug' para depuraração?" -#: cobc/cobc.c:3699 cobc/cobc.c:3724 cobc/cobc.c:3752 +#: cobc/cobc.c:3661 cobc/cobc.c:3702 cobc/cobc.c:4281 +#, fuzzy, c-format +msgid "ignoring nonexistent directory \"%s\"" +msgstr "ignorando directiva inválida: '%s'" + +#: cobc/cobc.c:3943 cobc/cobc.c:3968 cobc/cobc.c:3996 #, fuzzy, c-format msgid "unknown warning option '%s'" msgstr "nome/rótulo de configuração (configuration tag) desconhecido '%s'" -#: cobc/cobc.c:3813 +#: cobc/cobc.c:4063 #, fuzzy, c-format msgid "%s option requires a listing file" msgstr "a opção '%s' requer um ficheiro de listagem" -#: cobc/cobc.c:3820 +#: cobc/cobc.c:4070 msgid "output to stdout only valid for preprocess" msgstr "" -#: cobc/cobc.c:3829 +#: cobc/cobc.c:4085 +msgid "-MT must be given to specify target file" +msgstr "" + +#: cobc/cobc.c:4091 msgid "all runtime checks are enabled" msgstr "todas as opções de verificação do programa de execução (runtime) estão habilitadas" -#: cobc/cobc.c:4030 +#: cobc/cobc.c:4316 msgid "only one stdin input allowed" msgstr "permitida apenas uma entrada-padrão (stdin)" -#: cobc/cobc.c:4040 +#: cobc/cobc.c:4326 #, fuzzy, c-format msgid "invalid file name parameter (length > %d)" msgstr "parâmetro para nome de ficheiro inválido (comprimento > %d)" -#: cobc/cobc.c:4270 +#: cobc/cobc.c:4559 #, fuzzy msgid "return status:" msgstr "valor ou condição (status) de retorno:" -#: cobc/cobc.c:4306 libcob/common.c:5711 +#: cobc/cobc.c:4595 libcob/common.c:6391 #, c-format msgid "external process \"%s\" ended with signal %s (%d)" msgstr "" -#: cobc/cobc.c:4364 +#: cobc/cobc.c:4654 msgid "nothing for -j to run" msgstr "não existe nada para executar com '-j'" -#: cobc/cobc.c:4406 cobc/cobc.c:4420 +#: cobc/cobc.c:4697 cobc/cobc.c:4711 #, fuzzy, c-format #| msgid "... removed from environment" msgid "%s is resolved by environment as: %s" msgstr "... removido do ambiente" -#: cobc/cobc.c:4882 +#: cobc/cobc.c:5175 #, fuzzy msgid "preprocessing:" msgstr "preprocessando:" -#: cobc/cobc.c:4952 +#: cobc/cobc.c:5244 msgid "'cobxref' execution unsuccessful" msgstr "execução de 'cobxref' malsucedida" -#: cobc/cobc.c:4955 +#: cobc/cobc.c:5247 #, fuzzy, c-format msgid "check that 'cobxref' is in %s" msgstr "verificar se 'cobxref' está contido em %s" -#: cobc/cobc.c:4957 +#: cobc/cobc.c:5249 #, fuzzy msgid "no listing produced" msgstr "não foi criada nenhuma listagem" -#: cobc/cobc.c:5882 cobc/cobc.c:5921 +#: cobc/cobc.c:6234 cobc/cobc.c:6273 msgid "No fields defined." msgstr "" -#: cobc/cobc.c:5941 +#: cobc/cobc.c:6293 msgid "No labels defined." msgstr "" -#: cobc/cobc.c:5963 +#: cobc/cobc.c:6324 cobc/cobc.c:9292 +#, fuzzy +msgid "command line:" +msgstr "linha de comando:" + +#: cobc/cobc.c:6342 msgid "Error/Warning summary:" msgstr "" -#: cobc/cobc.c:6006 +#: cobc/cobc.c:6385 msgid "0 warnings in compilation group" msgstr "" -#: cobc/cobc.c:6010 +#: cobc/cobc.c:6389 msgid "1 warning in compilation group" msgstr "" -#: cobc/cobc.c:6014 +#: cobc/cobc.c:6393 #, c-format msgid "%d warnings in compilation group" msgstr "" -#: cobc/cobc.c:6020 +#: cobc/cobc.c:6399 #, fuzzy msgid "0 errors in compilation group" msgstr "Demasiados erros - A abortar a compilação" -#: cobc/cobc.c:6024 +#: cobc/cobc.c:6403 #, fuzzy msgid "1 error in compilation group" msgstr "Demasiados erros - A abortar a compilação" -#: cobc/cobc.c:6028 +#: cobc/cobc.c:6407 #, fuzzy, c-format msgid "%d errors in compilation group" msgstr "Demasiados erros - A abortar a compilação" -#: cobc/cobc.c:6034 +#: cobc/cobc.c:6413 #, fuzzy, c-format msgid "Too many errors in compilation group: %d maximum errors" msgstr "Demasiados erros - A abortar a compilação" -#: cobc/cobc.c:6632 +#: cobc/cobc.c:7028 #, fuzzy, c-format #| msgid "%s: %d: Too many continuation lines" msgid "%s:%d: too many continuation lines" msgstr "%s: %d: Demasiadas linhas de continuação" -#: cobc/cobc.c:7552 +#: cobc/cobc.c:7956 #, fuzzy msgid "parsing:" msgstr "a analisar:" -#: cobc/cobc.c:7612 +#: cobc/cobc.c:8017 #, fuzzy msgid "translating:" msgstr "a traduzir:" -#: cobc/cobc.c:8786 +#: cobc/cobc.c:9217 #, fuzzy msgid "no input files" msgstr "sem ficheiros de entrada" -#: cobc/cobc.c:8816 +#: cobc/cobc.c:9248 #, c-format msgid "%s option invalid in this combination" msgstr "opção '%s' inválida nesta combinação" -#: cobc/cobc.c:8857 -#, fuzzy -msgid "command line:" -msgstr "linha de comando:" - -#: cobc/codegen.c:1041 cobc/codegen.c:4463 cobc/codegen.c:11648 -#: cobc/codegen.c:12186 +#: cobc/codegen.c:1040 cobc/codegen.c:4506 cobc/codegen.c:11910 +#: cobc/codegen.c:12467 #, fuzzy msgid "unexpected CONSTANT item" msgstr "item CONSTANT inesperado" -#: cobc/codegen.c:2981 cobc/codegen.c:3261 cobc/codegen.c:8523 cobc/tree.c:1413 +#: cobc/codegen.c:2921 cobc/codegen.c:3207 cobc/codegen.c:8866 cobc/tree.c:1419 #, fuzzy, c-format msgid "unexpected cast type: %d" msgstr "conversão de tipo de dados (cast type) inesperada: %d" -#: cobc/codegen.c:3713 cobc/codegen.c:4413 +#: cobc/codegen.c:3690 cobc/codegen.c:4455 #, fuzzy, c-format msgid "internal statement stack depth exceeded: %d" msgstr "excedida a profundidade interna da pilha de instruções: %d" -#: cobc/codegen.c:3785 +#: cobc/codegen.c:3763 #, fuzzy, c-format msgid "%s is not a field" msgstr "'%s' não é um campo" -#: cobc/codegen.c:4186 cobc/codegen.c:4257 +#: cobc/codegen.c:4177 cobc/codegen.c:4279 #, fuzzy, c-format msgid "unexpected function: %s" msgstr "função inesperada: %s" -#: cobc/codegen.c:5204 +#: cobc/codegen.c:5256 #, fuzzy, c-format msgid "unexpected tree category: %d" msgstr "categoria de árvore (tree category) inesperada: %d" -#: cobc/codegen.c:5971 +#: cobc/codegen.c:6108 #, fuzzy, c-format msgid "unexpected size: %d" msgstr "tamanho inesperado: %d" -#: cobc/codegen.c:7595 +#: cobc/codegen.c:7894 #, c-format msgid "No ENTRY FOR GO TO '%s'" msgstr "" -#: cobc/codegen.c:7816 cobc/codegen.c:8163 +#: cobc/codegen.c:8283 cobc/codegen.c:8609 #, fuzzy, c-format msgid "unexpected handler type: %d" msgstr "tipo de manipulador (handler type) inesperado %d" -#: cobc/codegen.c:8254 -#, fuzzy -msgid "unexpected error_node parameter" -msgstr "parâmetro 'error_node' inesperado" - -#: cobc/codegen.c:8544 +#: cobc/codegen.c:8887 #, fuzzy, c-format msgid "unexpected tree type: %d" msgstr "tipo de árvore (tree type) inesperado: %d" -#: cobc/codegen.c:9520 +#: cobc/codegen.c:9776 msgid "Nested OCCURS in report" msgstr "" -#: cobc/codeoptim.c:2777 +#: cobc/codeoptim.c:2856 #, fuzzy, c-format msgid "unexpected optimization value: %d" msgstr "valor de otimização inesperado: %d" -#: cobc/config.c:164 libcob/common.c:7824 libcob/common.c:7838 -#: libcob/common.c:8315 +#: cobc/config.c:164 libcob/common.c:8639 libcob/common.c:8653 +#: libcob/common.c:9136 #, fuzzy, c-format msgid "invalid value '%s' for configuration tag '%s'" msgstr "valor '%s' inválido para o nome/rótulo de configuração (configuration tag) '%s'" -#: cobc/config.c:167 libcob/common.c:7117 libcob/common.c:7234 +#: cobc/config.c:167 libcob/common.c:7915 libcob/common.c:7939 #, c-format msgid "should be one of the following values: %s" msgstr "deveria ser um dos seguintes valores: %s" @@ -623,7 +631,7 @@ msgstr "deveria ser um dos seguintes valores: %s" msgid "must be numeric" msgstr "t(e/ê)m de ser numérico(s)" -#: cobc/config.c:171 libcob/common.c:7215 +#: cobc/config.c:171 libcob/common.c:8045 #, c-format msgid "maximum value: %lu" msgstr "valor máximo: %lu" @@ -638,46 +646,46 @@ msgstr "valor mínimo: %d" msgid "unsupported value '%s' for configuration tag '%s'" msgstr "valor '%s' não suportado para o nome/rótulo de configuração (configuration tag) '%s'" -#: cobc/config.c:318 cobc/pplex.l:1185 libcob/common.c:7739 +#: cobc/config.c:319 cobc/pplex.l:1264 libcob/common.c:8554 msgid "recursive inclusion" msgstr "inclusão recursiva" -#: cobc/config.c:393 libcob/common.c:7791 +#: cobc/config.c:394 libcob/common.c:8606 #, fuzzy msgid "configuration file was included here" msgstr "o ficheiro de configuração foi incluído aqui" -#: cobc/config.c:422 +#: cobc/config.c:423 #, c-format msgid "The previous loaded configuration '%s' will be discarded." msgstr "A configuração previamente carregada '%s' será descartada." -#: cobc/config.c:458 +#: cobc/config.c:459 msgid "missing definitions:" msgstr "definições em falta:" -#: cobc/config.c:460 +#: cobc/config.c:461 #, fuzzy, c-format msgid "\tno definition of '%s'" msgstr "\tnão existem definições de '%s'" -#: cobc/config.c:523 +#: cobc/config.c:524 #, fuzzy, c-format msgid "invalid configuration tag '%s'" msgstr "nome/rótulo de configuração (configuration tag) inválido '%s'" -#: cobc/config.c:536 libcob/common.c:7545 libcob/common.c:7629 -#: libcob/common.c:7657 +#: cobc/config.c:537 libcob/common.c:8360 libcob/common.c:8444 +#: libcob/common.c:8472 #, fuzzy, c-format msgid "unknown configuration tag '%s'" msgstr "nome/rótulo de configuração (configuration tag) desconhecido '%s'" -#: cobc/config.c:560 +#: cobc/config.c:561 #, fuzzy, c-format msgid "invalid configuration tag '%s' in word-list" msgstr "nome/rótulo de configuração (configuration tag) inválido '%s'" -#: cobc/config.c:622 +#: cobc/config.c:623 #, c-format msgid "Could not access word list for '%s'" msgstr "" @@ -718,11 +726,11 @@ msgstr "literal numérico inválido: '%s'" #: cobc/config.def:73 msgid "" "default initialization for fields without VALUE, may be one of\n" -" * character in quotes\n" -" * decimal 0..255 representing a character\n" -" * \"init\" to initialize to PICTURE/USAGE\n" -" * \"none\" to do no explicit initialization\n" -" * default: \"init\"" +" * character in quotes\n" +" * decimal 0..255 representing a character\n" +" * \"init\" to initialize to PICTURE/USAGE\n" +" * \"none\" to do no explicit initialization\n" +" * default: \"init\"" msgstr "" #: cobc/config.def:83 @@ -749,1119 +757,1123 @@ msgstr "" msgid "whether DECIMAL-POINT IS COMMA has effect in XML/JSON GENERATE, may be one of: none, xml, json, all" msgstr "" -#: cobc/config.def:103 -msgid "resolve file names at run time using environment variables" +#: cobc/config.def:101 +msgid "checking for subscript (only done with EC-BOUND-SUBSCRIPT active), may be one of: full, max, record" msgstr "" #: cobc/config.def:106 -msgid "alternate formatting of numeric fields" +msgid "resolve file names at run time using environment variables" msgstr "" #: cobc/config.def:109 -msgid "numeric truncation according to ANSI" +msgid "alternate formatting of numeric fields" msgstr "" #: cobc/config.def:112 -#, fuzzy -#| msgid "'%s' cannot have OCCURS DEPENDING" -msgid "allow complex OCCURS DEPENDING ON" -msgstr "'%s' não pode usar OCURRS DEPENDING" +msgid "numeric truncation according to ANSI" +msgstr "" #: cobc/config.def:115 +msgid "allow non-standard OCCURS DEPENDING ON syntax" +msgstr "" + +#: cobc/config.def:118 #, fuzzy msgid "adjust items following OCCURS DEPENDING (implies complex-odo)" msgstr "" "ajusta itens seguintes a OCCURS DEPENDING\n" "\t\t\t- requere sintaxe descontraída (relaxed) implicita ou explicitamente" -#: cobc/config.def:118 +#: cobc/config.def:121 +#, fuzzy +msgid "applies JUSTIFY with VALUE clause" +msgstr "avisar item EXTERNAL com cláusula VALUE" + +#: cobc/config.def:124 msgid "allow REDEFINES to other than last equal level number" msgstr "" -#: cobc/config.def:121 +#: cobc/config.def:127 #, fuzzy msgid "allow certain syntax variations (e.g. REDEFINES position)" msgstr "" "verificação de sintaxe descontraída (relax)\n" "\t\t\t- e.g. posição REDEFINES" -#: cobc/config.def:124 +#: cobc/config.def:130 msgid "allow zero length reference-modification (only changed with EC-BOUND-REF-MOD active)" msgstr "" -#: cobc/config.def:127 +#: cobc/config.def:133 msgid "allow non-matching level numbers" msgstr "" -#: cobc/config.def:130 +#: cobc/config.def:136 msgid "require ASSIGN USING items to be in WORKING-STORAGE" msgstr "" -#: cobc/config.def:133 +#: cobc/config.def:139 msgid "LOCAL-STORAGE SECTION implies RECURSIVE attribute" msgstr "" -#: cobc/config.def:136 +#: cobc/config.def:142 msgid "LINKAGE SECTION items remain allocated between invocations" msgstr "" -#: cobc/config.def:139 +#: cobc/config.def:145 msgid "MOVE operates as on IBM (left to right, byte by byte)" msgstr "" -#: cobc/config.def:142 +#: cobc/config.def:148 msgid "exit point of any currently executing perform is recognized if reached" msgstr "" -#: cobc/config.def:145 +#: cobc/config.def:151 msgid "limit precision in intermediate results to precision of final result (less accurate)" msgstr "" -#: cobc/config.def:148 +#: cobc/config.def:154 msgid "evaluate constant expressions at compile time" msgstr "" -#: cobc/config.def:151 +#: cobc/config.def:157 msgid "allow hexadecimal value 'F' for NUMERIC test of signed PACKED DECIMAL field" msgstr "" -#: cobc/config.def:154 +#: cobc/config.def:160 msgid "program names don't lead to a reserved identifier" msgstr "" -#: cobc/config.def:157 +#: cobc/config.def:163 msgid "set WITH UPDATE clause as default for ACCEPT dest-item, instead of WITH NO UPDATE" msgstr "" -#: cobc/config.def:160 +#: cobc/config.def:166 msgid "set WITH AUTO clause as default for ACCEPT dest-item, instead of WITH TAB" msgstr "" -#: cobc/config.def:163 +#: cobc/config.def:169 msgid "assume CONSOLE IS CRT if not set otherwise" msgstr "" -#: cobc/config.def:166 +#: cobc/config.def:172 msgid "NO-ECHO hides input with asterisks like SECURE" msgstr "" -#: cobc/config.def:169 +#: cobc/config.def:175 msgid "assume a field DISPLAY starts at LINE 0 COL 0 (i.e. at the cursor), not LINE 1 COL 1" msgstr "" -#: cobc/config.def:172 +#: cobc/config.def:178 msgid "special behaviour of DISPLAY SPACE/ALL X'01'/ALL X'02'/ALL X'07'" msgstr "" -#: cobc/config.def:175 +#: cobc/config.def:181 msgid "COMP-1 is a 16-bit signed integer" msgstr "" -#: cobc/config.def:178 +#: cobc/config.def:184 msgid "POINTER is a 64-bit unsigned integer" msgstr "" -#: cobc/config.def:181 +#: cobc/config.def:187 msgid "imply zero in move of non-numeric literal to numeric items" msgstr "" -#: cobc/config.def:184 +#: cobc/config.def:190 msgid "implicitly define a variable if an ASSIGN DYNAMIC does not match any data item" msgstr "" -#: cobc/config.def:187 +#: cobc/config.def:193 msgid "specifying device by mnemonic" msgstr "" -#: cobc/config.def:193 +#: cobc/config.def:199 msgid "" "check contents of Area A (when reference format supports Area A enforcement),\n" -" enabled checks include:\n" -" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" -" and toplevel numbers (01 and 77) must start in Area A;\n" -" * statements must not start in Area A; and\n" -" * separator periods must not be within Area A." +" enabled checks include:\n" +" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" +" and toplevel numbers (01 and 77) must start in Area A;\n" +" * statements must not start in Area A; and\n" +" * separator periods must not be within Area A" msgstr "" -#: cobc/config.def:203 +#: cobc/config.def:209 msgid "comment paragraphs in IDENTIFICATION DIVISION (AUTHOR, DATE-WRITTEN, ...)" msgstr "" -#: cobc/config.def:207 -msgid "CONTROL DIVISION" -msgstr "" - -#: cobc/config.def:211 cobc/ppparse.y:101 cobc/ppparse.y:104 -msgid "partial replacing with literal" +#: cobc/config.def:217 +msgid "" +"apply partial replacing with literal source operand even when it replaces with spaces only;\n" +" * \"skip\" prevents such replacements" msgstr "" -#: cobc/config.def:214 +#: cobc/config.def:221 msgid "MEMORY-SIZE clause" msgstr "" -#: cobc/config.def:217 +#: cobc/config.def:224 msgid "MULTIPLE-FILE-TAPE clause" msgstr "" -#: cobc/config.def:220 +#: cobc/config.def:227 #, fuzzy #| msgid "RECORD clause invalid" msgid "LABEL-RECORDS clause" msgstr "cláusula RECORD inválida" -#: cobc/config.def:223 +#: cobc/config.def:230 #, fuzzy msgid "VALUE-OF clause" msgstr "cláusula VALUE inválida" -#: cobc/config.def:226 +#: cobc/config.def:233 #, fuzzy #| msgid "RECORD clause invalid" msgid "DATA-RECORDS clause" msgstr "cláusula RECORD inválida" -#: cobc/config.def:229 +#: cobc/config.def:236 msgid "OCCURS clause on top-level" msgstr "" -#: cobc/config.def:232 cobc/parser.y:7285 +#: cobc/config.def:239 cobc/parser.y:7566 msgid "SAME AS clause" msgstr "" -#: cobc/config.def:235 cobc/parser.y:7621 +#: cobc/config.def:242 cobc/parser.y:7904 #, fuzzy msgid "TYPE TO clause" msgstr "cláusulas LOCK" -#: cobc/config.def:238 cobc/parser.y:7644 +#: cobc/config.def:245 cobc/parser.y:7927 msgid "USAGE type-name" msgstr "" -#: cobc/config.def:241 cobc/parser.y:8190 +#: cobc/config.def:248 cobc/parser.y:8563 msgid "SYNCHRONIZED clause" msgstr "" -#: cobc/config.def:244 cobc/parser.y:8193 +#: cobc/config.def:251 cobc/parser.y:8566 msgid "LEFT/RIGHT phrases in SYNCHRONIZED clause" msgstr "" -#: cobc/config.def:247 +#: cobc/config.def:254 msgid "SPECIAL-NAMES clause" msgstr "" -#: cobc/config.def:250 +#: cobc/config.def:257 #, fuzzy -msgid "GOTO statement without name" -msgstr "instrução %s não terminada por END-%s" +msgid "GO TO statement without name" +msgstr "GO TO sem nome-de-procedimento" -#: cobc/config.def:253 +#: cobc/config.def:260 #, fuzzy msgid "STOP-literal statement" msgstr "instrução SET inválida" -#: cobc/config.def:256 +#: cobc/config.def:263 #, fuzzy msgid "STOP-identifier statement" msgstr "identificador PROMPT inválido" -#: cobc/config.def:259 +#: cobc/config.def:266 #, fuzzy msgid "STOP ERROR statement" msgstr "segmento SECTION" -#: cobc/config.def:262 +#: cobc/config.def:269 msgid "DEBUGGING MODE and debugging indicator" msgstr "" -#: cobc/config.def:268 +#: cobc/config.def:275 msgid "PADDING CHARACTER clause" msgstr "" -#: cobc/config.def:271 +#: cobc/config.def:278 msgid "NEXT SENTENCE phrase" msgstr "" -#: cobc/config.def:274 +#: cobc/config.def:281 msgid "listing-directive statements EJECT, SKIP1, SKIP2, SKIP3" msgstr "" -#: cobc/config.def:277 +#: cobc/config.def:284 msgid "listing-directive statement TITLE" msgstr "" -#: cobc/config.def:280 +#: cobc/config.def:287 #, fuzzy msgid "ENTRY statement" msgstr "segmento SECTION" -#: cobc/config.def:283 +#: cobc/config.def:290 #, fuzzy msgid "move noninteger to alphanumeric" msgstr "transferência (MOVE) de valor não-inteiro para alfanumérico" -#: cobc/config.def:286 +#: cobc/config.def:293 #, fuzzy msgid "move figurative constants to numeric" msgstr "constante figurativa inválida aqui" -#: cobc/config.def:289 +#: cobc/config.def:296 #, fuzzy msgid "move figurative constant SPACE to numeric" msgstr "constante figurativa inválida aqui" -#: cobc/config.def:292 +#: cobc/config.def:299 #, fuzzy msgid "move figurative constant QUOTE to numeric" msgstr "constante figurativa inválida aqui" -#: cobc/config.def:295 +#: cobc/config.def:302 #, fuzzy #| msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgid "OCCURS DEPENDING ON without to" msgstr "OCCURS DEPENDING ON '%s' fora dos limites: %d" -#: cobc/config.def:298 cobc/parser.y:11102 +#: cobc/config.def:305 cobc/parser.y:11443 msgid "section segments" msgstr "" -#: cobc/config.def:301 +#: cobc/config.def:308 #, fuzzy msgid "ALTER statement" msgstr "segmento SECTION" -#: cobc/config.def:304 +#: cobc/config.def:311 msgid "OVERFLOW clause for CALL" msgstr "" -#: cobc/config.def:307 +#: cobc/config.def:314 #, fuzzy msgid "boolean literals (B'1010')" msgstr "literal numérico booleano" -#: cobc/config.def:310 +#: cobc/config.def:317 #, fuzzy msgid "hexadecimal-boolean literals (BX'A')" msgstr "literal hexadecimal-booleano" -#: cobc/config.def:313 +#: cobc/config.def:320 #, fuzzy msgid "national literals (N'UTF-16 string')" msgstr "literal nacional" -#: cobc/config.def:316 +#: cobc/config.def:323 #, fuzzy msgid "hexadecimal-national literals (NX'265E')" msgstr "literal hexadecimal-nacional" -#: cobc/config.def:319 +#: cobc/config.def:326 msgid "non-standard national literals (NC'UTF-16 string')" msgstr "" -#: cobc/config.def:322 +#: cobc/config.def:329 msgid "HP COBOL octal literals (%377)" msgstr "" -#: cobc/config.def:325 +#: cobc/config.def:332 msgid "ACUCOBOL-GT literals (#B #O #H #X)" msgstr "" -#: cobc/config.def:328 cobc/pplex.l:2199 +#: cobc/config.def:335 +msgid "EBCDIC symbolic characters in literals (\" \"135,151,151\"bar\"195, 194\"Z\" for \" foobarBAZ\")" +msgstr "" + +#: cobc/config.def:338 cobc/pplex.l:2428 msgid "continuation of COBOL words" msgstr "continuação das palavras COBOL" -#: cobc/config.def:331 +#: cobc/config.def:341 #, fuzzy #| msgid "NOT EXCEPTION before EXCEPTION" msgid "NOT ON EXCEPTION before ON EXCEPTION" msgstr "NOT EXCEPTION antes de EXCEPTION" -#: cobc/config.def:334 +#: cobc/config.def:344 #, fuzzy #| msgid "non-standard DISPLAY" msgid "extensions to ACCEPT and DISPLAY" msgstr "DISPLAY despadronizado (non-standard)" -#: cobc/config.def:337 cobc/field.c:3357 +#: cobc/config.def:347 cobc/field.c:3645 msgid "RENAMES of 01-, 66- and 77-level items" msgstr "RENAMES dos itens de nível 01, 66 e 77" -#: cobc/config.def:341 +#: cobc/config.def:351 msgid "allow larger REDEFINES items" msgstr "" -#: cobc/config.def:344 +#: cobc/config.def:354 #, fuzzy #| msgid "'%s' is not defined in SPECIAL-NAMES" msgid "constants defined in SPECIAL-NAMES" msgstr "'%s' não está definido em SPECIAL-NAMES" -#: cobc/config.def:347 +#: cobc/config.def:357 msgid "constant with level 78 item (note: has left to right precedence in expressions)" msgstr "" -#: cobc/config.def:350 +#: cobc/config.def:360 msgid "constant with level 01 CONSTANT AS/FROM item" msgstr "" -#: cobc/config.def:353 +#: cobc/config.def:363 msgid "PERFORM VARYING without BY phrase (implies BY 1)" msgstr "" -#: cobc/config.def:356 +#: cobc/config.def:366 msgid "references to sections not in DECLARATIVES from within DECLARATIVES" msgstr "" -#: cobc/config.def:359 cobc/parser.y:12225 cobc/parser.y:12521 +#: cobc/config.def:369 cobc/parser.y:12614 cobc/parser.y:12913 msgid "CALL/CANCEL with program-prototype-name" msgstr "CALL/CANCEL com nome-do-protótipo-do-programa (program-prototype-name)" -#: cobc/config.def:362 +#: cobc/config.def:372 msgid "specifying call-convention by mnemonic" msgstr "" -#: cobc/config.def:365 +#: cobc/config.def:375 msgid "specifying call-convention by WITH ... LINKAGE" msgstr "" -#: cobc/config.def:368 +#: cobc/config.def:378 +msgid "support for PROCEDURE DIVISION USING OPTIONAL" +msgstr "" + +#: cobc/config.def:381 msgid "numeric literals in VALUE clause of numeric-edited items" msgstr "" -#: cobc/config.def:371 +#: cobc/config.def:384 msgid "incorrect order of CONFIGURATION SECTION paragraphs" msgstr "" -#: cobc/config.def:374 +#: cobc/config.def:387 msgid "allow >> DEFINE CONSTANT var AS literal" msgstr "" -#: cobc/config.def:377 +#: cobc/config.def:390 #, fuzzy #| msgid "REDEFINES clause must follow entry-name" msgid "REDEFINES clause not following entry-name in definition" msgstr "cláusula REDEFINES tem de seguir o nome-de-entrada" -#: cobc/config.def:380 +#: cobc/config.def:393 msgid "record sizes does not match RECORD clause" msgstr "" -#: cobc/config.def:383 cobc/parser.y:5736 cobc/parser.y:5750 cobc/parser.y:5763 -#: cobc/parser.y:5774 +#: cobc/config.def:396 cobc/parser.y:5991 cobc/parser.y:6005 cobc/parser.y:6018 +#: cobc/parser.y:6029 #, fuzzy msgid "RECORD DELIMITER clause" msgstr "cláusulas LOCK" -#: cobc/config.def:386 +#: cobc/config.def:399 msgid "BINARY-SEQUENTIAL and LINE-SEQUENTIAL phrases in RECORD DELIMITER" msgstr "" -#: cobc/config.def:389 cobc/tree.c:4805 +#: cobc/config.def:402 cobc/tree.c:4873 msgid "RECORD DELIMITER clause on file with fixed-length records" msgstr "" -#: cobc/config.def:392 +#: cobc/config.def:405 msgid "missing statement (e.g. empty IF / PERFORM)" msgstr "" -#: cobc/config.def:395 +#: cobc/config.def:408 msgid "missing period in PROCEDURE DIVISION (when reference format supports Area A enforcement)" msgstr "" -#: cobc/config.def:398 +#: cobc/config.def:411 msgid "zero-length literals, e.g. '' and \"\"" msgstr "" -#: cobc/config.def:401 +#: cobc/config.def:414 msgid "XML GENERATE's phrases other than COUNT IN" msgstr "" -#: cobc/config.def:404 cobc/typeck.c:8565 +#: cobc/config.def:417 cobc/typeck.c:9017 msgid "AFTER phrase in CONTINUE statement" msgstr "" -#: cobc/config.def:407 -msgid "ENTRY FOR GOTO and GOTO ENTRY statements" +#: cobc/config.def:420 +msgid "ENTRY FOR GO TO and GO TO ENTRY statements" msgstr "" -#: cobc/config.def:410 +#: cobc/config.def:423 cobc/typeck.c:4642 msgid "ASSIGN [TO] variable in SELECT" msgstr "" -#: cobc/config.def:413 +#: cobc/config.def:426 msgid "ASSIGN USING/VARYING variable in SELECT" msgstr "" -#: cobc/config.def:416 +#: cobc/config.def:429 msgid "ASSIGN EXTERNAL/DYNAMIC in SELECT" msgstr "" -#: cobc/config.def:419 +#: cobc/config.def:432 msgid "ASSIGN DISK FROM variable in SELECT" msgstr "" -#: cobc/config.def:422 +#: cobc/config.def:435 msgid "VSAM status in FILE STATUS" msgstr "" -#: cobc/config.def:425 +#: cobc/config.def:438 msgid "CALL to own PROGRAM-ID implies RECURSIVE attribute" msgstr "" -#: cobc/config.def:428 +#: cobc/config.def:441 msgid "DEPENDING clause in RECORD CONTAINS" msgstr "" -#: cobc/config.def:431 cobc/tree.c:3584 +#: cobc/config.def:444 cobc/tree.c:3623 msgid "PICTURE string with 'L' character" msgstr "" -#: cobc/error.c:83 +#: cobc/error.c:141 libcob/common.c:1379 libcob/common.c:8715 +#: libcob/common.c:8766 +#, fuzzy, c-format +msgid "warning: " +msgstr "aviso: " + +#: cobc/error.c:142 libcob/common.c:8784 +msgid "note: " +msgstr "" + +#: cobc/error.c:162 #, fuzzy, c-format msgid "in section '%s':" msgstr "na secção" -#: cobc/error.c:94 +#: cobc/error.c:173 #, fuzzy, c-format msgid "in paragraph '%s':" msgstr "no parágrafo" -#: cobc/error.c:129 cobc/error.c:133 cobc/error.c:136 +#: cobc/error.c:227 cobc/error.c:231 cobc/error.c:234 msgid "too many errors" msgstr "demasiados erros" -#: cobc/error.c:145 +#: cobc/error.c:243 #, fuzzy, c-format msgid "in file included from " msgstr "o ficheiro de configuração foi incluído aqui" -#: cobc/error.c:163 libcob/common.c:8325 +#: cobc/error.c:261 libcob/common.c:9146 msgid "configuration error:" msgstr "erro de configuração:" -#: cobc/error.c:176 libcob/common.c:861 +#: cobc/error.c:274 libcob/common.c:920 #, c-format msgid "system error %d" msgstr "erro de sistema %d" -#: cobc/error.c:346 cobc/error.c:413 cobc/error.c:475 cobc/error.c:631 -#: cobc/error.c:675 cobc/error.c:785 libcob/common.c:1318 libcob/common.c:7900 -#: libcob/common.c:7951 -#, fuzzy, c-format -msgid "warning: " -msgstr "aviso: " - -#: cobc/error.c:518 cobc/error.c:534 cobc/error.c:868 cobc/error.c:889 +#: cobc/error.c:616 cobc/error.c:632 cobc/error.c:971 cobc/error.c:992 #, c-format msgid "%s used" msgstr "%s usad(o/a)" -#: cobc/error.c:521 cobc/error.c:871 +#: cobc/error.c:619 cobc/error.c:974 #, c-format msgid "%s is archaic in %s" msgstr "%s é antiquad(o/a) (archaic) em %s" -#: cobc/error.c:525 cobc/error.c:875 +#: cobc/error.c:623 cobc/error.c:978 #, c-format msgid "%s is obsolete in %s" msgstr "%s é obsolet(o/a) em %s" -#: cobc/error.c:531 cobc/error.c:881 cobc/parser.y:5738 +#: cobc/error.c:629 cobc/error.c:984 cobc/parser.y:5993 #, c-format msgid "%s ignored" msgstr "%s ignorad(o/a)" -#: cobc/error.c:537 cobc/error.c:891 +#: cobc/error.c:635 cobc/error.c:994 #, c-format msgid "%s does not conform to %s" msgstr "%s não está em conformidade com %s" -#: cobc/error.c:553 +#: cobc/error.c:651 #, fuzzy msgid "configuration warning:" msgstr "aviso de configuração" -#: cobc/error.c:728 cobc/error.c:731 cobc/error.c:755 cobc/error.c:758 -#: libcob/common.c:7969 -msgid "note: " -msgstr "" - -#: cobc/error.c:933 cobc/error.c:962 +#: cobc/error.c:1040 cobc/error.c:1069 #, fuzzy, c-format msgid "redefinition of '%s'" msgstr "redefinição de '%s'" -#: cobc/error.c:939 cobc/error.c:973 +#: cobc/error.c:1046 cobc/error.c:1080 #, c-format msgid "'%s' previously defined here" msgstr "'%s' previamente definido(s) aqui" -#: cobc/error.c:1017 cobc/error.c:1023 +#: cobc/error.c:1124 cobc/error.c:1130 #, fuzzy, c-format msgid "'%s' is not defined" msgstr "%s não está definid(o/a)" -#: cobc/error.c:1019 +#: cobc/error.c:1126 #, fuzzy, c-format msgid "'%s' cannot be used here" msgstr "'%s' não pode ser usad(o/a) aqui" -#: cobc/error.c:1021 cobc/parser.y:7658 +#: cobc/error.c:1128 cobc/parser.y:7941 #, c-format msgid "'%s' is not defined, but is a reserved word in another dialect" msgstr "'%s' não está definid(o/a), mas é uma palavra reservada noutro dialeto" -#: cobc/error.c:1060 +#: cobc/error.c:1167 #, fuzzy, c-format msgid "'%s' is ambiguous; needs qualification" msgstr "%s é ambigu(o/a); necessita qualificação" -#: cobc/error.c:1090 +#: cobc/error.c:1197 #, fuzzy, c-format msgid "'%s' is a special register" msgstr "'%s' não é um inteiro" -#: cobc/error.c:1093 +#: cobc/error.c:1200 #, fuzzy, c-format msgid "'%s' internally defined" msgstr "%s não está definid(o/a)" -#: cobc/error.c:1097 cobc/parser.y:18176 cobc/parser.y:18181 cobc/typeck.c:5000 -#: cobc/typeck.c:5047 cobc/typeck.c:5048 +#: cobc/error.c:1204 cobc/parser.y:18772 cobc/parser.y:18777 cobc/typeck.c:5166 +#: cobc/typeck.c:5213 cobc/typeck.c:5214 #, c-format msgid "'%s' defined here" msgstr "'%s' definid(o/a) aqui" -#: cobc/error.c:1108 +#: cobc/error.c:1215 #, fuzzy, c-format msgid "fatal error: %s" msgstr "erro fatal: %s" -#: cobc/error.c:1117 +#: cobc/error.c:1224 #, fuzzy, c-format msgid "group item '%s' cannot have %s clause" msgstr "item de grupo '%s' não pode ter a cláusula %s" -#: cobc/error.c:1132 +#: cobc/error.c:1239 #, fuzzy, c-format msgid "constant item '%s' requires a %s clause" msgstr "item constante '%s' requer a cláusula %s" -#: cobc/error.c:1136 +#: cobc/error.c:1243 #, fuzzy, c-format msgid "level %02d item '%s' requires a %s clause" msgstr "item de nível %02d '%s' requer a cláusula %s" -#: cobc/error.c:1151 +#: cobc/error.c:1258 #, fuzzy, c-format msgid "constant item '%s' can only have a %s clause" msgstr "item constante '%s' só pode ter a cláusula %s" -#: cobc/error.c:1155 +#: cobc/error.c:1262 #, fuzzy, c-format msgid "level %02d item '%s' can only have a %s clause" msgstr "item de nível %02d '%s' só pode ter a cláusula %s" -#: cobc/field.c:136 +#: cobc/field.c:139 msgid "constant expression has Divide by ZERO" msgstr "" -#: cobc/field.c:192 cobc/field.c:329 cobc/field.c:337 +#: cobc/field.c:195 cobc/field.c:332 cobc/field.c:340 msgid "missing right parenthesis" msgstr "" -#: cobc/field.c:221 +#: cobc/field.c:224 #, c-format msgid "expression stack overflow at %d entries for operation '%c'" msgstr "" -#: cobc/field.c:262 +#: cobc/field.c:265 #, c-format msgid "expression stack overflow at %d entries" msgstr "" -#: cobc/field.c:279 +#: cobc/field.c:282 #, fuzzy msgid "missing left parenthesis" msgstr "definições em falta:" -#: cobc/field.c:320 +#: cobc/field.c:323 #, fuzzy, c-format msgid "invalid operator '%s' in expression" msgstr "expressão inválida" -#: cobc/field.c:339 +#: cobc/field.c:342 #, c-format msgid "'%c' operator misplaced" msgstr "" -#: cobc/field.c:400 +#: cobc/field.c:403 #, fuzzy, c-format msgid "invalid level number '%s'" msgstr "número de nível '%s' inválido" -#: cobc/field.c:460 cobc/field.c:498 +#: cobc/field.c:463 cobc/field.c:502 #, fuzzy msgid "level number must begin with 01 or 77" msgstr "o número de nível tem que começar com 01 ou 77" -#: cobc/field.c:558 cobc/field.c:562 +#: cobc/field.c:562 cobc/field.c:566 #, fuzzy, c-format msgid "no previous data item of level %02d" msgstr "não existe previamente um item de dados de nível %02d" -#: cobc/field.c:620 +#: cobc/field.c:631 #, c-format msgid "'%s' cannot be qualified here" msgstr "'%s' não pode ser qualificad(o/a) aqui" -#: cobc/field.c:626 +#: cobc/field.c:637 #, c-format msgid "'%s' cannot be subscripted here" msgstr "'%s' não pode ser endereçad(o/a) (subscripted) aqui" -#: cobc/field.c:642 cobc/field.c:653 +#: cobc/field.c:653 cobc/field.c:664 #, c-format msgid "'%s' is not defined in '%s'" msgstr "'%s' não está definid(o/a) em '%s'" -#: cobc/field.c:660 +#: cobc/field.c:671 #, fuzzy msgid "level number of REDEFINES entries must be identical" msgstr "número de nível de entradas REDEFINES têm de ser idênticas" -#: cobc/field.c:665 +#: cobc/field.c:676 #, fuzzy, c-format msgid "'%s' is not the original definition" msgstr "'%s' não é a definição original" -#: cobc/field.c:826 cobc/parser.y:659 +#: cobc/field.c:720 cobc/parser.y:1051 +#, fuzzy, c-format +msgid "duplicate %s" +msgstr "cláusula %s duplicada" + +#: cobc/field.c:878 cobc/parser.y:733 #, fuzzy, c-format msgid "duplicate %s clause" msgstr "cláusula %s duplicada" -#: cobc/field.c:906 +#: cobc/field.c:988 #, fuzzy, c-format msgid "%s clause not compatible with PIC %s" msgstr "cláusula %s não compatível com USAGE %d" -#: cobc/field.c:917 cobc/field.c:953 +#: cobc/field.c:999 cobc/field.c:1036 #, fuzzy, c-format msgid "%s clause not compatible with USAGE %s" msgstr "cláusula %s não compatível com USAGE %d" -#: cobc/field.c:1053 cobc/field.c:1069 cobc/field.c:1131 cobc/field.c:1142 +#: cobc/field.c:1140 cobc/field.c:1159 cobc/field.c:1227 cobc/field.c:1238 #, c-format msgid "PICTURE clause required for '%s'" msgstr "cláusula PICTURE requerida para '%s'" -#: cobc/field.c:1138 +#: cobc/field.c:1234 #, fuzzy, c-format msgid "a non-numeric literal is expected for '%s'" msgstr "é esperado um literal não numérico para '%s'" -#: cobc/field.c:1150 +#: cobc/field.c:1247 #, fuzzy, c-format msgid "defining implicit picture size %d for '%s'" msgstr "a definir o tamanho implícito da cláusula PICTURE %d para '%s'" -#: cobc/field.c:1171 +#: cobc/field.c:1271 #, c-format msgid "'%s' ANY LENGTH only allowed in LINKAGE" msgstr "'%s' ANY LENGTH só é permitid(o/a) na secção LINKAGE" -#: cobc/field.c:1175 +#: cobc/field.c:1275 #, c-format msgid "'%s' ANY LENGTH must be 01 level" msgstr "'%s' ANY LENGTH tem de ser de nível 01" -#: cobc/field.c:1179 +#: cobc/field.c:1279 #, fuzzy, c-format msgid "'%s' ANY LENGTH cannot be BASED/EXTERNAL" msgstr "'%s' ANY LENGTH não pode ser BASED/EXTERNAL" -#: cobc/field.c:1184 cobc/field.c:1210 +#: cobc/field.c:1283 cobc/field.c:1313 #, c-format msgid "'%s' ANY LENGTH has invalid definition" msgstr "'%s' ANY LENGTH tem definição inválida" -#: cobc/field.c:1192 +#: cobc/field.c:1295 #, fuzzy, c-format msgid "'%s' ANY NUMERIC must be PIC 9" msgstr "'%s' ANY LENGTH tem de usar a cláusula PICTURE" -#: cobc/field.c:1198 +#: cobc/field.c:1301 #, fuzzy, c-format -msgid "'%s' ANY LENGTH must be PIC X, PIC N or PIC 1" +msgid "'%s' ANY LENGTH must be PIC X, PIC U, PIC N or PIC 1" msgstr "'%s' ANY LENGTH tem de usar a cláusula PICTURE" -#: cobc/field.c:1208 +#: cobc/field.c:1311 #, fuzzy, c-format msgid "'%s' ANY NUMERIC has invalid definition" msgstr "'%s' ANY LENGTH tem definição inválida" -#: cobc/field.c:1224 +#: cobc/field.c:1327 #, c-format msgid "'%s' EXTERNAL must be specified at 01/77 level" msgstr "'%s' EXTERNAL tem de ser especificad(o/a) com nível 01 ou 77" -#: cobc/field.c:1228 +#: cobc/field.c:1331 #, c-format msgid "'%s' EXTERNAL can only be specified in WORKING-STORAGE section" msgstr "'%s' EXTERNAL só pode ser especificad(o/a) na secção WORKING-STORAGE" -#: cobc/field.c:1232 +#: cobc/field.c:1335 #, c-format msgid "'%s' EXTERNAL and BASED are mutually exclusive" msgstr "'%s' EXTERNAL e BASED são mutuamente exclusivos" -#: cobc/field.c:1235 +#: cobc/field.c:1338 #, c-format msgid "'%s' EXTERNAL not allowed with REDEFINES" msgstr "'%s' EXTERNAL não é permitid(o/a) com REDEFINES" -#: cobc/field.c:1247 +#: cobc/field.c:1350 #, c-format msgid "'%s' BASED not allowed here" msgstr "'%s' BASED não é permitid(o/a) aqui" -#: cobc/field.c:1250 +#: cobc/field.c:1353 #, c-format msgid "'%s' BASED not allowed with REDEFINES" msgstr "'%s' BASED não é permitid(o/a) com REDEFINES" -#: cobc/field.c:1253 +#: cobc/field.c:1356 #, c-format msgid "'%s' BASED only allowed at the 01 and 77 levels" msgstr "'%s' BASED só é permitid(o/a) nos níveis 01 e 77" -#: cobc/field.c:1279 +#: cobc/field.c:1383 #, fuzzy, c-format #| msgid "'%s' cannot have the OCCURS clause due to '%s'" msgid "'%s' cannot have an OCCURS clause due to '%s'" msgstr "'%s' não pode ter a cláusula OCCURS devido a '%s'" -#: cobc/field.c:1298 +#: cobc/field.c:1402 #, fuzzy, c-format msgid "the original definition '%s' should not have an OCCURS clause" msgstr "a definição original '%s' não deveria ter a cláusula OCCURS" -#: cobc/field.c:1305 +#: cobc/field.c:1408 +#, fuzzy, c-format +msgid "the original definition '%s' should not have an ANY LENGTH clause" +msgstr "a definição original '%s' não deveria ter a cláusula OCCURS" + +#: cobc/field.c:1415 msgid "REDEFINES must follow the original definition" msgstr "REDEFINES tem de seguir a definição original" -#: cobc/field.c:1313 +#: cobc/field.c:1423 #, c-format msgid "'%s' cannot be variable length" msgstr "'%s' não pode ser de comprimento variável" -#: cobc/field.c:1316 +#: cobc/field.c:1426 #, fuzzy, c-format msgid "the original definition '%s' cannot be variable length" msgstr "a definição original '%s' não pode ser de comprimento variável" -#: cobc/field.c:1335 +#: cobc/field.c:1445 cobc/field.c:1708 #, fuzzy, c-format #| msgid "'%s' cannot have JUSTIFIED RIGHT" msgid "'%s' cannot have JUSTIFIED RIGHT clause" msgstr "'%s' não pode usar JUSTIFIED RIGHT" -#: cobc/field.c:1342 +#: cobc/field.c:1453 #, fuzzy, c-format #| msgid "'%s' cannot have PICTURE clause" msgid "'%s' cannot have BLANK WHEN ZERO clause" msgstr "'%s' não pode ter a cláusula de PICTURE" -#: cobc/field.c:1348 +#: cobc/field.c:1460 #, c-format msgid "SCREEN group item '%s' has invalid clause" msgstr "o item de grupo SCREEN '%s' contém uma cláusula inválida" -#: cobc/field.c:1436 +#: cobc/field.c:1548 #, fuzzy, c-format msgid "%s USAGE %s incompatible with %s USAGE %s" msgstr "cláusula %s não compatível com USAGE %d" -#: cobc/field.c:1516 +#: cobc/field.c:1629 #, c-format msgid "'%s' cannot have PICTURE clause" msgstr "'%s' não pode ter a cláusula de PICTURE" -#: cobc/field.c:1533 -#, fuzzy, c-format -msgid "%s item '%s' should be USAGE DISPLAY" -msgstr "'%s' não é USAGE DISPLAY" - -#: cobc/field.c:1556 +#: cobc/field.c:1662 #, fuzzy, c-format msgid "'%s' COMP-6 with sign - changing to COMP-3" msgstr "'%s' COMP-6 com sinal - a alterar para COMP-3" -#: cobc/field.c:1582 +#: cobc/field.c:1688 msgid "elementary items with SIGN clause must have S in PICTURE" msgstr "itens elementares com a cláusula SIGN têm de ter 'S' em PICTURE" -#: cobc/field.c:1585 +#: cobc/field.c:1691 msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgstr "itens elementares com a cláusula SIGN têm de usar USAGE DISPLAY or NATIONAL" -#: cobc/field.c:1602 -#, c-format -msgid "'%s' cannot have JUSTIFIED RIGHT" -msgstr "'%s' não pode usar JUSTIFIED RIGHT" - -#: cobc/field.c:1614 +#: cobc/field.c:1720 #, fuzzy, c-format msgid "'%s' cannot have S in PICTURE string and BLANK WHEN ZERO" msgstr "'%s' não pode ter 'S' em PICTURE e BLANK WHEN ZERO" -#: cobc/field.c:1619 +#: cobc/field.c:1725 #, c-format msgid "'%s' cannot have BLANK WHEN ZERO without being USAGE DISPLAY or NATIONAL" msgstr "'%s' não pode ter BLANK WHEN ZERO sem ser USAGE DISPLAY ou NATIONAL" -#: cobc/field.c:1631 +#: cobc/field.c:1737 #, fuzzy, c-format msgid "'%s' cannot have * in PICTURE string and BLANK WHEN ZERO" msgstr "'%s' não pode ter '*' em PICTURE e BLANK WHEN ZERO" -#: cobc/field.c:1638 +#: cobc/field.c:1744 #, fuzzy, c-format msgid "'%s' is not numeric, so cannot have BLANK WHEN ZERO" msgstr "'%s' não é numérico, portanto não pode ter BLANK WHEN ZERO" -#: cobc/field.c:1691 +#: cobc/field.c:1798 #, c-format msgid "elements in VALUE clause for '%s' (%d) exceed max amount (%d)" msgstr "" -#: cobc/field.c:1708 cobc/field.c:1712 +#: cobc/field.c:1822 +msgid "unexpected VALUES ARE for elementary item" +msgstr "" + +#: cobc/field.c:1836 cobc/field.c:1840 #, fuzzy, c-format msgid "initial VALUE clause ignored for %s item '%s'" msgstr "cláusula inicial VALUE ignorada para o item EXTERNAL" -#: cobc/field.c:1725 +#: cobc/field.c:1853 msgid "FULL has no effect on numeric items; you may want REQUIRED or PIC Z" msgstr "" -#: cobc/field.c:1755 +#: cobc/field.c:1884 msgid "VALUE may not contain a figurative constant" msgstr "" -#: cobc/field.c:1763 -#, fuzzy -#| msgid "cannot specify both %s and %s" -msgid "cannot specify both FULL and JUSTIFIED" +#: cobc/field.c:1893 cobc/field.c:1935 cobc/parser.y:750 cobc/parser.y:1823 +#: cobc/parser.y:1826 +#, c-format +msgid "cannot specify both %s and %s" msgstr "não é possível especificar ambos '%s' e '%s'" -#: cobc/field.c:1775 +#: cobc/field.c:1905 #, c-format msgid "'%s' has FROM, TO or USING without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1792 +#: cobc/field.c:1922 #, c-format msgid "'%s' has numeric VALUE without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1805 -#, fuzzy -#| msgid "cannot specify both %s and %s" -msgid "cannot specify both PIC and VALUE" -msgstr "não é possível especificar ambos '%s' e '%s'" - -#: cobc/field.c:1813 +#: cobc/field.c:1943 msgid "cannot have PIC without FROM, TO or USING" msgstr "" -#: cobc/field.c:1822 +#: cobc/field.c:1952 msgid "cannot have numeric VALUE without PIC" msgstr "" -#: cobc/field.c:1831 +#: cobc/field.c:1961 msgid "cannot have FROM, TO or USING without PIC" msgstr "" -#: cobc/field.c:1841 +#: cobc/field.c:1971 #, fuzzy #| msgid "INITIALIZED TO item is not alphanumeric" msgid "VALUE item may not be numeric" msgstr "item INITIALIZED TO não é alfanumérico" -#: cobc/field.c:1856 +#: cobc/field.c:1986 #, c-format msgid "'%s' needs a PIC, COL, LINE, VALUE, BELL or BLANK clause" msgstr "" -#: cobc/field.c:1868 +#: cobc/field.c:1998 #, c-format msgid "'%s' cannot have PIC without FROM, TO, USING or numeric VALUE" msgstr "" -#: cobc/field.c:1876 +#: cobc/field.c:2006 #, c-format msgid "'%s' needs a PIC, FROM, TO, USING, VALUE, BELL, BLANK or ERASE clause" msgstr "" -#: cobc/field.c:1912 +#: cobc/field.c:2042 msgid "cannot use AUTO, FULL, PROMPT, REQUIRED or SECURE on elementary item without TO or USING" msgstr "" -#: cobc/field.c:1919 +#: cobc/field.c:2049 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED, OCCURS or SIGN on item without FROM, TO or USING" msgstr "" -#: cobc/field.c:1938 +#: cobc/field.c:2068 msgid "cannot use AUTO, FULL, REQUIRED or SECURE on elementary item without FROM, TO or USING" msgstr "" -#: cobc/field.c:1943 +#: cobc/field.c:2073 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED or SIGN without FROM, TO or USING" msgstr "" -#: cobc/field.c:1960 +#: cobc/field.c:2090 #, fuzzy #| msgid "'%s' cannot have BLANK WHEN ZERO without being USAGE DISPLAY or NATIONAL" msgid "cannot have BLANK WHEN ZERO without PIC" msgstr "'%s' não pode ter BLANK WHEN ZERO sem ser USAGE DISPLAY ou NATIONAL" -#: cobc/field.c:1963 +#: cobc/field.c:2093 #, fuzzy #| msgid "'%s' cannot have JUSTIFIED RIGHT" msgid "cannot have JUSTIFIED without PIC" msgstr "'%s' não pode usar JUSTIFIED RIGHT" -#: cobc/field.c:1983 +#: cobc/field.c:2113 msgid "cannot have AUTO without FROM, TO or USING" msgstr "" -#: cobc/field.c:1988 +#: cobc/field.c:2118 msgid "cannot use FULL or REQUIRED on item without TO or USING" msgstr "" -#: cobc/field.c:1995 +#: cobc/field.c:2125 msgid "SECURE can be used with TO only" msgstr "" -#: cobc/field.c:1997 +#: cobc/field.c:2127 #, fuzzy #| msgid "READ must be executed first" msgid "SECURE must be used with TO" msgstr "READ tem de ser executado primeiro" -#: cobc/field.c:2016 +#: cobc/field.c:2146 #, fuzzy, c-format msgid "'%s' does nothing" msgstr "%s não está definid(o/a)" -#: cobc/field.c:2235 +#: cobc/field.c:2361 #, fuzzy, c-format #| msgid "'%s' 77 level not allowed here" msgid "'%s' 77 level is not allowed here" msgstr "'%s' o nível 77 não é permitido aqui" -#: cobc/field.c:2627 +#: cobc/field.c:2399 msgid "OCCURS and multi COLUMNs is not allowed" msgstr "" -#: cobc/field.c:2655 +#: cobc/field.c:2419 #, fuzzy, c-format msgid "duplicate LINE %d ignored" msgstr "definição (define) duplicada '%s' - ignorado" -#: cobc/field.c:2672 +#: cobc/field.c:2870 #, fuzzy, c-format msgid "ignoring SYNCHRONIZED for group item '%s'" msgstr "ignorando SYNCHRONIZIED para o item de grupo '%s'" -#: cobc/field.c:2686 cobc/field.c:2954 +#: cobc/field.c:2884 cobc/field.c:3219 msgid "larger REDEFINES" msgstr "" -#: cobc/field.c:2699 cobc/field.c:2957 cobc/field.c:2962 +#: cobc/field.c:2898 cobc/field.c:3222 cobc/field.c:3227 #, fuzzy, c-format msgid "size of '%s' larger than size of '%s'" msgstr "o tamanho de '%s' é mais comprido que o tamanho de '%s'" -#: cobc/field.c:2812 cobc/field.c:2879 +#: cobc/field.c:3045 cobc/field.c:3129 cobc/parser.y:832 #, fuzzy, c-format msgid "'%s' cannot be larger than %d bytes" msgstr "'%s' não pode ser maior do que %d octetos (bytes)" -#: cobc/field.c:2850 cobc/field.c:2858 +#: cobc/field.c:3086 cobc/field.c:3094 #, c-format msgid "'%s' binary field cannot be larger than %d digits" msgstr "'%s' o campo binário não pode ser maior do que %d dígitos" -#: cobc/field.c:2940 cobc/field.c:3522 -#, fuzzy, c-format -msgid "unexpected USAGE: %d" -msgstr "USAGE inesperado: %d" - -#: cobc/field.c:3067 cobc/parser.y:710 cobc/parser.y:712 cobc/parser.y:6274 -#: cobc/parser.y:6284 cobc/parser.y:7344 cobc/parser.y:7347 cobc/parser.y:7349 -#: cobc/parser.y:7351 cobc/parser.y:7386 cobc/parser.y:8237 cobc/parser.y:8239 -#: cobc/parser.y:8241 cobc/parser.y:8243 cobc/parser.y:8558 cobc/parser.y:8567 -#: cobc/parser.y:10564 cobc/parser.y:12075 cobc/parser.y:13492 -#: cobc/parser.y:14902 cobc/typeck.c:5034 +#: cobc/field.c:3353 cobc/parser.y:791 cobc/parser.y:793 cobc/parser.y:6529 +#: cobc/parser.y:6539 cobc/parser.y:7625 cobc/parser.y:7628 cobc/parser.y:7630 +#: cobc/parser.y:7632 cobc/parser.y:7667 cobc/parser.y:8610 cobc/parser.y:8612 +#: cobc/parser.y:8614 cobc/parser.y:8616 cobc/parser.y:8958 cobc/parser.y:8967 +#: cobc/parser.y:10897 cobc/parser.y:12460 cobc/parser.y:13920 +#: cobc/parser.y:15390 cobc/typeck.c:5200 #, c-format msgid "%s and %s are mutually exclusive" msgstr "%s e %s são mutuamente exclusivos" -#: cobc/field.c:3068 cobc/parser.y:7529 cobc/parser.y:7566 +#: cobc/field.c:3354 cobc/parser.y:7810 cobc/parser.y:7847 msgid "variable-length PICTURE" msgstr "" -#: cobc/field.c:3187 +#: cobc/field.c:3475 #, fuzzy msgid "literal type does not match numeric data type" msgstr "tipo literal não corresponde ao tipo de dados numérico" -#: cobc/field.c:3261 +#: cobc/field.c:3549 #, c-format msgid "THRU item '%s' may not come before '%s'" msgstr "o item THRU '%s' não pode vir antes de '%s'" -#: cobc/field.c:3284 +#: cobc/field.c:3572 #, c-format msgid "RENAMES cannot start/end at the OCCURS item '%s'" msgstr "RENAMES não pode iniciar/acabar no item OCCURS '%s'" -#: cobc/field.c:3292 +#: cobc/field.c:3580 #, c-format msgid "cannot use RENAMES on part of the table '%s'" msgstr "não pode usar RENAMES em parte da tabela '%s'" -#: cobc/field.c:3330 +#: cobc/field.c:3618 #, c-format msgid "RENAMES may not contain '%s' as it is a pointer or object reference" msgstr "RENAMES não pode conter '%s' porque é um ponteiro ou uma referência a um objeto" -#: cobc/field.c:3335 +#: cobc/field.c:3623 #, c-format msgid "RENAMES may not contain '%s' as it is an OCCURS DEPENDING table" msgstr "RENAMES não pode conter '%s' porque é uma tabela OCCURS DEPENDING (ODO table)" -#: cobc/field.c:3359 +#: cobc/field.c:3647 #, fuzzy msgid "RENAMES may not reference a level 88" msgstr "RENAMES não pode referênciar o nível 88" -#: cobc/field.c:3383 +#: cobc/field.c:3671 #, c-format msgid "'%s' must immediately follow the record '%s'" msgstr "''%s' tem de vir imediatamente após o registo '%s'" -#: cobc/field.c:3391 +#: cobc/field.c:3679 #, c-format msgid "THRU item must be different to '%s'" msgstr "o item THRU tem de ser diferente de '%s'" -#: cobc/field.c:3397 +#: cobc/field.c:3685 #, c-format msgid "'%s' and '%s' must be in the same record" msgstr "'%s' e '%s' têm que estar definidos no mesmo registo" -#: cobc/field.c:3408 +#: cobc/field.c:3696 #, c-format msgid "THRU item '%s' may not be subordinate to '%s'" msgstr "o item THRU '%s' não pode ser subordinado a '%s'" @@ -1921,83 +1933,81 @@ msgid "" " intrinsics to be used without FUNCTION keyword" msgstr "" -#: cobc/flag.def:78 -msgid "" -" -fec=<exception-name>\tenable code generation for <exception-name>,\n" -" sets -fsource-location" -msgstr "" - -#: cobc/flag.def:81 cobc/help.c:96 -msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" -msgstr "" - -#: cobc/flag.def:84 +#: cobc/flag.def:85 msgid "" " -fdump=<scope> dump data fields on abort, <scope> may be\n" " a combination of: ALL, WS, LS, RD, FD, SC, LO" msgstr "" -#: cobc/flag.def:87 +#: cobc/flag.def:88 msgid "" " -fno-dump=<scope> exclude data fields from dumping on abort, <scope> may\n" -" be a combination of: ALL, WS, LS, RD, FD, SC, LO" +" be a combination of: ALL, WS, LS, RD, FD, SC, LO\n" +" default if no scope specified: ALL" msgstr "" -#: cobc/flag.def:92 +#: cobc/flag.def:94 msgid "" " -fcallfh=<name> specifies <name> to be used for I/O\n" " as external provided EXTFH interface module" msgstr "" -#: cobc/flag.def:96 +#: cobc/flag.def:98 +msgid "" +" -febcdic-table=<cconv-table>/<file>\tEBCDIC/ASCII translation table\n" +" * e.g. default, ebcdic500_latin1..." +msgstr "" + +#: cobc/flag.def:102 msgid "" -" -febcdic-table=[DEFAULT|RESTRICTED-GC|IBM|GCOS]\tdefine EBCDIC translation table:\n" -" * default: translation to extended ASCII as per MF\n" -" * restricted-gc: translation from restricted ASCII only\n" -" * ibm: translation to restricted ASCII as per IBM\n" -" * gcos: translation to extended ASCII as per GCOS7" +" -fdefault-colseq=[ASCII|EBCDIC|NATIVE]\tdefine default collating sequence\n" +" * default: NATIVE" msgstr "" -#: cobc/flag.def:107 +#: cobc/flag.def:110 #, fuzzy msgid "" " -fwinmain generate WinMain instead of main when compiling\n" " as executable" msgstr " -i, -info exibe a informação do compilador (compilação/ambiente)" -#: cobc/flag.def:111 +#: cobc/flag.def:114 #, fuzzy msgid " -fcomputed-goto generate computed goto C statements" msgstr "gera instruções 'goto' na linguagem 'C'" -#: cobc/flag.def:114 +#: cobc/flag.def:117 msgid " -fextra-brace generate extra braces in C source" msgstr "" -#: cobc/flag.def:117 +#: cobc/flag.def:120 #, fuzzy msgid " -fcorrect-numeric attempt correction of invalid numeric display items" msgstr "tentativa de correção de itens de exibição numéricos inválidos" -#: cobc/flag.def:120 +#: cobc/flag.def:123 #, fuzzy #| msgid "PERFORM stack allocated on heap" msgid " -fstack-on-heap PERFORM stack allocated on heap" msgstr "pilha de PERFORM alocada na memória 'heap' (estrutura de dados organizada como árvore binária balanceada)" -#: cobc/flag.def:123 +#: cobc/flag.def:126 msgid "" " -fstack-extended store origin of entrypoints and PERFORM\n" -" * turned on by -debug/-dump" +" * turned on by --debug/-fdump" msgstr "" -#: cobc/flag.def:128 +#: cobc/flag.def:130 +msgid " -fno-fast-compare disables inline comparisions" +msgstr "" + +#: cobc/flag.def:135 msgid "" " -fno-remove-unreachable\tdisable remove of unreachable code\n" " * turned off by -g" msgstr "" -#: cobc/flag.def:132 +#: cobc/flag.def:139 #, fuzzy msgid "" " -ftrace generate trace code\n" @@ -2006,18 +2016,18 @@ msgstr "" " -Xref gera uma referência cruzada através de 'cobxref'\n" " ('cobxref' de V. Coen tem que estar definido em 'path')" -#: cobc/flag.def:136 +#: cobc/flag.def:143 msgid "" " -ftraceall generate trace code\n" " * scope: executed SECTION/PARAGRAPH/STATEMENTS" msgstr "" -#: cobc/flag.def:140 +#: cobc/flag.def:147 #, fuzzy msgid " -fsyntax-only syntax error checking only; don't emit any output" msgstr "apenas para verificação de erros de sintaxe; não emite qualquer resultado" -#: cobc/flag.def:143 +#: cobc/flag.def:150 #, fuzzy msgid "" " -fdebugging-line enable debugging lines\n" @@ -2026,44 +2036,51 @@ msgstr "" "habilita linhas de depuração\n" "\t\t\t- 'D' na coluna indicadora (7) ou '>>D' flutuante" -#: cobc/flag.def:147 +#: cobc/flag.def:154 #, fuzzy msgid "" " -fsource-location generate source location code\n" -" * turned on by -debug/-ftraceall/-fec/-dump" +" * turned on by --debug/-ftraceall/-fec/-fdump" msgstr "" "Gera código de localização na fonte (source)\n" "\t\t\t- habilitado por '-debug/-g/-ftraceall'" -#: cobc/flag.def:151 +#: cobc/flag.def:158 #, fuzzy msgid " -fimplicit-init automatic initialization of the COBOL runtime system" msgstr "inicialização automática do sistema de execução (runtime) do GnuCOBOL" -#: cobc/flag.def:154 +#: cobc/flag.def:161 msgid "" " -fno-recursive-check disable check of recursive program call;\n" " effectively compiling as RECURSIVE program" msgstr "" -#: cobc/flag.def:158 +#: cobc/flag.def:165 #, fuzzy msgid "" " -fstack-check PERFORM stack checking\n" -" * turned on by -debug/-g" +" * turned on by --debug/-g" msgstr "" "verificação da pilha (stack) de PERFORM\n" "\t\t\t- habilitado por '-debug' ou '-g'" -#: cobc/flag.def:162 +#: cobc/flag.def:169 +msgid "" +" -fmemory-check=<scope> checks for invalid writes to internal storage,\n" +" <scope> may be one of: all, pointer, using, none\n" +" * default: none, set to all by --debug" +msgstr "" + +#: cobc/flag.def:174 msgid " -fsection-exit-check check that code execution does not leave the scope of SECTIONs" msgstr "" -#: cobc/flag.def:165 +#: cobc/flag.def:177 msgid " -fimplicit-goback-check\tcheck that code execution does not end implicit at end of PROCEDURE DIVISION" msgstr "" -#: cobc/flag.def:168 +#: cobc/flag.def:180 #, fuzzy msgid "" " -fwrite-after use AFTER 1 for WRITE of LINE SEQUENTIAL\n" @@ -2072,19 +2089,13 @@ msgstr "" "usar AFTER 1 para escrita (WRITE) de ficheiros sequênciais com registos delimitados (LINE SEQUENTIAL)\n" "\t\t\t- padrão: BEFORE 1" -#: cobc/flag.def:172 -#, fuzzy -#| msgid "" -#| "'*' or '/' in column 1 treated as comment\n" -#| "\t\t\t- FIXED format only" +#: cobc/flag.def:184 msgid "" -" -fmfcomment '*' or '/' in column 1 treated as comment\n" -" * FIXED format only" +" -fmfcomment '*' in column 1 treated as comment with listing suppression\n" +" * FIXED/COBOL85/VARIABLE format only" msgstr "" -"'*' ou '/' na columa 1 tratado como comentário\n" -"\t\t\t- apenas para fontes de formato fixo (FIXED)" -#: cobc/flag.def:176 +#: cobc/flag.def:188 #, fuzzy #| msgid "" #| "'$' in indicator area treated as '*',\n" @@ -2096,7 +2107,7 @@ msgstr "" "'$' na coluna indicadora (7) é tratado como '*',\n" "\t\t\t'|' tratado como comentário flutuante" -#: cobc/flag.def:181 +#: cobc/flag.def:193 #, fuzzy msgid "" " -fno-trunc allow numeric field overflow\n" @@ -2105,7 +2116,7 @@ msgstr "" "permit(e/ir) transbordo (overflow) de campo numérico\n" "\t\t\t- comportamento não-ANSI" -#: cobc/flag.def:185 +#: cobc/flag.def:197 #, fuzzy msgid "" " -fsingle-quote use a single quote (apostrophe) for QUOTE\n" @@ -2114,7 +2125,7 @@ msgstr "" "usa apóstrofo (apostrophe) para QUOTE\n" "\t\t\t- padrão: aspa (double quote)" -#: cobc/flag.def:195 +#: cobc/flag.def:207 #, fuzzy msgid "" " -foptional-file treat all files as OPTIONAL\n" @@ -2124,12 +2135,12 @@ msgstr "" "\t\t\t- exceto se NOT OPTIONAL fôr especificado" # @@@ BAD ENGLISH OR BAD PORTUGUESE ??? -#: cobc/flag.def:199 +#: cobc/flag.def:211 #, fuzzy msgid " -fstatic-call output static function calls for the CALL statement" msgstr "chamadas a funções estáticas de saída para a instrução CALL" -#: cobc/flag.def:202 +#: cobc/flag.def:214 #, fuzzy #| msgid "disable generation of C function declations for subroutines with static CALL" msgid "" @@ -2137,54 +2148,77 @@ msgid "" " for subroutines with static CALL" msgstr "desabilita a generação de declarações de funções 'C' para subrotinas com chamada (CALL) estática" -#: cobc/flag.def:206 +#: cobc/flag.def:218 msgid "" " -fgen-c-line-directives\tgenerate source location directives in C code;\n" -" * turned on by -g" +" * turned on by -g/--coverage" msgstr "" -#: cobc/flag.def:210 +#: cobc/flag.def:222 msgid "" " -fgen-c-labels generate extra labels in C sources;\n" " * turned on by -g" msgstr "" -#: cobc/flag.def:214 +#: cobc/flag.def:226 msgid "" -" -fno-theaders suppress all headers and output of compilation\n" -" options from listing while keeping page breaks" +" -fno-theaders suppress all headers from listing while keeping\n" +" page breaks" msgstr "" -#: cobc/flag.def:218 +#: cobc/flag.def:230 #, fuzzy msgid " -fno-tsource suppress source from listing" msgstr " -F -free usa programa fonte (source) de formato livre" -#: cobc/flag.def:221 +#: cobc/flag.def:233 msgid " -fno-tmessages suppress warning and error summary from listing" msgstr "" -#: cobc/flag.def:224 +#: cobc/flag.def:236 #, fuzzy msgid " -ftsymbols specify symbols in listing" msgstr " --no-symbols não especifica símbolos na listagem" -#: cobc/flag.def:227 +#: cobc/flag.def:239 +#, fuzzy +msgid " -ftcmd specify command line in listing" +msgstr " --no-symbols não especifica símbolos na listagem" + +#: cobc/flag.def:242 +msgid " -fno-ttimestamp suppress timestamp in listing headers" +msgstr "" + +#: cobc/flag.def:245 +msgid "" +" -fttitle=<title> set listing title with '_' replaced by spaces;\n" +" defaults to package name and version" +msgstr "" + +#: cobc/flag.def:249 msgid "" " -fno-diagnostics-show-option\tsuppress output of option that directly\n" " controls the diagnostic" msgstr "" -#: cobc/help.c:32 +#: cobc/flag.def:253 +msgid " -fno-diagnostics-show-caret\tdo not display source context on warning/error diagnostic" +msgstr "" + +#: cobc/flag.def:256 +msgid " -fno-diagnostics-show-line-numbers\tsuppress display of line numbers in diagnostics" +msgstr "" + +#: cobc/help.c:33 msgid "GnuCOBOL compiler for most COBOL dialects with lots of extensions" msgstr "compilador GnuCOBOL para a maioria dos dialetos com bastantes extensões" -#: cobc/help.c:34 +#: cobc/help.c:35 #, c-format msgid "Usage: %s [options]... file..." msgstr "Modo de usar: %s [opções]... ficheiro..." -#: cobc/help.c:47 bin/cobcrun.c:143 +#: cobc/help.c:48 bin/cobcrun.c:143 #, c-format msgid "" "Report bugs to: %s\n" @@ -2193,45 +2227,44 @@ msgstr "" "Reportar incorreções (bugs) para: %s\n" "ou (preferencialmente) usar o rastreador de problemas (issue tracker) através da página inicial." -#: cobc/help.c:51 -#, fuzzy -#| msgid "GnuCOBOL home page: <http://www.gnu.org/software/gnucobol/>" -msgid "GnuCOBOL home page: <https://www.gnu.org/software/gnucobol/>" -msgstr "Página inicial do GnuCOBOL: <http://www.gnu.org/software/gnucobol/>" +#: cobc/help.c:52 bin/cobcrun.c:146 +#, c-format +msgid "GnuCOBOL home page: <%s>" +msgstr "" -#: cobc/help.c:52 -#, fuzzy +#: cobc/help.c:54 bin/cobcrun.c:148 +#, fuzzy, c-format #| msgid "General help using GNU software: <http://www.gnu.org/gethelp/>" -msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" +msgid "General help using GNU software: <%s>" msgstr "Ajuda geral sobre utilização dos programas GNU: <http://www.gnu.org/gethelp/>" -#: cobc/help.c:58 bin/cobcrun.c:125 +#: cobc/help.c:61 bin/cobcrun.c:125 msgid "Options:" msgstr "Opções:" -#: cobc/help.c:59 +#: cobc/help.c:62 #, fuzzy msgid " -h, --help display this help and exit" msgstr " -h, -help exibe esta ajuda (help) e termina" -#: cobc/help.c:60 +#: cobc/help.c:63 #, fuzzy msgid " -V, --version display compiler version information and exit" msgstr " -V, -version exibe a versão do compilador e termina" -#: cobc/help.c:61 +#: cobc/help.c:64 #, fuzzy msgid " -dumpversion display compiler version and exit" msgstr " -V, -version exibe a versão do compilador e termina" -#: cobc/help.c:62 +#: cobc/help.c:65 #, fuzzy msgid "" " -i, --info display compiler information (build/environment)\n" " and exit" msgstr " -i, -info exibe a informação do compilador (compilação/ambiente)" -#: cobc/help.c:64 +#: cobc/help.c:67 msgid "" " -v, --verbose verbose mode, display additional information;\n" " multiple -v options increase the verbosity,\n" @@ -2242,33 +2275,33 @@ msgid "" " (3) pass verbose option to linker" msgstr "" -#: cobc/help.c:71 +#: cobc/help.c:74 #, fuzzy msgid " -q, --brief reduced displays, commands invoked not shown" msgstr " -q, -brief exibições reduzidas; os comandos invocados não são mostrados" -#: cobc/help.c:72 +#: cobc/help.c:75 #, fuzzy msgid " -### like -v but commands not executed" msgstr " -x cria um programa executável" -#: cobc/help.c:73 +#: cobc/help.c:76 #, fuzzy msgid " -x build an executable program" msgstr " -x cria um programa executável" -#: cobc/help.c:74 +#: cobc/help.c:77 #, fuzzy msgid " -m build a dynamically loadable module (default)" msgstr " -m cria um módulo de carregamento dinâmico (padrão)" -#: cobc/help.c:75 +#: cobc/help.c:78 #, fuzzy #| msgid " -j [<args>], -job[=<args>]\trun program after build, passing <args>" msgid " -j [<args>], --job[=<args>]\trun program after build, passing <args>" msgstr " -j [<args>], -job[=<args>]\texecuta programa após a sua criação, passando o(s) argumento(s) <args>" -#: cobc/help.c:76 +#: cobc/help.c:79 #, fuzzy msgid "" " -std=<dialect> warnings/features for a specific dialect\n" @@ -2286,104 +2319,103 @@ msgstr "" " ibm, mvs, bs2000, mf, acu;\n" " ver ficheiros de configuração no subdiretório 'config'" -#: cobc/help.c:84 +#: cobc/help.c:87 #, fuzzy msgid " -F, --free use free source format (alias for -fformat=free)" msgstr " -F -free usa programa fonte (source) de formato livre" -#: cobc/help.c:85 +#: cobc/help.c:88 #, fuzzy msgid "" " --fixed use fixed source format (default; alias for\n" " -fformat=fixed)" msgstr " -fixed usa programa fonte (source) de formato fixo (padrão)" -#: cobc/help.c:87 +#: cobc/help.c:90 #, fuzzy msgid " -O, -O2, -O3, -Os enable optimization" msgstr " -O, -O2, -Os habilita otimização" -#: cobc/help.c:88 +#: cobc/help.c:91 #, fuzzy msgid " -O0 disable optimization" msgstr " -W habilita todos os avisos" -#: cobc/help.c:89 +#: cobc/help.c:92 #, fuzzy msgid " -g enable C compiler debug and stack check" msgstr " -g habilita 'depuração/verificação de pilha/rastreio' do compilador 'C'" -#: cobc/help.c:90 +#: cobc/help.c:93 #, fuzzy msgid "" " -d, --debug enable all run-time error checking,\n" " equal to -fstack-check -fec=EC-ALL" msgstr " -d, -debug habilita a verificação de todos os erros em tempo de execução" -#: cobc/help.c:93 +#: cobc/help.c:97 msgid "" " -fec=<exception-name>\tenable code generation for <exception-name>,\n" " see --list-exceptions for the possible values,\n" " sets -fsource-location" msgstr "" -#: cobc/help.c:97 +#: cobc/help.c:100 +msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" +msgstr "" + +#: cobc/help.c:101 #, fuzzy msgid " -o <file> place the output into <file>" msgstr " -o <file> coloca o resultado (output) no ficheiro <file>" -#: cobc/help.c:98 +#: cobc/help.c:102 #, fuzzy msgid "" " -b combine all input files into a single\n" " dynamically loadable module" msgstr " -b combina todos os ficheiro de entrada num único\n" -#: cobc/help.c:100 +#: cobc/help.c:104 #, fuzzy msgid " -E preprocess only; do not compile or link" msgstr " -E apenas preprocessamento; não compila ou enlaça (link)" -#: cobc/help.c:101 +#: cobc/help.c:105 #, fuzzy msgid " -C translation only; convert COBOL to C" msgstr " -C apenas tradução; converte COBOL para linguagem 'C'" -#: cobc/help.c:102 +#: cobc/help.c:106 #, fuzzy msgid " -S compile only; output assembly file" msgstr " -S apenas compilação; gera um programa fonte em 'assembler' (e.g. '*.s')" -#: cobc/help.c:103 +#: cobc/help.c:107 #, fuzzy msgid " -c compile and assemble, but do not link" msgstr " -c compila e assembla, mas não enlaça (link)" -#: cobc/help.c:104 +#: cobc/help.c:108 #, fuzzy msgid " -T <file> generate and place a wide program listing into <file>" msgstr " -T <file> gera e coloca uma listagem alargada no ficheiro <file>" -#: cobc/help.c:105 +#: cobc/help.c:109 #, fuzzy msgid " -t <file> generate and place a program listing into <file>" msgstr " -t <file> gera e coloca uma listagem normal no ficheiro <file>" -#: cobc/help.c:106 +#: cobc/help.c:110 msgid " --tlines=<lines> specify lines per page in listing, default = 55" msgstr " --tlines=<lines> especifica o número de linhas por página numa listagem criada por -T ou -t, padrão = 55" -#: cobc/help.c:108 -#, fuzzy -msgid " --tsymbols specify symbols in listing, use -ftsymbols instead" -msgstr " --no-symbols não especifica símbolos na listagem" - -#: cobc/help.c:110 +#: cobc/help.c:111 #, fuzzy msgid " -P[=<dir or file>] generate preprocessed program listing (.lst)" msgstr " -P[=<dir ou file>] gera uma listagem (.lst) do programa fonte preprocessado" -#: cobc/help.c:112 +#: cobc/help.c:113 #, fuzzy msgid "" " -X, --Xref generate cross reference through 'cobxref'\n" @@ -2392,35 +2424,30 @@ msgstr "" " -Xref gera uma referência cruzada através de 'cobxref'\n" " ('cobxref' de V. Coen tem que estar definido em 'path')" -#: cobc/help.c:115 +#: cobc/help.c:116 #, fuzzy msgid " -X, --Xref specify cross reference in listing" msgstr " --no-symbols não especifica símbolos na listagem" -#: cobc/help.c:117 +#: cobc/help.c:118 #, fuzzy msgid " -I <directory> add <directory> to copy/include search path" msgstr " -I <directory> adiciona <directory> aos caminhos de pesquisa dos subdiretórios copy/include" -#: cobc/help.c:118 +#: cobc/help.c:119 #, fuzzy msgid " -L <directory> add <directory> to library search path" msgstr " -L <directory> adiciona <directory> ao caminho de pesquisa do subdiretório de bibliotecas (tipicamente 'lib')" -#: cobc/help.c:119 +#: cobc/help.c:120 #, fuzzy msgid " -l <lib> link the library <lib>" msgstr " -l <lib> enlaça (link) a bibloteca <lib>" -#: cobc/help.c:120 -#, fuzzy -msgid " -A <options> add <options> to the C compile phase" -msgstr " -A <options> adiciona <options> à fase de compilação C" - #: cobc/help.c:121 #, fuzzy -msgid " -Q <options> add <options> to the C link phase" -msgstr " -Q <options> adiciona <options> à fase de enlace (link) C" +msgid " -K <entry> generate CALL to <entry> as static" +msgstr " -K <entry> gera chamada para entrada <entry> estaticamente" #: cobc/help.c:122 #, fuzzy @@ -2429,40 +2456,49 @@ msgstr " -D <define> define <define> para a compilação COBOL" #: cobc/help.c:123 #, fuzzy -msgid " -K <entry> generate CALL to <entry> as static" -msgstr " -K <entry> gera chamada para entrada <entry> estaticamente" +msgid " -A <options> add <options> to the C compile phase" +msgstr " -A <options> adiciona <options> à fase de compilação C" #: cobc/help.c:124 #, fuzzy +msgid " -Q <options> add <options> to the C link phase" +msgstr " -Q <options> adiciona <options> à fase de enlace (link) C" + +#: cobc/help.c:125 +msgid " --coverage instrument generated binaries for coverage" +msgstr "" + +#: cobc/help.c:126 +#, fuzzy msgid " --conf=<file> user-defined dialect configuration; see -std" msgstr " -conf=<file> configuração do dialeto definido-pelo-utilizador; ver -std" -#: cobc/help.c:125 +#: cobc/help.c:127 #, fuzzy msgid " --list-reserved display reserved words" msgstr " -list-reserved exibe palavras reservadas" -#: cobc/help.c:126 +#: cobc/help.c:128 #, fuzzy msgid " --list-intrinsics display intrinsic functions" msgstr " -list-intrinsics exibe funções intrínsecas" -#: cobc/help.c:127 +#: cobc/help.c:129 #, fuzzy msgid " --list-mnemonics display mnemonic names" msgstr " -list-mnemonics exibe nomes mnemónicos" -#: cobc/help.c:128 +#: cobc/help.c:130 #, fuzzy msgid " --list-exceptions display exception names" msgstr " -list-mnemonics exibe nomes mnemónicos" -#: cobc/help.c:129 +#: cobc/help.c:131 #, fuzzy msgid " --list-system display system routines" msgstr " -list-system exibe rotinas de sistema" -#: cobc/help.c:130 +#: cobc/help.c:132 #, fuzzy msgid "" " --save-temps[=<dir>] save intermediate files\n" @@ -2471,3938 +2507,4000 @@ msgstr "" " -save-temps[=<dir>] guarda ficheiros intermediários\n" " - padrão: directório atual" -#: cobc/help.c:132 +#: cobc/help.c:134 +msgid " -MT <target> set/add target file used in dependency list" +msgstr "" + +#: cobc/help.c:135 +#, fuzzy +msgid " -MF <file> place dependency list into <file>" +msgstr " -o <file> coloca o resultado (output) no ficheiro <file>" + +#: cobc/help.c:136 #, fuzzy msgid " -ext <extension> add file extension for resolving COPY" msgstr " -ext <extension> adiciona extensão de ficheiro (e.g. .CPY, .cpy) para resolver COPY" -#: cobc/help.c:139 +#: cobc/help.c:143 #, fuzzy msgid "Warning options:" msgstr "nome/rótulo de configuração (configuration tag) desconhecido '%s'" -#: cobc/help.c:140 +#: cobc/help.c:144 #, fuzzy msgid " -Wall enable most warnings (all except as noted below)" msgstr " -Wall habilita a maior parte dos avisos (todos exceto os abaixo indicados)" -#: cobc/help.c:141 +#: cobc/help.c:145 #, fuzzy msgid " -Wextra like -Wall but enable some extra warning flags" msgstr " -W habilita todos os avisos" -#: cobc/help.c:142 +#: cobc/help.c:146 #, fuzzy msgid " -w disable all warnings" msgstr " -W habilita todos os avisos" -#: cobc/help.c:143 +#: cobc/help.c:147 #, fuzzy #| msgid " -Wno-<warning> disable warning enabled by -W or -Wall" msgid " -Wno-<warning> disable warning enabled by default, -Wall or -Wextra" msgstr " -Wno-<warning> desabilita avisos habilitados por -W ou -Wall" #. TRANSLATORS: This msgid is appended to msgid for -Wno-pending and others -#: cobc/help.c:149 +#: cobc/help.c:153 #, fuzzy #| msgid " mvs MVS Compatible" msgid " * ALWAYS active" msgstr " mvs Compatível MVS" #. TRANSLATORS: This msgid is appended to msgid for -Wpossible-truncate and others -#: cobc/help.c:153 +#: cobc/help.c:157 #, fuzzy msgid " * NOT set with -Wall" msgstr "-v invocad(o/a) pelo compilador" -#: cobc/help.c:161 +#: cobc/help.c:165 +msgid " -fdiagnostics-plain-output\tmake diagnostic output as plain as possible" +msgstr "" + +#: cobc/help.c:166 #, fuzzy msgid " -Werror treat all warnings as errors" msgstr " -W habilita todos os avisos" -#: cobc/help.c:162 +#: cobc/help.c:167 #, fuzzy msgid " -Wno-error don't treat warnings as errors" msgstr " -W habilita todos os avisos" -#: cobc/help.c:163 +#: cobc/help.c:168 msgid " -Werror=<warning> treat specified <warning> as error" msgstr "" -#: cobc/help.c:164 +#: cobc/help.c:169 #, fuzzy msgid " -Wno-error=<warning> don't treat specified <warning> as error" msgstr " -W habilita todos os avisos" -#: cobc/help.c:180 +#: cobc/help.c:185 msgid "Compiler options:" msgstr "" -#: cobc/help.c:198 +#: cobc/help.c:203 msgid "" " -fibmcomp sets -fbinary-size=2-4-8 -fsynchronized-clause=ok\n" " -fno-ibmcomp sets -fbinary-size=1--8 -fsynchronized-clause=ignore" msgstr "" -#: cobc/help.c:201 +#: cobc/help.c:206 msgid "" " -falternate-ebcdic use restricted ASCII to EBCDIC translate\n" " -fno-alternate-ebcdic use extended ASCII to EBCDIC translate" msgstr "" -#: cobc/help.c:230 +#: cobc/help.c:235 msgid "Compiler dialect configuration options:" msgstr "" -#: cobc/help.c:232 cobc/help.c:238 +#: cobc/help.c:237 cobc/help.c:243 msgid "<value>" msgstr "<value>" -#: cobc/help.c:242 +#: cobc/help.c:247 msgid "<support>" msgstr "<support>" -#: cobc/help.c:251 +#: cobc/help.c:256 msgid "where <support> is one of the following:" msgstr "onde <support> corresponde a um dos seguintes:" #. TRANSLATORS: This msgid is used when a variable name #. or label is referenced in a compiler message. -#: cobc/help.c:254 cobc/help.c:257 cobc/help.c:260 cobc/help.c:263 -#: cobc/help.c:266 cobc/help.c:269 cobc/help.c:272 cobc/help.c:275 -#: cobc/typeck.c:2361 +#: cobc/help.c:259 cobc/help.c:262 cobc/help.c:265 cobc/help.c:268 +#: cobc/help.c:271 cobc/help.c:274 cobc/help.c:277 cobc/help.c:280 +#: cobc/typeck.c:2378 #, c-format msgid "'%s'" msgstr "" -#: cobc/help.c:277 +#: cobc/help.c:282 msgid "word to be taken out of the reserved words list" msgstr "palavra a retirar da lista de palavras reservadas" -#: cobc/help.c:277 cobc/help.c:278 cobc/help.c:280 +#: cobc/help.c:282 cobc/help.c:283 cobc/help.c:285 msgid "<word>" msgstr "<word>" -#: cobc/help.c:278 +#: cobc/help.c:283 msgid "word to be added to reserved words list" msgstr "palavra a adicionar à lista de palavras reservadas" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "word to be added to reserved words list as alias" msgstr "palavra a adicionar à lista de palavras reservadas como nome alternativo (alias)" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "<word>:<alias>" msgstr "<word>:<alias>" -#: cobc/help.c:280 +#: cobc/help.c:285 msgid "special register to disable" msgstr "" -#: cobc/help.c:281 +#: cobc/help.c:286 msgid "special register to enable" msgstr "" -#: cobc/help.c:282 +#: cobc/help.c:287 msgid "<word> or <word>:<definition>, where definition uses backslash escaped spaces" msgstr "" -#: cobc/parser.y:315 cobc/parser.y:323 +#: cobc/parser.y:307 #, c-format msgid "'%s' should start in Area A" msgstr "" -#: cobc/parser.y:331 cobc/parser.y:333 +#: cobc/parser.y:315 +#, c-format +msgid "%s should start in Area A" +msgstr "" + +#: cobc/parser.y:322 +#, fuzzy, c-format +#| msgid "should not contain '%c'" +msgid "%s should not start in Area A" +msgstr "não deveria conter '%c'" + +#: cobc/parser.y:330 cobc/parser.y:332 msgid "start of statement in Area A" msgstr "" -#: cobc/parser.y:344 cobc/parser.y:379 +#: cobc/parser.y:428 #, fuzzy, c-format msgid "unreachable statement '%s'" msgstr "instrução inacessível '%s'" -#: cobc/parser.y:470 +#: cobc/parser.y:542 #, c-format msgid "ENTRY '%s' duplicated" msgstr "ENTRY '%s' duplicad(o/a)" -#: cobc/parser.y:520 +#: cobc/parser.y:594 #, fuzzy, c-format #| msgid "ENTRY '%s' duplicated" msgid "ENTRY FOR GO TO '%s' duplicated" msgstr "ENTRY '%s' duplicad(o/a)" -#: cobc/parser.y:536 +#: cobc/parser.y:610 #, fuzzy, c-format msgid "maximum nested program depth exceeded (%d)" msgstr "profundidade máxima excedida para programa aninhado (programa contido dentro de outro) (nested) (%d)" -#: cobc/parser.y:562 cobc/parser.y:589 +#: cobc/parser.y:636 cobc/parser.y:663 #, fuzzy, c-format msgid "%s statement not terminated by %s" msgstr "instrução %s não terminada por END-%s" -#: cobc/parser.y:592 +#: cobc/parser.y:666 #, fuzzy, c-format msgid "%s statement not terminated" msgstr "instrução %s não terminada por END-%s" -#: cobc/parser.y:634 -msgid "USE statement invalid for SORT file" +#: cobc/parser.y:708 +#, fuzzy +#| msgid "USE statement invalid for SORT file" +msgid "USE statement invalid for SD file" msgstr "instrução USE inválida para o ficheiro de ordenação (SORT file)" -#: cobc/parser.y:676 cobc/parser.y:1670 cobc/parser.y:1673 -#, c-format -msgid "cannot specify both %s and %s" -msgstr "não é possível especificar ambos '%s' e '%s'" - -#: cobc/parser.y:677 +#: cobc/parser.y:751 #, fuzzy, c-format #| msgid "%s ignored" msgid "%s is ignored" msgstr "%s ignorad(o/a)" -#: cobc/parser.y:686 +#: cobc/parser.y:760 #, c-format -msgid "Cannot specify %s without number of lines on page" +msgid "cannot specify %s without number of lines on page" msgstr "" -#: cobc/parser.y:696 +#: cobc/parser.y:770 #, fuzzy, c-format msgid "maximum OCCURS depth exceeded (%d)" msgstr "profundidade máxima excedida para OCCURS (%d)" -#: cobc/parser.y:704 cobc/typeck.c:3037 +#: cobc/parser.y:785 cobc/typeck.c:3127 #, c-format msgid "'%s' is not in LINKAGE SECTION" msgstr "'%s' não está na LINKAGE SECTION" -#: cobc/parser.y:725 +#: cobc/parser.y:806 msgid "TO phrase without DEPENDING phrase" msgstr "frase TO sem frase DEPENDING" -#: cobc/parser.y:727 +#: cobc/parser.y:808 #, fuzzy #| msgid "maximum number of occurences assumed to be exact number" msgid "maximum number of occurrences assumed to be exact number" msgstr "número máximo de ocorrências assumido como número exato" -#: cobc/parser.y:732 cobc/parser.y:8032 +#: cobc/parser.y:813 cobc/parser.y:8398 msgid "OCCURS TO must be greater than OCCURS FROM" msgstr "OCCURS TO tem de ser maior que OCCURS FROM" -#: cobc/parser.y:741 +#: cobc/parser.y:823 #, fuzzy msgid "OCCURS DEPENDING ON without TO phrase" msgstr "ODO (OCCURS DEPENDING ON) sem a frase TO" -#: cobc/parser.y:806 +#: cobc/parser.y:899 #, c-format msgid "%s header missing" msgstr "%s sem o cabeçalho" -#: cobc/parser.y:807 +#: cobc/parser.y:900 #, fuzzy, c-format #| msgid "%s header missing - assumed" msgid "%s header assumed" msgstr "%s sem o cabeçalho - assumido" -#: cobc/parser.y:939 -#, fuzzy, c-format -msgid "duplicate %s" -msgstr "cláusula %s duplicada" - -#: cobc/parser.y:941 +#: cobc/parser.y:1053 #, c-format msgid "%s incorrectly after %s" msgstr "" -#: cobc/parser.y:1078 +#: cobc/parser.y:1208 #, fuzzy, c-format msgid "redefinition of program name '%s'" msgstr "redefinição do nome do programa '%s'" -#: cobc/parser.y:1083 +#: cobc/parser.y:1213 #, fuzzy, c-format msgid "redefinition of program ID '%s'" msgstr "redefinição da identificação do programa (program ID) '%s'" -#: cobc/parser.y:1117 +#: cobc/parser.y:1247 #, c-format msgid "FUNCTION '%s' has no PROCEDURE DIVISION" msgstr "" -#: cobc/parser.y:1228 +#: cobc/parser.y:1372 msgid "functions may not be defined within a program/function" msgstr "" -#: cobc/parser.y:1278 +#: cobc/parser.y:1426 #, fuzzy, c-format msgid "END FUNCTION '%s' is different from FUNCTION-ID '%s'" msgstr "END FUNCTION '%s' não corresponde a FUNCTION-ID '%s'" -#: cobc/parser.y:1292 +#: cobc/parser.y:1440 #, fuzzy, c-format msgid "END PROGRAM '%s' is different from PROGRAM-ID '%s'" msgstr "END PROGRAM '%s' não corresponde a PROGRAM-ID '%s'" -#: cobc/parser.y:1341 +#: cobc/parser.y:1489 #, fuzzy msgid "currency symbol must be one character long" msgstr "'%s' CURSOR tem de ter 4 ou 6 carateres" -#: cobc/parser.y:1398 +#: cobc/parser.y:1546 #, fuzzy, c-format #| msgid "a trailing currency symbol" msgid "invalid character '%c' in currency symbol" msgstr "um símbolo monetário traseiro (e.g. 123.45 €)" -#: cobc/parser.y:1414 +#: cobc/parser.y:1562 msgid "prototype has same name as current function and will be ignored" msgstr "protótipo tem o mesmo nome da função atual e será ignorado" -#: cobc/parser.y:1441 +#: cobc/parser.y:1589 #, c-format msgid "duplicate REPOSITORY entries for '%s' do not match" msgstr "entradas de repositório (REPOSITORY) para '%s' não correspondem" -#: cobc/parser.y:1445 +#: cobc/parser.y:1593 #, c-format msgid "duplicate REPOSITORY entry for '%s'" msgstr "entrada de repositório (REPOSITORY entry) duplicada para '%s'" -#: cobc/parser.y:1510 +#: cobc/parser.y:1658 #, c-format msgid "ORGANIZATION %s is incompatible with RECORD DELIMITER" msgstr "" -#: cobc/parser.y:1548 cobc/parser.y:1939 cobc/typeck.c:829 +#: cobc/parser.y:1694 cobc/parser.y:2142 cobc/typeck.c:835 #, fuzzy, c-format msgid "condition-name not allowed here: '%s'" msgstr "modificação da referência não é permitida aqui" -#: cobc/parser.y:1554 cobc/parser.y:2127 +#: cobc/parser.y:1700 cobc/parser.y:2345 #, fuzzy msgid "SCREEN item cannot be used here" msgstr "'%s' não pode ser usad(o/a) aqui" -#: cobc/parser.y:1557 +#: cobc/parser.y:1703 #, fuzzy msgid "REPORT item cannot be used here" msgstr "'%s' não pode ser usad(o/a) aqui" -#: cobc/parser.y:1563 +#: cobc/parser.y:1709 #, fuzzy msgid "TYPEDEF item cannot be used here" msgstr "'%s' não pode ser usad(o/a) aqui" -#: cobc/parser.y:1572 +#: cobc/parser.y:1718 #, fuzzy msgid "elementary item expected" msgstr "esperado um valor inteiro" -#: cobc/parser.y:1579 +#: cobc/parser.y:1725 #, fuzzy msgid "item may not reference itself" msgstr "RENAMES não pode referênciar o nível 88" -#: cobc/parser.y:1586 +#: cobc/parser.y:1733 #, fuzzy #| msgid "THRU item '%s' may not be subordinate to '%s'" msgid "item may not be subordinate to any item with USAGE clause" msgstr "o item THRU '%s' não pode ser subordinado a '%s'" -#: cobc/parser.y:1588 +#: cobc/parser.y:1735 #, fuzzy #| msgid "THRU item '%s' may not be subordinate to '%s'" msgid "item may not be subordinate to any item with SIGN clause" msgstr "o item THRU '%s' não pode ser subordinado a '%s'" -#: cobc/parser.y:1631 +#: cobc/parser.y:1780 #, c-format msgid "illegal combination of %s with other clauses" msgstr "" -#: cobc/parser.y:1641 +#: cobc/parser.y:1794 #, fuzzy, c-format #| msgid "THRU item '%s' may not be subordinate to '%s'" msgid "entry following %s may not be subordinate to it" msgstr "o item THRU '%s' não pode ser subordinado a '%s'" -#: cobc/parser.y:1859 +#: cobc/parser.y:2042 +msgid "INITIAL specified on non-input field" +msgstr "INITIAL não foi especificado num campo de entrada" + +#: cobc/parser.y:2054 +msgid "relative LINE/COLUMN clause required with OCCURS" +msgstr "cláusula LINE/COLUMN relativa requerida com OCCURS" + +#: cobc/parser.y:2072 msgid "FOR phrase cannot immediately follow ALL/LEADING/TRAILING" msgstr "frase FOR não pode seguir imediatamente ALL/LEADING/TRAILING" -#: cobc/parser.y:1861 +#: cobc/parser.y:2074 msgid "missing CHARACTERS/ALL/LEADING/TRAILING phrase after FOR phrase" msgstr "falta a frase CHARACTERS/ALL/LEADING/TRAILING após a frase FOR" -#: cobc/parser.y:1868 +#: cobc/parser.y:2081 #, fuzzy #| msgid "missing value between CHARACTERS/ALL/LEADING/TRAILING words" msgid "missing value between ALL/LEADING/TRAILING words" msgstr "falta o valor entre as palavras CHARACTERS/ALL/LEADING/TRAILING" -#: cobc/parser.y:1873 +#: cobc/parser.y:2086 msgid "missing FOR phrase before CHARACTERS/ALL/LEADING/TRAILING phrase" msgstr "falta a frase FOR antes da frase CHARACTERS/ALL/LEADING/TRAILING" -#: cobc/parser.y:1880 +#: cobc/parser.y:2093 #, fuzzy msgid "missing ALL/LEADING/TRAILING before value" msgstr "falta ALL/LEADING/TRAILING antes do valor" -#: cobc/parser.y:1935 +#: cobc/parser.y:2138 msgid "use of condition-name in place of data-name" msgstr "" -#: cobc/parser.y:1966 +#: cobc/parser.y:2169 msgid "cannot specify NO ADVANCING in screen DISPLAY" msgstr "não é possível especificar NO ADVANCING em exibição de ecrã (screen DISPLAY)" -#: cobc/parser.y:2029 cobc/parser.y:2046 +#: cobc/parser.y:2232 cobc/parser.y:2249 msgid "non-standard DISPLAY" msgstr "DISPLAY despadronizado (non-standard)" -#: cobc/parser.y:2033 +#: cobc/parser.y:2236 msgid "screens may only be displayed on CRT" msgstr "ecrãs (screens) só podem ser exibidos no ecrã CRT (tubo de raios catódicos)" -#: cobc/parser.y:2038 cobc/parser.y:2081 +#: cobc/parser.y:2241 cobc/parser.y:2284 msgid "cannot mix screens and fields in the same DISPLAY statement" msgstr "não pode misturar ecrãs (screens) e campos (fields) na mesma instrução DISPLAY" -#: cobc/parser.y:2042 +#: cobc/parser.y:2245 msgid "screen clauses may only be used for DISPLAY on CRT" msgstr "cláusulas de ecrã (screen) só podem ser usadas com DISPLAY no ecrã CRT (tubo de raios catódicos)" -#: cobc/parser.y:2087 +#: cobc/parser.y:2290 msgid "ambiguous DISPLAY; put items to display on device in separate DISPLAY" msgstr "DISPLAY ambíguo; colocar os items a exibir num dispositivo com exibição (DISPLAY) separada" -#: cobc/parser.y:2103 +#: cobc/parser.y:2301 #, fuzzy, c-format msgid "%s is not an alphanumeric literal" msgstr "'%s' não é um literal alfanumérico" -#: cobc/parser.y:2105 +#: cobc/parser.y:2305 #, fuzzy, c-format msgid "'%s' is not USAGE DISPLAY" msgstr "'%s' não é USAGE DISPLAY" -#: cobc/parser.y:2120 cobc/typeck.c:9790 +#: cobc/parser.y:2322 cobc/parser.y:19534 +#, fuzzy, c-format +msgid "'%s' is not a field" +msgstr "'%s' não é um campo" + +#: cobc/parser.y:2338 cobc/typeck.c:10231 #, fuzzy, c-format msgid "invalid target for %s" msgstr "destino inválido para %s" -#: cobc/parser.y:2129 +#: cobc/parser.y:2347 #, fuzzy msgid "RENAMES item may not be used here" msgstr "a constante não pode ser usada aqui - '%s'" -#: cobc/parser.y:2131 cobc/typeck.c:2737 cobc/typeck.c:2828 +#: cobc/parser.y:2349 cobc/typeck.c:2822 cobc/typeck.c:2913 msgid "ANY LENGTH item not allowed here" msgstr "item ANY LENGTH não é permitido aqui" -#: cobc/parser.y:2135 +#: cobc/parser.y:2353 #, c-format msgid "item '%s' has wrong class for VALIDATE" msgstr "" -#: cobc/parser.y:2144 +#: cobc/parser.y:2362 #, fuzzy #| msgid "REDEFINES clause must follow entry-name" msgid "WHEN clause must follow EVERY clause" msgstr "cláusula REDEFINES tem de seguir o nome-de-entrada" -#: cobc/parser.y:2229 cobc/parser.y:18631 +#: cobc/parser.y:2447 cobc/parser.y:19251 #, fuzzy msgid "non-zero value expected" msgstr "esperado um valor inteiro" -#: cobc/parser.y:2235 cobc/tree.c:4735 +#: cobc/parser.y:2453 cobc/tree.c:4803 #, fuzzy, c-format #| msgid "RECORD size exceeds maximum allowed (%d)" msgid "RECORD size (IDX) exceeds maximum allowed (%d)" msgstr "tamanho do registo (RECORD) excede o máximo permitido (%d)" -#: cobc/parser.y:2239 cobc/tree.c:4739 +#: cobc/parser.y:2457 cobc/tree.c:4807 #, c-format msgid "RECORD size exceeds maximum allowed (%d)" msgstr "tamanho do registo (RECORD) excede o máximo permitido (%d)" -#: cobc/parser.y:2244 +#: cobc/parser.y:2462 msgid "RECORD clause invalid" msgstr "cláusula RECORD inválida" -#: cobc/parser.y:3368 +#: cobc/parser.y:3595 #, fuzzy msgid "multiple PROGRAM-ID's without matching END PROGRAM" msgstr "múltiplos 'PROGRAM-ID' sem o correspondente 'END PROGRAM' de cada um" -#: cobc/parser.y:3371 +#: cobc/parser.y:3598 #, fuzzy msgid "executable requested but no program found" msgstr "programa executável solicitado mas não encontrado" -#: cobc/parser.y:3488 +#: cobc/parser.y:3717 msgid "prototypes must be come before any program/function definitions" msgstr "" -#: cobc/parser.y:3691 +#: cobc/parser.y:3930 msgid "COMMON may only be used in a contained program" msgstr "COMMON só pode ser usado num programa aninhado (programa contido dentro de outro)" -#: cobc/parser.y:3778 +#: cobc/parser.y:4017 msgid "CALL prototypes" msgstr "protótipos CALL" -#: cobc/parser.y:3953 cobc/parser.y:4235 cobc/parser.y:4281 cobc/parser.y:4394 -#: cobc/parser.y:4608 cobc/parser.y:4705 cobc/parser.y:4744 cobc/parser.y:4803 -#: cobc/parser.y:4824 cobc/parser.y:4867 cobc/parser.y:4946 cobc/parser.y:4965 -#: cobc/parser.y:4981 cobc/parser.y:4999 cobc/parser.y:5017 cobc/parser.y:5034 -#: cobc/parser.y:5052 cobc/parser.y:7404 cobc/parser.y:8628 +#: cobc/parser.y:4192 cobc/parser.y:4471 cobc/parser.y:4517 cobc/parser.y:4632 +#: cobc/parser.y:4846 cobc/parser.y:4943 cobc/parser.y:4982 cobc/parser.y:5041 +#: cobc/parser.y:5062 cobc/parser.y:5105 cobc/parser.y:5184 cobc/parser.y:5203 +#: cobc/parser.y:5219 cobc/parser.y:5237 cobc/parser.y:5255 cobc/parser.y:5272 +#: cobc/parser.y:5290 cobc/parser.y:7685 cobc/parser.y:9028 #, c-format msgid "%s not allowed in nested programs" msgstr "%s não é permitido em programas aninhados (programas contidos dentro de outros)" -#: cobc/parser.y:4109 +#: cobc/parser.y:4345 msgid "segment-number must be in range of values 1 to 49" msgstr "" -#: cobc/parser.y:4121 +#: cobc/parser.y:4357 #, fuzzy msgid "duplicate CLASSIFICATION clause" msgstr "cláusula CLASSIFICATION duplicada" -#: cobc/parser.y:4200 +#: cobc/parser.y:4436 msgid "PROGRAM phrase" msgstr "frase PROGRAM" -#: cobc/parser.y:4302 cobc/parser.y:4313 cobc/parser.y:4657 +#: cobc/parser.y:4538 cobc/parser.y:4549 cobc/parser.y:4895 #, fuzzy, c-format msgid "invalid %s clause" msgstr "cláusula %s inválida" -#: cobc/parser.y:4616 cobc/parser.y:4754 +#: cobc/parser.y:4854 cobc/parser.y:4992 #, fuzzy msgid "type does not match alphabet" msgstr "tipo literal não corresponde ao tipo de dados numérico" -#: cobc/parser.y:4760 +#: cobc/parser.y:4998 #, fuzzy msgid "CLASS IS integer IN alphabet-name" msgstr "'%s' não é um nome-de-alfabeto" -#: cobc/parser.y:4780 cobc/parser.y:4784 +#: cobc/parser.y:5018 cobc/parser.y:5022 msgid "CLASS literal with THRU must have size 1" msgstr "literal CLASS com THRU tem de ter 1 caratere de comprimento" -#: cobc/parser.y:4879 +#: cobc/parser.y:5117 msgid "separate currency symbol and currency string" msgstr "" -#: cobc/parser.y:4912 +#: cobc/parser.y:5150 #, fuzzy, c-format msgid "invalid CURRENCY SIGN '%s'" msgstr "CURRENCY SIGN '%s' inválido" -#: cobc/parser.y:5139 +#: cobc/parser.y:5377 msgid "cannot use RELATIVE KEY clause on INDEXED files" msgstr "" -#: cobc/parser.y:5143 +#: cobc/parser.y:5381 msgid "cannot use RECORD KEY clause on RELATIVE files" msgstr "" -#: cobc/parser.y:5215 +#: cobc/parser.y:5453 msgid "EXTERNAL/DYNAMIC cannot be used with literals" msgstr "" -#: cobc/parser.y:5235 +#: cobc/parser.y:5473 msgid "EXTERNAL/DYNAMIC cannot be used with USING/VARYING" msgstr "" -#: cobc/parser.y:5246 +#: cobc/parser.y:5484 msgid "EXTERNAL/DYNAMIC cannot be used with DISK FROM" msgstr "" -#: cobc/parser.y:5248 -msgid "ASSIGN DISK FROM" -msgstr "" - -#: cobc/parser.y:5370 +#: cobc/parser.y:5608 msgid "ASSIGN EXTERNAL/DYNAMIC" msgstr "" -#: cobc/parser.y:5486 cobc/parser.y:5666 +#: cobc/parser.y:5724 cobc/parser.y:5921 #, c-format msgid "%s only valid with ORGANIZATION %s" msgstr "" -#: cobc/parser.y:5583 +#: cobc/parser.y:5818 cobc/typeck.c:3818 #, fuzzy, c-format msgid "'%s' is not an alphabet-name" msgstr "'%s' não é um nome-de-alfabeto" -#: cobc/parser.y:5599 +#: cobc/parser.y:5854 msgid "VSAM status" msgstr "" -#: cobc/parser.y:5733 cobc/parser.y:5758 +#: cobc/parser.y:5988 cobc/parser.y:6013 #, fuzzy, c-format #| msgid "READ PREVIOUS only allowed for INDEXED SEQUENTIAL files" msgid "RECORD DELIMITER %s only allowed with SEQUENTIAL files" msgstr "READ PREVIOUS apenas permitida em ficheiros indexados de leitura sequencial (INDEXED SEQUENTIAL)" -#: cobc/parser.y:5745 +#: cobc/parser.y:6000 #, fuzzy, c-format #| msgid "READ PREVIOUS only allowed for INDEXED SEQUENTIAL files" msgid "RECORD DELIMITER %s only allowed with (LINE) SEQUENTIAL files" msgstr "READ PREVIOUS apenas permitida em ficheiros indexados de leitura sequencial (INDEXED SEQUENTIAL)" -#: cobc/parser.y:5751 +#: cobc/parser.y:6006 msgid "LINE-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5764 +#: cobc/parser.y:6019 msgid "BINARY-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5772 +#: cobc/parser.y:6027 #, fuzzy #| msgid "READ PREVIOUS only allowed for INDEXED SEQUENTIAL files" msgid "RECORD DELIMITER clause only allowed with (LINE) SEQUENTIAL files" msgstr "READ PREVIOUS apenas permitida em ficheiros indexados de leitura sequencial (INDEXED SEQUENTIAL)" -#: cobc/parser.y:5776 +#: cobc/parser.y:6031 #, c-format msgid "RECORD DELIMITER %s not recognized; will be ignored" msgstr "" -#: cobc/parser.y:5814 +#: cobc/parser.y:6069 msgid "DUPLICATES for primary keys" msgstr "" -#: cobc/parser.y:6058 +#: cobc/parser.y:6313 msgid "DOS/VS APPLY phrase" msgstr "" -#: cobc/parser.y:6212 +#: cobc/parser.y:6467 msgid "RECORD description missing or invalid" msgstr "descrição RECORD não existe ou é inválida" -#: cobc/parser.y:6239 +#: cobc/parser.y:6494 #, fuzzy, c-format msgid "duplicate file description for %s" msgstr "valores duplicados na classe '%s'" -#: cobc/parser.y:6288 cobc/parser.y:6893 cobc/parser.y:7389 cobc/parser.y:13485 -#: cobc/parser.y:16686 +#: cobc/parser.y:6543 cobc/parser.y:7170 cobc/parser.y:7670 cobc/parser.y:13913 +#: cobc/parser.y:17210 #, fuzzy, c-format msgid "%s is invalid in a user FUNCTION" msgstr "%s é inválid(o/a) numa função-definida-pelo-utilizador (UDF)" -#: cobc/parser.y:6326 cobc/parser.y:6336 +#: cobc/parser.y:6581 cobc/parser.y:6591 msgid "RECORD clause ignored for LINE SEQUENTIAL" msgstr "cláusula RECORD ignorada para LINE SEQUENTIAL" -#: cobc/parser.y:6433 +#: cobc/parser.y:6688 msgid "LINAGE clause with wrong file type" msgstr "cláusula LINAGE com tipo de ficheiro incorreto" -#: cobc/parser.y:6495 +#: cobc/parser.y:6750 msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgstr "RECORDING MODE U or S só pode ser usado com ficheiros de registos sequenciais (RECORD SEQUENTIAL)" -#: cobc/parser.y:6532 +#: cobc/parser.y:6787 #, fuzzy, c-format msgid "ignoring CODE-SET '%s'" msgstr "a ignorar CODE-SET '%s'" -#: cobc/parser.y:6541 +#: cobc/parser.y:6796 msgid "CODE-SET clause invalid for file type" msgstr "cláusula CODE-SET inválida para o tipo de ficheiro" -#: cobc/parser.y:6562 +#: cobc/parser.y:6817 msgid "REPORT clause with wrong file type" msgstr "cláusula REPORT com o tipo de ficheiro incorreto" -#: cobc/parser.y:6641 +#: cobc/parser.y:6899 #, fuzzy msgid "CD record missing" msgstr "falta o registo CD" -#: cobc/parser.y:7091 +#: cobc/parser.y:7372 msgid "CONSTANT item not at 01 level" msgstr "item CONSTANT não se encontra no nível 01" -#: cobc/parser.y:7236 +#: cobc/parser.y:7517 #, fuzzy #| msgid "REDEFINES clause must follow entry-name" msgid "REDEFINES clause not following entry-name" msgstr "cláusula REDEFINES tem de seguir o nome-de-entrada" -#: cobc/parser.y:7309 cobc/parser.y:7339 cobc/parser.y:7381 cobc/parser.y:7470 -#: cobc/parser.y:8233 +#: cobc/parser.y:7590 cobc/parser.y:7620 cobc/parser.y:7662 cobc/parser.y:7751 +#: cobc/parser.y:8606 #, c-format msgid "%s only allowed at 01/77 level" msgstr "%s apenas permitido no nível 01/77" -#: cobc/parser.y:7312 cobc/parser.y:7341 cobc/parser.y:7383 cobc/parser.y:8235 -#: cobc/parser.y:8587 cobc/parser.y:8609 +#: cobc/parser.y:7593 cobc/parser.y:7622 cobc/parser.y:7664 cobc/parser.y:8608 +#: cobc/parser.y:8987 cobc/parser.y:9009 #, fuzzy, c-format msgid "%s requires a data name" msgstr "%s requere um nome de dados" -#: cobc/parser.y:7316 cobc/parser.y:7565 +#: cobc/parser.y:7597 cobc/parser.y:7846 #, fuzzy, c-format msgid "%s not allowed in %s" msgstr "%s não permitida nos ficheiros %s" -#: cobc/parser.y:7337 cobc/parser.y:7391 cobc/parser.y:8231 cobc/parser.y:8583 -#: cobc/parser.y:8607 +#: cobc/parser.y:7618 cobc/parser.y:7672 cobc/parser.y:8604 cobc/parser.y:8983 +#: cobc/parser.y:9007 #, c-format msgid "%s not allowed here" msgstr "%s não é permitido aqui" -#: cobc/parser.y:7528 +#: cobc/parser.y:7809 #, fuzzy, c-format msgid "%s requires DEPENDING clause" msgstr "%s requere um nome de dados" -#: cobc/parser.y:7544 +#: cobc/parser.y:7825 msgid "a locale-format PICTURE string must only consist of '9', '.', '+', 'Z' and the currency-sign" msgstr "" -#: cobc/parser.y:7554 +#: cobc/parser.y:7835 msgid "DEPENDING clause needs either an OCCURS clause or a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7560 +#: cobc/parser.y:7841 msgid "only USAGE DISPLAY may specify a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7610 cobc/typeck.c:4752 +#: cobc/parser.y:7893 cobc/typeck.c:4916 #, fuzzy, c-format #| msgid "'%s' is not a locale name" msgid "'%s' is not a locale-name" msgstr "'%s' não é um nome de local (locale)" -#: cobc/parser.y:7656 +#: cobc/parser.y:7939 #, fuzzy, c-format #| msgid "'%s' is not a valid data name" msgid "'%s' is not a valid USAGE" msgstr "'%s' não é um nome de datos válido" -#: cobc/parser.y:7661 +#: cobc/parser.y:7944 #, fuzzy, c-format msgid "unknown USAGE: %s" msgstr "falha desconhecida: %d" -#: cobc/parser.y:7808 +#: cobc/parser.y:8139 #, c-format msgid "unknown HANDLE type: %s" msgstr "" -#: cobc/parser.y:8082 +#: cobc/parser.y:8347 +#, fuzzy, c-format +msgid "'%s' is not USAGE UTF-8" +msgstr "'%s' não é USAGE DISPLAY" + +#: cobc/parser.y:8448 msgid "INDEXED should follow ASCENDING/DESCENDING" msgstr "" -#: cobc/parser.y:8317 +#: cobc/parser.y:8658 cobc/parser.y:8660 +#, fuzzy, c-format +msgid "unexpected %s" +msgstr "tamanho inesperado: %d" + +#: cobc/parser.y:8709 msgid "amount of entries in FROM and TO must match" msgstr "" -#: cobc/parser.y:8326 +#: cobc/parser.y:8718 #, c-format msgid "entry in FROM (%d) must be <= entry in TO (%d)" msgstr "" -#: cobc/parser.y:8585 +#: cobc/parser.y:8985 #, fuzzy, c-format #| msgid "%s only allowed at 01/77 level" msgid "%s only allowed at 01 level" msgstr "%s apenas permitido no nível 01/77" -#: cobc/parser.y:8589 cobc/parser.y:8611 +#: cobc/parser.y:8989 cobc/parser.y:9011 #, c-format msgid "%s and %s combination not allowed" msgstr "" -#: cobc/parser.y:8723 +#: cobc/parser.y:9127 msgid "GLOBAL is not allowed with RD" msgstr "GLOBAL não é permitido com RD" -#: cobc/parser.y:9247 +#: cobc/parser.y:9650 #, fuzzy, c-format msgid "%s is not valid for VARYING" msgstr "'%s' não é um campo (field) ou ficheiro (file)" -#: cobc/parser.y:9283 +#: cobc/parser.y:9686 msgid "LINE with OCCURS is not supported" msgstr "" -#: cobc/parser.y:9323 +#: cobc/parser.y:9726 msgid "PLUS is not recommended with LEFT, RIGHT or CENTER" msgstr "" -#: cobc/parser.y:9325 +#: cobc/parser.y:9728 #, fuzzy #| msgid "GLOBAL is not allowed with RD" msgid "PLUS is not allowed with LEFT, RIGHT or CENTER" msgstr "GLOBAL não é permitido com RD" -#: cobc/parser.y:9363 +#: cobc/parser.y:9766 msgid "PLUS is ignored on first field of line" msgstr "" -#: cobc/parser.y:9394 +#: cobc/parser.y:9797 msgid "invalid COLUMN integer; must be > 0" msgstr "" -#: cobc/parser.y:9396 +#: cobc/parser.y:9799 msgid "COLUMN numbers should increase" msgstr "" -#: cobc/parser.y:9492 cobc/parser.y:9547 -msgid "INITIAL specified on non-input field" -msgstr "INITIAL não foi especificado num campo de entrada" - -#: cobc/parser.y:9504 cobc/parser.y:9559 -msgid "relative LINE/COLUMN clause required with OCCURS" -msgstr "cláusula LINE/COLUMN relativa requerida com OCCURS" - -#: cobc/parser.y:9661 cobc/parser.y:9665 +#: cobc/parser.y:9990 cobc/parser.y:9994 msgid "screen positions from data-item" msgstr "" -#: cobc/parser.y:9821 +#: cobc/parser.y:10153 #, fuzzy, c-format #| msgid "missing definitions:" msgid "missing %s" msgstr "definições em falta:" -#: cobc/parser.y:10508 +#: cobc/parser.y:10840 #, fuzzy msgid "OCCURS screen items" msgstr "GLOBAL não é permitida com itens de ecrã (screen)" -#: cobc/parser.y:10520 +#: cobc/parser.y:10852 #, fuzzy msgid "GLOBAL screen items" msgstr "GLOBAL não é permitida com itens de ecrã (screen)" -#: cobc/parser.y:10571 +#: cobc/parser.y:10904 msgid "overriding convention specified in ENTRY-CONVENTION" msgstr "" -#: cobc/parser.y:10586 +#: cobc/parser.y:10917 #, fuzzy msgid "executable program requested but PROCEDURE/ENTRY has USING clause" msgstr "programa executável solicitado mas PROCEDURE/ENTRY tem cláusula USING" -#: cobc/parser.y:10654 cobc/parser.y:10671 cobc/parser.y:12278 +#: cobc/parser.y:10987 cobc/parser.y:11004 cobc/parser.y:12667 #, fuzzy, c-format msgid "number of arguments exceeds maximum %d" msgstr "número de parâmetros excede o máximo %d" -#: cobc/parser.y:10663 +#: cobc/parser.y:10996 msgid "CHAINING invalid in user FUNCTION" msgstr "CHAINING inválido numa função-definida-pelo-utilizador (UDF)" -#: cobc/parser.y:10699 +#: cobc/parser.y:11032 #, fuzzy msgid "ANY LENGTH items may only be BY REFERENCE formal parameters" msgstr "itens ANY LENGTH só podem ser passados por referência (BY REFERENCE)" -#: cobc/parser.y:10716 cobc/parser.y:12337 cobc/parser.y:12350 +#: cobc/parser.y:11049 cobc/parser.y:12728 cobc/parser.y:12741 #, c-format msgid "%s not allowed in CHAINED programs" msgstr "%s não é permitido em programas CHAINED" -#: cobc/parser.y:10718 +#: cobc/parser.y:11051 #, fuzzy msgid "parameters passed BY VALUE" msgstr "parâmetros passados por valor (BY VALUE)" -#: cobc/parser.y:10733 cobc/parser.y:10742 cobc/parser.y:10750 -#: cobc/parser.y:10771 +#: cobc/parser.y:11066 cobc/parser.y:11075 cobc/parser.y:11083 +#: cobc/parser.y:11104 msgid "SIZE only allowed for BY VALUE items" msgstr "SIZE apenas permitido para itens passados por valor (BY VALUE)" -#: cobc/parser.y:10773 cobc/parser.y:10798 +#: cobc/parser.y:11106 cobc/parser.y:11131 #, fuzzy msgid "invalid value for SIZE" msgstr "valor inválido para SIZE" -#: cobc/parser.y:10813 +#: cobc/parser.y:11146 msgid "MEMORY SIZE phrase in CALL statement" msgstr "" -#: cobc/parser.y:10825 +#: cobc/parser.y:11162 msgid "OPTIONAL only allowed for BY REFERENCE items" msgstr "OPTIONAL apenas permitido para itens passados por referência (BY REFERENCE)" -#: cobc/parser.y:10837 +#: cobc/parser.y:11177 msgid "RETURNING clause is required for a FUNCTION" msgstr "cláusula RETURNING é requerida para uma função (FUNCTION)" -#: cobc/parser.y:10843 +#: cobc/parser.y:11183 msgid "RETURNING clause cannot be OMITTED for main program" msgstr "cláusula RETURNING não pode ser OMITTED para o programa principal" -#: cobc/parser.y:10846 +#: cobc/parser.y:11186 #, fuzzy msgid "RETURNING clause cannot be OMITTED for a FUNCTION" msgstr "cláusula RETURNING não pode ser omitida (OMITTED) para uma função (FUNTION)" -#: cobc/parser.y:10859 +#: cobc/parser.y:11199 #, fuzzy msgid "RETURNING item is not defined in LINKAGE SECTION" msgstr "'%s' não está na LINKAGE SECTION" -#: cobc/parser.y:10861 +#: cobc/parser.y:11201 #, fuzzy msgid "RETURNING item must have level 01" msgstr "item RETURNING tem de ter o nível 01" -#: cobc/parser.y:10863 +#: cobc/parser.y:11203 #, fuzzy msgid "RETURNING item should not have OCCURS" msgstr "item RETURNING não deverá ter OCCURS" -#: cobc/parser.y:10867 +#: cobc/parser.y:11207 msgid "function RETURNING item may not be ANY LENGTH" msgstr "item RETURNING de uma função não pode ser definido com ANY LENGTH" -#: cobc/parser.y:11080 +#: cobc/parser.y:11421 #, fuzzy, c-format msgid "'%s' is not a statement" msgstr "'%s' não é uma instrução" -#: cobc/parser.y:11083 +#: cobc/parser.y:11424 #, c-format msgid "unknown statement '%s'; it may exist in another dialect" msgstr "instrução desconhecida '%s'; pode existir noutro dialeto" -#: cobc/parser.y:11087 +#: cobc/parser.y:11428 #, fuzzy, c-format msgid "unknown statement '%s'" msgstr "instrução desconhecida '%s'" -#: cobc/parser.y:11105 +#: cobc/parser.y:11446 msgid "SECTION segment-number must be less than or equal to 99" msgstr "" -#: cobc/parser.y:11108 +#: cobc/parser.y:11449 #, fuzzy msgid "SECTION segment-number in DECLARATIVES must be less than 50" msgstr "segmento SECTION inválido dentro de DECLARATIVE" -#: cobc/parser.y:11116 +#: cobc/parser.y:11457 #, fuzzy msgid "SECTION segment within DECLARATIVES" msgstr "segmento SECTION inválido dentro de DECLARATIVE" -#: cobc/parser.y:11313 cobc/parser.y:11448 +#: cobc/parser.y:11667 cobc/parser.y:11806 msgid "non-standard ACCEPT" msgstr "ACCEPT não padronizado" -#: cobc/parser.y:11325 +#: cobc/parser.y:11679 #, fuzzy msgid "PROMPT clause" msgstr "cláusulas LOCK" -#: cobc/parser.y:11329 +#: cobc/parser.y:11683 msgid "SIZE IS clause" msgstr "" -#: cobc/parser.y:11549 cobc/parser.y:11842 +#: cobc/parser.y:11907 cobc/parser.y:12226 msgid "TIME-OUT or BEFORE TIME clauses" msgstr "cláusulas TIME-OUT ou BEFORE TIME" -#: cobc/parser.y:11575 cobc/parser.y:11591 cobc/parser.y:11606 +#: cobc/parser.y:11937 cobc/parser.y:11960 cobc/parser.y:11978 msgid "AT screen-location" msgstr "AT screen-location" -#: cobc/parser.y:11607 +#: cobc/parser.y:11979 msgid "LINE or COLUMN" msgstr "LINE ou COLUMN" -#: cobc/parser.y:11972 +#: cobc/parser.y:12358 msgid "ALLOCATE CHARACTERS requires RETURNING clause" msgstr "ALLOCATE CHARACTERS requere cláusula RETURNING" -#: cobc/parser.y:11987 cobc/parser.y:13289 +#: cobc/parser.y:12373 #, fuzzy, c-format msgid "ignoring %s phrase" msgstr "ignorando sinal" -#: cobc/parser.y:11989 +#: cobc/parser.y:12375 msgid "addressing mode should be either 24 or 31 bit" msgstr "" -#: cobc/parser.y:12061 +#: cobc/parser.y:12446 msgid "CALL to own PROGRAM-ID" msgstr "" -#: cobc/parser.y:12062 +#: cobc/parser.y:12447 #, fuzzy msgid "assuming RECURSIVE attribute" msgstr "chamada recursiva a um programa - assume-se o atributo RECURSIVE" -#: cobc/parser.y:12082 +#: cobc/parser.y:12467 msgid "STATIC CALL convention ignored because of ON EXCEPTION" msgstr "" -#: cobc/parser.y:12091 +#: cobc/parser.y:12476 msgid "ON EXCEPTION ignored because of STATIC CALL" msgstr "" -#: cobc/parser.y:12205 cobc/typeck.c:13644 +#: cobc/parser.y:12594 cobc/typeck.c:14450 #, fuzzy msgid "invalid mnemonic name" msgstr "nome mnemónico inválido" -#: cobc/parser.y:12229 +#: cobc/parser.y:12618 msgid "id/literal ignored, using prototype name" msgstr "" -#: cobc/parser.y:12235 +#: cobc/parser.y:12624 #, fuzzy msgid "NESTED phrase is only valid with literal" msgstr "EXIT PERFORM é apenas válido com PERFORM em linha (inline)" -#: cobc/parser.y:12296 +#: cobc/parser.y:12685 #, fuzzy, c-format msgid "%s only allowed when arguments are passed %s" msgstr "OMITTED apenas permitido quando os parâmetros são passados por referência (BY REFERENCE)" -#: cobc/parser.y:12385 +#: cobc/parser.y:12776 msgid "RETURNING item must have level 01 or 77" msgstr "item RETURNING ten de ter o nível 01 ou 77" -#: cobc/parser.y:12389 +#: cobc/parser.y:12780 #, fuzzy msgid "RETURNING item must be a LINKAGE SECTION item or have BASED clause" msgstr "item RETURNING tem de ser definido na LINKAGE SECTION ou ter uma cláusula BASED" -#: cobc/parser.y:12423 cobc/parser.y:17409 cobc/parser.y:17464 +#: cobc/parser.y:12814 cobc/parser.y:17937 cobc/parser.y:18000 msgid "NOT EXCEPTION before EXCEPTION" msgstr "NOT EXCEPTION antes de EXCEPTION" -#: cobc/parser.y:13162 +#: cobc/parser.y:13572 #, c-format msgid "HANDLE must be a %s HANDLE" msgstr "" -#: cobc/parser.y:13174 +#: cobc/parser.y:13584 msgid "HANDLE must be a generic HANDLE" msgstr "" -#: cobc/parser.y:13251 +#: cobc/parser.y:13661 #, fuzzy, c-format msgid "HANDLE clause invalid for %s" msgstr "a cláusula %s é inválida para o ficheiro '%s'" -#: cobc/parser.y:13483 cobc/parser.y:16876 +#: cobc/parser.y:13911 cobc/parser.y:17400 #, fuzzy, c-format msgid "%s is invalid in nested program" msgstr "%s é inválido em programas aninhados (programas contidos dentro de outros)" -#: cobc/parser.y:13521 cobc/parser.y:13564 cobc/parser.y:13575 -#: cobc/parser.y:13586 +#: cobc/parser.y:13940 cobc/parser.y:13983 cobc/parser.y:13994 +#: cobc/parser.y:14005 #, fuzzy, c-format msgid "maximum evaluate depth exceeded (%d)" msgstr "máxima profundidade para avaliação excedida (%d)" -#: cobc/parser.y:13627 cobc/parser.y:13637 +#: cobc/parser.y:14048 cobc/parser.y:14089 cobc/parser.y:14633 +#: cobc/parser.y:14644 cobc/parser.y:14653 cobc/parser.y:17959 +#: cobc/parser.y:17981 cobc/parser.y:18022 cobc/parser.y:18038 +#: cobc/parser.y:18078 cobc/parser.y:18095 cobc/parser.y:18132 +#: cobc/parser.y:18149 cobc/parser.y:18199 cobc/parser.y:18216 +#: cobc/parser.y:18252 cobc/parser.y:18269 cobc/parser.y:18310 +#: cobc/parser.y:18327 +#, fuzzy, c-format +msgid "%s without imperative statement" +msgstr "'%s' não é uma instrução" + +#: cobc/parser.y:14056 cobc/parser.y:14066 msgid "WHEN without imperative statement" msgstr "" -#: cobc/parser.y:13655 cobc/parser.y:13665 +#: cobc/parser.y:14097 cobc/parser.y:14107 msgid "WHEN OTHER without imperative statement" msgstr "" -#: cobc/parser.y:13745 +#: cobc/parser.y:14191 #, fuzzy msgid "invalid THROUGH usage" msgstr "utilização inválida de THRU/THROUGH" -#: cobc/parser.y:13909 +#: cobc/parser.y:14372 msgid "EXIT PROGRAM is not allowed within a USE GLOBAL procedure" msgstr "EXIT PROGRAM não é permitido dentro de um procedimento com USE GLOBAL" -#: cobc/parser.y:13913 +#: cobc/parser.y:14376 #, fuzzy msgid "EXIT PROGRAM not allowed within a FUNCTION" msgstr "EXIT PROGRAM não é permitido dentro duma função (FUNCTION)" -#: cobc/parser.y:13927 +#: cobc/parser.y:14390 msgid "EXIT FUNCTION is not allowed within a USE GLOBAL procedure" msgstr "EXIT FUNCTION não é permitido dentro de um procedimiento com USE GLOBAL" -#: cobc/parser.y:13931 +#: cobc/parser.y:14394 #, fuzzy msgid "EXIT FUNCTION only allowed within a FUNCTION" msgstr "EXIT FUNCTION apenas permitido dentro de uma função (FUNCTION)" -#: cobc/parser.y:13945 cobc/parser.y:13968 +#: cobc/parser.y:14408 cobc/parser.y:14431 msgid "EXIT PERFORM is only valid with inline PERFORM" msgstr "EXIT PERFORM é apenas válido com PERFORM em linha (inline)" -#: cobc/parser.y:13990 +#: cobc/parser.y:14453 msgid "EXIT SECTION is only valid with an active SECTION" msgstr "EXIT SECTION é apenas válido com uma secção (SECTION) activa" -#: cobc/parser.y:14011 +#: cobc/parser.y:14474 msgid "EXIT PARAGRAPH is only valid with an active PARAGRAPH" msgstr "EXIT PARAGRAPH é apenas válido com um parágrafo (PARAGRAPH) activo" -#: cobc/parser.y:14034 +#: cobc/parser.y:14497 msgid "RETURNING/GIVING not allowed for non-returning runtime elements" msgstr "" -#: cobc/parser.y:14166 +#: cobc/parser.y:14640 msgid "IF without imperative statement" msgstr "" -#: cobc/parser.y:14497 cobc/parser.y:14506 +#: cobc/parser.y:14983 cobc/parser.y:14992 msgid "single-character literal or data item expected" msgstr "" -#: cobc/parser.y:14524 +#: cobc/parser.y:15010 #, fuzzy msgid "TALLYING clause is incomplete" msgstr "Cláusula TALLYING está incompleta" -#: cobc/parser.y:14640 +#: cobc/parser.y:15126 msgid "INSPECT missing ALL/FIRST/LEADING/TRAILING" msgstr "INSPECT sem ALL/FIRST/LEADING/TRAILING" -#: cobc/parser.y:14902 +#: cobc/parser.y:15390 #, fuzzy msgid "LOCK clauses" msgstr "cláusulas LOCK" -#: cobc/parser.y:15059 +#: cobc/parser.y:15547 msgid "inline PERFORM without imperative statement" msgstr "" -#: cobc/parser.y:15180 cobc/parser.y:15188 cobc/parser.y:15196 +#: cobc/parser.y:15670 cobc/parser.y:15678 cobc/parser.y:15686 #, c-format msgid "PERFORM VARYING '%s' (line %d of %s) is not a numeric field" msgstr "" -#: cobc/parser.y:15212 +#: cobc/parser.y:15702 #, fuzzy msgid "PERFORM VARYING without BY phrase" msgstr "ODO (OCCURS DEPENDING ON) sem a frase TO" -#: cobc/parser.y:15252 +#: cobc/parser.y:15742 #, fuzzy, c-format msgid "'%s' is not an object-reference" msgstr "'%s' não é um inteiro" -#: cobc/parser.y:15292 cobc/typeck.c:12295 cobc/typeck.c:13552 +#: cobc/parser.y:15782 cobc/typeck.c:13066 cobc/typeck.c:14358 msgid "LOCK clause invalid with file LOCK AUTOMATIC" msgstr "cláusula LOCK inválida com ficheiro definido com bloqueio automático (LOCK AUTOMATIC)" -#: cobc/parser.y:15297 +#: cobc/parser.y:15787 msgid "KEY clause invalid with this file type" msgstr "cláusula KEY inválida com este tipo de ficheiro" -#: cobc/parser.y:15302 cobc/typeck.c:12291 cobc/typeck.c:13548 +#: cobc/parser.y:15792 cobc/typeck.c:13062 cobc/typeck.c:14354 msgid "INVALID KEY clause invalid with this file type" msgstr "cláusula INVALID KEY inválida com este tipo de ficheiro" -#: cobc/parser.y:15986 +#: cobc/parser.y:16494 +#, fuzzy +msgid "MERGE requires KEY phrase" +msgstr "ficheiro de ordenação (sort) requere a frase KEY" + +#: cobc/parser.y:16498 #, fuzzy -msgid "file sort requires KEY phrase" +msgid "file SORT requires KEY phrase" msgstr "ficheiro de ordenação (sort) requere a frase KEY" -#: cobc/parser.y:16010 +#: cobc/parser.y:16522 #, fuzzy msgid "table SORT requires KEY phrase" msgstr "ficheiro de ordenação (sort) requere a frase KEY" -#: cobc/parser.y:16072 +#: cobc/parser.y:16527 #, fuzzy -msgid "file sort requires USING or INPUT PROCEDURE" +#| msgid "'%s' is not a file name" +msgid "must be an SD filename" +msgstr "'%s' não é um nome de um ficheiro" + +#: cobc/parser.y:16585 +msgid "MERGE requires USING files" +msgstr "" + +#: cobc/parser.y:16587 +#, fuzzy +msgid "file SORT requires USING or INPUT PROCEDURE" msgstr "ficheiro de ordenação (sort) requere USING ou INPUT PROCEDURE" -#: cobc/parser.y:16079 +#: cobc/parser.y:16595 msgid "USING invalid with table SORT" msgstr "USING inválido com tabela de ordenação (SORT)" -#: cobc/parser.y:16089 +#: cobc/parser.y:16605 msgid "INPUT PROCEDURE invalid with table SORT" msgstr "INPUT PROCEDURE inválido com tabela de ordenação (SORT)" -#: cobc/parser.y:16091 +#: cobc/parser.y:16607 msgid "INPUT PROCEDURE invalid with MERGE" msgstr "INPUT PROCEDURE inválido com MERGE" -#: cobc/parser.y:16104 +#: cobc/parser.y:16621 +#, fuzzy +msgid "MERGE requires GIVING or OUTPUT PROCEDURE" +msgstr "ficheiro de ordenação requere GIVING ou OUTPUT PROCEDURE" + +#: cobc/parser.y:16623 #, fuzzy -msgid "file sort requires GIVING or OUTPUT PROCEDURE" +msgid "file SORT requires GIVING or OUTPUT PROCEDURE" msgstr "ficheiro de ordenação requere GIVING ou OUTPUT PROCEDURE" -#: cobc/parser.y:16111 +#: cobc/parser.y:16631 msgid "GIVING invalid with table SORT" msgstr "GIVING inválido com tabela de ordenação (SORT)" -#: cobc/parser.y:16121 +#: cobc/parser.y:16641 msgid "OUTPUT PROCEDURE invalid with table SORT" msgstr "OUTPUT PROCEDURE inválido com tabela de ordenação (SORT)" -#: cobc/parser.y:16148 +#: cobc/parser.y:16668 msgid "SIZE/LENGTH invalid here" msgstr "SIZE/LENGTH inválido aqui" -#: cobc/parser.y:16197 +#: cobc/parser.y:16717 #, fuzzy msgid "NOT EQUAL condition not allowed on START statement" msgstr "condição NOT EQUAL não é permitida na instrução START" -#: cobc/parser.y:16255 +#: cobc/parser.y:16776 #, fuzzy, c-format msgid "%s is replaced by %s" msgstr "%s é antiquad(o/a) (archaic) em %s" -#: cobc/parser.y:16304 +#: cobc/parser.y:16825 msgid "STOP literal" msgstr "" -#: cobc/parser.y:16308 +#: cobc/parser.y:16829 #, fuzzy msgid "STOP identifier" msgstr "identificador PROMPT inválido" -#: cobc/parser.y:16446 +#: cobc/parser.y:16969 msgid "SUPPRESS statement must be within DECLARATIVES" msgstr "instrução SUPPRESS tem de ser definida nas declarativas (DECLARATIVES)" -#: cobc/parser.y:16520 -msgid "UNLOCK invalid for SORT files" +#: cobc/parser.y:17043 +#, fuzzy +#| msgid "UNLOCK invalid for SORT files" +msgid "UNLOCK invalid for SD files" msgstr "UNLOCK inválido para ficheiros de ordenação (SORT)" -#: cobc/parser.y:16656 cobc/parser.y:16736 +#: cobc/parser.y:17180 cobc/parser.y:17260 msgid "USE statement must be within DECLARATIVES" msgstr "instrução USE tem de estar definida nas declarativas (DECLARATIVES)" -#: cobc/parser.y:16658 +#: cobc/parser.y:17182 msgid "SECTION header missing before USE statement" msgstr "cabeçalho SECTION não foi definido antes da instrução USE" -#: cobc/parser.y:16738 +#: cobc/parser.y:17262 msgid "USE DEBUGGING not supported in contained program" msgstr "USE DEBUGGING não suportado em programa aninhado" -#: cobc/parser.y:16786 cobc/parser.y:16795 cobc/parser.y:16813 -#: cobc/parser.y:16849 cobc/typeck.c:4886 +#: cobc/parser.y:17310 cobc/parser.y:17319 cobc/parser.y:17337 +#: cobc/parser.y:17373 cobc/typeck.c:5050 #, fuzzy, c-format msgid "duplicate DEBUGGING target: '%s'" msgstr "Diretiva DEFINE/SET inválida" -#: cobc/parser.y:16811 +#: cobc/parser.y:17335 #, fuzzy msgid "constant item cannot be used here" msgstr "a constante não pode ser usada aqui - '%s'" -#: cobc/parser.y:16837 +#: cobc/parser.y:17361 #, fuzzy msgid "duplicate USE DEBUGGING ON ALL PROCEDURES" msgstr "USE DEBUGGING ON ALL PROCEDURES duplicado" -#: cobc/parser.y:17089 +#: cobc/parser.y:17614 msgid "ENCODING clause must come before XML-DECLARATION" msgstr "" -#: cobc/parser.y:17091 +#: cobc/parser.y:17616 msgid "ENCODING clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17094 +#: cobc/parser.y:17619 msgid "XML GENERATE ENCODING clause" msgstr "" -#: cobc/parser.y:17101 +#: cobc/parser.y:17626 msgid "XML-DECLARATION clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17104 +#: cobc/parser.y:17629 msgid "XML GENERATE XML-DECLARATION clause" msgstr "" -#: cobc/parser.y:17110 +#: cobc/parser.y:17635 msgid "XML GENERATE WITH ATTRIBUTES clause" msgstr "" -#: cobc/parser.y:17123 +#: cobc/parser.y:17648 msgid "XML GENERATE NAMESPACE clause" msgstr "" -#: cobc/parser.y:17147 +#: cobc/parser.y:17672 msgid "XML GENERATE NAME OF clause" msgstr "" -#: cobc/parser.y:17211 +#: cobc/parser.y:17736 msgid "XML GENERATE TYPE OF clause" msgstr "" -#: cobc/parser.y:17252 +#: cobc/parser.y:17777 msgid "XML GENERATE SUPPRESS clause" msgstr "" -#: cobc/parser.y:17392 +#: cobc/parser.y:17920 #, fuzzy, c-format #| msgid "'%s' is not a locale name" msgid "'%s' is not a schema name" msgstr "'%s' não é um nome de local (locale)" -#: cobc/parser.y:17510 +#: cobc/parser.y:18055 msgid "NOT SIZE ERROR before SIZE ERROR" msgstr "NOT SIZE ERROR antes de SIZE ERROR" -#: cobc/parser.y:17556 +#: cobc/parser.y:18109 msgid "NOT OVERFLOW before OVERFLOW" msgstr "NOT OVERFLOW antes de OVERFLOW" -#: cobc/parser.y:17655 +#: cobc/parser.y:18161 cobc/parser.y:18176 +#, fuzzy +#| msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" +msgid "NOT AT END before AT END" +msgstr "NOT AT END-OF-PAGE antes de AT END-OF-PAGE" + +#: cobc/parser.y:18229 msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" msgstr "NOT AT END-OF-PAGE antes de AT END-OF-PAGE" -#: cobc/parser.y:17705 +#: cobc/parser.y:18287 msgid "NOT INVALID KEY before INVALID KEY" msgstr "NOT INVALID KEY antes de INVALID KEY" -#: cobc/parser.y:18048 +#: cobc/parser.y:18644 msgid "LINAGE-COUNTER must be qualified here" msgstr "LINAGE-COUNTER tem de ser qualificado aqui" -#: cobc/parser.y:18051 +#: cobc/parser.y:18647 #, fuzzy msgid "invalid LINAGE-COUNTER usage" msgstr "modo de usar de LINAGE-COUNTER inválido" -#: cobc/parser.y:18062 cobc/parser.y:18158 cobc/parser.y:18247 +#: cobc/parser.y:18658 cobc/parser.y:18754 cobc/parser.y:18843 #, c-format msgid "'%s' is not a file name" msgstr "'%s' não é um nome de um ficheiro" -#: cobc/parser.y:18072 +#: cobc/parser.y:18668 msgid "LINE-COUNTER must be qualified here" msgstr "LINE-COUNTER tem de ser qualificado aqui" -#: cobc/parser.y:18076 +#: cobc/parser.y:18672 #, fuzzy msgid "invalid LINE-COUNTER usage" msgstr "modo de usar de LINE-COUNTER inválido" -#: cobc/parser.y:18087 cobc/parser.y:18112 +#: cobc/parser.y:18683 cobc/parser.y:18708 #, c-format msgid "'%s' is not a report name" msgstr "'%s' não é um nome de um relatório (report)" -#: cobc/parser.y:18097 +#: cobc/parser.y:18693 msgid "PAGE-COUNTER must be qualified here" msgstr "PAGE-COUNTER tem de ser qualificado aqui" -#: cobc/parser.y:18101 +#: cobc/parser.y:18697 #, fuzzy msgid "invalid PAGE-COUNTER usage" msgstr "modo de usar de PAGE-COUNTER inválido" -#: cobc/parser.y:18148 cobc/typeck.c:12256 cobc/typeck.c:12339 -#: cobc/typeck.c:13516 +#: cobc/parser.y:18744 cobc/typeck.c:13027 cobc/typeck.c:13110 +#: cobc/typeck.c:14322 #, fuzzy, c-format msgid "%s requires a record name as subject" msgstr "%s requere um nome de registo (record) como assunto" -#: cobc/parser.y:18175 +#: cobc/parser.y:18771 #, c-format msgid "'%s' not indexed" msgstr "'%s' não indexado" -#: cobc/parser.y:18180 +#: cobc/parser.y:18776 #, fuzzy msgid "SEARCH ALL requires KEY phrase" msgstr "ficheiro de ordenação (sort) requere a frase KEY" -#: cobc/parser.y:18204 cobc/parser.y:18229 +#: cobc/parser.y:18800 cobc/parser.y:18825 #, fuzzy, c-format msgid "multiple reference to '%s' " msgstr "múltiplas referências a '%s' " -#: cobc/parser.y:18259 +#: cobc/parser.y:18855 #, fuzzy, c-format msgid "'%s' is not a CD name" msgstr "'%s' não é um nome CD" -#: cobc/parser.y:18273 +#: cobc/parser.y:18869 #, fuzzy, c-format #| msgid "'%s' is not a report name" msgid "'%s' is not a valid report name" msgstr "'%s' não é um nome de um relatório (report)" -#: cobc/parser.y:18526 +#: cobc/parser.y:19134 #, fuzzy msgid "invalid mnemonic identifier" msgstr "identificador mnemónico inválido" -#: cobc/parser.y:18606 +#: cobc/parser.y:19214 +#, fuzzy +msgid "an alphanumeric literal is expected here" +msgstr "é esperado um valor alfanumérico" + +#: cobc/parser.y:19226 #, fuzzy msgid "a numeric literal is expected here" msgstr "é esperado um literal não numérico para '%s'" -#: cobc/parser.y:18618 cobc/parser.y:19366 +#: cobc/parser.y:19238 cobc/parser.y:19979 #, fuzzy msgid "a non-numeric literal is expected here" msgstr "é esperado um literal não numérico para '%s'" -#: cobc/parser.y:18784 cobc/typeck.c:7302 cobc/typeck.c:7309 +#: cobc/parser.y:19404 cobc/typeck.c:993 cobc/typeck.c:4825 cobc/typeck.c:7679 +#: cobc/typeck.c:7686 #, fuzzy, c-format msgid "'%s' is not numeric" msgstr "'%s' não é numérico" -#: cobc/parser.y:18800 +#: cobc/parser.y:19420 #, fuzzy, c-format msgid "'%s' is not a field or file" msgstr "'%s' não é um campo (field) ou ficheiro (file)" -#: cobc/parser.y:18820 cobc/parser.y:18859 cobc/parser.y:18935 -#, fuzzy, c-format -msgid "'%s' is not a field" -msgstr "'%s' não é um campo" - -#: cobc/parser.y:18841 +#: cobc/parser.y:19446 #, fuzzy, c-format #| msgid "'%s' is not a file name" msgid "'%s' is not a type-name" msgstr "'%s' não é um nome de um ficheiro" -#: cobc/parser.y:18927 cobc/typeck.c:2328 cobc/typeck.c:2407 +#: cobc/parser.y:19526 cobc/typeck.c:2345 cobc/typeck.c:2401 cobc/typeck.c:2550 #, c-format msgid "'%s' cannot be reference modified" msgstr "'%s' não pode ser modificado por referência" -#: cobc/parser.y:19015 +#: cobc/parser.y:19627 #, fuzzy, c-format msgid "'%s' is not a field or alphabet" msgstr "'%s' não é um campo (field) ou ficheiro (file)" -#: cobc/parser.y:19041 +#: cobc/parser.y:19653 #, fuzzy msgid "a subscripted data-item cannot be used here" msgstr "'%s' não pode ser usad(o/a) aqui" -#: cobc/parser.y:19089 +#: cobc/parser.y:19701 #, fuzzy msgid "unsigned integer value expected" msgstr "esperado valor inteiro positivo (sem sinal)" -#: cobc/parser.y:19101 cobc/parser.y:19105 cobc/parser.y:19155 +#: cobc/parser.y:19713 cobc/parser.y:19717 cobc/parser.y:19767 #, fuzzy msgid "integer value expected" msgstr "esperado um valor inteiro" -#: cobc/parser.y:19110 +#: cobc/parser.y:19722 #, fuzzy msgid "invalid symbolic integer" msgstr "inteiro simbólico inválido" -#: cobc/parser.y:19126 cobc/parser.y:19130 +#: cobc/parser.y:19738 cobc/parser.y:19742 #, fuzzy msgid "unsigned positive integer value expected" msgstr "esperado valor inteiro positivo (sem sinal)" -#: cobc/parser.y:19159 -#, fuzzy -msgid "invalid CLASS value" -msgstr "valor de CLASS inválido" +#: cobc/parser.y:19772 +#, c-format +msgid "CLASS value %d outside of range for the used character set" +msgstr "" -#: cobc/parser.y:19246 +#: cobc/parser.y:19859 msgid "PHYSICAL argument for LENGTH functions" msgstr "" -#: cobc/parser.y:19418 cobc/parser.y:19435 +#: cobc/parser.y:20031 cobc/parser.y:20048 msgid "cannot specify offset and SYSTEM-OFFSET at the same time" msgstr "Não é possível especificar o deslocamento (offset) e SYSTEM-OFFSET ao mesmo tempo" -#: cobc/parser.y:19702 cobc/parser.y:19711 cobc/parser.y:19721 -#: cobc/parser.y:19731 cobc/parser.y:19751 cobc/parser.y:19771 -#: cobc/parser.y:19777 +#: cobc/parser.y:20228 +msgid "terminator" +msgstr "" + +#: cobc/parser.y:20317 cobc/parser.y:20327 cobc/parser.y:20338 +#: cobc/parser.y:20348 cobc/parser.y:20369 cobc/parser.y:20389 +#: cobc/parser.y:20396 msgid "optional period" msgstr "" -#: cobc/pplex.l:257 cobc/pplex.l:2219 cobc/pplex.l:2233 +#: cobc/pplex.l:261 cobc/pplex.l:2448 cobc/pplex.l:2462 msgid "debugging indicator" msgstr "" -#: cobc/pplex.l:334 +#: cobc/pplex.l:348 #, fuzzy msgid "ignoring empty directive" msgstr "ignorando directiva vazia" -#: cobc/pplex.l:344 cobc/pplex.l:411 +#: cobc/pplex.l:358 cobc/pplex.l:431 #, fuzzy, c-format msgid "ignoring invalid directive: '%s'" msgstr "ignorando directiva inválida: '%s'" -#: cobc/pplex.l:351 +#: cobc/pplex.l:365 #, fuzzy msgid "ignoring invalid directive" msgstr "ignorando directiva inválida" -#: cobc/pplex.l:358 +#: cobc/pplex.l:372 #, fuzzy msgid "VCS directive" msgstr "diretiva PAGE" -#: cobc/pplex.l:420 cobc/pplex.l:441 +#: cobc/pplex.l:440 cobc/pplex.l:461 #, fuzzy, c-format msgid "ignoring unknown directive: '%s'" msgstr "ignorando directiva inválida: '%s'" -#: cobc/pplex.l:1065 +#: cobc/pplex.l:1164 #, fuzzy msgid "IF/ELIF/ELSE directive without matching END-IF" msgstr "directiva IF/ELIF/ELSE sem o correspondente END-IF" -#: cobc/pplex.l:1409 +#: cobc/pplex.l:1332 +msgid "free format detected" +msgstr "" + +#: cobc/pplex.l:1608 #, c-format msgid "copybook not found in library '%s', library-name ignored" msgstr "" -#: cobc/pplex.l:1469 +#: cobc/pplex.l:1667 #, fuzzy, c-format msgid "ignoring %s directive because of %s" msgstr "ignorando directiva inválida: '%s'" # @@@ CHECK TRANSLATION ??? -#: cobc/pplex.l:1645 +#: cobc/pplex.l:1854 #, fuzzy, c-format msgid "directive nest depth exceeded: %d" msgstr "profundidade do nó diretivo excedido: %d" -#: cobc/pplex.l:1663 +#: cobc/pplex.l:1872 msgid "ELSE directive without matching IF/ELIF" msgstr "directiva ELSE sem o(s) correspondente(s) IF/ELIF" -#: cobc/pplex.l:1679 +#: cobc/pplex.l:1888 msgid "END-IF directive without matching IF/ELIF/ELSE" msgstr "directiva END-IF sem o(s) correspondente(s) IF/ELIF/ELSE" -#: cobc/pplex.l:1695 +#: cobc/pplex.l:1904 msgid "ELIF directive without matching IF/ELIF" msgstr "directiva ELIF sem o(s) correspondente(s) IF/ELIF" -#: cobc/pplex.l:1717 +#: cobc/pplex.l:1926 #, fuzzy, c-format msgid "invalid internal case: %u" msgstr "situação interna inválida: %u" -#: cobc/pplex.l:1914 +#: cobc/pplex.l:2139 msgid "buffer overrun - too many continuation lines" msgstr "ultrapassado o limite da memória de armazenamento temporário (buffer) - demasiadas linhas de continuação" -#: cobc/pplex.l:2009 cobc/pplex.l:2019 +#: cobc/pplex.l:2236 cobc/pplex.l:2246 #, fuzzy msgid "line not terminated by a newline" msgstr "" "linha não terminada por uma nova linha (newline)\n" "e.g. ascii decimal 10" -#: cobc/pplex.l:2013 cobc/pplex.l:2023 +#: cobc/pplex.l:2240 cobc/pplex.l:2250 #, c-format msgid "source text exceeds %d bytes, will be truncated" msgstr "o texto do programa fonte excede %d octetos (bytes), será truncado" -#: cobc/pplex.l:2042 +#: cobc/pplex.l:2269 msgid "version control conflict marker in file" msgstr "" -#: cobc/pplex.l:2194 +#: cobc/pplex.l:2423 #, fuzzy msgid "invalid continuation in comment entry" msgstr "continuação inválida na entrada de comentário" -#: cobc/pplex.l:2241 +#: cobc/pplex.l:2470 #, fuzzy, c-format msgid "invalid indicator '\\' at column %d" msgstr "indicador '%c' inválido na coluna 7" -#: cobc/pplex.l:2253 +#: cobc/pplex.l:2482 #, fuzzy, c-format msgid "invalid indicator '%c' at column %d" msgstr "indicador '%c' inválido na coluna 7" -#: cobc/pplex.l:2312 cobc/pplex.l:2323 +#: cobc/pplex.l:2541 cobc/pplex.l:2552 #, fuzzy msgid "invalid line continuation" msgstr "continuação de linha inválida" -#: cobc/pplex.l:2331 +#: cobc/pplex.l:2560 #, fuzzy msgid "continuation character expected" msgstr "caratere de continuação esperado" # @@@ CHECK TRANSLATION ??? -#: cobc/pplex.l:2399 +#: cobc/pplex.l:2628 #, fuzzy, c-format msgid "source text after program-text area (column %d)" msgstr "código fonte após a área de instruções-de-programação (coluna %d)" -#: cobc/ppparse.y:107 +#: cobc/ppparse.y:102 cobc/ppparse.y:106 +msgid "partial replacing with literal" +msgstr "" + +#: cobc/ppparse.y:109 msgid "unexpected COBOL word in partial replacement phrase" msgstr "" +#: cobc/ppparse.y:176 +#, fuzzy +msgid "invalid partial replacing operand" +msgstr "literal nacional inválido" + # @@@ CHECK TRANSLATION ??? -#: cobc/ppparse.y:256 +#: cobc/ppparse.y:291 #, fuzzy msgid "directive comparison on different types" msgstr "comparação de instruções em diferentes tipos" -#: cobc/ppparse.y:324 +#: cobc/ppparse.y:359 #, fuzzy, c-format msgid "duplicate DEFINE directive '%s'" msgstr "Diretiva DEFINE/SET inválida" -#: cobc/ppparse.y:331 cobc/ppparse.y:341 +#: cobc/ppparse.y:366 cobc/ppparse.y:376 #, fuzzy, c-format msgid "invalid constant %s in DEFINE directive" msgstr "Diretiva DEFINE/SET inválida" -#: cobc/ppparse.y:439 +#: cobc/ppparse.y:474 #, c-format msgid "compiler flag '%s' unknown" msgstr "" -#: cobc/ppparse.y:486 +#: cobc/ppparse.y:521 #, fuzzy, c-format msgid "invalid %s directive option '%s'" msgstr "diretiva %s inválida" -#: cobc/ppparse.y:488 +#: cobc/ppparse.y:523 #, fuzzy, c-format msgid "invalid %s directive option" msgstr "diretiva %s inválida" -#: cobc/ppparse.y:839 cobc/ppparse.y:848 cobc/ppparse.y:1258 +#: cobc/ppparse.y:875 cobc/ppparse.y:884 cobc/ppparse.y:1294 #, fuzzy, c-format msgid "invalid %s directive" msgstr "diretiva %s inválida" -#: cobc/ppparse.y:1330 +#: cobc/ppparse.y:1366 #, fuzzy msgid "LEAP-SECOND ON directive" msgstr "ignorando a directiva LEAP-SECOND" -#: cobc/ppparse.y:1439 cobc/ppparse.y:1471 +#: cobc/ppparse.y:1475 cobc/ppparse.y:1507 #, fuzzy msgid "invalid constant" msgstr "constante inválida" -#: cobc/reserved.c:4012 +#: cobc/reserved.c:4029 #, fuzzy msgid "device name" msgstr "nome do dispositivo" -#: cobc/reserved.c:4015 +#: cobc/reserved.c:4032 #, fuzzy msgid "switch name" msgstr "nome do comutador (switch)" -#: cobc/reserved.c:4018 +#: cobc/reserved.c:4035 #, fuzzy msgid "feature name" msgstr "nome da característica (feature)" -#: cobc/reserved.c:4129 +#: cobc/reserved.c:4146 #, fuzzy, c-format msgid "reserved word (%s) must have less than %d characters" msgstr "palavra reservada tem de ter menos de %d carateres" -#: cobc/reserved.c:4149 +#: cobc/reserved.c:4166 #, fuzzy, c-format #| msgid "should not contain '%c'" msgid "reserved word (%s) may not contain '%c'" msgstr "não deveria conter '%c'" -#: cobc/reserved.c:4166 +#: cobc/reserved.c:4183 msgid "ignored asterisk at end of alias target" msgstr "asterisco ignorado no fim do nome alternativo (alias) destino (target)" -#: cobc/reserved.c:4229 +#: cobc/reserved.c:4248 #, c-format msgid "alias target '%s' is not a default reserved word" msgstr "nome alternativo (alias) de destino (target) '%s' não é uma palavra reservada padrão" -#: cobc/reserved.c:4719 +#: cobc/reserved.c:4738 #, fuzzy, c-format msgid "invalid system-name '%s'" msgstr "nome-de-sistema inválido '%s'" -#: cobc/reserved.c:4883 +#: cobc/reserved.c:4902 #, fuzzy, c-format msgid "'%s' is a reserved word, but isn't supported" msgstr "'%s' é uma palavra reservada, mas não é suportada" -#: cobc/reserved.c:4988 +#: cobc/reserved.c:5005 #, fuzzy, c-format msgid "intrinsic function %s is unknown" msgstr "função intrínseca" -#: cobc/reserved.c:5016 +#: cobc/reserved.c:5033 #, fuzzy msgid "Intrinsic Function" msgstr "função intrínseca" -#: cobc/reserved.c:5016 cobc/reserved.c:5249 cobc/reserved.c:5386 +#: cobc/reserved.c:5033 cobc/reserved.c:5266 cobc/reserved.c:5403 #, fuzzy msgid "Implemented" msgstr "Implementad(o/a)" -#: cobc/reserved.c:5016 cobc/typeck.c:1163 +#: cobc/reserved.c:5033 cobc/typeck.c:1178 msgid "Parameters" msgstr "Parâmetros" -#: cobc/reserved.c:5020 cobc/reserved.c:5253 cobc/reserved.c:5400 -#: cobc/reserved.c:5406 +#: cobc/reserved.c:5037 cobc/reserved.c:5270 cobc/reserved.c:5417 +#: cobc/reserved.c:5423 #, fuzzy msgid "Yes" msgstr "Sim (Yes)" -#: cobc/reserved.c:5023 cobc/reserved.c:5256 cobc/reserved.c:5410 +#: cobc/reserved.c:5040 cobc/reserved.c:5273 cobc/reserved.c:5427 #, fuzzy msgid "No" msgstr "Não (No)" -#: cobc/reserved.c:5029 +#: cobc/reserved.c:5046 msgid "Unlimited" msgstr "Sem limite" -#: cobc/reserved.c:5046 +#: cobc/reserved.c:5063 msgid "Exception Name" msgstr "" -#: cobc/reserved.c:5148 +#: cobc/reserved.c:5165 #, c-format msgid "special register '%s' is unknown, needs a definition" msgstr "" -#: cobc/reserved.c:5155 +#: cobc/reserved.c:5172 #, c-format msgid "special register '%s' has a bad definition: %s" msgstr "" -#: cobc/reserved.c:5159 +#: cobc/reserved.c:5176 #, c-format msgid "special register '%s' is unknown" msgstr "" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 #, fuzzy msgid "Internal registers" msgstr "Registos internos suplementares (extra)" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 #, fuzzy msgid "Definition" msgstr "definição" -#: cobc/reserved.c:5337 +#: cobc/reserved.c:5354 #, fuzzy, c-format msgid "unknown system-name '%s'" msgstr "instrução desconhecida '%s'" -#: cobc/reserved.c:5363 +#: cobc/reserved.c:5380 #, fuzzy msgid "System names" msgstr "Rotina de sistema" -#: cobc/reserved.c:5386 +#: cobc/reserved.c:5403 msgid "Reserved Words" msgstr "Palavras Reservadas" -#: cobc/reserved.c:5398 +#: cobc/reserved.c:5415 #, fuzzy msgid "Yes (Context sensitive)" msgstr "Sim (Yes) (sensível ao contexto)" -#: cobc/reserved.c:5408 +#: cobc/reserved.c:5425 #, fuzzy msgid "No (Context sensitive)" msgstr "Não (No) (sensível ao contexto)" -#: cobc/scanner.l:272 +#: cobc/scanner.l:281 #, fuzzy, c-format msgid "'%s' is not a reserved word, so cannot be removed" msgstr "'%s' é uma palavra reservada, mas não é suportada" -#: cobc/scanner.l:320 +#: cobc/scanner.l:329 msgid "separator period in Area A" msgstr "" -#: cobc/scanner.l:1067 +#: cobc/scanner.l:1096 #, fuzzy, c-format msgid "a constant may not be used here - '%s'" msgstr "a constante não pode ser usada aqui - '%s'" -#: cobc/scanner.l:1137 +#: cobc/scanner.l:1170 msgid "ignoring redundant ." msgstr "ignorando o redundante." -#: cobc/scanner.l:1195 +#: cobc/scanner.l:1249 #, fuzzy, c-format msgid "invalid symbol '%s' - skipping word" msgstr "símbolo inválido '%s' - ignorando a palavra" -#: cobc/scanner.l:1289 +#: cobc/scanner.l:1323 #, fuzzy msgid "invalid national literal" msgstr "literal nacional inválido" -#: cobc/scanner.l:1293 cobc/tree.c:2800 +#: cobc/scanner.l:1327 cobc/tree.c:2822 #, fuzzy, c-format msgid "invalid literal: '%s'" msgstr "literal inválido: '%s'" -#: cobc/scanner.l:1295 +#: cobc/scanner.l:1329 #, fuzzy, c-format msgid "invalid hexadecimal literal: '%s'" msgstr "literal hexadecimal inválido: '%s'" -#: cobc/scanner.l:1297 cobc/tree.c:1779 +#: cobc/scanner.l:1331 cobc/tree.c:1803 #, fuzzy, c-format msgid "invalid numeric literal: '%s'" msgstr "literal numérico inválido: '%s'" -#: cobc/scanner.l:1299 +#: cobc/scanner.l:1333 #, fuzzy, c-format msgid "invalid floating-point literal: '%s'" msgstr "literal de ponto flutuante inválido" -#: cobc/scanner.l:1301 +#: cobc/scanner.l:1335 cobc/scanner.l:1337 #, fuzzy, c-format msgid "invalid %s literal: '%s'" msgstr "literal %s inválido: '%s'" -#: cobc/scanner.l:1350 +#: cobc/scanner.l:1365 +#, c-format +msgid "character code %s out of encoding range %s" +msgstr "" + +#: cobc/scanner.l:1422 +msgid "extraneous separator ',' at end of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1435 +msgid "extraneous character ',' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1440 +#, c-format +msgid "invalid character '%c' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1470 #, fuzzy, c-format msgid "literal length exceeds %u characters" msgstr "o comprimento do literal excede %d carateres" -#: cobc/scanner.l:1365 +#: cobc/scanner.l:1485 #, c-format msgid "missing terminating %c character" msgstr "" -#: cobc/scanner.l:1382 cobc/scanner.l:1444 cobc/scanner.l:1729 +#: cobc/scanner.l:1502 cobc/scanner.l:1569 cobc/scanner.l:1868 #, fuzzy msgid "zero-length literal" msgstr "literal numérico booleano" -#: cobc/scanner.l:1385 +#: cobc/scanner.l:1505 #, fuzzy msgid "national literal has zero length; a SPACE will be assumed" msgstr "o literal alfanumérico tem comprimento zero; um espaço (SPACE) será assumido" -#: cobc/scanner.l:1386 +#: cobc/scanner.l:1506 #, fuzzy msgid "alphanumeric literal has zero length; a SPACE will be assumed" msgstr "o literal alfanumérico tem comprimento zero; um espaço (SPACE) será assumido" -#: cobc/scanner.l:1412 cobc/scanner.l:1413 cobc/scanner.l:1417 -#: cobc/scanner.l:1494 +#: cobc/scanner.l:1519 +msgid "UTF-8 literal" +msgstr "" + +#: cobc/scanner.l:1536 cobc/scanner.l:1537 cobc/scanner.l:1541 +#: cobc/scanner.l:1624 #, fuzzy msgid "national literal" msgstr "literal nacional" -#: cobc/scanner.l:1416 +#: cobc/scanner.l:1540 #, fuzzy msgid "national-character literal" msgstr "literal nacional" -#: cobc/scanner.l:1447 +#: cobc/scanner.l:1571 #, fuzzy msgid "hexadecimal literal has zero length; X'00' will be assumed" msgstr "o literal alfanumérico tem comprimento zero; um espaço (SPACE) será assumido" -#: cobc/scanner.l:1472 +#: cobc/scanner.l:1575 cobc/scanner.l:1601 #, fuzzy msgid "hexadecimal-boolean literal" msgstr "literal hexadecimal-booleano" -#: cobc/scanner.l:1480 cobc/scanner.l:1499 cobc/scanner.l:1608 -#: cobc/scanner.l:1659 cobc/scanner.l:1754 cobc/scanner.l:1824 -#, fuzzy, c-format -msgid "literal length %lu exceeds %u characters" -msgstr "o comprimento do literal %d excede %d carateres" - -#: cobc/scanner.l:1490 +#: cobc/scanner.l:1579 cobc/scanner.l:1619 #, fuzzy msgid "hexadecimal-national literal" msgstr "literal hexadecimal-nacional" -#: cobc/scanner.l:1521 cobc/scanner.l:1551 cobc/scanner.l:1674 -#: cobc/scanner.l:1771 cobc/scanner.l:1835 +#: cobc/scanner.l:1609 cobc/scanner.l:1629 cobc/scanner.l:1744 +#: cobc/scanner.l:1798 cobc/scanner.l:1893 cobc/scanner.l:1963 +#, fuzzy, c-format +msgid "literal length %lu exceeds %u characters" +msgstr "o comprimento do literal %d excede %d carateres" + +#: cobc/scanner.l:1651 cobc/scanner.l:1680 cobc/scanner.l:1813 +#: cobc/scanner.l:1910 cobc/scanner.l:1974 #, fuzzy, c-format msgid "literal contains invalid character '%c'" msgstr "o literal contém um caratere inválido '%c'" -#: cobc/scanner.l:1573 +#: cobc/scanner.l:1704 #, c-format msgid "literal does not have an even number of digits" msgstr "o literal não tem um número de dígitos par (even)" -#: cobc/scanner.l:1599 +#: cobc/scanner.l:1735 cobc/scanner.l:1788 #, fuzzy, c-format msgid "%s literals must contain at least one character" msgstr "o literal contém um caratere inválido '%c'" -#: cobc/scanner.l:1639 cobc/scanner.l:1739 cobc/scanner.l:1813 +#: cobc/scanner.l:1775 cobc/scanner.l:1878 cobc/scanner.l:1952 #, fuzzy msgid "ACUCOBOL numeric literal" msgstr "literal numérico ACUCOBOL" -#: cobc/scanner.l:1651 -#, fuzzy -msgid "H literals must contain at least one character" -msgstr "o literal contém um caratere inválido '%c'" - -#: cobc/scanner.l:1690 cobc/scanner.l:1783 cobc/scanner.l:1846 +#: cobc/scanner.l:1829 cobc/scanner.l:1922 cobc/scanner.l:1985 #, fuzzy, c-format msgid "literal exceeds limit %u" msgstr "literal excede tamanho de datos" -#: cobc/scanner.l:1724 +#: cobc/scanner.l:1863 #, fuzzy msgid "numeric boolean literal" msgstr "literal numérico booleano" -#: cobc/scanner.l:1731 +#: cobc/scanner.l:1870 #, fuzzy -msgid "Boolean literal has zero length; B'0' will be assumed" +msgid "boolean literal has zero length; B'0' will be assumed" msgstr "o literal alfanumérico tem comprimento zero; um espaço (SPACE) será assumido" -#: cobc/scanner.l:1807 +#: cobc/scanner.l:1946 #, fuzzy msgid "HP COBOL octal literal" msgstr "literal numérico ACUCOBOL" -#: cobc/scanner.l:1921 +#: cobc/scanner.l:2059 #, fuzzy, c-format msgid "literal length %lu exceeds maximum of %u digits" msgstr "o comprimento do literal %d excede o máximo de %d dígitos" -#: cobc/scanner.l:1927 +#: cobc/scanner.l:2065 #, fuzzy, c-format msgid "literal length %lu exceeds %u digits" msgstr "o comprimento do literal %d excede %d dígitos" -#: cobc/scanner.l:2039 cobc/tree.c:3845 +#: cobc/scanner.l:2177 cobc/tree.c:3888 #, fuzzy, c-format #| msgid "significand has more than 34 digits" msgid "significand has more than %d digits" msgstr "o significando (ou mantissa) tem mais de 34 dígitos" -#: cobc/scanner.l:2044 +#: cobc/scanner.l:2182 #, c-format msgid "exponent has decimal point" msgstr "o exponente tem um ponto decimal" -#: cobc/scanner.l:2050 cobc/tree.c:3853 +#: cobc/scanner.l:2188 cobc/tree.c:3896 #, c-format msgid "exponent has more than 4 digits" msgstr "o exponente tem mais de 4 dígitos" -#: cobc/scanner.l:2080 +#: cobc/scanner.l:2218 #, fuzzy, c-format #| msgid "exponent not between -78 and 76" msgid "exponent not between -6143 and 6144" msgstr "o exponente não se situa entre os valores -78 e 76" -#: cobc/scanner.l:2089 +#: cobc/scanner.l:2227 #, c-format msgid "significand of 0 must be positive" msgstr "o significando (ou mantissa) de 0 tem de ser positivo" -#: cobc/scanner.l:2094 +#: cobc/scanner.l:2232 #, c-format msgid "exponent of 0 must be 0" msgstr "o exponente de 0 tem de ser 0" -#: cobc/scanner.l:2099 +#: cobc/scanner.l:2237 #, c-format msgid "exponent of 0 must be positive" msgstr "o exponente de 0 tem de ser positivo" -#: cobc/scanner.l:2261 +#: cobc/scanner.l:2399 #, fuzzy, c-format msgid "invalid CONSTANT: %s" msgstr "constante (CONSTANT) inválida: %s" -#: cobc/scanner.l:2271 +#: cobc/scanner.l:2409 #, fuzzy, c-format msgid "invalid alphanumeric CONSTANT: %s" msgstr "constante (CONSTANT) alfanumérica inválida: %s" -#: cobc/scanner.l:2275 +#: cobc/scanner.l:2413 #, fuzzy, c-format msgid "empty alphanumeric CONSTANT: %s" msgstr "constante (CONSTANT) alfanumérica vazia: %s" -#: cobc/scanner.l:2292 cobc/scanner.l:2300 cobc/scanner.l:2305 +#: cobc/scanner.l:2430 cobc/scanner.l:2438 cobc/scanner.l:2443 #, fuzzy, c-format msgid "invalid numeric CONSTANT: %s" msgstr "constante (CONSTANT) numérica inválida: %s" -#: cobc/scanner.l:2384 cobc/scanner.l:2411 +#: cobc/scanner.l:2522 cobc/scanner.l:2549 #, fuzzy, c-format #| msgid "'%s' is not defined, but is a reserved word in another dialect" msgid "'%s' is not a default reserved word, so cannot be aliased" msgstr "'%s' não está definid(o/a), mas é uma palavra reservada noutro dialeto" -#: cobc/scanner.l:2387 +#: cobc/scanner.l:2525 #, c-format msgid "'%s' is already reserved" msgstr "" -#: cobc/scanner.l:2389 +#: cobc/scanner.l:2527 msgid "you may want MAKESYN instead" msgstr "" -#: cobc/scanner.l:2414 +#: cobc/scanner.l:2552 #, fuzzy, c-format #| msgid "alias target '%s' is not a default reserved word" msgid "'%s' is not a reserved word" msgstr "nome alternativo (alias) de destino (target) '%s' não é uma palavra reservada padrão" -#: cobc/scanner.l:2415 +#: cobc/scanner.l:2553 msgid "you may want ADDSYN or OVERRIDE instead" msgstr "" -#: cobc/tree.c:391 +#: cobc/tree.c:392 #, c-format msgid "%s clause is required for file '%s'" msgstr "cláusula %s é requerida para o ficheiro '%s'" -#: cobc/tree.c:395 +#: cobc/tree.c:396 #, fuzzy, c-format msgid "%s clause is invalid for file '%s' (file type)" msgstr "a cláusula %s é inválida para o ficheiro '%s' (tipo de ficheiro)" -#: cobc/tree.c:399 +#: cobc/tree.c:400 #, fuzzy, c-format msgid "%s clause is invalid for file '%s'" msgstr "a cláusula %s é inválida para o ficheiro '%s'" -#: cobc/tree.c:426 +#: cobc/tree.c:427 #, c-format msgid "FOR item '%s' is a record" msgstr "item FOR '%s' é um registo (record)" # @@@ CHECK TRANSLATION ??? -#: cobc/tree.c:435 +#: cobc/tree.c:436 #, fuzzy, c-format msgid "FOR item '%s' is in different record to '%s'" msgstr "item FOR '%s' está num registo (record) diferente para '%s'" -#: cobc/tree.c:444 +#: cobc/tree.c:445 #, c-format msgid "FOR item '%s' is not in a record associated with '%s'" msgstr "item FOR '%s' não é um registo associado com '%s'" # @@@ CHECK TRANSLATION ??? -#: cobc/tree.c:558 +#: cobc/tree.c:559 #, fuzzy msgid "internal error node" msgstr "nó de erro interno" -#: cobc/tree.c:560 +#: cobc/tree.c:561 #, fuzzy msgid "unknown constant" msgstr "constante desconhecida" -#: cobc/tree.c:571 +#: cobc/tree.c:572 #, fuzzy, c-format msgid "literal \"%s\"" msgstr "literal inválido: '%s'" -#: cobc/tree.c:842 -#, fuzzy, c-format -#| msgid "FUNCTION %s has invalid/not supported arguments - Tag %d" -msgid "FUNCTION %s has invalid/not supported arguments - tag %d" -msgstr "FUNCTION %s tem argumentos inválidos/não suportados - Identificador (Tag) %d" - -#: cobc/tree.c:963 +#: cobc/tree.c:969 #, fuzzy, c-format msgid "invalid date/time function: '%d'" msgstr "função data/hora (date/time) inválida: '%d'" -#: cobc/tree.c:995 +#: cobc/tree.c:1001 #, fuzzy, c-format msgid "FUNCTION '%s' has invalid date/time format" msgstr "FUNCTION '%s' tem o formato data/hora (date/time) inválido" # @@@ CHECK TRANSLATION ??? -#: cobc/tree.c:1002 +#: cobc/tree.c:1008 #, fuzzy, c-format msgid "FUNCTION '%s' has format in variable" msgstr "FUNCTION '%s' tem formato na variável" -#: cobc/tree.c:1482 +#: cobc/tree.c:1488 #, fuzzy, c-format msgid "unknown tree tag: %d, category: %d" msgstr "marca/rótulo de árvore (tree tag) desconhecid(o/a): %d, categoria: %d" -#: cobc/tree.c:1577 +#: cobc/tree.c:1590 #, fuzzy, c-format msgid "unexpected numeric USAGE: %d" msgstr "modo de usar (USAGE) numérico inesperado: %d" -#: cobc/tree.c:1591 +#: cobc/tree.c:1604 #, fuzzy, c-format msgid "unexpected category: %d" msgstr "categoria inesperada: %d" -#: cobc/tree.c:1790 +#: cobc/tree.c:1814 #, fuzzy, c-format msgid "literal length %d exceeds maximum of %d digits" msgstr "o comprimento do literal %d excede o máximo de %d dígitos" -#: cobc/tree.c:1795 +#: cobc/tree.c:1819 #, fuzzy, c-format msgid "literal length %d exceeds %d digits" msgstr "o comprimento do literal %d excede %d dígitos" -#: cobc/tree.c:1844 cobc/tree.c:1856 cobc/tree.c:1913 cobc/tree.c:1963 +#: cobc/tree.c:1868 cobc/tree.c:1880 cobc/tree.c:1937 cobc/tree.c:1987 #, fuzzy, c-format msgid "numeric literal '%s' exceeds limit '%s'" msgstr "literal numérico '%s' excede o limite '%s'" -#: cobc/tree.c:2655 +#: cobc/tree.c:2676 #, fuzzy msgid "invalid LOCALE literal" msgstr "literal LOCALE inválido" -#: cobc/tree.c:2782 +#: cobc/tree.c:2803 #, fuzzy msgid "only literals with the same category can be concatenated" msgstr "só é possível concatenar literais da mesma categoria" # @@@ BAD ENGLISH - "alpanumeric" should be "alphanumeric" -#: cobc/tree.c:2789 +#: cobc/tree.c:2811 #, fuzzy -msgid "only alphanumeric, national or boolean literals may be concatenated" +msgid "only alphanumeric, utf-8, national or boolean literals may be concatenated" msgstr "só é possível concatenar literais alfanuméricos, nacionais ou booleanos" -#: cobc/tree.c:2801 +#: cobc/tree.c:2823 #, fuzzy, c-format msgid "literal length %d exceeds %d characters" msgstr "o comprimento do literal %d excede %d carateres" -#: cobc/tree.c:3078 +#: cobc/tree.c:3103 msgid "B, 0 or /" msgstr "B, 0 ou /" -#: cobc/tree.c:3092 +#: cobc/tree.c:3117 msgid "the sign of the floating-point exponent" msgstr "o sinal do exponente do valor de ponto flutuante (floating-point)" -#: cobc/tree.c:3094 +#: cobc/tree.c:3119 msgid "a leading +/- sign" msgstr "um sinal dianteiro (leading) +/- (e.g. -123.45)" -#: cobc/tree.c:3096 +#: cobc/tree.c:3121 msgid "a trailing +/- sign" msgstr "um sinal traseiro (trailing) +/- (e.g. 123.45-" -#: cobc/tree.c:3098 +#: cobc/tree.c:3123 msgid "CR or DB" msgstr "CR ou DB" -#: cobc/tree.c:3100 +#: cobc/tree.c:3125 msgid "a leading currency symbol" msgstr "um símbolo monetário dianteiro (e.g. € 123.45)" -#: cobc/tree.c:3102 +#: cobc/tree.c:3127 msgid "a trailing currency symbol" msgstr "um símbolo monetário traseiro (e.g. 123.45 €)" -#: cobc/tree.c:3104 +#: cobc/tree.c:3129 msgid "a Z or * which is before the decimal point" msgstr "um Z ou * o qual se encontra antes do ponto decimal" -#: cobc/tree.c:3106 +#: cobc/tree.c:3131 msgid "a Z or * which is after the decimal point" msgstr "um Z ou * o qual se encontra depois do ponto decimal" -#: cobc/tree.c:3108 +#: cobc/tree.c:3133 msgid "a floating +/- string which is before the decimal point" msgstr "uma sequência (string) flutuante +/-, a qual se encontra antes do ponto decimal" -#: cobc/tree.c:3110 +#: cobc/tree.c:3135 msgid "a floating +/- string which is after the decimal point" msgstr "uma sequência (string) flutuante +/-, a qual se encontra depois do ponto decimal" -#: cobc/tree.c:3112 +#: cobc/tree.c:3137 msgid "a floating currency symbol string which is before the decimal point" msgstr "uma sequência (string) flutuante do símbolo monetário a qual se encontra antes do ponto decimal" -#: cobc/tree.c:3114 +#: cobc/tree.c:3139 msgid "a floating currency symbol string which is after the decimal point" msgstr "uma sequência (string) flutuante do símbolo monetário a qual se encontra depois do ponto decimal" -#: cobc/tree.c:3118 +#: cobc/tree.c:3143 msgid "A or X" msgstr "A ou X" -#: cobc/tree.c:3126 +#: cobc/tree.c:3151 msgid "a P which is before the decimal point" msgstr "um P que se encontra antes do ponto decimal" -#: cobc/tree.c:3128 +#: cobc/tree.c:3153 msgid "a P which is after the decimal point" msgstr "um P que se encontra depois do ponto decimal" -#: cobc/tree.c:3149 cobc/tree.c:3599 +#: cobc/tree.c:3176 cobc/tree.c:3638 #, c-format msgid "%s may only occur once in a PICTURE string" msgstr "%s só pode ocorrer uma vez numa sequência (string) PICTURE" -#: cobc/tree.c:3151 cobc/tree.c:3541 +#: cobc/tree.c:3178 cobc/tree.c:3570 #, fuzzy, c-format msgid "%s cannot follow %s" msgstr "%s não pode ser definida após %s" -#: cobc/tree.c:3154 +#: cobc/tree.c:3181 #, fuzzy msgid "invalid PICTURE string detected" msgstr "detetada sequência (string) PICTURE inválida" -#: cobc/tree.c:3271 +#: cobc/tree.c:3299 msgid "number or constant in parentheses is not an unsigned integer" msgstr "número ou constante entre parêntesis não corresponde a um inteiro sem sinal" -#: cobc/tree.c:3280 +#: cobc/tree.c:3308 #, fuzzy, c-format #| msgid "only up to 9 significant digits are permitted within parentheses" msgid "only up to %d significant digits are permitted within parentheses" msgstr "apenas o máximo de 9 dígitos significativos são permitidos entre parêntesis" -#: cobc/tree.c:3288 +#: cobc/tree.c:3316 msgid "number or constant in parentheses must be greater than zero" msgstr "número ou constante entre parêntesis tem de ser maior que zero" -#: cobc/tree.c:3299 +#: cobc/tree.c:3327 msgid "parentheses must be preceded by a picture symbol" msgstr "" -#: cobc/tree.c:3329 +#: cobc/tree.c:3353 msgid "unbalanced parentheses" msgstr "parêntesis desequilibrados" -#: cobc/tree.c:3337 +#: cobc/tree.c:3361 #, fuzzy #| msgid "parentheses must contain (a constant-name defined as) a positive integer" msgid "parentheses must contain an unsigned integer" msgstr "parêntesis têm de conter (uma constante definida como) um inteiro positivo" -#: cobc/tree.c:3375 +#: cobc/tree.c:3409 #, fuzzy, c-format msgid "'%s' is not a constant-name" msgstr "'%s' não é o nome de uma constante" -#: cobc/tree.c:3382 -#, fuzzy, c-format -msgid "'%s' is not a numeric literal" -msgstr "'%s' não é um literal numérico" - -#: cobc/tree.c:3386 +#: cobc/tree.c:3422 #, fuzzy, c-format -msgid "'%s' is not an integer" +msgid "'%s' is not an unsigned positive integer" msgstr "'%s' não é um inteiro" -#: cobc/tree.c:3390 -#, fuzzy, c-format -msgid "'%s' is not unsigned" -msgstr "'%s' não é 'sem-sinal' (unsigned)" - -#: cobc/tree.c:3450 +#: cobc/tree.c:3479 msgid "missing PICTURE string" msgstr "falta a sequência (string) PICTURE" -#: cobc/tree.c:3479 +#: cobc/tree.c:3508 msgid "C must be followed by R" msgstr "C tem de ser seguido por R (tal como 'CR', não 'C R')" -#: cobc/tree.c:3482 +#: cobc/tree.c:3511 msgid "D must be followed by B" msgstr "D tem de ser seguido por B (tal como 'DB', não 'D B')" -#: cobc/tree.c:3497 cobc/tree.c:3596 cobc/tree.c:3622 cobc/tree.c:3733 +#: cobc/tree.c:3526 cobc/tree.c:3635 cobc/tree.c:3661 cobc/tree.c:3773 #, fuzzy #| msgid "unbalanced parentheses" msgid "uncommon parentheses" msgstr "parêntesis desequilibrados" -#: cobc/tree.c:3541 +#: cobc/tree.c:3570 msgid "exponent" msgstr "" -#: cobc/tree.c:3586 +#: cobc/tree.c:3625 #, fuzzy #| msgid "S must be at start of PICTURE string" msgid "L must be at start of PICTURE string" msgstr "S tem de estar definido no início da sequência (string) PICTURE" -#: cobc/tree.c:3604 +#: cobc/tree.c:3643 msgid "S must be at start of PICTURE string" msgstr "S tem de estar definido no início da sequência (string) PICTURE" -#: cobc/tree.c:3660 +#: cobc/tree.c:3699 msgid "P must be at start or end of PICTURE string" msgstr "P tem de estar definido no início ou no fim da sequência (string) PICTURE" -#: cobc/tree.c:3690 +#: cobc/tree.c:3730 msgid "cannot have both Z and * in PICTURE string" msgstr "não é possível ambos Z e * na sequência (string) PICTURE" -#: cobc/tree.c:3768 +#: cobc/tree.c:3808 #, fuzzy, c-format msgid "invalid PICTURE character '%c'" msgstr "caratere '%c' inválido em PICTURE" -#: cobc/tree.c:3798 +#: cobc/tree.c:3841 #, c-format msgid "PICTURE string may not contain more than %d characters; contains %d characters" msgstr "sequência (string) PICTURE não pode conter mais de %d carateres; contém %d carateres" -#: cobc/tree.c:3803 -msgid "PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" +#: cobc/tree.c:3846 +#, fuzzy +#| msgid "PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" +msgid "PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" msgstr "sequência (string) PICTURE tem de conter pelo menos um do conjunto 'A,N,X,Z,1,9,*'; ou pelo menos dois do conjunto '+,-,símbolo monetário'" -#: cobc/tree.c:3830 +#: cobc/tree.c:3873 #, fuzzy, c-format msgid "numeric field cannot be larger than %d digits" msgstr "campo numérico não pode exceder %d dígitos" -#: cobc/tree.c:4267 +#: cobc/tree.c:4333 #, fuzzy, c-format #| msgid "PICTURE clause required for '%s'" msgid "needs PICTURE clause for SUM %s" msgstr "cláusula PICTURE requerida para '%s'" -#: cobc/tree.c:4274 +#: cobc/tree.c:4340 #, fuzzy, c-format #| msgid "PICTURE clause required for '%s'" msgid "non-numeric PICTURE clause for SUM %s" msgstr "cláusula PICTURE requerida para '%s'" -#: cobc/tree.c:4346 cobc/tree.c:4359 +#: cobc/tree.c:4412 cobc/tree.c:4425 #, c-format msgid "no DETAIL line defined in report %s" msgstr "" -#: cobc/tree.c:4361 +#: cobc/tree.c:4427 msgid "PAGE LIMIT FIRST DETAIL should be >= HEADING" msgstr "" -#: cobc/tree.c:4364 +#: cobc/tree.c:4430 msgid "PAGE LIMIT FOOTING should be >= HEADING" msgstr "" -#: cobc/tree.c:4366 +#: cobc/tree.c:4432 msgid "PAGE LIMIT LAST DETAIL should be >= FIRST DETAIL" msgstr "" -#: cobc/tree.c:4368 +#: cobc/tree.c:4434 msgid "PAGE LIMIT FOOTING should be >= LAST DETAIL" msgstr "" -#: cobc/tree.c:4370 +#: cobc/tree.c:4436 msgid "PAGE LIMIT LINES should be >= FOOTING" msgstr "" -#: cobc/tree.c:4563 libcob/fileio.c:8999 +#: cobc/tree.c:4631 libcob/fileio.c:9358 #, c-format msgid "maximum keys (%d/%d) exceeded for file '%s'" msgstr "" -#: cobc/tree.c:4627 cobc/tree.c:4650 +#: cobc/tree.c:4695 cobc/tree.c:4718 #, fuzzy, c-format msgid "invalid KEY item '%s', not in file '%s'" msgstr "item KEY inválido '%s', não existe no ficheiro '%s'" -#: cobc/tree.c:4661 +#: cobc/tree.c:4729 #, c-format msgid "minimal record length %d can not hold the key item '%s'; needs to be at least %d" msgstr "comprimento mínimo do registo %d não permite a chave '%s'; necessita ser pelo menos %d" -#: cobc/tree.c:4696 +#: cobc/tree.c:4764 #, fuzzy, c-format #| msgid "missing definitions:" msgid "missing file description for %s" msgstr "definições em falta:" -#: cobc/tree.c:4745 +#: cobc/tree.c:4813 #, fuzzy, c-format msgid "size of record '%s' (%d) smaller than minimum of file '%s' (%d)" msgstr "comprimento do registo '%s' (%d) é menor que o mínimo exigido pelo ficheiro '%s' (%d)" -#: cobc/tree.c:4748 cobc/tree.c:4765 +#: cobc/tree.c:4816 cobc/tree.c:4833 msgid "file size adjusted" msgstr "" -#: cobc/tree.c:4760 +#: cobc/tree.c:4828 #, fuzzy, c-format msgid "size of record '%s' (%d) larger than maximum of file '%s' (%d)" msgstr "comprimento do registo '%s' (%d) é maior que o máximo exigido pelo ficheiro '%s' (%d)" -#: cobc/tree.c:4793 +#: cobc/tree.c:4861 msgid "RECORD VARYING specified without limits, but implied limits are equal" msgstr "" -#: cobc/tree.c:4795 +#: cobc/tree.c:4863 #, fuzzy, c-format #| msgid "%s ignored" msgid "%s clause ignored" msgstr "%s ignorad(o/a)" -#: cobc/tree.c:4890 cobc/typeck.c:7695 cobc/typeck.c:14389 cobc/typeck.c:14441 -#: cobc/typeck.c:14477 libcob/fileio.c:4598 libcob/screenio.c:3720 -#: libcob/screenio.c:3750 +#: cobc/tree.c:4958 cobc/typeck.c:8128 cobc/typeck.c:15186 cobc/typeck.c:15238 +#: cobc/typeck.c:15275 libcob/fileio.c:4724 libcob/screenio.c:4613 +#: libcob/screenio.c:4639 #, fuzzy, c-format msgid "runtime is not configured to support %s" msgstr "biblioteca de execução (runtime library) não está configurada para esta operação" -#: cobc/tree.c:5395 +#: cobc/tree.c:5474 #, fuzzy, c-format msgid "literal '%.38s' is longer than '%s'" msgstr "o tamanho de '%s' é mais comprido que o tamanho de '%s'" -#: cobc/tree.c:5399 +#: cobc/tree.c:5478 #, c-format msgid "literal '%.38s' is longer than reference-modification of '%s'" msgstr "" -#: cobc/tree.c:5424 +#: cobc/tree.c:5508 #, c-format msgid "literal '%s' is alphanumeric but '%s' is numeric" msgstr "" -#: cobc/tree.c:5466 +#: cobc/tree.c:5550 #, c-format msgid "literal '%s' has more decimals than '%s'" msgstr "" -#: cobc/tree.c:5508 +#: cobc/tree.c:5598 #, c-format msgid "literal '%s' has more digits than '%s'" msgstr "" -#: cobc/tree.c:5548 cobc/tree.c:5572 +#: cobc/tree.c:5646 cobc/tree.c:5676 #, fuzzy, c-format #| msgid "THRU item '%s' may not be subordinate to '%s'" msgid "unsigned '%s' may not be %s %s" msgstr "o item THRU '%s' não pode ser subordinado a '%s'" -#: cobc/tree.c:5558 cobc/tree.c:5581 +#: cobc/tree.c:5658 cobc/tree.c:5689 #, c-format msgid "unsigned '%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5614 cobc/tree.c:5639 +#: cobc/tree.c:5726 cobc/tree.c:5756 #, fuzzy, c-format msgid "'%s' may not be %s %s" msgstr "'%s' não pode ser usad(o/a) aqui" -#: cobc/tree.c:5625 cobc/tree.c:5650 +#: cobc/tree.c:5738 cobc/tree.c:5768 #, c-format msgid "'%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5795 +#: cobc/tree.c:5917 #, fuzzy msgid "divide by constant ZERO" msgstr "constante inválida" -#: cobc/tree.c:5879 cobc/tree.c:5886 +#: cobc/tree.c:6001 cobc/tree.c:6008 #, c-format msgid "%s should be COMP-X/COMP-5 for logical operator" msgstr "" -#: cobc/tree.c:5927 cobc/tree.c:5932 cobc/tree.c:6151 cobc/typeck.c:5675 -#: cobc/typeck.c:5684 cobc/typeck.c:5691 cobc/typeck.c:6772 cobc/typeck.c:6913 -#, fuzzy -msgid "invalid expression" -msgstr "expressão inválida" - -#: cobc/tree.c:6148 +#: cobc/tree.c:6283 #, fuzzy, c-format msgid "invalid expression: %s %s %s" msgstr "expressão inválida" -#: cobc/tree.c:6195 +#: cobc/tree.c:6286 +msgid "invalid expression: boolean expected with logical operator" +msgstr "" + +#: cobc/tree.c:6330 #, fuzzy, c-format msgid "unexpected operator: %d" msgstr "operador inesperado: %d" -#: cobc/tree.c:6206 +#: cobc/tree.c:6341 #, c-format msgid "expression '%.38s' %s '%.38s' is always TRUE" msgstr "" -#: cobc/tree.c:6212 +#: cobc/tree.c:6347 msgid "expression is always TRUE" msgstr "" -#: cobc/tree.c:6225 +#: cobc/tree.c:6360 #, c-format msgid "expression '%.38s' %s '%.38s' is always FALSE" msgstr "" -#: cobc/tree.c:6231 +#: cobc/tree.c:6366 msgid "expression is always FALSE" msgstr "" -#: cobc/tree.c:6443 +#: cobc/tree.c:6588 #, fuzzy msgid "invalid file name reference" msgstr "referência de nome de ficheiro inválido" -#: cobc/tree.c:6451 +#: cobc/tree.c:6596 #, fuzzy, c-format #| msgid "BY CONTENT assumed for alphanumeric item" msgid "BY CONTENT assumed for alphanumeric item '%s'" msgstr "BY CONTENT assumido para item alfanumérico" -#: cobc/tree.c:6456 +#: cobc/tree.c:6601 #, fuzzy, c-format #| msgid "BY CONTENT assumed for alphanumeric item" msgid "BY CONTENT assumed for national item '%s'" msgstr "BY CONTENT assumido para item alfanumérico" -#: cobc/tree.c:6595 +#: cobc/tree.c:6740 msgid "PERFORM FOREVER since UNTIL is always FALSE" msgstr "" -#: cobc/tree.c:6599 +#: cobc/tree.c:6744 msgid "PERFORM ONCE since UNTIL is always TRUE" msgstr "" -#: cobc/tree.c:6602 +#: cobc/tree.c:6747 msgid "PERFORM NEVER since UNTIL is always TRUE" msgstr "" -#: cobc/tree.c:6726 +#: cobc/tree.c:6871 #, fuzzy, c-format #| msgid "no definition/prototype seen for program '%s'" msgid "no definition/prototype seen for FUNCTION '%s'" msgstr "não existe aparentemente definição/protótipo para o programa '%s'" -#: cobc/tree.c:6728 +#: cobc/tree.c:6873 #, fuzzy, c-format #| msgid "no definition/prototype seen for program '%s'" msgid "no definition/prototype seen for PROGRAM '%s'" msgstr "não existe aparentemente definição/protótipo para o programa '%s'" -#: cobc/tree.c:6737 +#: cobc/tree.c:6882 #, fuzzy, c-format #| msgid "no definition/prototype seen for program with external name '%s'" msgid "no definition/prototype seen for FUNCTION with external name '%s'" msgstr "não existe aparentemente definição/protótipo para o programa '%s'" -#: cobc/tree.c:6739 +#: cobc/tree.c:6884 #, fuzzy, c-format #| msgid "no definition/prototype seen for program with external name '%s'" msgid "no definition/prototype seen for PROGRAM with external name '%s'" msgstr "não existe aparentemente definição/protótipo para o programa '%s'" -#: cobc/tree.c:6831 +#: cobc/tree.c:6976 cobc/tree.c:7158 cobc/tree.c:7233 cobc/tree.c:7239 +#: cobc/tree.c:7247 cobc/tree.c:7255 cobc/tree.c:7277 cobc/tree.c:7287 +#: cobc/tree.c:7292 #, fuzzy, c-format #| msgid "FUNCTION '%s' has invalid parameter" -msgid "FUNCTION %s has invalid argument" +msgid "FUNCTION '%s' has invalid argument" msgstr "FUNCTION '%s' tem parâmetro inválido" -#: cobc/tree.c:6833 +#: cobc/tree.c:6978 #, c-format -msgid "either all arguments or none should be if type %s" +msgid "either all arguments or none should be of type %s" msgstr "" -#: cobc/tree.c:6863 cobc/tree.c:6869 cobc/tree.c:6911 cobc/tree.c:6916 +#: cobc/tree.c:7010 cobc/tree.c:7016 cobc/tree.c:7057 cobc/tree.c:7063 #, c-format msgid "FUNCTION '%s' has invalid reference modification" msgstr "FUNCTION '%s' tem modificação de referência inválida" -#: cobc/tree.c:6880 cobc/tree.c:7194 +#: cobc/tree.c:7027 cobc/tree.c:7344 #, c-format msgid "FUNCTION '%s' unknown" msgstr "FUNCTION '%s' desconhecida" -#: cobc/tree.c:6884 +#: cobc/tree.c:7031 #, fuzzy, c-format msgid "FUNCTION '%s' is not implemented" msgstr "FUNCTION '%s' não está implementada" -#: cobc/tree.c:6891 cobc/tree.c:6898 cobc/tree.c:7179 +#: cobc/tree.c:7037 cobc/tree.c:7044 cobc/tree.c:7329 #, c-format msgid "FUNCTION '%s' has wrong number of arguments" msgstr "FUNCTION '%s' tem um número incorreto de argumentos" -#: cobc/tree.c:6905 +#: cobc/tree.c:7051 #, fuzzy, c-format msgid "FUNCTION '%s' cannot have reference modification" msgstr "FUNCTION '%s' não pode ter modificação da referencia" -#: cobc/tree.c:7008 cobc/tree.c:7083 cobc/tree.c:7089 cobc/tree.c:7097 -#: cobc/tree.c:7105 cobc/tree.c:7127 cobc/tree.c:7137 cobc/tree.c:7142 -#, fuzzy, c-format -#| msgid "FUNCTION '%s' has invalid parameter" -msgid "FUNCTION '%s' has invalid argument" -msgstr "FUNCTION '%s' tem parâmetro inválido" - -#: cobc/tree.c:7185 +#: cobc/tree.c:7335 #, fuzzy, c-format #| msgid "FUNCTION '%s' has invalid first parameter" msgid "FUNCTION '%s' has invalid first argument" msgstr "FUNCTION '%s' tem o primeiro parâmetro inválido" -#: cobc/typeck.c:584 +#: cobc/typeck.c:590 #, c-format msgid "%s should be COMP-5/COMP-X for logical operator" msgstr "" -#: cobc/typeck.c:850 +#: cobc/typeck.c:856 #, fuzzy, c-format #| msgid "%s not allowed here" msgid "%s item not allowed here: '%s'" msgstr "%s não é permitido aqui" -#: cobc/typeck.c:892 +#: cobc/typeck.c:898 #, fuzzy, c-format msgid "'%s' is not a group name" msgstr "'%s' não é um nome de grupo" -#: cobc/typeck.c:911 +#: cobc/typeck.c:921 #, c-format msgid "'%s' is not a numeric name" msgstr "'%s' não é um nome numérico" -#: cobc/typeck.c:934 +#: cobc/typeck.c:944 #, fuzzy, c-format msgid "'%s' is not a numeric or numeric-edited name" msgstr "'%s' não é um nome numérico ou numérico-editado" -#: cobc/typeck.c:974 -#, fuzzy, c-format -#| msgid "'%s' is not a numeric value" -msgid "'%s' is Alpha, instead of a numeric value" -msgstr "'%s' não é um valor numérico" - -#: cobc/typeck.c:977 +#: cobc/typeck.c:1043 #, fuzzy, c-format -#| msgid "'%s' is not a numeric value" -msgid "'%s' is Alpha Edited, instead of a numeric value" -msgstr "'%s' não é um valor numérico" - -#: cobc/typeck.c:990 -#, c-format -msgid "'%s' is not a numeric value" -msgstr "'%s' não é um valor numérico" - -#: cobc/typeck.c:1040 -#, c-format -msgid "'%s' is not an integer value" -msgstr "'%s' não é um valor inteiro" +msgid "'%s' is not an integer" +msgstr "'%s' não é um inteiro" -#: cobc/typeck.c:1044 +#: cobc/typeck.c:1047 #, fuzzy msgid "positive numeric integer is required here" msgstr "é requerido aqui um valor inteiro positivo" -#: cobc/typeck.c:1163 +#: cobc/typeck.c:1178 #, fuzzy msgid "System routine" msgstr "Rotina de sistema" -#: cobc/typeck.c:2054 libcob/call.c:1180 +#: cobc/typeck.c:2037 libcob/call.c:1172 #, c-format msgid "'%s' literal includes leading spaces which are omitted" msgstr "o literal '%s' inclui espaços dianteiros os quais são omitidos (e.g. ' TESTE' -> 'TESTE')" -#: cobc/typeck.c:2058 +#: cobc/typeck.c:2041 #, c-format msgid "'%s' literal includes trailing spaces which are omitted" msgstr "o literal '%s' inclui espaços traseiros os quais são omitidos (e.g. 'TESTE ' -> 'TESTE')" -#: cobc/typeck.c:2125 +#: cobc/typeck.c:2108 msgid "ON/OFF usage requires a SWITCH name" msgstr "o modo de usar de ON/OFF requere o nome de um comutador (SWITCH)" -#: cobc/typeck.c:2143 +#: cobc/typeck.c:2126 #, fuzzy, c-format msgid "word length exceeds maximum of %d characters: '%s'" msgstr "o comprimento da palavra excede o máximo de %d carateres: '%s'" -#: cobc/typeck.c:2146 +#: cobc/typeck.c:2129 #, fuzzy, c-format msgid "word length exceeds %d characters: '%s'" msgstr "o comprimento da palavra excede %d carateres: '%s'" -#: cobc/typeck.c:2223 +#: cobc/typeck.c:2206 #, fuzzy, c-format #| msgid "ASSIGN interpreted as %s" msgid "ASSIGN %s interpreted as '%s'" msgstr "ASSIGN interpretado como %s" -#: cobc/typeck.c:2315 cobc/typeck.c:2487 +#: cobc/typeck.c:2332 cobc/typeck.c:2631 #, fuzzy, c-format msgid "subscript missing for '%s' - defaulting to 1" msgstr "falta endereço (subscript) para '%s' - assumindo 1" -#: cobc/typeck.c:2338 cobc/typeck.c:2403 cobc/typeck.c:2659 +#: cobc/typeck.c:2355 cobc/typeck.c:2546 cobc/typeck.c:2746 #, c-format msgid "'%s' cannot be subscripted" msgstr "'%s' não pode endereçado (subscripted)" -#: cobc/typeck.c:2342 cobc/typeck.c:2663 +#: cobc/typeck.c:2359 cobc/typeck.c:2750 #, fuzzy, c-format msgid "'%s' requires one subscript" msgstr "'%s' requere 1 endereço (vetor)" -#: cobc/typeck.c:2345 cobc/typeck.c:2666 +#: cobc/typeck.c:2362 cobc/typeck.c:2753 #, c-format msgid "'%s' requires %d subscripts" msgstr "'%s; requiere %d endereços (matriz)" -#: cobc/typeck.c:2363 +#: cobc/typeck.c:2380 #, c-format msgid "'%s' (accessed by '%s')" msgstr "'%s' (acedido por '%s')" -#: cobc/typeck.c:2471 -#, c-format -msgid "'%s' has no OCCURS clause" -msgstr "'%s' não tem cláusula OCCURS" +#: cobc/typeck.c:2399 cobc/typeck.c:4987 +#, fuzzy, c-format +#| msgid "'%s' cannot be reference modified" +msgid "%s may not be reference modified" +msgstr "'%s' não pode ser modificado por referência" -#: cobc/typeck.c:2537 libcob/common.c:3941 libcob/common.c:3952 +#: cobc/typeck.c:2437 cobc/typeck.c:2442 cobc/typeck.c:2466 +#: libcob/common.c:4477 libcob/common.c:4521 #, fuzzy, c-format -msgid "subscript of '%s' out of bounds: %d" -msgstr "endereço de '%s' fora dos limites: %d" +msgid "length of '%s' out of bounds: %d" +msgstr "comprimento de '%s' fora dos limites: %d" -#: cobc/typeck.c:2587 cobc/typeck.c:2598 libcob/common.c:3976 -#: libcob/common.c:4027 +#: cobc/typeck.c:2453 cobc/typeck.c:2462 libcob/common.c:4462 +#: libcob/common.c:4513 #, fuzzy, c-format msgid "offset of '%s' out of bounds: %d" msgstr "deslocamento (offset) de '%s' fora dos limites: %d" -#: cobc/typeck.c:2592 cobc/typeck.c:2603 cobc/typeck.c:2612 -#: libcob/common.c:3991 libcob/common.c:4035 +#: cobc/typeck.c:2458 +msgid "suspicious reference-modification: always using max. position" +msgstr "" + +#: cobc/typeck.c:2475 +msgid "suspicious reference-modification: always using max. length" +msgstr "" + +#: cobc/typeck.c:2615 +#, c-format +msgid "'%s' has no OCCURS clause" +msgstr "'%s' não tem cláusula OCCURS" + +#: cobc/typeck.c:2694 libcob/common.c:4427 libcob/common.c:4438 #, fuzzy, c-format -msgid "length of '%s' out of bounds: %d" -msgstr "comprimento de '%s' fora dos limites: %d" +msgid "subscript of '%s' out of bounds: %d" +msgstr "endereço de '%s' fora dos limites: %d" -#: cobc/typeck.c:2727 cobc/typeck.c:2806 +#: cobc/typeck.c:2812 cobc/typeck.c:2891 #, fuzzy msgid "reference modification not allowed here" msgstr "modificação da referência não é permitida aqui" -#: cobc/typeck.c:2741 cobc/typeck.c:2832 +#: cobc/typeck.c:2826 cobc/typeck.c:2917 msgid "88 level item not allowed here" msgstr "item de nível 88 não é permitido aqui" -#: cobc/typeck.c:2745 cobc/typeck.c:2836 cobc/typeck.c:2844 cobc/typeck.c:2906 +#: cobc/typeck.c:2830 cobc/typeck.c:2921 cobc/typeck.c:2929 cobc/typeck.c:2991 #, fuzzy msgid "variable length item not allowed here" msgstr "item de comprimento variável não é permitido aqui" -#: cobc/typeck.c:2774 +#: cobc/typeck.c:2859 #, fuzzy, c-format msgid "'%s' has not been DEFINEd" msgstr "'%s' não existe nas declarativas (DECLARATIVES)" -#: cobc/typeck.c:2810 +#: cobc/typeck.c:2895 #, fuzzy msgid "only field names allowed here" msgstr "item de nível 88 não é permitido aqui" -#: cobc/typeck.c:2821 +#: cobc/typeck.c:2906 #, c-format msgid "VALUE of '%s': %s target '%s' is invalid" msgstr "" -#: cobc/typeck.c:2823 cobc/typeck.c:2889 +#: cobc/typeck.c:2908 cobc/typeck.c:2974 #, fuzzy msgid "target must be in FILE SECTION or LINKAGE SECTION or have the EXTERNAL clause" msgstr "item RETURNING tem de ser definido na LINKAGE SECTION ou ter uma cláusula BASED" -#: cobc/typeck.c:2879 cobc/typeck.c:2888 +#: cobc/typeck.c:2964 cobc/typeck.c:2973 #, fuzzy, c-format msgid "VALUE of '%s': %s target is invalid" msgstr "o destino de SET é inválido: '%s'" -#: cobc/typeck.c:2881 +#: cobc/typeck.c:2966 #, fuzzy msgid "no previous data-item found" msgstr "não existe previamente um item de dados de nível %02d" -#: cobc/typeck.c:3040 cobc/typeck.c:4799 +#: cobc/typeck.c:3130 cobc/typeck.c:4963 #, fuzzy, c-format msgid "'%s' cannot be BASED/EXTERNAL" msgstr "'%s' não pode ser BASED/EXTERNAL" -#: cobc/typeck.c:3045 +#: cobc/typeck.c:3135 #, c-format msgid "'%s' is not in WORKING-STORAGE SECTION" msgstr "'%s' não está na WORKING-STORAGE SECTION" -#: cobc/typeck.c:3052 cobc/typeck.c:4796 +#: cobc/typeck.c:3142 cobc/typeck.c:4960 #, c-format msgid "'%s' not level 01 or 77" msgstr "'%s' não pertence ao nível 01 ou 77" -#: cobc/typeck.c:3055 cobc/typeck.c:3090 cobc/typeck.c:4802 +#: cobc/typeck.c:3145 cobc/typeck.c:3180 cobc/typeck.c:4966 #, c-format msgid "'%s' REDEFINES field not allowed here" msgstr "'%s' campo REDEFINES não é permitido aqui" -#: cobc/typeck.c:3075 cobc/typeck.c:8423 +#: cobc/typeck.c:3165 cobc/typeck.c:8876 #, fuzzy, c-format msgid "duplicate USING BY REFERENCE item '%s'" msgstr "Diretiva DEFINE/SET inválida" -#: cobc/typeck.c:3103 +#: cobc/typeck.c:3193 #, c-format msgid "'%s' USING item duplicates RETURNING item" msgstr "'%s' item USING duplica o item RETURNING" -#: cobc/typeck.c:3177 +#: cobc/typeck.c:3268 #, fuzzy, c-format msgid "prototype and definition of '%s' do not match" msgstr "redefinição de '%s'" -#: cobc/typeck.c:3256 +#: cobc/typeck.c:3389 cobc/typeck.c:3486 #, c-format msgid "parameters #%d ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3259 +#: cobc/typeck.c:3393 #, c-format msgid "returning items ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3295 +#: cobc/typeck.c:3429 #, fuzzy #| msgid "no definition/prototype seen for function '%s'" msgid "definition is a program but the prototype is a function" msgstr "não existe aparentemente definição/protótipo para a função '%s'" -#: cobc/typeck.c:3299 +#: cobc/typeck.c:3433 #, fuzzy #| msgid "no definition/prototype seen for program '%s'" msgid "definition is a function but the prototype is a program" msgstr "não existe aparentemente definição/protótipo para o programa '%s'" -#: cobc/typeck.c:3306 -msgid "DECIMAL-POINT IS COMMA clauses differ" -msgstr "" - -#: cobc/typeck.c:3312 -msgid "CURRENCY clauses differ" -msgstr "" - -#: cobc/typeck.c:3348 +#: cobc/typeck.c:3496 #, fuzzy msgid "number of parameters differ" msgstr "número de parâmetros excede o máximo %d" -#: cobc/typeck.c:3358 +#: cobc/typeck.c:3506 msgid "definition has a RETURNING item but prototype does not" msgstr "" -#: cobc/typeck.c:3362 +#: cobc/typeck.c:3510 msgid "definition does not have a RETURNING item but prototype does" msgstr "" -#: cobc/typeck.c:3411 +#: cobc/typeck.c:3560 #, fuzzy, c-format msgid "unexpected tree tag: %d" msgstr "marca/rótulo de árvore (tree tag) inesperado: %d" -#: cobc/typeck.c:3433 +#: cobc/typeck.c:3584 #, fuzzy, c-format msgid "expected argument #%d, %s, to be passed BY VALUE" msgstr "parâmetros passados por valor (BY VALUE)" -#: cobc/typeck.c:3437 +#: cobc/typeck.c:3589 #, c-format msgid "expected argument #%d, %s, to be passed BY REFERENCE/CONTENT" msgstr "" -#: cobc/typeck.c:3455 cobc/typeck.c:3580 cobc/typeck.c:3583 +#: cobc/typeck.c:3608 cobc/typeck.c:3733 cobc/typeck.c:3736 #, c-format msgid "argument #%d is not optional" msgstr "" -#: cobc/typeck.c:3468 +#: cobc/typeck.c:3622 #, c-format msgid "argument #%d must be at least %d bytes long" msgstr "" -#: cobc/typeck.c:3483 +#: cobc/typeck.c:3637 #, c-format msgid "argument #%d is a different type of pointer than the parameter" msgstr "" -#: cobc/typeck.c:3490 +#: cobc/typeck.c:3644 #, c-format msgid "argument #%d is ANY LENGTH, but expecting a fixed size item" msgstr "" -#: cobc/typeck.c:3518 +#: cobc/typeck.c:3672 #, c-format msgid "argument #%d, %s, does not conform to the parameter definition" msgstr "" -#: cobc/typeck.c:3566 +#: cobc/typeck.c:3719 #, c-format msgid "expecting up to %d arguments, but found %d" msgstr "" -#: cobc/typeck.c:3598 +#: cobc/typeck.c:3752 #, fuzzy #| msgid "function RETURNING item may not be ANY LENGTH" msgid "the RETURNING item is of a fixed size, not ANY LENGTH" msgstr "item RETURNING de uma função não pode ser definido com ANY LENGTH" -#: cobc/typeck.c:3603 +#: cobc/typeck.c:3758 #, fuzzy, c-format msgid "RETURNING item %s is not a valid type" msgstr "item RETURNING tem de ter o nível 01" -#: cobc/typeck.c:3609 +#: cobc/typeck.c:3764 #, fuzzy msgid "unexpected RETURNING item" msgstr "item CONSTANT inesperado" -#: cobc/typeck.c:3612 +#: cobc/typeck.c:3767 msgid "expecting a RETURNING item, but none provided" msgstr "" -#: cobc/typeck.c:3663 -#, c-format -msgid "'%s' is not an alphabet name" -msgstr "'%s' não é um nome de alfabeto" - -#: cobc/typeck.c:3939 +#: cobc/typeck.c:4091 #, fuzzy, c-format msgid "duplicate character values in alphabet '%s': %s" msgstr "valores de caracteres duplicados no alfabeto '%s': %s" -#: cobc/typeck.c:3944 +#: cobc/typeck.c:4096 #, fuzzy, c-format msgid "invalid character values in alphabet '%s', starting at position %d" msgstr "valores de carateres inválidos no alfabeto '%s', começando na posição %d" -#: cobc/typeck.c:4045 +#: cobc/typeck.c:4198 #, fuzzy, c-format msgid "duplicate character values in class '%s'" msgstr "valores duplicados na classe '%s'" -#: cobc/typeck.c:4074 +#: cobc/typeck.c:4227 #, fuzzy msgid "invalid ALPHABET name" msgstr "nome de alfabeto (ALPHABET) inválido" -#: cobc/typeck.c:4103 +#: cobc/typeck.c:4256 #, c-format msgid "'%s' is not a locale name" msgstr "'%s' não é um nome de local (locale)" -#: cobc/typeck.c:4257 +#: cobc/typeck.c:4410 #, fuzzy msgid "invalid RECORD DEPENDING item" msgstr "item RECORD DEPENDING inválido" -#: cobc/typeck.c:4262 +#: cobc/typeck.c:4415 msgid "RECORD DEPENDING must reference a data-item" msgstr "RECORD DEPENDING tem de referenciar um item-de-dados" -#: cobc/typeck.c:4285 +#: cobc/typeck.c:4438 #, fuzzy, c-format msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgstr "item RECORD DEPENDING '%s' deverá ser definido numa das seguintes secções: WORKING-STORAGE, LOCAL-STORAGE or LINKAGE" -#: cobc/typeck.c:4298 +#: cobc/typeck.c:4451 #, fuzzy, c-format msgid "file %s: RELATIVE KEY %s is not numeric" msgstr "valor na cláusula AT não é numérico" -#: cobc/typeck.c:4307 +#: cobc/typeck.c:4460 #, c-format msgid "file %s: RELATIVE KEY %s must be integer" msgstr "" -#: cobc/typeck.c:4312 +#: cobc/typeck.c:4465 #, c-format msgid "file %s: RELATIVE KEY %s must be unsigned" msgstr "" -#: cobc/typeck.c:4319 +#: cobc/typeck.c:4472 #, c-format msgid "file %s: RELATIVE KEY %s cannot have OCCURS" msgstr "" -#: cobc/typeck.c:4325 +#: cobc/typeck.c:4478 #, c-format msgid "RELATIVE KEY %s cannot be in file record belonging to %s" msgstr "" -#: cobc/typeck.c:4334 +#: cobc/typeck.c:4487 #, c-format msgid "file %s: RELATIVE KEY %s declared outside WORKING-STORAGE" msgstr "" -#: cobc/typeck.c:4356 cobc/typeck.c:8396 +#: cobc/typeck.c:4509 cobc/typeck.c:8833 #, c-format msgid "'%s' is not a valid data name" msgstr "'%s' não é um nome de datos válido" -#: cobc/typeck.c:4363 +#: cobc/typeck.c:4516 #, fuzzy, c-format msgid "CRT STATUS item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "item RECORD DEPENDING '%s' deverá ser definido numa das seguintes secções: WORKING-STORAGE, LOCAL-STORAGE or LINKAGE" -#: cobc/typeck.c:4369 +#: cobc/typeck.c:4522 #, fuzzy, c-format msgid "'%s' numeric CRT STATUS must have at least 4 digits" msgstr "'%s' CRT STATUS tem de ter 4 carateres" -#: cobc/typeck.c:4375 +#: cobc/typeck.c:4528 #, fuzzy, c-format msgid "'%s' CRT STATUS must be 3 or 4 characters long" msgstr "'%s' CRT STATUS tem de ter 4 carateres" -#: cobc/typeck.c:4397 +#: cobc/typeck.c:4550 #, fuzzy, c-format msgid "FILE STATUS '%s' is not a field" msgstr "'%s' não é um campo" -#: cobc/typeck.c:4409 +#: cobc/typeck.c:4562 #, c-format msgid "FILE STATUS '%s' may not be a decimal or have a PIC with a P" msgstr "" -#: cobc/typeck.c:4414 +#: cobc/typeck.c:4567 #, c-format msgid "FILE STATUS '%s' is a numeric field, but I-O status codes are not numeric in general" msgstr "" -#: cobc/typeck.c:4418 +#: cobc/typeck.c:4571 #, fuzzy, c-format msgid "FILE STATUS '%s' must be an alphanumeric or numeric field" msgstr "'%s' não é um nome numérico ou numérico-editado" -#: cobc/typeck.c:4425 +#: cobc/typeck.c:4578 #, fuzzy, c-format msgid "FILE STATUS '%s' must be USAGE DISPLAY" msgstr "'%s' não é USAGE DISPLAY" -#: cobc/typeck.c:4432 +#: cobc/typeck.c:4585 #, fuzzy, c-format msgid "FILE STATUS '%s' must be 2 characters long" msgstr "'%s' CRT STATUS tem de ter 4 carateres" -#: cobc/typeck.c:4440 +#: cobc/typeck.c:4593 #, fuzzy, c-format msgid "FILE STATUS '%s' must be in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE" msgstr "item RECORD DEPENDING '%s' deverá ser definido numa das seguintes secções: WORKING-STORAGE, LOCAL-STORAGE or LINKAGE" -#: cobc/typeck.c:4446 +#: cobc/typeck.c:4599 #, fuzzy, c-format #| msgid "RENAMES may not contain '%s' as it is an OCCURS DEPENDING table" msgid "FILE STATUS '%s' may not be located after an OCCURS DEPENDING field" msgstr "RENAMES não pode conter '%s' porque é uma tabela OCCURS DEPENDING (ODO table)" -#: cobc/typeck.c:4460 +#: cobc/typeck.c:4613 #, fuzzy, c-format #| msgid "'%s' will be implicitly defined" msgid "variable '%s' will be implicitly defined" msgstr "'%s' será definido implicitamente" -#: cobc/typeck.c:4489 cobc/typeck.c:4550 +#: cobc/typeck.c:4703 msgid "ASSIGN variable" msgstr "" -#: cobc/typeck.c:4555 +#: cobc/typeck.c:4708 #, fuzzy, c-format #| msgid "ASSIGN data item '%s' invalid" msgid "ASSIGN data item '%s' is invalid" msgstr "item de dados ASSIGN '%s' inválido" -#: cobc/typeck.c:4619 +#: cobc/typeck.c:4773 #, fuzzy, c-format msgid "'%s' CURSOR must be 4 or 6 characters long" msgstr "'%s' CURSOR tem de ter 4 ou 6 carateres" -#: cobc/typeck.c:4680 +#: cobc/typeck.c:4844 #, fuzzy, c-format #| msgid "'%s' cannot have OCCURS DEPENDING" msgid "'%s' cannot have nested OCCURS DEPENDING" msgstr "'%s' não pode usar OCURRS DEPENDING" -#: cobc/typeck.c:4694 +#: cobc/typeck.c:4858 #, fuzzy, c-format #| msgid "'%s' ODO field item invalid here" msgid "'%s' OCCURS DEPENDING ON field item invalid here" msgstr "'%s' item de campo ODO (OCCURS DEPENDING ON) inválido aqui" -#: cobc/typeck.c:4704 +#: cobc/typeck.c:4868 #, fuzzy, c-format #| msgid "'%s' cannot have OCCURS DEPENDING" msgid "'%s' cannot have OCCURS DEPENDING because of '%s'" msgstr "'%s' não pode usar OCURRS DEPENDING" -#: cobc/typeck.c:4716 +#: cobc/typeck.c:4880 #, fuzzy, c-format #| msgid "'%s' ODO item must have GLOBAL attribute" msgid "'%s' OCCURS DEPENDING ON item must have GLOBAL attribute" msgstr "'%s' item ODO (OCCURS DEPENDING ON) tem de ter o atributo GLOBAL" -#: cobc/typeck.c:4730 +#: cobc/typeck.c:4894 #, c-format msgid "PASSWORD '%s' for EXTERNAL file '%s' must have EXTERNAL attribute" msgstr "" -#: cobc/typeck.c:4768 +#: cobc/typeck.c:4932 #, fuzzy, c-format #| msgid "duplicate REPOSITORY entry for '%s'" msgid "duplicate APPLY COMMIT target: '%s'" msgstr "entrada de repositório (REPOSITORY entry) duplicada para '%s'" -#: cobc/typeck.c:4782 +#: cobc/typeck.c:4946 #, fuzzy #| msgid "USE statement invalid for SORT file" msgid "APPLY COMMIT statement invalid for SORT file" msgstr "instrução USE inválida para o ficheiro de ordenação (SORT file)" -#: cobc/typeck.c:4785 +#: cobc/typeck.c:4949 #, fuzzy #| msgid "USE statement invalid for SORT file" msgid "APPLY COMMIT statement invalid for REPORT file" msgstr "instrução USE inválida para o ficheiro de ordenação (SORT file)" -#: cobc/typeck.c:4792 +#: cobc/typeck.c:4956 #, fuzzy, c-format msgid "APPLY COMMIT item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "item RECORD DEPENDING '%s' deverá ser definido numa das seguintes secções: WORKING-STORAGE, LOCAL-STORAGE or LINKAGE" -#: cobc/typeck.c:4806 +#: cobc/typeck.c:4970 #, fuzzy, c-format #| msgid "%s not allowed here" msgid "item not allowed here: '%s'" msgstr "%s não é permitido aqui" -#: cobc/typeck.c:4819 +#: cobc/typeck.c:4983 #, fuzzy, c-format #| msgid "'%s' cannot be subscripted" msgid "%s may not be subscripted" msgstr "'%s' não pode endereçado (subscripted)" -#: cobc/typeck.c:4823 -#, fuzzy, c-format -#| msgid "'%s' cannot be reference modified" -msgid "%s may not be reference modified" -msgstr "'%s' não pode ser modificado por referência" - -#: cobc/typeck.c:4883 +#: cobc/typeck.c:5047 #, fuzzy, c-format msgid "DEBUGGING target invalid: '%s'" msgstr "destino para DEBUGGING inválido: '%s'" -#: cobc/typeck.c:4889 +#: cobc/typeck.c:5053 #, fuzzy, c-format msgid "DEBUGGING target already specified with ALL PROCEDURES: '%s'" msgstr "destino para DEBUGGING inválido com ALL PROCEDURES: '%s'" -#: cobc/typeck.c:4909 +#: cobc/typeck.c:5073 #, fuzzy msgid "DEBUGGING target" msgstr "destino para DEBUGGING inválido: '%s'" -#: cobc/typeck.c:4916 +#: cobc/typeck.c:5080 #, c-format msgid "'%s' is not a valid DEBUGGING target" msgstr "'%s' não é um destino válido para DEBUGGING" -#: cobc/typeck.c:4962 cobc/typeck.c:4970 +#: cobc/typeck.c:5126 cobc/typeck.c:5134 #, c-format msgid "'%s' is not in DECLARATIVES" msgstr "'%s' não existe nas declarativas (DECLARATIVES)" -#: cobc/typeck.c:4984 +#: cobc/typeck.c:5148 #, fuzzy, c-format msgid "invalid reference to '%s' (in DECLARATIVES)" msgstr "referência inválida de '%s' (em DECLARATIVES)" -#: cobc/typeck.c:4996 +#: cobc/typeck.c:5162 #, c-format msgid "GO TO paragraph '%s' which is defined in another SECTION" msgstr "" -#: cobc/typeck.c:5006 +#: cobc/typeck.c:5172 #, fuzzy, c-format msgid "'%s' is not a procedure name" msgstr "'%s' não é o nome de um procedimento" -#: cobc/typeck.c:5041 +#: cobc/typeck.c:5207 #, fuzzy, c-format #| msgid "'%s' and '%s' must be in the same record" msgid "%s and %s are not in the same SECTION" msgstr "'%s' e '%s' têm que estar definidos no mesmo registo" -#: cobc/typeck.c:5046 +#: cobc/typeck.c:5212 #, fuzzy, c-format #| msgid "'%s' defined here" msgid "%s is defined before %s" msgstr "'%s' definid(o/a) aqui" -#: cobc/typeck.c:5088 +#: cobc/typeck.c:5254 #, fuzzy, c-format msgid "'%s' ANY LENGTH item must be a formal parameter" msgstr "itens ANY LENGTH só podem ser passados por referência (BY REFERENCE)" -#: cobc/typeck.c:5136 +#: cobc/typeck.c:5302 #, c-format msgid "LINKAGE item '%s' is not a PROCEDURE USING parameter" msgstr "item '%s' em LINKAGE não é um parâmetro PROCEDURE USING" -#: cobc/typeck.c:5192 +#: cobc/typeck.c:5358 #, c-format msgid "'%s' is not an alterable paragraph" msgstr "'%s' não é um parágrafo alterável" -#: cobc/typeck.c:5802 cobc/typeck.c:5806 +#: cobc/typeck.c:5852 +#, fuzzy +msgid "invalid expression: unfinished expression" +msgstr "expressão inválida" + +#: cobc/typeck.c:5858 cobc/typeck.c:5865 +#, fuzzy +msgid "invalid expression" +msgstr "expressão inválida" + +#: cobc/typeck.c:5990 cobc/typeck.c:5994 #, fuzzy, c-format msgid "suggest parentheses around %s within %s" msgstr "Parêntesis sugeridos em redor de AND dentro de OR" -#: cobc/typeck.c:5815 +#: cobc/typeck.c:6003 #, fuzzy msgid "invalid conditional expression" msgstr "expressão inválida" -#: cobc/typeck.c:5932 +#: cobc/typeck.c:6120 #, fuzzy, c-format msgid "internal decimal structure size exceeded: %d" msgstr "excedido o tamanho de estrutura decimal interna: %d" -#: cobc/typeck.c:5935 +#: cobc/typeck.c:6123 msgid "Try to minimize the number of parentheses or split into multiple computations." msgstr "Tantar minimizar o número de parêntesis ou dividir em múltiplos cáculos/computações." -#: cobc/typeck.c:5959 +#: cobc/typeck.c:6147 #, c-format msgid "more than %d nested expressions" msgstr "" -#: cobc/typeck.c:6000 +#: cobc/typeck.c:6188 msgid "precision of result may change with arithmetic-osvs" msgstr "" -#: cobc/typeck.c:6080 +#: cobc/typeck.c:6268 #, fuzzy, c-format msgid "unexpected operation: %c (%d)" msgstr "operação inesperada: %c (%d)" -#: cobc/typeck.c:6085 +#: cobc/typeck.c:6273 #, c-format msgid "%s operator may be misplaced" msgstr "" -#: cobc/typeck.c:6160 +#: cobc/typeck.c:6349 #, fuzzy msgid "unexpected constant expansion" msgstr "expansão de constante inesperada" -#: cobc/typeck.c:6882 cobc/typeck.c:11024 +#: cobc/typeck.c:7106 cobc/typeck.c:11656 cobc/typeck.c:11661 #, fuzzy msgid "alphanumeric value is expected" msgstr "é esperado um valor alfanumérico" -#: cobc/typeck.c:6884 cobc/typeck.c:11019 +#: cobc/typeck.c:7109 cobc/typeck.c:11651 #, fuzzy msgid "numeric value is expected" msgstr "é esperado um valor numérico" -#: cobc/typeck.c:6954 +#: cobc/typeck.c:7203 +#, fuzzy +msgid "invalid expression: condition expected" +msgstr "detetada opção inválida" + +#: cobc/typeck.c:7271 +#, fuzzy +msgid "incomplete expression" +msgstr "expressão inválida" + +#: cobc/typeck.c:7312 #, c-format msgid "more than %d nested conditions" msgstr "" -#: cobc/typeck.c:7290 cobc/typeck.c:7371 +#: cobc/typeck.c:7667 cobc/typeck.c:7748 #, fuzzy msgid "no CORRESPONDING items found" msgstr "não foram encontrados itens CORRESPONDING" -#: cobc/typeck.c:7443 +#: cobc/typeck.c:7820 msgid "no items to ACCEPT found" msgstr "" -#: cobc/typeck.c:7493 +#: cobc/typeck.c:7870 #, fuzzy msgid "no items to DISPLAY found" msgstr "tipo inválido para operando de DISPLAY" -#: cobc/typeck.c:7605 +#: cobc/typeck.c:7981 msgid "cannot specify figurative constant ZERO in AT clause" msgstr "não é possível especificar constante figurativa ZERO na cláusula AT" -#: cobc/typeck.c:7609 +#: cobc/typeck.c:7985 #, fuzzy msgid "value in AT clause is not numeric" msgstr "valor na cláusula AT não é numérico" -#: cobc/typeck.c:7615 +#: cobc/typeck.c:7991 #, fuzzy msgid "value in AT clause must have 4 or 6 digits" msgstr "valor na cláusula AT tem de ter 4 ou 6 dígitos" -#: cobc/typeck.c:7737 +#: cobc/typeck.c:8168 #, fuzzy msgid "invalid PROMPT literal" msgstr "literal PROMPT inválido" -#: cobc/typeck.c:7742 +#: cobc/typeck.c:8173 #, fuzzy msgid "invalid PROMPT identifier" msgstr "identificador PROMPT inválido" -#: cobc/typeck.c:8032 +#: cobc/typeck.c:8465 #, fuzzy, c-format msgid "'%s' is not an input device" msgstr "'%s' não é um dispositivo de entrada (input device)" -#: cobc/typeck.c:8059 cobc/typeck.c:9242 +#: cobc/typeck.c:8492 cobc/typeck.c:9708 #, c-format msgid "'%s' is not defined in SPECIAL-NAMES" msgstr "'%s' não está definido em SPECIAL-NAMES" -#: cobc/typeck.c:8064 +#: cobc/typeck.c:8497 #, fuzzy, c-format msgid "invalid input device '%s'" msgstr "dispositivo de entrada '%s' inválido" -#: cobc/typeck.c:8069 cobc/typeck.c:9246 +#: cobc/typeck.c:8502 cobc/typeck.c:9712 #, c-format msgid "unknown device '%s'; it may exist in another dialect" msgstr "dispositivo desconhecido '%s'; pode existir noutro dialeto" -#: cobc/typeck.c:8072 cobc/typeck.c:9249 +#: cobc/typeck.c:8505 cobc/typeck.c:9715 #, fuzzy, c-format msgid "unknown device '%s'; not defined in SPECIAL-NAMES" msgstr "dispositivo desconhecido '%s'; não foi definido em SPECIAL-NAMES" -#: cobc/typeck.c:8088 +#: cobc/typeck.c:8524 #, fuzzy msgid "target of RETURNING is not a data pointer" msgstr "destino de RETURNING não é um ponteiro de dados" -#: cobc/typeck.c:8115 cobc/typeck.c:12634 cobc/typeck.c:12700 -#: cobc/typeck.c:12768 +#: cobc/typeck.c:8551 cobc/typeck.c:13410 cobc/typeck.c:13479 +#: cobc/typeck.c:13547 #, c-format msgid "cannot change address of '%s', which is not BASED or a LINKAGE item" msgstr "" -#: cobc/typeck.c:8121 +#: cobc/typeck.c:8557 #, fuzzy msgid "target of ALLOCATE must have BASED clause" msgstr "destino de ALLOCATE não é um item BASED" -#: cobc/typeck.c:8155 cobc/typeck.c:8571 +#: cobc/typeck.c:8591 cobc/typeck.c:9023 msgid "amount must be specified as a numeric expression" msgstr "" -#: cobc/typeck.c:8161 +#: cobc/typeck.c:8597 msgid "INITIALIZED TO item is not alphanumeric" msgstr "item INITIALIZED TO não é alfanumérico" -#: cobc/typeck.c:8232 +#: cobc/typeck.c:8667 #, fuzzy msgid "only alphanumeric FUNCTION types are allowed here" msgstr "apenas os tipos de função (FUNCTION) alfanuméricos são permitidos aqui" -#: cobc/typeck.c:8240 +#: cobc/typeck.c:8675 #, fuzzy msgid "invalid RETURNING field" msgstr "campo RETURNING inválido" -#: cobc/typeck.c:8259 +#: cobc/typeck.c:8694 msgid "STDCALL not available on this platform" msgstr "STDCALL não está disponível nesta plataforma" -#: cobc/typeck.c:8263 +#: cobc/typeck.c:8698 msgid "STDCALL used on 64-bit Windows platform" msgstr "STDCALL utilizado em plataforma Windows de 64-bits" -#: cobc/typeck.c:8268 +#: cobc/typeck.c:8703 msgid "STATIC CALL convention requires a literal program name" msgstr "convenção STATIC CALL requere um literal no nome do programa" -#: cobc/typeck.c:8273 cobc/typeck.c:11975 cobc/typeck.c:12900 -#: cobc/typeck.c:13271 +#: cobc/typeck.c:8708 cobc/typeck.c:12746 cobc/typeck.c:13681 +#: cobc/typeck.c:14077 msgid "HANDLE must be either a generic or a THREAD HANDLE" msgstr "" -#: cobc/typeck.c:8291 +#: cobc/typeck.c:8726 #, fuzzy msgid "numeric literal is negative" msgstr "literal numérico á negativo" -#: cobc/typeck.c:8370 +#: cobc/typeck.c:8805 #, fuzzy msgid "numeric literal exceeds size limits" msgstr "literal numérico excede os limites de tamanho" -#: cobc/typeck.c:8385 +#: cobc/typeck.c:8820 #, fuzzy, c-format msgid "figurative constant %s invalid here" msgstr "constante figurativa inválida aqui" -#: cobc/typeck.c:8403 +#: cobc/typeck.c:8840 #, c-format msgid "'%s' is not a 01 or 77 level item" msgstr "'%s' não é um item de nível 01 ou 77" -#: cobc/typeck.c:8407 +#: cobc/typeck.c:8856 #, c-format msgid "'%s' ANY LENGTH item not passed BY REFERENCE" msgstr "'%s' item ANY LENGTH não foi passado por referência (BY REFERENCE)" -#: cobc/typeck.c:8457 cobc/typeck.c:8462 +#: cobc/typeck.c:8909 cobc/typeck.c:8914 #, fuzzy, c-format msgid "wrong number of CALL parameters for '%s', %d given, %d expected" msgstr "número incorreto de parâmetros em CALL para '%s'" -#: cobc/typeck.c:8529 cobc/typeck.c:8603 cobc/typeck.c:8607 cobc/typeck.c:8637 -#: cobc/typeck.c:11932 cobc/typeck.c:12092 cobc/typeck.c:12281 -#: cobc/typeck.c:12285 cobc/typeck.c:13206 cobc/typeck.c:13539 -#: cobc/typeck.c:13542 +#: cobc/typeck.c:8981 cobc/typeck.c:9055 cobc/typeck.c:9059 cobc/typeck.c:9095 +#: cobc/typeck.c:12703 cobc/typeck.c:12863 cobc/typeck.c:13052 +#: cobc/typeck.c:13056 cobc/typeck.c:14012 cobc/typeck.c:14345 +#: cobc/typeck.c:14348 #, fuzzy, c-format msgid "%s not allowed on %s files" msgstr "%s não permitida nos ficheiros %s" -#: cobc/typeck.c:8704 +#: cobc/typeck.c:9172 msgid "positions cannot be specified for main windows" msgstr "" -#: cobc/typeck.c:8714 cobc/typeck.c:8718 cobc/typeck.c:8740 +#: cobc/typeck.c:9183 cobc/typeck.c:9187 cobc/typeck.c:9211 msgid "HANDLE must be either a generic or a WINDOW HANDLE or X(10)" msgstr "" -#: cobc/typeck.c:8849 +#: cobc/typeck.c:9324 #, c-format msgid "'%s' is an invalid type for DISPLAY operand" msgstr "'%s' é um tipo inválido para o operando de DISPLAY" -#: cobc/typeck.c:8854 +#: cobc/typeck.c:9329 #, fuzzy msgid "invalid type for DISPLAY operand" msgstr "tipo inválido para operando de DISPLAY" -#: cobc/typeck.c:9202 cobc/typeck.c:9235 +#: cobc/typeck.c:9668 cobc/typeck.c:9701 #, c-format msgid "'%s' is not an output device" msgstr "'%s' não é um dispositivo de salida" -#: cobc/typeck.c:9335 +#: cobc/typeck.c:9800 #, fuzzy msgid "invalid use of 88 level in WHEN expression" msgstr "utilização inválida do nivel 88 na expressão WHEN" -#: cobc/typeck.c:9396 +#: cobc/typeck.c:9861 #, fuzzy msgid "wrong number of WHEN parameters" msgstr "número incorreto de parâmetros em WHEN" -#: cobc/typeck.c:9518 cobc/typeck.c:9530 +#: cobc/typeck.c:9983 cobc/typeck.c:9995 #, fuzzy, c-format msgid "target %d of FREE is not a BASED data item" msgstr "destino %d de FREE não é um item de datos BASED" -#: cobc/typeck.c:9536 +#: cobc/typeck.c:10001 #, fuzzy, c-format msgid "target %d of FREE must be a data pointer" msgstr "destino %d de FREE tem de ser um ponteiro de dados" -#: cobc/typeck.c:9550 +#: cobc/typeck.c:10015 #, fuzzy msgid "GO TO without procedure-name" msgstr "GO TO sem nome-de-procedimento" -#: cobc/typeck.c:9560 +#: cobc/typeck.c:10023 msgid "GO TO with multiple procedure-names" msgstr "GO TO com múltiplos nomes-de-procedimentos" -#: cobc/typeck.c:9582 -#, fuzzy -#| msgid "GO TO with multiple procedure-names" -msgid "GO TO ENTRY with multiple entry-names" -msgstr "GO TO com múltiplos nomes-de-procedimentos" - -#: cobc/typeck.c:9646 +#: cobc/typeck.c:10088 #, fuzzy msgid "invalid INITIALIZE statement" msgstr "instrução INITIALIZE inválida" -#: cobc/typeck.c:9752 cobc/typeck.c:9755 +#: cobc/typeck.c:10193 cobc/typeck.c:10196 #, c-format msgid "%s operands differ in size" msgstr "operandos de %s diferem em tamanho" -#: cobc/typeck.c:9785 +#: cobc/typeck.c:10226 #, fuzzy, c-format msgid "unexpected clause %d" msgstr "cláusula inesperada %d" -#: cobc/typeck.c:9860 cobc/typeck.c:9871 cobc/typeck.c:9882 cobc/typeck.c:9893 +#: cobc/typeck.c:10301 cobc/typeck.c:10312 cobc/typeck.c:10323 +#: cobc/typeck.c:10334 #, fuzzy, c-format msgid "data name expected before %s" msgstr "nome de dados esperado antes de %s" -#: cobc/typeck.c:9903 +#: cobc/typeck.c:10344 #, c-format msgid "ALL, LEADING or TRAILING expected before '%s'" msgstr "esparado ALL, LEADING ou TRAILING antes de '%s'" -#: cobc/typeck.c:9913 +#: cobc/typeck.c:10354 #, fuzzy msgid "operand has wrong size" msgstr "operando tem o tamanho incorreto" -#: cobc/typeck.c:10007 +#: cobc/typeck.c:10448 #, c-format msgid "'%s' defined here as PIC %s" msgstr "'%s' definido aqui como PIC %s" -#: cobc/typeck.c:10011 +#: cobc/typeck.c:10452 #, c-format msgid "'%s' defined here as a group of length %d" msgstr "'%s' definido aqui como um grupo de comprimento %d" -#: cobc/typeck.c:10017 +#: cobc/typeck.c:10458 #, fuzzy, c-format msgid "internal register '%s' defined as USAGE %s" msgstr "registo interno '%s' definido como BINARY-LONG" -#: cobc/typeck.c:10020 +#: cobc/typeck.c:10461 #, c-format msgid "'%s' defined here as USAGE %s" msgstr "'%s' definido aqui como USAGE %s" -#: cobc/typeck.c:10045 cobc/typeck.c:10063 +#: cobc/typeck.c:10486 cobc/typeck.c:10504 #, fuzzy, c-format msgid "value size is %d" msgstr "tamanho do valor excede o tamanho de dados" -#: cobc/typeck.c:10059 +#: cobc/typeck.c:10500 #, c-format msgid "value is %s" msgstr "" -#: cobc/typeck.c:10338 -#, fuzzy -msgid "invalid destination for MOVE" -msgstr "variável destino inválido para MOVE" - -#: cobc/typeck.c:10380 +#: cobc/typeck.c:10824 #, fuzzy msgid "MOVE of figurative constant SPACE to numeric item" msgstr "constante figurativa inválida aqui" -#: cobc/typeck.c:10395 +#: cobc/typeck.c:10839 msgid "MOVE of figurative constant QUOTE to numeric item" msgstr "" -#: cobc/typeck.c:10400 cobc/typeck.c:10411 +#: cobc/typeck.c:10844 cobc/typeck.c:10855 #, fuzzy msgid "MOVE of figurative constant to numeric item" msgstr "constante figurativa inválida aqui" -#: cobc/typeck.c:10469 +#: cobc/typeck.c:10936 msgid "numeric literal in VALUE clause of numeric-edited item" msgstr "" -#: cobc/typeck.c:10494 +#: cobc/typeck.c:10966 #, fuzzy msgid "numeric move to ALPHABETIC" msgstr "transferência (move) numérica para ALPHABETIC" -#: cobc/typeck.c:10506 +#: cobc/typeck.c:10978 #, fuzzy msgid "data item not signed" msgstr "item de dados não tem sinal" -#: cobc/typeck.c:10509 +#: cobc/typeck.c:10981 #, fuzzy msgid "ignoring sign" msgstr "ignorando sinal" -#: cobc/typeck.c:10821 +#: cobc/typeck.c:11381 #, fuzzy msgid "overlapping MOVE may occur and produce unpredictable results" msgstr "sobreposição de MOVE pode ocorrer e produzir resultados imprevisíveis" -#: cobc/typeck.c:10828 +#: cobc/typeck.c:11388 #, fuzzy msgid "overlapping MOVE may produce unpredictable results" msgstr "sobreposição de MOVE pode produzir resultados imprevisíveis" -#: cobc/typeck.c:10961 +#: cobc/typeck.c:11593 #, fuzzy msgid "invalid source for MOVE" msgstr "valor origem inválido para MOVE" -#: cobc/typeck.c:10982 +#: cobc/typeck.c:11614 #, fuzzy msgid "source is non-numeric - substituting zero" msgstr "valor origem não é numérico - substituindo por zero" -#: cobc/typeck.c:10988 cobc/typeck.c:10999 +#: cobc/typeck.c:11620 cobc/typeck.c:11631 #, fuzzy msgid "invalid VALUE clause" msgstr "cláusula VALUE inválida" -#: cobc/typeck.c:10991 cobc/typeck.c:12841 cobc/typeck.c:12846 -#: cobc/typeck.c:12873 cobc/typeck.c:12878 +#: cobc/typeck.c:11623 cobc/typeck.c:13622 cobc/typeck.c:13627 +#: cobc/typeck.c:13654 cobc/typeck.c:13659 #, fuzzy msgid "invalid SET statement" msgstr "instrução SET inválida" -#: cobc/typeck.c:10993 +#: cobc/typeck.c:11625 #, fuzzy msgid "invalid MOVE statement" msgstr "instrução MOVE inválida" -#: cobc/typeck.c:11000 +#: cobc/typeck.c:11632 #, fuzzy msgid "literal exceeds data size" msgstr "literal excede tamanho de datos" -#: cobc/typeck.c:11004 +#: cobc/typeck.c:11636 #, fuzzy msgid "numeric literal exceeds data size" msgstr "literal numérico excede tamanho de dados" -#: cobc/typeck.c:11013 +#: cobc/typeck.c:11645 #, fuzzy msgid "MOVE of non-integer to alphanumeric" msgstr "transferência (MOVE) de valor não-inteiro para alfanumérico" -#: cobc/typeck.c:11029 +#: cobc/typeck.c:11666 cobc/typeck.c:11671 +#, fuzzy +msgid "national value is expected" +msgstr "é esperado um valor numérico" + +#: cobc/typeck.c:11676 #, fuzzy msgid "value does not fit the picture string" msgstr "valor não se ajusta à PICTURE (string)" -#: cobc/typeck.c:11035 +#: cobc/typeck.c:11682 #, fuzzy msgid "value size exceeds data size" msgstr "tamanho do valor excede o tamanho de dados" -#: cobc/typeck.c:11040 +#: cobc/typeck.c:11687 #, fuzzy msgid "sending field larger than receiving field" msgstr "campo de envio é maior que o campo de receção" -#: cobc/typeck.c:11045 +#: cobc/typeck.c:11692 #, fuzzy msgid "some digits may be truncated" msgstr "alguns dígitos podem ser truncados" -#: cobc/typeck.c:11798 cobc/typeck.c:11848 +#: cobc/typeck.c:12566 cobc/typeck.c:12619 #, fuzzy, c-format msgid "invalid MOVE target: %s" msgstr "variável destino MOVE inválido: %s" -#: cobc/typeck.c:12105 +#: cobc/typeck.c:12876 msgid "READ PREVIOUS not allowed for this file type" msgstr "READ PREVIOUS não é permitido para este tipo de ficheiro" -#: cobc/typeck.c:12113 +#: cobc/typeck.c:12884 msgid "KEY ignored with sequential READ" msgstr "chave (KEY) ignorada com leitura (READ) sequencial" -#: cobc/typeck.c:12209 +#: cobc/typeck.c:12980 #, fuzzy msgid "figurative constants not allowed in FROM clause" msgstr "constante figurativa inválida aqui" -#: cobc/typeck.c:12216 -msgid "literal in FROM clause must be alphanumeric, national or boolean" +#: cobc/typeck.c:12987 +msgid "literal in FROM clause must be alphanumeric, utf-8, national or boolean" msgstr "" -#: cobc/typeck.c:12239 cobc/typeck.c:13499 +#: cobc/typeck.c:13010 cobc/typeck.c:14305 #, fuzzy, c-format msgid "%s FILE requires a FROM clause" msgstr "%s requere um nome de dados" -#: cobc/typeck.c:12261 cobc/typeck.c:12345 cobc/typeck.c:13521 +#: cobc/typeck.c:13032 cobc/typeck.c:13116 cobc/typeck.c:14327 #, fuzzy, c-format msgid "%s subject does not refer to a record name" msgstr "o assunto %s não se refere a um nome de registo" -#: cobc/typeck.c:12351 +#: cobc/typeck.c:13122 msgid "RELEASE not allowed on this record item" msgstr "RELEASE não é permitido neste registo" -#: cobc/typeck.c:12433 cobc/typeck.c:12454 cobc/typeck.c:12461 +#: cobc/typeck.c:13183 cobc/typeck.c:13209 cobc/typeck.c:13237 #, fuzzy msgid "invalid SEARCH ALL condition" msgstr "condição SEARCH ALL inválida" -#: cobc/typeck.c:12578 cobc/typeck.c:12585 +#: cobc/typeck.c:13231 +msgid "SEARCH ALL requires comparision of KEY field" +msgstr "" + +#: cobc/typeck.c:13354 cobc/typeck.c:13361 msgid "SET targets must be PROGRAM-POINTER" msgstr "o destino de SET tem de ser um ponteiro para um programa (PROGRAM-POINTER)" -#: cobc/typeck.c:12610 +#: cobc/typeck.c:13386 #, c-format msgid "SET target '%s' is not numeric, an INDEX or a POINTER" msgstr "" -#: cobc/typeck.c:12627 cobc/typeck.c:12696 cobc/typeck.c:12764 +#: cobc/typeck.c:13403 cobc/typeck.c:13475 cobc/typeck.c:13543 #, c-format msgid "cannot change address of '%s', which is not level 1 or 77" msgstr "" -#: cobc/typeck.c:12721 +#: cobc/typeck.c:13500 #, fuzzy, c-format #| msgid "SET targets must be PROGRAM-POINTER" msgid "SET target '%s' is not a POINTER for FCD" msgstr "o destino de SET tem de ser um ponteiro para um programa (PROGRAM-POINTER)" -#: cobc/typeck.c:12789 +#: cobc/typeck.c:13569 #, c-format msgid "SET target '%s' is not a POINTER for FCD-KEYDEF" msgstr "" -#: cobc/typeck.c:12882 +#: cobc/typeck.c:13663 #, fuzzy msgid "field does not have a FALSE clause" msgstr "campo não tem a cláusula FALSE" -#: cobc/typeck.c:12913 +#: cobc/typeck.c:13694 msgid "THREAD-priority must be between 1 and 32767" msgstr "" -#: cobc/typeck.c:12933 +#: cobc/typeck.c:13714 msgid "SET ATTRIBUTE requires a screen item as subject" msgstr "SET ATTRIBUTE requere um item de ecrã (screen) como objetivo" -#: cobc/typeck.c:12939 +#: cobc/typeck.c:13720 msgid "SET ATTRIBUTE subject does not refer to a screen item" msgstr "um sujeito de SET ATTRIBUTE não se refere a um item de ecrã (screen)" -#: cobc/typeck.c:12990 -#, fuzzy -msgid "invalid SORT filename" -msgstr "nome de ficheiro inválido em SORT" - -#: cobc/typeck.c:13051 -#, fuzzy -msgid "invalid SORT USING parameter" -msgstr "parâmetro inválido em SORT USING" - -#: cobc/typeck.c:13080 -#, fuzzy -msgid "invalid SORT GIVING parameter" -msgstr "parâmetro inválido em SORT GIVING" +#: cobc/typeck.c:13835 cobc/typeck.c:13875 +#, fuzzy, c-format +msgid "invalid %s parameter" +msgstr "parâmetro inválido %s" -#: cobc/typeck.c:13134 cobc/typeck.c:13161 cobc/typeck.c:13181 +#: cobc/typeck.c:13940 cobc/typeck.c:13967 cobc/typeck.c:13987 #, fuzzy msgid "invalid key item" msgstr "item chave (key) inválido" -#: cobc/typeck.c:13211 +#: cobc/typeck.c:14017 msgid "LENGTH/SIZE clause only allowed on INDEXED files" msgstr "clásula LENGTH/SIZE só é permitida em ficheiros indexados (INDEXED)" -#: cobc/typeck.c:13216 +#: cobc/typeck.c:14022 msgid "START not allowed with ACCESS MODE RANDOM" msgstr "START não é permitido com ACCESS MODE RANDOM" -#: cobc/typeck.c:13305 -#, c-format -msgid "%s item '%s' must be numeric and an integer" -msgstr "" - -#: cobc/typeck.c:13311 +#: cobc/typeck.c:14111 cobc/typeck.c:14117 #, fuzzy, c-format msgid "%s item '%s' must be an integer" msgstr "'%s' não é um inteiro" -#: cobc/typeck.c:13315 +#: cobc/typeck.c:14121 #, c-format msgid "%s item '%s' may not have PICTURE with P in it" msgstr "" -#: cobc/typeck.c:13331 +#: cobc/typeck.c:14137 #, fuzzy, c-format msgid "'%s' is not an elementary item" msgstr "'%s' não é uma instrução" -#: cobc/typeck.c:13407 +#: cobc/typeck.c:14213 #, fuzzy #| msgid "RETURNING item must have level 01 or 77" msgid "STRING items must be all NATIONAL or none" msgstr "item RETURNING ten de ter o nível 01 ou 77" -#: cobc/typeck.c:13555 +#: cobc/typeck.c:14361 msgid "LOCK clause invalid here" msgstr "cláusula LOCK inválida aqui" -#: cobc/typeck.c:13800 +#: cobc/typeck.c:14606 msgid "data item is not part of a report" msgstr "" -#: cobc/typeck.c:13820 +#: cobc/typeck.c:14626 msgid "improper use of SUPPRESS PRINTING" msgstr "" -#: cobc/typeck.c:13835 +#: cobc/typeck.c:14642 #, fuzzy, c-format msgid "%s must be alphanumeric or national" msgstr "'%s' não é um literal alfanumérico" -#: cobc/typeck.c:13846 +#: cobc/typeck.c:14652 #, c-format msgid "%s may not be a figurative constant" msgstr "" -#: cobc/typeck.c:13885 +#: cobc/typeck.c:14690 #, fuzzy, c-format #| msgid "'%s' and '%s' must be in the same record" msgid "%s must be a child of the input record" msgstr "'%s' e '%s' têm que estar definidos no mesmo registo" -#: cobc/typeck.c:13911 +#: cobc/typeck.c:14715 #, c-format msgid "%s may not be an ignored item in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:13922 +#: cobc/typeck.c:14725 #, fuzzy, c-format #| msgid "must be numeric" msgid "%s must be elementary" msgstr "t(e/ê)m de ser numérico(s)" -#: cobc/typeck.c:13935 +#: cobc/typeck.c:14737 #, fuzzy, c-format #| msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgid "STRING item '%s' must be USAGE DISPLAY or NATIONAL" msgstr "itens elementares com a cláusula SIGN têm de usar USAGE DISPLAY or NATIONAL" -#: cobc/typeck.c:13947 +#: cobc/typeck.c:14749 #, fuzzy, c-format #| msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgid "%s must be USAGE DISPLAY or NATIONAL" msgstr "itens elementares com a cláusula SIGN têm de usar USAGE DISPLAY or NATIONAL" -#: cobc/typeck.c:13961 +#: cobc/typeck.c:14761 #, fuzzy, c-format msgid "%s must be an integer" msgstr "'%s' não é um inteiro" -#: cobc/typeck.c:13977 cobc/typeck.c:13983 +#: cobc/typeck.c:14776 cobc/typeck.c:14782 msgid "JSON/XML GENERATE receiving item" msgstr "" -#: cobc/typeck.c:13980 +#: cobc/typeck.c:14779 msgid "JSON/XML GENERATE receiving item may not have JUSTIFIED clause" msgstr "" -#: cobc/typeck.c:14068 +#: cobc/typeck.c:14867 #, fuzzy #| msgid "'%s' cannot be reference modified" msgid "JSON/XML GENERATE input record may not be reference modified" msgstr "'%s' não pode ser modificado por referência" -#: cobc/typeck.c:14074 +#: cobc/typeck.c:14873 msgid "JSON/XML GENERATE input record may not have RENAMES clause" msgstr "" -#: cobc/typeck.c:14079 +#: cobc/typeck.c:14878 #, c-format msgid "all the children of '%s' are ignored in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14086 +#: cobc/typeck.c:14885 msgid "JSON/XML GENERATE input record has subrecords with non-unique names" msgstr "" -#: cobc/typeck.c:14091 +#: cobc/typeck.c:14890 msgid "floating-point items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14095 +#: cobc/typeck.c:14894 msgid "OCCURS items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14142 +#: cobc/typeck.c:14941 msgid "NAMESPACE must be a valid URI" msgstr "" -#: cobc/typeck.c:14186 +#: cobc/typeck.c:14985 msgid "NAMESPACE-PREFIX must be a valid XML name" msgstr "" -#: cobc/typeck.c:14215 cobc/typeck.c:14223 +#: cobc/typeck.c:15014 cobc/typeck.c:15022 msgid "NAME OF item" msgstr "" -#: cobc/typeck.c:14220 +#: cobc/typeck.c:15019 msgid "NAME OF item must be the input record or a child of it" msgstr "" -#: cobc/typeck.c:14230 +#: cobc/typeck.c:15029 msgid "NAME OF ... OMITTED only valid for source identifier" msgstr "" -#: cobc/typeck.c:14238 +#: cobc/typeck.c:15037 #, c-format msgid "NAME OF literal must be a valid %s identifier" msgstr "" -#: cobc/typeck.c:14265 cobc/typeck.c:14266 cobc/typeck.c:14269 -#: cobc/typeck.c:14273 +#: cobc/typeck.c:15062 cobc/typeck.c:15063 cobc/typeck.c:15066 +#: cobc/typeck.c:15070 msgid "TYPE OF item" msgstr "" -#: cobc/typeck.c:14291 +#: cobc/typeck.c:15088 msgid "SUPPRESS WHEN SPACE item" msgstr "" -#: cobc/typeck.c:14294 +#: cobc/typeck.c:15091 msgid "SUPPRESS WHEN LOW-VALUE item" msgstr "" -#: cobc/typeck.c:14296 +#: cobc/typeck.c:15093 msgid "SUPPRESS WHEN HIGH-VALUE item" msgstr "" -#: cobc/typeck.c:14325 cobc/typeck.c:14333 cobc/typeck.c:14337 +#: cobc/typeck.c:15122 cobc/typeck.c:15130 cobc/typeck.c:15134 msgid "SUPPRESS item" msgstr "" -#: cobc/typeck.c:14329 +#: cobc/typeck.c:15126 #, fuzzy msgid "SUPPRESS item with WHEN clause" msgstr "avisar item EXTERNAL com cláusula VALUE" -#: cobc/typeck.c:14407 +#: cobc/typeck.c:15204 msgid "WITH ATTRIBUTES specified, but no attributes can be generated" msgstr "" @@ -6470,182 +6568,196 @@ msgid " -Wparentheses warn if parentheses are omitted around AND within msgstr "avisar falta de parêntesis ao redor de AND dentro de OR" #: cobc/warning.def:70 -msgid " -Wstrict-typing warn strictly about type mismatch" +msgid " -Wstrict-typing warn strictly about type mismatch, even when same size" msgstr "" #: cobc/warning.def:73 -msgid " -Wimplicit-define warn whenever data items are implicitly defined" +msgid " -Wtyping warn about type mismatch" msgstr "" #: cobc/warning.def:76 +msgid " -Wimplicit-define warn whenever data items are implicitly defined" +msgstr "" + +#: cobc/warning.def:79 #, fuzzy msgid " -Wno-corresponding do not warn about CORRESPONDING with no matching items" msgstr "avisar CORRESPONDING com itens sem correspondência" -#: cobc/warning.def:79 +#: cobc/warning.def:82 #, fuzzy msgid " -Winitial-value warn if initial VALUE clause is ignored" msgstr "cláusula inicial VALUE ignorada para o item EXTERNAL" -#: cobc/warning.def:82 +#: cobc/warning.def:85 #, fuzzy #| msgid "warn missing FUNCTION prototypes/definitions" msgid " -Wprototypes warn about missing FUNCTION prototypes/definitions" msgstr "avisar a falta de protótipos/definições de funções" -#: cobc/warning.def:85 +#: cobc/warning.def:88 msgid " -Warithmetic-osvs warn if arithmetic expression precision has changed" msgstr "" -#: cobc/warning.def:88 +#: cobc/warning.def:91 #, fuzzy msgid " -Wcall-params warn about non 01/77 items for CALL parameters" msgstr "avisar itens que não sejam do nível 01/77 para parâmetros CALL" -#: cobc/warning.def:91 +#: cobc/warning.def:94 msgid " -Wconstant-expression warn about expressions that always resolve to true/false" msgstr "" -#: cobc/warning.def:94 +#: cobc/warning.def:97 msgid " -Wconstant-numlit-expression\twarn about numeric expressions that always resolve to true/false" msgstr "" -#: cobc/warning.def:97 +#: cobc/warning.def:100 msgid " -Wlarger-01-redefines warn about larger redefines allowed by COBOL standards" msgstr "" -#: cobc/warning.def:100 +#: cobc/warning.def:103 #, fuzzy msgid " -Wcolumn-overflow warn about text after program-text area, FIXED format" msgstr "avisar sobre texto após a área de programação (tipicamente, coluna 72), formato fixo (FIXED)" -#: cobc/warning.def:103 +#: cobc/warning.def:106 #, fuzzy msgid " -Wterminator warn about lack of scope terminator END-XXX" msgstr "avisar sobre a falta do terminador de escopo END-XXX (e.g. IF <condition> [THEN] ... END-IF)" -#: cobc/warning.def:106 +#: cobc/warning.def:109 #, fuzzy msgid " -Wlinkage warn about dangling LINKAGE items" msgstr "avisar sobre itens LINKAGE pendentes" -#: cobc/warning.def:109 +#: cobc/warning.def:112 msgid " -Wunreachable warn about likely unreachable statements" msgstr "" -#: cobc/warning.def:112 +#: cobc/warning.def:115 msgid " -Wno-dialect do not warn about dialect specific issues" msgstr "" -#: cobc/warning.def:115 +#: cobc/warning.def:118 msgid " -Wno-goto-section do not warn about GO TO section-name" msgstr "" -#: cobc/warning.def:118 +#: cobc/warning.def:121 msgid " -Wgoto-different-section\twarn about GO TO a praragraph defined in a different section" msgstr "" -#: cobc/warning.def:121 +#: cobc/warning.def:124 msgid " -Wsuspicious-perform-thru\twarn if PERFORM THRU references procedures not in ascending order or multiple sections" msgstr "" -#: cobc/warning.def:124 +#: cobc/warning.def:127 msgid " -Wdangling-text warn about source text after program-area" msgstr "" -#: cobc/warning.def:127 +#: cobc/warning.def:130 msgid " -Wno-missing-newline do not warn about missing newlines" msgstr "" -#: cobc/warning.def:130 +#: cobc/warning.def:133 msgid " -Wno-others do not warn about different issues" msgstr "" -#: cobc/warning.def:133 +#: cobc/warning.def:136 msgid " -Wno-unsupported do not warn if runtime does not support a feature used" msgstr "" -#: libcob/call.c:94 +#: libcob/call.c:98 #, c-format msgid "LoadLibrary/GetProcAddress error %d" msgstr "erro em LoadLibrary/GetProcAddress %d" -#: libcob/call.c:841 +#: libcob/call.c:626 +#, c-format +msgid "preloading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:817 #, fuzzy, c-format #| msgid "PROGRAM name exceeds 31 characters" msgid "%s: PROGRAM name exceeds %d characters" msgstr "nome de programa (PROGRAM) excede 31 carateres" -#: libcob/call.c:842 +#: libcob/call.c:818 #, fuzzy, c-format #| msgid "PROGRAM name exceeds 31 characters" msgid "%s: FUNCTION name exceeds %d characters" msgstr "nome de programa (PROGRAM) excede 31 carateres" -#: libcob/call.c:1067 +#: libcob/call.c:945 libcob/call.c:978 +#, c-format +msgid "loading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:1049 #, fuzzy msgid "indeterminable error in resolve of COBOL CALL" msgstr "Erro indeterminável na resolução da instrução CALL do COBOL" -#: libcob/call.c:1149 +#: libcob/call.c:1145 #, fuzzy, c-format msgid "user-defined FUNCTION '%s' not found" msgstr "não foi encontrada a função-definida-pelo-utilizador (UDF) '%s'" -#: libcob/call.c:1239 libcob/call.c:1325 libcob/call.c:1445 libcob/call.c:1472 +#: libcob/call.c:1247 libcob/call.c:1328 libcob/call.c:1448 libcob/call.c:1475 #, c-format msgid "NULL parameter passed to '%s'" msgstr "parâmetro nulo (NULL parameter) passado para '%s'" -#: libcob/call.c:1329 +#: libcob/call.c:1332 #, fuzzy, c-format msgid "invalid number of arguments passed to '%s'" msgstr "número inválido de argumentos passados para '%s'" -#: libcob/call.c:1449 +#: libcob/call.c:1452 #, fuzzy msgid "multiple call to 'cob_setjmp'" msgstr "chamada (call) múltipla a 'cob_setjmp'" -#: libcob/call.c:1476 +#: libcob/call.c:1479 #, fuzzy msgid "call to 'cob_longjmp' with no prior 'cob_setjmp'" msgstr "chamada (call) a 'cob_longjmp' sem previamente ter chamado 'cob_setjmp'" -#: libcob/call.c:1703 libcob/call.c:1730 libcob/common.c:8144 +#: libcob/call.c:1608 +#, c-format +msgid "preloading of '%s' failed" +msgstr "" + +#: libcob/call.c:1706 libcob/call.c:1733 libcob/common.c:8965 msgid "cob_init() has not been called" msgstr "'cob_init()' não foi chamado" -#: libcob/call.c:1709 +#: libcob/call.c:1712 #, c-format msgid "parameter %d is not within range of %d" msgstr "" -#: libcob/call.c:1715 +#: libcob/call.c:1718 #, fuzzy, c-format msgid "parameter %d is NULL" msgstr "parâmetros passados por valor (BY VALUE)" -#: libcob/call.c:2042 +#: libcob/call.c:2045 msgid "NULL field" msgstr "" -#: libcob/call.c:2050 +#: libcob/call.c:2053 #, fuzzy msgid "field not allocated" msgstr "ficheiro não aberto" -#: libcob/call.c:2116 +#: libcob/call.c:2119 #, c-format msgid "attempt to over-write constant field with '%s'" msgstr "" -#: libcob/call.c:2156 libcob/call.c:2212 -#, c-format -msgid "attempt to over-write constant parameter %d with " -msgstr "" - -#: libcob/call.c:2263 +#: libcob/call.c:2161 libcob/call.c:2219 libcob/call.c:2270 #, c-format msgid "attempt to over-write constant parameter %d with '%s'" msgstr "" @@ -6685,723 +6797,750 @@ msgstr "%s: opção inválida -- %c" msgid "%s: option requires an argument -- '%c'" msgstr "%s: opção requere um argumento -- %c" -#: libcob/common.c:1242 +#: libcob/common.c:1074 +#, c-format +msgid "requested coredump creation failed with status %d" +msgstr "" + +#: libcob/common.c:1303 msgid "fatal arithmetic error" msgstr "" -#: libcob/common.c:1245 +#: libcob/common.c:1306 msgid "interrupt from keyboard" msgstr "" -#: libcob/common.c:1249 +#: libcob/common.c:1310 msgid "hangup" msgstr "" -#: libcob/common.c:1253 +#: libcob/common.c:1314 msgid "quit" msgstr "" -#: libcob/common.c:1257 +#: libcob/common.c:1318 #, fuzzy msgid "termination" msgstr "definição" -#: libcob/common.c:1261 +#: libcob/common.c:1322 msgid "emt termination" msgstr "" -#: libcob/common.c:1265 +#: libcob/common.c:1326 msgid "broken pipe" msgstr "" -#: libcob/common.c:1269 +#: libcob/common.c:1330 #, fuzzy #| msgid "signal %s" msgid "I/O signal" msgstr "sinal %s" -#: libcob/common.c:1273 +#: libcob/common.c:1334 #, fuzzy msgid "attempt to reference invalid memory address" msgstr "tentativa de referenciar memória não alocada" -#: libcob/common.c:1277 +#: libcob/common.c:1338 #, fuzzy msgid "bus error" msgstr "erro: " -#: libcob/common.c:1281 +#: libcob/common.c:1342 msgid "illegal instruction" msgstr "" -#: libcob/common.c:1285 +#: libcob/common.c:1346 #, fuzzy #| msgid "aborting" msgid "abort" msgstr "a abortar" -#: libcob/common.c:1289 +#: libcob/common.c:1350 msgid "process killed" msgstr "" -#: libcob/common.c:1293 +#: libcob/common.c:1354 #, fuzzy #| msgid "caught signal" msgid "alarm signal" msgstr "sinal capturado" -#: libcob/common.c:1297 +#: libcob/common.c:1358 #, fuzzy msgid "stop process" msgstr "preprocessando:" -#: libcob/common.c:1301 libcob/common.c:1305 +#: libcob/common.c:1362 libcob/common.c:1366 msgid "child process stopped" msgstr "" #. TRANSLATORS: This msgid is used for an OS signal like SIGABRT. -#: libcob/common.c:1312 +#: libcob/common.c:1373 #, fuzzy #| msgid "signal %s" msgid "signal" msgstr "sinal %s" #. TRANSLATORS: This msgid is shown for a requested but not complete stack trace. -#: libcob/common.c:1314 +#: libcob/common.c:1375 msgid "(more COBOL runtime elements follow...)" msgstr "" -#: libcob/common.c:1316 libcob/common.c:8101 +#: libcob/common.c:1377 libcob/common.c:8922 #, fuzzy, c-format msgid "abnormal termination - file contents may be incorrect" msgstr "terminação anormal - conteúdo de ficheiro pode estar incorreto" -#: libcob/common.c:3145 libcob/common.c:8581 libcob/common.c:8595 +#: libcob/common.c:3441 libcob/common.c:9398 libcob/common.c:9412 #, fuzzy msgid "version mismatch" msgstr "erro: incompatibilidade de versão" -#: libcob/common.c:3146 libcob/common.c:3148 libcob/common.c:8582 -#: libcob/common.c:8584 +#: libcob/common.c:3442 libcob/common.c:3444 libcob/common.c:9399 +#: libcob/common.c:9401 #, fuzzy, c-format #| msgid "%s has version/patch level %s/%d" msgid "%s has version %s.%d" msgstr "%s tem versão/nível do remendo (patch) %s/%d" -#: libcob/common.c:3158 +#: libcob/common.c:3454 #, fuzzy, c-format #| msgid "CALL to %s requires %d parameters" msgid "CALL to %s requires %d arguments" msgstr "chamada (CALL) a %s requere %d parâmetros" -#: libcob/common.c:3779 +#: libcob/common.c:4141 #, c-format msgid "code execution leaving %s" msgstr "" -#: libcob/common.c:3789 +#: libcob/common.c:4151 #, fuzzy, c-format msgid "BASED/LINKAGE item %s has NULL address" msgstr "item BASED/LINKAGE '%s' tem endereço nulo (NULL address)" -#: libcob/common.c:3802 libcob/common.c:3806 +#: libcob/common.c:4168 +#, c-format +msgid "memory violation detected for '%s' after %s" +msgstr "" + +#: libcob/common.c:4171 +#, c-format +msgid "memory violation detected after %s" +msgstr "" + +#: libcob/common.c:4229 libcob/common.c:4244 libcob/common.c:4283 +#: libcob/common.c:4287 #, c-format msgid "LINKAGE item %s not passed by caller" msgstr "item LINKAGE %s não foi passado pelo programa chamador (caller)" -#: libcob/common.c:3892 +#: libcob/common.c:4253 +#, c-format +msgid "LINKAGE item %s (size %lu) too small in the caller (size %lu)" +msgstr "" + +#: libcob/common.c:4378 #, fuzzy, c-format #| msgid "'%s' not numeric: '%s'" msgid "'%s' (Type: %s) not numeric: '%s'" msgstr "'%s' não é numérico: '%s'" -#: libcob/common.c:3917 +#: libcob/common.c:4403 #, c-format msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgstr "OCCURS DEPENDING ON '%s' fora dos limites: %d" -#: libcob/common.c:3920 libcob/common.c:3958 +#: libcob/common.c:4406 libcob/common.c:4444 #, fuzzy, c-format msgid "maximum subscript for '%s': %d" msgstr "endereço de '%s' fora dos limites: %d" -#: libcob/common.c:3922 +#: libcob/common.c:4408 #, fuzzy, c-format msgid "minimum subscript for '%s': %d" msgstr "endereço de '%s' fora dos limites: %d" -#: libcob/common.c:3955 +#: libcob/common.c:4441 #, c-format msgid "current maximum subscript for '%s': %d" msgstr "" -#: libcob/common.c:3979 +#: libcob/common.c:4465 #, fuzzy, c-format msgid "offset of '%s' out of bounds: %d, maximum: %d" msgstr "deslocamento (offset) de '%s' fora dos limites: %d" -#: libcob/common.c:3994 +#: libcob/common.c:4480 #, fuzzy, c-format msgid "length of '%s' out of bounds: %d, maximum: %d" msgstr "comprimento de '%s' fora dos limites: %d" -#: libcob/common.c:4005 +#: libcob/common.c:4491 #, fuzzy, c-format msgid "length of '%s' out of bounds: %d, starting at: %d, maximum: %d" msgstr "comprimento de '%s' fora dos limites: %d" -#: libcob/common.c:4093 libcob/common.c:4098 +#: libcob/common.c:4579 libcob/common.c:4584 #, c-format msgid "EXTERNAL item '%s' previously allocated with size %d, requested size is %d" msgstr "item EXTERNAL '%s' previamente alocado com tamanho %d, comprimento pedido é %d" -#: libcob/common.c:4593 +#: libcob/common.c:4961 libcob/common.c:5201 #, c-format msgid "COB_CURRENT_DATE '%s' is invalid" msgstr "" -#: libcob/common.c:5641 libcob/common.c:5644 +#: libcob/common.c:6321 libcob/common.c:6324 msgid "Program abandoned at user request" msgstr "" -#: libcob/common.c:5668 +#: libcob/common.c:6348 #, fuzzy, c-format msgid "parameter to SYSTEM call is larger than %d characters" msgstr "parâmetro para chamada SYSTEM é superior a %d carateres" -#: libcob/common.c:6202 +#: libcob/common.c:6998 #, fuzzy, c-format #| msgid "Error '%s' during CBL_GC_FORK" msgid "error '%s' during CBL_GC_FORK" msgstr "Erro '%s' durante CBL_GC_FORK" -#: libcob/common.c:6207 libcob/common.c:6304 +#: libcob/common.c:7003 libcob/common.c:7100 #, fuzzy, c-format msgid "'%s' is not supported on this platform" msgstr "'%s' não é suportado nesta plataforma" -#: libcob/common.c:6233 +#: libcob/common.c:7029 #, c-format msgid "error '%s' for P%d during CBL_GC_WAITPID" msgstr "erro '%s' para P%d durante CBL_GC_WAITPID" -#: libcob/common.c:6424 -msgid "Call to CBL_GC_GETOPT with wrong longoption size." +#: libcob/common.c:7220 +#, fuzzy +#| msgid "Call to CBL_GC_GETOPT with wrong longoption size." +msgid "call to CBL_GC_GETOPT with wrong longoption size" msgstr "Chamada a CBL_GC_GETOPT com o tamanho de opção longa (longoption) incorreto" -#: libcob/common.c:6429 -msgid "Call to CBL_GC_GETOPT with missing longind." +#: libcob/common.c:7225 +#, fuzzy +#| msgid "Call to CBL_GC_GETOPT with missing longind." +msgid "call to CBL_GC_GETOPT with missing longind" msgstr "Chamada a CBL_GC_GETOPT com inexistente 'longind'" -#: libcob/common.c:6856 libcob/common.c:6877 libcob/common.c:6890 -#: libcob/common.c:9107 libcob/common.c:9111 +#: libcob/common.c:7654 libcob/common.c:7675 libcob/common.c:7688 +#: libcob/common.c:9924 libcob/common.c:9928 #, c-format msgid "(default)" msgstr "(padrão)" -#: libcob/common.c:7143 libcob/common.c:7162 +#: libcob/common.c:7973 libcob/common.c:7992 msgid "should be unsigned" msgstr "" -#: libcob/common.c:7151 libcob/common.c:7200 +#: libcob/common.c:7981 libcob/common.c:8030 #, fuzzy #| msgid "must be numeric" msgid "should be numeric" msgstr "t(e/ê)m de ser numérico(s)" -#: libcob/common.c:7209 +#: libcob/common.c:8039 #, c-format msgid "minimum value: %lu" msgstr "valor mínimo: %lu" -#: libcob/common.c:7261 libcob/common.c:7825 libcob/common.c:7839 +#: libcob/common.c:8069 libcob/common.c:8640 libcob/common.c:8654 +#: bin/cobcrun.c:206 #, c-format msgid "should not contain '%c'" msgstr "não deveria conter '%c'" -#: libcob/common.c:7342 libcob/common.c:7390 libcob/common.c:7418 -#: libcob/common.c:7427 libcob/common.c:7435 libcob/common.c:7460 +#: libcob/common.c:8150 libcob/common.c:8169 libcob/common.c:8231 +#: libcob/common.c:8240 libcob/common.c:8248 libcob/common.c:8273 #, c-format msgid "not set" msgstr "" # @@@ CONTEXT ??? -#: libcob/common.c:7410 libcob/common.c:7413 libcob/common.c:7416 +#: libcob/common.c:8223 libcob/common.c:8226 libcob/common.c:8229 #, fuzzy, c-format msgid "set by %s" msgstr "(set by %s)" -#: libcob/common.c:7552 +#: libcob/common.c:8367 #, c-format msgid "WARNING - '%s' without a value - ignored!" msgstr "AVISO - '%s' sem um valor - ignorado!" -#: libcob/common.c:7555 +#: libcob/common.c:8370 #, fuzzy, c-format msgid "'%s' without a value!" msgstr "'%s' sem um valor" -#: libcob/common.c:7582 +#: libcob/common.c:8397 #, c-format msgid "WARNING - '%s %s' without a value - ignored!" msgstr "AVISO - '%s %s' sem um valor - ignorado!" -#: libcob/common.c:8085 +#: libcob/common.c:8906 #, fuzzy msgid "error" msgstr "erro: " -#: libcob/common.c:8127 +#: libcob/common.c:8948 #, fuzzy msgid "attempt to CANCEL active program" msgstr "tentativa de cancelar (CANCEL) o programa ativo" -#: libcob/common.c:8154 +#: libcob/common.c:8975 msgid "CALL of program with CHAINING clause" msgstr "" -#: libcob/common.c:8158 +#: libcob/common.c:8979 #, fuzzy msgid "stack overflow, possible PERFORM depth exceeded" msgstr "o limite da pilha de memória foi ultrapassado, possível profundidade de PERFORM excedida" -#: libcob/common.c:8163 +#: libcob/common.c:8984 #, fuzzy msgid "invalid entry/exit in GLOBAL USE procedure" msgstr "entrada/saída (entry/exit) inválida em procedimento GLOBAL USE" -#: libcob/common.c:8167 +#: libcob/common.c:8988 #, fuzzy msgid "unable to allocate memory" msgstr "incapacidade de alocar memória" -#: libcob/common.c:8172 +#: libcob/common.c:8993 #, fuzzy msgid "invalid entry into module" msgstr "entrada (entry) inválida no módulo" -#: libcob/common.c:8179 +#: libcob/common.c:9000 #, c-format msgid "recursive CALL from '%s' to '%s' which is NOT RECURSIVE" msgstr "" -#: libcob/common.c:8184 +#: libcob/common.c:9005 #, fuzzy, c-format msgid "invalid recursive COBOL CALL to '%s'" msgstr "chamada (CALL) recursiva a '%s' inválida" -#: libcob/common.c:8199 +#: libcob/common.c:9020 #, fuzzy msgid "end of file" msgstr "fim de ficheiro" -#: libcob/common.c:8202 +#: libcob/common.c:9023 #, fuzzy msgid "key out of range" msgstr "chave fora de alcance" -#: libcob/common.c:8205 +#: libcob/common.c:9026 #, fuzzy msgid "key order not ascending" msgstr "a ordem da chave não é ascendente (ascending)" -#: libcob/common.c:8208 +#: libcob/common.c:9029 #, fuzzy msgid "record key already exists" msgstr "a chave do registo já existe" -#: libcob/common.c:8211 +#: libcob/common.c:9032 #, fuzzy msgid "record key does not exist" msgstr "a chave do registo não existe" -#: libcob/common.c:8214 +#: libcob/common.c:9035 #, fuzzy msgid "permanent file error" msgstr "erro de ficheiro permanente" -#: libcob/common.c:8217 +#: libcob/common.c:9038 #, fuzzy msgid "inconsistent file name" msgstr "nome do ficheiro de configuração inválido" -#: libcob/common.c:8220 +#: libcob/common.c:9041 #, fuzzy msgid "file does not exist" msgstr "o ficheiro não existe" -#: libcob/common.c:8223 +#: libcob/common.c:9044 #, fuzzy msgid "permission denied" msgstr "permissão negada" -#: libcob/common.c:8226 +#: libcob/common.c:9047 msgid "mismatch of fixed file attributes" msgstr "" -#: libcob/common.c:8229 +#: libcob/common.c:9050 #, fuzzy msgid "file already open" msgstr "ficheiro já aberto" -#: libcob/common.c:8232 +#: libcob/common.c:9053 #, fuzzy msgid "file not open" msgstr "ficheiro não aberto" -#: libcob/common.c:8235 +#: libcob/common.c:9056 msgid "READ must be executed first" msgstr "READ tem de ser executado primeiro" -#: libcob/common.c:8238 +#: libcob/common.c:9059 #, fuzzy msgid "record overflow" msgstr "transbordo de registro" # @@@ BAD ENGLISH - "uncessful" should be "unsuccessful" -#: libcob/common.c:8241 +#: libcob/common.c:9062 #, fuzzy #| msgid "READ after uncessful READ/START" msgid "READ after unsuccessful READ/START" msgstr "READ após READ/START mal sucedido" -#: libcob/common.c:8244 +#: libcob/common.c:9065 #, fuzzy msgid "READ/START not allowed, file not open for input" msgstr "READ/START não permitido, o ficheiro não está aberto para leitura (input)" -#: libcob/common.c:8247 +#: libcob/common.c:9068 msgid "WRITE not allowed, file not open for output" msgstr "WRITE não permitido, o ficheiro não está aberto para escrita (output)" -#: libcob/common.c:8250 +#: libcob/common.c:9071 #, fuzzy msgid "DELETE/REWRITE not allowed, file not open for I-O" msgstr "DELETE/REWRITE não permitido, o ficheiro não está aberto para E/S (I/O)" -#: libcob/common.c:8253 +#: libcob/common.c:9074 #, fuzzy msgid "record locked by another file connector" msgstr "registo bloqueado por outro utilizador ou processo" -#: libcob/common.c:8256 +#: libcob/common.c:9077 msgid "LINAGE values invalid" msgstr "valores LINAGE inválidos" -#: libcob/common.c:8259 +#: libcob/common.c:9080 #, fuzzy msgid "file sharing conflict" msgstr "conflicto em partilha de ficheiro" -#: libcob/common.c:8262 +#: libcob/common.c:9083 #, fuzzy #| msgid "Operation not allowed on LINE SEQUENTIAL files" msgid "invalid data in LINE SEQUENTIAL file" msgstr "Operação não permitida em ficheiros sequênciais com registos delimitados (e.g. 0x0a', 0x0d ou 0x0d0a)" -#: libcob/common.c:8266 +#: libcob/common.c:9087 #, fuzzy msgid "runtime library is not configured for this operation" msgstr "biblioteca de execução (runtime library) não está configurada para esta operação" -#: libcob/common.c:8271 +#: libcob/common.c:9092 #, fuzzy msgid "unknown file error" msgstr "erro de ficheiro desconhecido" -#: libcob/common.c:8278 +#: libcob/common.c:9099 #, fuzzy, c-format msgid "%s (status = %02d) for file %s" msgstr "%s (status = %02d) ficheiro : '%s'" -#: libcob/common.c:8281 +#: libcob/common.c:9102 #, fuzzy, c-format msgid "%s (status = %02d) for file %s on %s" msgstr "%s (status = %02d) ficheiro : '%s'" -#: libcob/common.c:8288 +#: libcob/common.c:9109 #, fuzzy msgid "attempt to use non-implemented function" msgstr "tentativa de utilização de função não implementada" -#: libcob/common.c:8291 +#: libcob/common.c:9112 #, fuzzy msgid "attempt to use non-implemented XML I/O" msgstr "tentativa de utilização de função não implementada" -#: libcob/common.c:8294 +#: libcob/common.c:9115 #, fuzzy msgid "attempt to use non-implemented JSON I/O" msgstr "tentativa de utilização de função não implementada" -#: libcob/common.c:8341 +#: libcob/common.c:9162 msgid "environment variables" msgstr "variáveis de ambiente" -#: libcob/common.c:8466 libcob/common.c:8539 libcob/common.c:8554 -#: libcob/common.c:8859 libcob/common.c:8893 libcob/common.c:8910 -#: libcob/common.c:8925 +#: libcob/common.c:9283 libcob/common.c:9356 libcob/common.c:9371 +#: libcob/common.c:9676 libcob/common.c:9710 libcob/common.c:9727 +#: libcob/common.c:9742 #, fuzzy, c-format #| msgid "C version %s%s" msgid "%s, version %d.%d.%d" msgstr "Versão de 'C': %s%s" -#: libcob/common.c:8468 libcob/common.c:8541 libcob/common.c:8558 -#: libcob/common.c:8862 libcob/common.c:8913 libcob/common.c:8928 +#: libcob/common.c:9285 libcob/common.c:9358 libcob/common.c:9375 +#: libcob/common.c:9679 libcob/common.c:9730 libcob/common.c:9745 #, c-format msgid "%s, version %d.%d.%d (compiled with %d.%d)" msgstr "" -#: libcob/common.c:8471 +#: libcob/common.c:9288 #, fuzzy, c-format #| msgid "C version %s%s" msgid "%s, version %s" msgstr "Versão de 'C': %s%s" -#: libcob/common.c:8739 +#: libcob/common.c:9556 #, fuzzy, c-format #| msgid "License LGPLv3+: GNU LGPL version 3 or later <http://gnu.org/licenses/lgpl.html>" msgid "License LGPLv3+: GNU LGPL version 3 or later <%s>" msgstr "Licença LGPLv3+: GNU LGPL versão 3 ou posterior <http://gnu.org/licenses/lgpl.html>" -#: libcob/common.c:8803 libcob/common.c:8805 +#: libcob/common.c:9620 libcob/common.c:9622 #, fuzzy msgid "dynamic loading" msgstr "Carregamento dinâmico" -#: libcob/common.c:8938 +#: libcob/common.c:9755 #, fuzzy #| msgid "<support>" msgid "mouse support" msgstr "<support>" -#: libcob/common.c:8955 +#: libcob/common.c:9772 msgid "CALL configuration" msgstr "configuração CALL" -#: libcob/common.c:8956 +#: libcob/common.c:9773 msgid "File I/O configuration" msgstr "Configuração E/S (I/O) de ficheiro (file)" -#: libcob/common.c:8957 +#: libcob/common.c:9774 msgid "Screen I/O configuration" msgstr "configuração E/S (I/O) de ecrã (screen)" -#: libcob/common.c:8958 +#: libcob/common.c:9775 msgid "Miscellaneous" msgstr "Diversos" -#: libcob/common.c:8959 +#: libcob/common.c:9776 msgid "System configuration" msgstr "Configuração de sistema" -#: libcob/common.c:8963 +#: libcob/common.c:9780 #, fuzzy msgid "runtime configuration" msgstr "configuração do programa de execução (runtime)" -#: libcob/common.c:8965 +#: libcob/common.c:9782 msgid "via" msgstr "via" -#: libcob/common.c:9040 libcob/common.c:9068 +#: libcob/common.c:9857 libcob/common.c:9885 msgid "... removed from environment" msgstr "... removido do ambiente" # @@@ CONTEXT ??? -#: libcob/common.c:9094 libcob/common.c:9096 +#: libcob/common.c:9911 libcob/common.c:9913 #, fuzzy, c-format msgid "(set by %s)" msgstr "(set by %s)" # @@@ CONTEXT ??? -#: libcob/common.c:9104 +#: libcob/common.c:9921 #, fuzzy, c-format msgid "(reset)" msgstr "(reset)" -#: libcob/common.c:9334 +#: libcob/common.c:10151 msgid "compiler was not built with --enable-debug-log; COB_DEBUG_LOG ignored" msgstr "" -#: libcob/common.c:9524 libcob/common.c:9550 +#: libcob/common.c:10338 libcob/common.c:10364 #, c-format msgid "%s called with unknown option: %d" msgstr "" #. TRANSLATORS: This msgid is shown for a requested but empty stack trace. -#: libcob/common.c:9597 +#: libcob/common.c:10411 #, fuzzy msgid "No COBOL runtime elements on stack." msgstr "Ambiente do programa de execução (runtime) do GnuCOBOL" -#: libcob/common.c:9915 +#: libcob/common.c:10734 #, c-format msgid "Module dump due to %s" msgstr "" -#: libcob/common.c:9943 +#: libcob/common.c:10762 #, c-format msgid "Dump Program-Id %s from %s compiled %s" msgstr "" -#: libcob/common.c:9969 +#: libcob/common.c:10788 #, fuzzy, c-format #| msgid "Written by %s\n" msgid "dump written to %s" msgstr "Escrito por %s\n" -#: libcob/fileio.c:816 libcob/fileio.c:1628 libcob/fileio.c:1882 -#: libcob/fileio.c:3812 libcob/fileio.c:4396 libcob/fileio.c:9658 -#: libcob/fileio.c:9686 libcob/numeric.c:1583 +#: libcob/fileio.c:784 libcob/fileio.c:1664 libcob/fileio.c:1926 +#: libcob/fileio.c:3938 libcob/fileio.c:4522 libcob/fileio.c:10049 +#: libcob/fileio.c:10077 libcob/numeric.c:1915 #, fuzzy, c-format msgid "invalid internal call of %s" msgstr "situação interna inválida: %u" -#: libcob/fileio.c:3359 +#: libcob/fileio.c:3486 #, c-format msgid "BDB error: %s" msgstr "erro BDB: %s" -#: libcob/fileio.c:3369 +#: libcob/fileio.c:3496 #, c-format msgid "BDB error: %s %s" msgstr "erro BDB: %s %s" -#: libcob/fileio.c:3383 libcob/fileio.c:3403 +#: libcob/fileio.c:3510 libcob/fileio.c:3530 #, fuzzy, c-format msgid "cannot join BDB environment (%s), error: %d %s" msgstr "Não é possível unir ambiente BDB (%s), erro: %d %s" -#: libcob/fileio.c:3458 libcob/fileio.c:3483 libcob/fileio.c:3509 -#: libcob/fileio.c:3528 +#: libcob/fileio.c:3585 libcob/fileio.c:3610 libcob/fileio.c:3636 +#: libcob/fileio.c:3655 #, fuzzy, c-format #| msgid "BDB error: %s %s" msgid "BDB (%s), error: %d %s" msgstr "erro BDB: %s %s" -#: libcob/fileio.c:6071 +#: libcob/fileio.c:6199 #, c-format msgid "ERROR FILE %s has ASSIGN field is NULL" msgstr "" -#: libcob/fileio.c:6862 +#: libcob/fileio.c:7050 #, c-format msgid "call to CBL_OPEN_FILE with wrong access mode: %d" msgstr "chamada (all) a CBL_OPEN_FILE com modo de acesso incorreto: %d" -#: libcob/fileio.c:6946 +#: libcob/fileio.c:7135 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_lock: %d" msgstr "chamada (call) a CBL_CREATE_FILE com 'file_lock' incorreto: %d" -#: libcob/fileio.c:6949 +#: libcob/fileio.c:7138 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_dev: %d" msgstr "chamada (call) a CBL_CREATE_FILE com 'file_dev' incorreto: %d" -#: libcob/fileio.c:7174 libcob/fileio.c:7457 +#: libcob/fileio.c:7362 libcob/fileio.c:7645 #, c-format msgid "'%s' - File detail area is too short" msgstr "'%s' - área de detalhe de ficheiro é demasiado curta" -#: libcob/fileio.c:7686 +#: libcob/fileio.c:7871 msgid "SORT is unable to acquire temporary file" msgstr "SORT é incapaz de obter ficheiro temporário" #. TRANSLATORS: This msgid is concatenated with a filename; -#. setup translation to allow this to be followed on the right side. -#: libcob/fileio.c:8432 +#. setup translation to allow this to be followed on the right side, +#. if necessary use a colon or hyphen +#: libcob/fileio.c:8777 #, fuzzy msgid "implicit CLOSE of " msgstr "CLOSE implícito de %s ('%s')" -#: libcob/fileio.c:9617 libcob/fileio.c:9752 +#: libcob/fileio.c:10008 libcob/fileio.c:10193 #, c-format msgid "ERROR: EXTFH called with FCD version %d" msgstr "" -#: libcob/fileio.c:9886 +#: libcob/fileio.c:10310 #, fuzzy, c-format #| msgid "REPORT clause with wrong file type" msgid "ERROR: EXTFH called with wrong file organization %d" msgstr "cláusula REPORT com o tipo de ficheiro incorreto" -#: libcob/fileio.c:9893 +#: libcob/fileio.c:10317 #, c-format msgid "ERROR: EXTFH called with no %s pointer" msgstr "" -#: libcob/fileio.c:10029 +#: libcob/fileio.c:10461 #, c-format msgid "ERROR: EXTFH called with no %s pointer; Function %d" msgstr "" -#: libcob/fileio.c:10208 +#: libcob/fileio.c:10683 #, c-format msgid "ERROR: EXTFH called with unknown Function %d" msgstr "" -#: libcob/reportio.c:630 +#: libcob/reportio.c:629 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT %d" msgstr "" -#: libcob/reportio.c:637 libcob/reportio.c:652 +#: libcob/reportio.c:636 libcob/reportio.c:651 #, c-format msgid "INITIATE %s NEXT GROUP %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:645 +#: libcob/reportio.c:644 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:1327 +#: libcob/reportio.c:1336 #, c-format msgid "INITIATE %s was already done" msgstr "" -#: libcob/reportio.c:1343 +#: libcob/reportio.c:1352 #, c-format msgid "INITIATE %s PAGE LIMIT problem" msgstr "" -#: libcob/reportio.c:1420 +#: libcob/reportio.c:1429 #, c-format msgid "TERMINATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1565 +#: libcob/reportio.c:1574 #, c-format msgid "GENERATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1917 +#: libcob/reportio.c:1926 #, c-format msgid "could not find line to SUPPRESS in report %s" msgstr "" -#: libcob/screenio.c:568 +#: libcob/screenio.c:1055 #, fuzzy msgid "failed to initialize curses" msgstr "falha a inicializar 'curses'" -#: libcob/screenio.c:4081 +#: libcob/screenio.c:5034 msgid "end of program, please press a key to exit" msgstr "" -#: libcob/termio.c:78 libcob/termio.c:117 +#: libcob/termio.c:76 libcob/termio.c:136 msgid "(Not representable)" msgstr "(Não representável)" -#: libcob/termio.c:354 +#: libcob/termio.c:406 #, fuzzy, c-format #| msgid "cannot specify both %s and %s" msgid "cannot open %s (=%s)" msgstr "não é possível especificar ambos '%s' e '%s'" -#: libcob/termio.c:369 +#: libcob/termio.c:421 msgid "COB_DISPLAY_PUNCH_FILE is invalid, output to SYSPUNCH skipped" msgstr "" @@ -7484,33 +7623,22 @@ msgstr "" " e qualquer nome base para a lista de pré-carregamento de módulos\n" " (COB_LIBRARY_PATH e/ou COB_PRELOAD)" -#: bin/cobcrun.c:146 -#, c-format -msgid "GnuCOBOL home page: <%s>" -msgstr "" - -#: bin/cobcrun.c:148 -#, fuzzy, c-format -#| msgid "General help using GNU software: <http://www.gnu.org/gethelp/>" -msgid "General help using GNU software: <%s>" -msgstr "Ajuda geral sobre utilização dos programas GNU: <http://www.gnu.org/gethelp/>" - -#: bin/cobcrun.c:288 +#: bin/cobcrun.c:286 #, fuzzy msgid "invalid configuration file name" msgstr "nome do ficheiro de configuração inválido" -#: bin/cobcrun.c:355 +#: bin/cobcrun.c:353 #, fuzzy, c-format msgid "invalid module argument '%s'" msgstr "argumento de módulo inválido" -#: bin/cobcrun.c:410 +#: bin/cobcrun.c:408 #, c-format msgid "%s: missing PROGRAM name" msgstr "" -#: bin/cobcrun.c:412 +#: bin/cobcrun.c:410 #, c-format msgid "Try '%s --help' for more information." msgstr "" @@ -7547,18 +7675,21 @@ msgstr "" #~ " -vv exibe a versão do compilador e os comandos\n" #~ " invocados pelo compilador" +#~ msgid "GnuCOBOL home page: <http://www.gnu.org/software/gnucobol/>" +#~ msgstr "Página inicial do GnuCOBOL: <http://www.gnu.org/software/gnucobol/>" + #, fuzzy, c-format #~ msgid "invalid parameter -std=%s" #~ msgstr "parâmetro inválido %s" -#, fuzzy -#~ msgid "invalid option detected" -#~ msgstr "detetada opção inválida" - #, fuzzy, c-format #~ msgid "unknown option ignored:\t%s" #~ msgstr "opção desconhecida ignorada:\t%s" +#, fuzzy +#~ msgid "unexpected error_node parameter" +#~ msgstr "parâmetro 'error_node' inesperado" + #, c-format #~ msgid "Invalid type for '%s'" #~ msgstr "Tipo inválido para '%s'" @@ -7583,6 +7714,10 @@ msgstr "" #~ msgid "only level 88 items may have multiple values" #~ msgstr "apenas os itens de nível 88 podem usar valores múltiplos" +#, fuzzy, c-format +#~ msgid "unexpected USAGE: %d" +#~ msgstr "USAGE inesperado: %d" + #, fuzzy #~ msgid "define PERFORM stack size" #~ msgstr "definir tamanho da pilha para PERFORM" @@ -7654,6 +7789,13 @@ msgstr "" #~ "\t\t\t- SECTION/PARAGRAPH/STATEMENTS executado(s)\n" #~ "\t\t\t- habilitado por -debug" +#~ msgid "" +#~ "'*' or '/' in column 1 treated as comment\n" +#~ "\t\t\t- FIXED format only" +#~ msgstr "" +#~ "'*' ou '/' na columa 1 tratado como comentário\n" +#~ "\t\t\t- apenas para fontes de formato fixo (FIXED)" + #, fuzzy #~ msgid "check recursive program call" #~ msgstr "verifica chamada a programa recursivo" @@ -7715,6 +7857,10 @@ msgstr "" #~ msgid "non-negative integer value expected" #~ msgstr "esperado um valor inteiro não negativo (>=0)" +#, fuzzy +#~ msgid "invalid CLASS value" +#~ msgstr "valor de CLASS inválido" + #, fuzzy #~ msgid "spurious '$' detected - ignored" #~ msgstr "detetados '$' falsos - ignorado" @@ -7731,6 +7877,10 @@ msgstr "" #~ msgid "Extra (obsolete) context sensitive words" #~ msgstr "Palavras suplementares (obsoletas) sensíveis ao contexto" +#, c-format +#~ msgid "FUNCTION %s has invalid/not supported arguments - Tag %d" +#~ msgstr "FUNCTION %s tem argumentos inválidos/não suportados - Identificador (Tag) %d" + #~ msgid "cannot find the UTC offset on this system" #~ msgstr "não é possível encontrar deslocamento (offset) UTC neste sistema" @@ -7738,6 +7888,14 @@ msgstr "" #~ msgid "invalid literal cast" #~ msgstr "conversão do tipo de dados (cast) de um literal inválida" +#, fuzzy, c-format +#~ msgid "'%s' is not a numeric literal" +#~ msgstr "'%s' não é um literal numérico" + +#, fuzzy, c-format +#~ msgid "'%s' is not unsigned" +#~ msgstr "'%s' não é 'sem-sinal' (unsigned)" + #~ msgid "only one set of parentheses is permitted" #~ msgstr "apenas é permitido um conjunto de parêntesis (e.g. '( ... )'" @@ -7764,14 +7922,42 @@ msgstr "" #~ msgid "invalid use of HANDLE item" #~ msgstr "utilização inválida do item de nivel 88" +#, c-format +#~ msgid "'%s' is not a numeric value" +#~ msgstr "'%s' não é um valor numérico" + +#, c-format +#~ msgid "'%s' is not an integer value" +#~ msgstr "'%s' não é um valor inteiro" + #, fuzzy #~ msgid "Variable length item not allowed here" #~ msgstr "item de comprimento variável não é permitido aqui" +#, c-format +#~ msgid "'%s' is not an alphabet name" +#~ msgstr "'%s' não é um nome de alfabeto" + #, fuzzy #~ msgid "the CHARACTERS field of ALLOCATE must be numeric" #~ msgstr "o campo CHARACTERS de ALLOCATE tem de ser numérico" +#, fuzzy +#~ msgid "invalid destination for MOVE" +#~ msgstr "variável destino inválido para MOVE" + +#, fuzzy +#~ msgid "invalid SORT filename" +#~ msgstr "nome de ficheiro inválido em SORT" + +#, fuzzy +#~ msgid "invalid SORT USING parameter" +#~ msgstr "parâmetro inválido em SORT USING" + +#, fuzzy +#~ msgid "invalid SORT GIVING parameter" +#~ msgstr "parâmetro inválido em SORT GIVING" + #, fuzzy #~ msgid "warn incompatible redefinition of data items" #~ msgstr "avisar sobre redefinição incompatível de itens de dados" diff --git a/po/sr.po b/po/sr.po index e380ea419..a7632c657 100644 --- a/po/sr.po +++ b/po/sr.po @@ -1,4 +1,4 @@ -# Serbian translations for GnuCOBOL package +# Serbian translation for gnucobol. # Copyright © 2020 Free Software Foundation, Inc. # This file is distributed under the same license as the gnucobol package. # Мирослав Николић <miroslavnikolic@rocketmail.com>, 2020–2021. @@ -6,7 +6,7 @@ msgid "" msgstr "" "Project-Id-Version: gnucobol-3.1.2\n" "Report-Msgid-Bugs-To: gnucobol-messages@gnu.org\n" -"POT-Creation-Date: 2022-10-23 03:06+0200\n" +"POT-Creation-Date: 2023-07-28 19:20+0200\n" "PO-Revision-Date: 2021-07-24 07:47+0200\n" "Last-Translator: Мирослав Николић <miroslavnikolic@rocketmail.com>\n" "Language-Team: Serbian <(nothing)>\n" @@ -17,106 +17,108 @@ msgstr "" "Plural-Forms: nplurals=3; plural=(n%10==1 && n%100!=11 ? 0 : n%10>=2 && n%10<=4 && (n%100<10 || n%100>=20) ? 1 : 2);\n" "X-Bugs: Report translation errors to the Language-Team address.\n" -#: cobc/cobc.c:98 +#: cobc/cobc.c:116 cobc/codegen.c:2655 cobc/scanner.l:1375 #, c-format msgid "invalid parameter: %s" msgstr "неисправан параметар: %s" -#: cobc/cobc.c:153 cobc/cobc.c:2233 cobc/cobc.c:2236 cobc/parser.y:802 -#: cobc/reserved.c:4022 libcob/common.c:226 libcob/common.c:1308 -#: libcob/common.c:2384 libcob/common.c:2388 libcob/common.c:2426 -#: libcob/common.c:2464 libcob/common.c:2654 libcob/common.c:7351 -#: libcob/common.c:8370 libcob/common.c:9391 libcob/common.c:9470 -#: libcob/common.c:9912 +#: cobc/cobc.c:171 cobc/cobc.c:2392 cobc/cobc.c:2395 cobc/parser.y:895 +#: cobc/reserved.c:4039 libcob/common.c:235 libcob/common.c:1369 +#: libcob/common.c:2698 libcob/common.c:2702 libcob/common.c:2740 +#: libcob/common.c:2778 libcob/common.c:2939 libcob/common.c:8159 +#: libcob/common.c:9191 libcob/common.c:10209 libcob/common.c:10284 +#: libcob/common.c:10731 msgid "unknown" msgstr "непознато" -#: cobc/cobc.c:855 +#: cobc/cobc.c:905 msgid "internal compiler error" msgstr "унутрашња грешка преводиоца" -#: cobc/cobc.c:921 cobc/cobc.c:1008 cobc/cobc.c:1070 cobc/cobc.c:1146 -#: cobc/cobc.c:1186 cobc/cobc.c:1262 +#: cobc/cobc.c:971 cobc/cobc.c:1058 cobc/cobc.c:1120 cobc/cobc.c:1196 +#: cobc/cobc.c:1236 cobc/cobc.c:1312 #, c-format msgid "cannot allocate %d bytes of memory" msgstr "не могу да доделим %d бајта меморије" -#: cobc/cobc.c:934 cobc/cobc.c:950 cobc/cobc.c:970 cobc/cobc.c:1029 -#: cobc/cobc.c:1048 cobc/cobc.c:1166 cobc/cobc.c:1281 cobc/cobc.c:1323 -#: cobc/field.c:2216 libcob/common.c:8191 +#: cobc/cobc.c:984 cobc/cobc.c:1000 cobc/cobc.c:1020 cobc/cobc.c:1079 +#: cobc/cobc.c:1098 cobc/cobc.c:1216 cobc/cobc.c:1331 cobc/cobc.c:1415 +#: cobc/field.c:2346 libcob/common.c:9012 #, c-format msgid "call to %s with NULL pointer" msgstr "позив за „%s“ са НИШТАВНИМ показивачем" -#: cobc/cobc.c:991 +#: cobc/cobc.c:1041 #, c-format msgid "cannot reallocate %d bytes of memory" msgstr "не могу поново да доделим %d бајта меморије" -#: cobc/cobc.c:1087 cobc/cobc.c:1203 +#: cobc/cobc.c:1137 cobc/cobc.c:1253 msgid "attempt to reallocate non-allocated memory" msgstr "покушавам да поново доделим не-додељену меморију" -#: cobc/cobc.c:1120 cobc/cobc.c:1236 +#: cobc/cobc.c:1170 cobc/cobc.c:1286 #, c-format msgid "call to %s with invalid pointer, as it is missing in list" msgstr "позив за „%s“ са неисправним показивачем, јер недостаје на списку" -#: cobc/cobc.c:1448 +#: cobc/cobc.c:1540 #, c-format msgid "assuming literal for unquoted '%s'" msgstr "подразумевам словност за нецитирано „%s“" -#: cobc/cobc.c:1495 +#: cobc/cobc.c:1587 msgid " - length exceeds maximum" msgstr " – дужина превазилази максимум" -#: cobc/cobc.c:1499 +#: cobc/cobc.c:1591 msgid " - name cannot be empty" msgstr " – назив не може бити празан" -#: cobc/cobc.c:1502 -msgid " - name cannot begin with space or underscore" +#: cobc/cobc.c:1594 +#, fuzzy +#| msgid " - name cannot begin with space or underscore" +msgid " - name cannot begin with space or hyphen" msgstr " – назив не може почети празнином или подвлаком" -#: cobc/cobc.c:1505 +#: cobc/cobc.c:1597 msgid " - name cannot begin with 'cob_' or 'COB_'" msgstr " – назив не може почети са „cob_“ или „COB_“" -#: cobc/cobc.c:1508 +#: cobc/cobc.c:1600 msgid " - name duplicates a 'C' keyword" msgstr " – назив удвостручава „C“ кључну реч" -#: cobc/cobc.c:1511 +#: cobc/cobc.c:1603 msgid " - name cannot contain a directory separator" msgstr " – назив не може да садржи раздвојник директоријума" -#: cobc/cobc.c:1520 +#: cobc/cobc.c:1612 #, c-format msgid "invalid file base name '%s'%s" msgstr "неисправан назив датотеке основе „%s“%s" -#: cobc/cobc.c:1524 +#: cobc/cobc.c:1616 #, c-format msgid "invalid ENTRY '%s'%s" msgstr "неисправно „ENTRY“ „%s“%s" -#: cobc/cobc.c:1527 +#: cobc/cobc.c:1619 #, c-format msgid "invalid PROGRAM-ID '%s'%s" msgstr "неисправно „PROGRAM-ID“ „%s“%s" -#: cobc/cobc.c:1659 +#: cobc/cobc.c:1751 #, c-format msgid "file '%s' does not exist" msgstr "датотека „%s“ не постоји" -#: cobc/cobc.c:1685 +#: cobc/cobc.c:1777 #, c-format msgid "duplicate exception '%s'" msgstr "двоструки изузетак „%s“" -#: cobc/cobc.c:1733 +#: cobc/cobc.c:1825 #, c-format msgid "invalid exception-name: %s" msgstr "неисправан назив изузетка: %s" @@ -130,67 +132,71 @@ msgstr "неисправан назив изузетка: %s" # For consistent translation, here is the English text: # msgstr "environment variable \"$name\" not set" # Please translate the English msgstr, not the msgid. -#: cobc/cobc.c:1870 cobc/cobc.c:8780 +#: cobc/cobc.c:1998 cobc/cobc.c:9211 msgid "please check environment variables as noted above" msgstr "проверите променљиве окружења као што је напоменуто изнад" -#: cobc/cobc.c:1882 cobc/error.c:348 cobc/error.c:382 cobc/error.c:408 -#: cobc/error.c:411 cobc/error.c:477 cobc/error.c:631 cobc/error.c:675 -#: cobc/error.c:779 cobc/error.c:782 +#: cobc/cobc.c:2010 cobc/error.c:140 msgid "error: " msgstr "грешка: " -#: cobc/cobc.c:1905 +#: cobc/cobc.c:2033 #, c-format msgid "duplicate DEFINE '%s' - ignored" msgstr "удвостручено „DEFINE“ „%s“ – занемарено" -#: cobc/cobc.c:1958 +#: cobc/cobc.c:2086 #, c-format msgid "environment variable '%s' is '%s'; should not contain '%c'" msgstr "променљива окружења „%s“ је „%s“; не треба да садржи „%c“" -#: cobc/cobc.c:1988 +#: cobc/cobc.c:2116 msgid "parameter buffer size exceeded" msgstr "величина међумеморије параметра је превазиђена" -#: cobc/cobc.c:2028 +#: cobc/cobc.c:2156 #, c-format msgid "warning: could not move temporary file to %s" msgstr "упозорење: не могу да преместим привремену датотеку у „%s“" -#: cobc/cobc.c:2239 +#: cobc/cobc.c:2329 +#, fuzzy, c-format +#| msgid "environment variable '%s' is '%s'; should not contain '%c'" +msgid "environment variable '%s' has invalid content" +msgstr "променљива окружења „%s“ је „%s“; не треба да садржи „%c“" + +#: cobc/cobc.c:2398 #, c-format msgid "aborting compile of %s at line %d (%s: %s)" msgstr "прекидам превођење „%s“ у реду %d (%s: %s)" -#: cobc/cobc.c:2243 +#: cobc/cobc.c:2402 #, fuzzy, c-format #| msgid "aborting compile of %s at line %d (%s: %s)" msgid "aborting codegen for %s, last statement at line %d (%s: %s)" msgstr "прекидам превођење „%s“ у реду %d (%s: %s)" -#: cobc/cobc.c:2246 +#: cobc/cobc.c:2405 #, c-format msgid "aborting codegen for %s (%s: %s)" msgstr "прекидам „codegen“ за „%s“ (%s: %s)" -#: cobc/cobc.c:2251 +#: cobc/cobc.c:2410 msgid "aborting" msgstr "прекидам" -#: cobc/cobc.c:2329 libcob/common.c:2823 libcob/common.c:8149 bin/cobcrun.c:375 +#: cobc/cobc.c:2488 libcob/common.c:3107 libcob/common.c:8970 bin/cobcrun.c:373 #, c-format msgid "Please report this!" msgstr "Пријавите ово, не било вам тешко!" -#: cobc/cobc.c:2346 bin/cobcrun.c:100 +#: cobc/cobc.c:2505 bin/cobcrun.c:100 #, fuzzy, c-format #| msgid "License GPLv3+: GNU GPL version 3 or later <https://gnu.org/licenses/gpl.html>" msgid "License GPLv3+: GNU GPL version 3 or later <%s>" msgstr "Дозвола ОЈЛи3+: Гнуова ОЈЛ издање 3 или касније <https://gnu.org/licenses/gpl.html>" -#: cobc/cobc.c:2348 libcob/common.c:8741 bin/cobcrun.c:102 +#: cobc/cobc.c:2507 libcob/common.c:9558 bin/cobcrun.c:102 msgid "" "This is free software; see the source for copying conditions. There is NO\n" "warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." @@ -198,248 +204,258 @@ msgstr "" "Ово је слободан софтвер; погледајте изворе за услове копирања. Нема БИЛО КАКВЕ\n" "ГАРАНЦИЈЕ; чак ни за КОМЕРЦИЈАЛНУ ВРЕДНОСТ или ИСПУЊАВАЊЕ ОДРЕЂЕНЕ ПОТРЕБЕ." -#: cobc/cobc.c:2350 libcob/common.c:8743 bin/cobcrun.c:104 +#: cobc/cobc.c:2509 libcob/common.c:9560 bin/cobcrun.c:104 #, fuzzy, c-format #| msgid "Written by %s\n" msgid "Written by %s" msgstr "Написао је %s\n" #. TRANSLATORS: This msgid is intended as the "Packaged" msgid, %s expands to date and time -#: cobc/cobc.c:2352 cobc/cobc.c:2365 libcob/common.c:8747 bin/cobcrun.c:106 +#: cobc/cobc.c:2511 cobc/cobc.c:2524 libcob/common.c:9564 bin/cobcrun.c:106 #, c-format msgid "Built %s" msgstr "Изградња %s" #. TRANSLATORS: This msgid is intended as the "Built" msgid, %s expands to date and time -#: cobc/cobc.c:2354 cobc/cobc.c:2367 libcob/common.c:8750 bin/cobcrun.c:108 +#: cobc/cobc.c:2513 cobc/cobc.c:2526 libcob/common.c:9567 bin/cobcrun.c:108 #, c-format msgid "Packaged %s" msgstr "Запаковао је %s" -#: cobc/cobc.c:2356 cobc/cobc.c:2369 cobc/cobc.c:2478 libcob/common.c:8787 +#: cobc/cobc.c:2515 cobc/cobc.c:2528 cobc/cobc.c:2637 libcob/common.c:9604 msgid "C version" msgstr "Ц издање" -#: cobc/cobc.c:2382 +#: cobc/cobc.c:2541 libcob/common.c:1075 msgid "executing:" msgstr "извршавам:" -#: cobc/cobc.c:2384 +#: cobc/cobc.c:2543 msgid "to be executed:" msgstr "биће извршено:" -#: cobc/cobc.c:2422 cobc/cobc.c:2423 libcob/common.c:6834 libcob/common.c:6835 -#: libcob/common.c:6866 libcob/common.c:6867 +#: cobc/cobc.c:2581 cobc/cobc.c:2582 libcob/common.c:7632 libcob/common.c:7633 +#: libcob/common.c:7664 libcob/common.c:7665 msgid "env" msgstr "окр" -#: cobc/cobc.c:2474 libcob/common.c:8783 +#: cobc/cobc.c:2633 libcob/common.c:9600 msgid "build information" msgstr "подаци о изградњи" -#: cobc/cobc.c:2475 libcob/common.c:8784 +#: cobc/cobc.c:2634 libcob/common.c:9601 msgid "build environment" msgstr "окружење изградње" -#: cobc/cobc.c:2484 libcob/common.c:8794 +#: cobc/cobc.c:2643 libcob/common.c:9611 msgid "GnuCOBOL information" msgstr "Подаци о ГнуКоболу" -#: cobc/cobc.c:2492 cobc/cobc.c:2575 cobc/cobc.c:2591 libcob/common.c:8410 -#: libcob/common.c:8777 libcob/common.c:8778 libcob/common.c:8812 -#: libcob/common.c:8878 libcob/common.c:8900 libcob/common.c:8934 +#: cobc/cobc.c:2651 cobc/cobc.c:2739 cobc/cobc.c:2755 libcob/common.c:9233 +#: libcob/common.c:9594 libcob/common.c:9595 libcob/common.c:9629 +#: libcob/common.c:9695 libcob/common.c:9717 libcob/common.c:9751 msgid "disabled" msgstr "искључено" -#: cobc/cobc.c:2523 cobc/cobc.c:2541 libcob/common.c:7397 libcob/common.c:8400 -#: libcob/common.c:8407 libcob/common.c:8816 libcob/common.c:8834 +#: cobc/cobc.c:2687 cobc/cobc.c:2705 libcob/common.c:8179 libcob/common.c:9221 +#: libcob/common.c:9230 libcob/common.c:9633 libcob/common.c:9651 msgid "yes" msgstr "да" -#: cobc/cobc.c:2525 cobc/cobc.c:2543 libcob/common.c:7399 libcob/common.c:8402 -#: libcob/common.c:8818 libcob/common.c:8836 +#: cobc/cobc.c:2689 cobc/cobc.c:2707 libcob/common.c:8181 libcob/common.c:9223 +#: libcob/common.c:9635 libcob/common.c:9653 msgid "no" msgstr "не" -#: cobc/cobc.c:2529 libcob/common.c:8822 +#: cobc/cobc.c:2693 libcob/common.c:9639 msgid "8 bytes" msgstr "8 бајта" -#: cobc/cobc.c:2531 libcob/common.c:8824 +#: cobc/cobc.c:2695 libcob/common.c:9641 msgid "4 bytes" msgstr "4 бајта" -#: cobc/cobc.c:2535 cobc/cobc.c:2537 libcob/common.c:8828 libcob/common.c:8830 +#: cobc/cobc.c:2699 cobc/cobc.c:2701 libcob/common.c:9645 libcob/common.c:9647 msgid "endianness" msgstr "крајњост" -#: cobc/cobc.c:2535 libcob/common.c:8828 +#: cobc/cobc.c:2699 libcob/common.c:9645 msgid "big-endian" msgstr "велика крајњост" -#: cobc/cobc.c:2537 libcob/common.c:8830 +#: cobc/cobc.c:2701 libcob/common.c:9647 msgid "little-endian" msgstr "мала крајњост" -#: cobc/cobc.c:2541 cobc/cobc.c:2543 libcob/common.c:8834 libcob/common.c:8836 +#: cobc/cobc.c:2705 cobc/cobc.c:2707 libcob/common.c:9651 libcob/common.c:9653 msgid "native EBCDIC" msgstr "изворни „EBCDIC“" -#: cobc/cobc.c:2546 libcob/common.c:8937 +#: cobc/cobc.c:2710 libcob/common.c:9754 msgid "extended screen I/O" msgstr "проширени У/И екрана" -#: cobc/cobc.c:2549 libcob/common.c:8840 +#: cobc/cobc.c:2713 libcob/common.c:9657 msgid "variable file format" msgstr "променљиви формат датотеке" -#: cobc/cobc.c:2555 cobc/cobc.c:2557 libcob/common.c:8846 libcob/common.c:8848 +#: cobc/cobc.c:2719 cobc/cobc.c:2721 libcob/common.c:9663 libcob/common.c:9665 msgid "sequential file handler" msgstr "секвенцијални руковалац датотеком" -#: cobc/cobc.c:2557 libcob/common.c:8848 +#: cobc/cobc.c:2721 libcob/common.c:9665 msgid "built-in" msgstr "уграђено" -#: cobc/cobc.c:2561 cobc/cobc.c:2563 cobc/cobc.c:2565 cobc/cobc.c:2567 -#: cobc/cobc.c:2570 cobc/cobc.c:2572 cobc/cobc.c:2575 libcob/common.c:8852 -#: libcob/common.c:8866 libcob/common.c:8868 libcob/common.c:8870 -#: libcob/common.c:8873 libcob/common.c:8875 libcob/common.c:8878 +#: cobc/cobc.c:2725 cobc/cobc.c:2727 cobc/cobc.c:2729 cobc/cobc.c:2731 +#: cobc/cobc.c:2734 cobc/cobc.c:2736 cobc/cobc.c:2739 libcob/common.c:9669 +#: libcob/common.c:9683 libcob/common.c:9685 libcob/common.c:9687 +#: libcob/common.c:9690 libcob/common.c:9692 libcob/common.c:9695 msgid "indexed file handler" msgstr "руковалац индексиране датотеке" -#: cobc/cobc.c:2580 cobc/cobc.c:2582 cobc/cobc.c:2585 libcob/common.c:8884 +#: cobc/cobc.c:2744 cobc/cobc.c:2746 cobc/cobc.c:2749 libcob/common.c:9701 msgid "mathematical library" msgstr "математичка библиотека" -#: cobc/cobc.c:2589 cobc/cobc.c:2591 libcob/common.c:8895 libcob/common.c:8900 +#: cobc/cobc.c:2753 cobc/cobc.c:2755 libcob/common.c:9712 libcob/common.c:9717 msgid "XML library" msgstr "библиотека XML" -#: cobc/cobc.c:2594 libcob/common.c:8917 libcob/common.c:8932 -#: libcob/common.c:8934 +#: cobc/cobc.c:2758 libcob/common.c:9734 libcob/common.c:9749 +#: libcob/common.c:9751 msgid "JSON library" msgstr "библиотека JSON" -#: cobc/cobc.c:2597 libcob/common.c:8810 libcob/common.c:8941 +#: cobc/cobc.c:2761 libcob/common.c:9627 libcob/common.c:9758 msgid "enabled" msgstr "укључено" -#: cobc/cobc.c:2604 +#: cobc/cobc.c:2768 msgid "only one of options 'E', 'S', 'C', 'c' may be specified" msgstr "може бити наведена само једна од опција E, S, C или c" -#: cobc/cobc.c:2610 +#: cobc/cobc.c:2774 msgid "only one of options 'm', 'x', 'b' may be specified" msgstr "може бити наведена само једна од опција m, x или b" -#: cobc/cobc.c:2652 +#: cobc/cobc.c:2816 #, c-format msgid "option requires one of 'ALL', 'FD', 'WS', 'LS', 'RD', 'FD', 'SC', 'LO' - not '%s'" msgstr "опција захтева једну од „ALL“, „FD“, „WS“, „LS“, „RD“, „FD“, „SC“, „LO“ – а не „%s“" -#: cobc/cobc.c:2682 +#: cobc/cobc.c:2846 #, c-format msgid "'%s' is not an intrinsic function" msgstr "„%s“ није суштинска функција" -#: cobc/cobc.c:2726 cobc/cobc.c:8094 cobc/cobc.c:8213 cobc/codegen.c:3783 -#: cobc/codegen.c:3884 cobc/codegen.c:5571 cobc/codegen.c:5700 -#: cobc/codegen.c:13034 cobc/tree.c:1391 cobc/tree.c:4497 cobc/tree.c:5067 -#: cobc/tree.c:5316 cobc/typeck.c:4344 cobc/typeck.c:9044 cobc/typeck.c:9079 -#: cobc/typeck.c:9977 cobc/typeck.c:12619 cobc/typeck.c:12690 -#: cobc/typeck.c:12758 cobc/typeck.c:13043 cobc/typeck.c:13086 -#: libcob/fileio.c:9703 libcob/fileio.c:9714 +#: cobc/cobc.c:2889 cobc/cobc.c:8507 cobc/cobc.c:8626 cobc/codegen.c:3761 +#: cobc/codegen.c:3864 cobc/codegen.c:5671 cobc/codegen.c:5816 +#: cobc/codegen.c:13429 cobc/parser.y:391 cobc/tree.c:1397 cobc/tree.c:4565 +#: cobc/tree.c:5135 cobc/tree.c:5392 cobc/typeck.c:4497 cobc/typeck.c:9504 +#: cobc/typeck.c:9541 cobc/typeck.c:10418 cobc/typeck.c:13395 +#: cobc/typeck.c:13469 cobc/typeck.c:13537 cobc/typeck.c:13825 +#: cobc/typeck.c:13887 libcob/fileio.c:10094 libcob/fileio.c:10105 #, c-format msgid "call to '%s' with invalid parameter '%s'" msgstr "позив ка „%s“ са неисправним параметром „%s“" -#: cobc/cobc.c:3136 +#: cobc/cobc.c:3300 msgid "loading standard configuration file 'default.conf'" msgstr "учитавам стандардну датотеку подешавања „default.conf“" -#: cobc/cobc.c:3217 +#: cobc/cobc.c:3387 msgid "the used C compiler is known to not be able to generate assembler code" msgstr "" -#: cobc/cobc.c:3299 +#: cobc/cobc.c:3469 msgid "invalid output file name" msgstr "неисправан назив излазне датотеке" -#: cobc/cobc.c:3361 +#: cobc/cobc.c:3531 #, c-format msgid "warning: '%s' is not a directory, defaulting to current directory" msgstr "упозорење: „%s“ није директоријум, пребацујем се на текући директоријум" -#: cobc/cobc.c:3388 +#: cobc/cobc.c:3558 #, c-format msgid "warning: %d lines per listing page specified, using %d" msgstr "упозорење: наведено је %d редова по страници списка, користим %d" -#: cobc/cobc.c:3438 +#: cobc/cobc.c:3615 #, c-format msgid "warning: assuming '%s' is a DEFINE - did you intend to use -debug?" msgstr "упозорење: подразумевам да је „%s“ „DEFINE“ – да ли сте хтели да користите „-debug“?" -#: cobc/cobc.c:3699 cobc/cobc.c:3724 cobc/cobc.c:3752 +#: cobc/cobc.c:3661 cobc/cobc.c:3702 cobc/cobc.c:4281 +#, fuzzy, c-format +#| msgid "ignoring unknown directive: '%s'" +msgid "ignoring nonexistent directory \"%s\"" +msgstr "занемарујем непознату смерницу: „%s“" + +#: cobc/cobc.c:3943 cobc/cobc.c:3968 cobc/cobc.c:3996 #, c-format msgid "unknown warning option '%s'" msgstr "непозната опција упозорења: %s" -#: cobc/cobc.c:3813 +#: cobc/cobc.c:4063 #, c-format msgid "%s option requires a listing file" msgstr "%s опција захтева датотеку списка" -#: cobc/cobc.c:3820 +#: cobc/cobc.c:4070 msgid "output to stdout only valid for preprocess" msgstr "излаз на стандардни излаз је важећи само за предпроцес" -#: cobc/cobc.c:3829 +#: cobc/cobc.c:4085 +msgid "-MT must be given to specify target file" +msgstr "" + +#: cobc/cobc.c:4091 msgid "all runtime checks are enabled" msgstr "све провере времена извршења су укључене" -#: cobc/cobc.c:4030 +#: cobc/cobc.c:4316 msgid "only one stdin input allowed" msgstr "само један улаз стандардног улаза је дозвољен" -#: cobc/cobc.c:4040 +#: cobc/cobc.c:4326 #, c-format msgid "invalid file name parameter (length > %d)" msgstr "неисправан параметар назива датотеке (дужина > %d)" -#: cobc/cobc.c:4270 +#: cobc/cobc.c:4559 msgid "return status:" msgstr "излазно стање:" -#: cobc/cobc.c:4306 libcob/common.c:5711 +#: cobc/cobc.c:4595 libcob/common.c:6391 #, c-format msgid "external process \"%s\" ended with signal %s (%d)" msgstr "спољни процес „%s“ је завршен сигналом %s (%d)" -#: cobc/cobc.c:4364 +#: cobc/cobc.c:4654 msgid "nothing for -j to run" msgstr "ништа за „-j“ за извршавање" -#: cobc/cobc.c:4406 cobc/cobc.c:4420 +#: cobc/cobc.c:4697 cobc/cobc.c:4711 #, c-format msgid "%s is resolved by environment as: %s" msgstr "„%s“ је решено окружењем као: %s" -#: cobc/cobc.c:4882 +#: cobc/cobc.c:5175 msgid "preprocessing:" msgstr "предобрађујем:" -#: cobc/cobc.c:4952 +#: cobc/cobc.c:5244 msgid "'cobxref' execution unsuccessful" msgstr "„cobxref“ извршење није успешно" -#: cobc/cobc.c:4955 +#: cobc/cobc.c:5247 #, c-format msgid "check that 'cobxref' is in %s" msgstr "проверите да ли је „cobxref“ у „%s“" -#: cobc/cobc.c:4957 +#: cobc/cobc.c:5249 msgid "no listing produced" msgstr "није произведен списак" @@ -452,15 +468,19 @@ msgstr "није произведен списак" # For consistent translation, here is the English text: # msgstr "field \"$name\" redefined" # Please translate the English msgstr, not the msgid. -#: cobc/cobc.c:5882 cobc/cobc.c:5921 +#: cobc/cobc.c:6234 cobc/cobc.c:6273 msgid "No fields defined." msgstr "Ниједно поље није дефинисано." -#: cobc/cobc.c:5941 +#: cobc/cobc.c:6293 msgid "No labels defined." msgstr "Ниједан натпис није дефинисан." -#: cobc/cobc.c:5963 +#: cobc/cobc.c:6324 cobc/cobc.c:9292 +msgid "command line:" +msgstr "линија наредби:" + +#: cobc/cobc.c:6342 msgid "Error/Warning summary:" msgstr "Сажетак грешке/упозорења:" @@ -477,134 +497,126 @@ msgstr "Сажетак грешке/упозорења:" # "warning: please use the $name option when specifying an attributes file, the " # "unadorned form is now obsolescent" # Please translate the English msgstr, not the msgid. -#: cobc/cobc.c:6006 +#: cobc/cobc.c:6385 msgid "0 warnings in compilation group" msgstr "0 упозорења у групи превођења" -#: cobc/cobc.c:6010 +#: cobc/cobc.c:6389 msgid "1 warning in compilation group" msgstr "1 упозорење у групи превођења" -#: cobc/cobc.c:6014 +#: cobc/cobc.c:6393 #, c-format msgid "%d warnings in compilation group" msgstr "%d упозорења у групи превођења" -#: cobc/cobc.c:6020 +#: cobc/cobc.c:6399 msgid "0 errors in compilation group" msgstr "0 грешака у групи превођења" -#: cobc/cobc.c:6024 +#: cobc/cobc.c:6403 msgid "1 error in compilation group" msgstr "1 грешка у групи превођења" -#: cobc/cobc.c:6028 +#: cobc/cobc.c:6407 #, c-format msgid "%d errors in compilation group" msgstr "%d грешке у групи превођења" -#: cobc/cobc.c:6034 +#: cobc/cobc.c:6413 #, c-format msgid "Too many errors in compilation group: %d maximum errors" msgstr "Превише грешака у групи превођења: највише грешака %d" -#: cobc/cobc.c:6632 +#: cobc/cobc.c:7028 #, fuzzy, c-format #| msgid "%s: %d: Too many continuation lines" msgid "%s:%d: too many continuation lines" msgstr "%s: %d: Превише редова настављања" -#: cobc/cobc.c:7552 +#: cobc/cobc.c:7956 msgid "parsing:" msgstr "обрађујем:" -#: cobc/cobc.c:7612 +#: cobc/cobc.c:8017 msgid "translating:" msgstr "преводим:" -#: cobc/cobc.c:8786 +#: cobc/cobc.c:9217 msgid "no input files" msgstr "нема улазних датотека" -#: cobc/cobc.c:8816 +#: cobc/cobc.c:9248 #, c-format msgid "%s option invalid in this combination" msgstr "неисправних опција у овој комбинацији – %s" -#: cobc/cobc.c:8857 -msgid "command line:" -msgstr "линија наредби:" - -#: cobc/codegen.c:1041 cobc/codegen.c:4463 cobc/codegen.c:11648 -#: cobc/codegen.c:12186 +#: cobc/codegen.c:1040 cobc/codegen.c:4506 cobc/codegen.c:11910 +#: cobc/codegen.c:12467 msgid "unexpected CONSTANT item" msgstr "неочекивана ставка „CONSTANT“" -#: cobc/codegen.c:2981 cobc/codegen.c:3261 cobc/codegen.c:8523 cobc/tree.c:1413 +#: cobc/codegen.c:2921 cobc/codegen.c:3207 cobc/codegen.c:8866 cobc/tree.c:1419 #, c-format msgid "unexpected cast type: %d" msgstr "неочекивана врста одливка: %d" -#: cobc/codegen.c:3713 cobc/codegen.c:4413 +#: cobc/codegen.c:3690 cobc/codegen.c:4455 #, c-format msgid "internal statement stack depth exceeded: %d" msgstr "премашена је унутрашња дубина спремника тврдње: %d" -#: cobc/codegen.c:3785 +#: cobc/codegen.c:3763 #, c-format msgid "%s is not a field" msgstr "„%s“ није поље" -#: cobc/codegen.c:4186 cobc/codegen.c:4257 +#: cobc/codegen.c:4177 cobc/codegen.c:4279 #, c-format msgid "unexpected function: %s" msgstr "неочекивана функција: %s" -#: cobc/codegen.c:5204 +#: cobc/codegen.c:5256 #, c-format msgid "unexpected tree category: %d" msgstr "неочекивана категорија стабла: %d" -#: cobc/codegen.c:5971 +#: cobc/codegen.c:6108 #, c-format msgid "unexpected size: %d" msgstr "неочекивана величина: %d" -#: cobc/codegen.c:7595 +#: cobc/codegen.c:7894 #, c-format msgid "No ENTRY FOR GO TO '%s'" msgstr "Нема „ENTRY FOR GO TO“ „%s“" -#: cobc/codegen.c:7816 cobc/codegen.c:8163 +#: cobc/codegen.c:8283 cobc/codegen.c:8609 #, c-format msgid "unexpected handler type: %d" msgstr "неочекивана врста руковаоца: %d" -#: cobc/codegen.c:8254 -msgid "unexpected error_node parameter" -msgstr "неочекивани параметар „error_node“" - -#: cobc/codegen.c:8544 +#: cobc/codegen.c:8887 #, c-format msgid "unexpected tree type: %d" msgstr "неочекивана врста стабла: %d" -#: cobc/codegen.c:9520 +#: cobc/codegen.c:9776 msgid "Nested OCCURS in report" msgstr "Угнеждено „OCCURS“ у извештају" -#: cobc/codeoptim.c:2777 +#: cobc/codeoptim.c:2856 #, c-format msgid "unexpected optimization value: %d" msgstr "неочекивана вредност оптимизације: %d" -#: cobc/config.c:164 libcob/common.c:7824 libcob/common.c:7838 -#: libcob/common.c:8315 +#: cobc/config.c:164 libcob/common.c:8639 libcob/common.c:8653 +#: libcob/common.c:9136 #, c-format msgid "invalid value '%s' for configuration tag '%s'" msgstr "неисправна вредност „%s“ за ознаку подешавања „%s“" -#: cobc/config.c:167 libcob/common.c:7117 libcob/common.c:7234 +#: cobc/config.c:167 libcob/common.c:7915 libcob/common.c:7939 #, c-format msgid "should be one of the following values: %s" msgstr "треба бити једна од следећих вредности: %s" @@ -613,7 +625,7 @@ msgstr "треба бити једна од следећих вредности: msgid "must be numeric" msgstr "мора бити број" -#: cobc/config.c:171 libcob/common.c:7215 +#: cobc/config.c:171 libcob/common.c:8045 #, c-format msgid "maximum value: %lu" msgstr "највећа вредност: %lu" @@ -628,7 +640,7 @@ msgstr "најмања вриједност: %d" msgid "unsupported value '%s' for configuration tag '%s'" msgstr "неподржана вредност „%s“ за ознаку подешавања „%s“" -#: cobc/config.c:318 cobc/pplex.l:1185 libcob/common.c:7739 +#: cobc/config.c:319 cobc/pplex.l:1264 libcob/common.c:8554 msgid "recursive inclusion" msgstr "дубинско укључивање" @@ -646,41 +658,41 @@ msgstr "дубинско укључивање" # "for examples of how to configure your build tool.\tYou may want to browse " # "some other files in the same directory for more hints." # Please translate the English msgstr, not the msgid. -#: cobc/config.c:393 libcob/common.c:7791 +#: cobc/config.c:394 libcob/common.c:8606 msgid "configuration file was included here" msgstr "датотека подешавања је укључена овде" -#: cobc/config.c:422 +#: cobc/config.c:423 #, c-format msgid "The previous loaded configuration '%s' will be discarded." msgstr "Претходно учитано подешавање „%s“ биће одбачено." -#: cobc/config.c:458 +#: cobc/config.c:459 msgid "missing definitions:" msgstr "недостају дефиниције:" -#: cobc/config.c:460 +#: cobc/config.c:461 #, c-format msgid "\tno definition of '%s'" msgstr "\tнема дефиниције за „%s“" -#: cobc/config.c:523 +#: cobc/config.c:524 #, c-format msgid "invalid configuration tag '%s'" msgstr "неисправна ознака подешавања „%s“" -#: cobc/config.c:536 libcob/common.c:7545 libcob/common.c:7629 -#: libcob/common.c:7657 +#: cobc/config.c:537 libcob/common.c:8360 libcob/common.c:8444 +#: libcob/common.c:8472 #, c-format msgid "unknown configuration tag '%s'" msgstr "непозната ознака подешавања „%s“" -#: cobc/config.c:560 +#: cobc/config.c:561 #, c-format msgid "invalid configuration tag '%s' in word-list" msgstr "неисправна ознака подешавања „%s“ у списку речи" -#: cobc/config.c:622 +#: cobc/config.c:623 #, c-format msgid "Could not access word list for '%s'" msgstr "Не могу да приступим списку речи за „%s“" @@ -722,11 +734,11 @@ msgstr "највећа величина словности броја" #: cobc/config.def:73 msgid "" "default initialization for fields without VALUE, may be one of\n" -" * character in quotes\n" -" * decimal 0..255 representing a character\n" -" * \"init\" to initialize to PICTURE/USAGE\n" -" * \"none\" to do no explicit initialization\n" -" * default: \"init\"" +" * character in quotes\n" +" * decimal 0..255 representing a character\n" +" * \"init\" to initialize to PICTURE/USAGE\n" +" * \"none\" to do no explicit initialization\n" +" * default: \"init\"" msgstr "" #: cobc/config.def:83 @@ -753,23 +765,29 @@ msgstr "која правила преводиоца ће применити н msgid "whether DECIMAL-POINT IS COMMA has effect in XML/JSON GENERATE, may be one of: none, xml, json, all" msgstr "да ли „DECIMAL-POINT IS COMMA“ има дејства у „XML/JSON GENERATE“, може бити једно од: none, xml, json, all" -#: cobc/config.def:103 +#: cobc/config.def:101 +msgid "checking for subscript (only done with EC-BOUND-SUBSCRIPT active), may be one of: full, max, record" +msgstr "" + +#: cobc/config.def:106 msgid "resolve file names at run time using environment variables" msgstr "решава називе датотека у време извршавања користећи променљиве окружења" -#: cobc/config.def:106 +#: cobc/config.def:109 msgid "alternate formatting of numeric fields" msgstr "измењује форматирање бројевних поља" -#: cobc/config.def:109 +#: cobc/config.def:112 msgid "numeric truncation according to ANSI" msgstr "бројевно скраћивање у складу са АНСИ-јем" -#: cobc/config.def:112 -msgid "allow complex OCCURS DEPENDING ON" +#: cobc/config.def:115 +#, fuzzy +#| msgid "allow complex OCCURS DEPENDING ON" +msgid "allow non-standard OCCURS DEPENDING ON syntax" msgstr "дозвољава сложено „OCCURS DEPENDING ON“" -#: cobc/config.def:115 +#: cobc/config.def:118 #, fuzzy #| msgid "" #| " -fodoslide adjust items following OCCURS DEPENDING\n" @@ -779,1059 +797,1070 @@ msgstr "" " -fodoslide поправља ставке које прате OCCURS DEPENDING\n" " * подразумева „-fcomplex-odo“" -#: cobc/config.def:118 +#: cobc/config.def:121 +#, fuzzy +#| msgid "invalid VALUE clause" +msgid "applies JUSTIFY with VALUE clause" +msgstr "неисправна VALUE клаузула" + +#: cobc/config.def:124 msgid "allow REDEFINES to other than last equal level number" msgstr "дозвољава „REDEFINES“ и на друге осим на последњи исти број нивоа" -#: cobc/config.def:121 +#: cobc/config.def:127 msgid "allow certain syntax variations (e.g. REDEFINES position)" msgstr "дозвољава одређене варијације синтаксе (нпр. положај „REDEFINES“)" -#: cobc/config.def:124 +#: cobc/config.def:130 msgid "allow zero length reference-modification (only changed with EC-BOUND-REF-MOD active)" msgstr "допушта измене упуте нулте дужине (измењено само са активним „EC-BOUND-REF-MOD“)" -#: cobc/config.def:127 +#: cobc/config.def:133 msgid "allow non-matching level numbers" msgstr "дозвољава неподударајуће бројеве нивоа" -#: cobc/config.def:130 +#: cobc/config.def:136 msgid "require ASSIGN USING items to be in WORKING-STORAGE" msgstr "захтева да ставке „ASSIGN USING“ буду у „WORKING-STORAGE“" -#: cobc/config.def:133 +#: cobc/config.def:139 msgid "LOCAL-STORAGE SECTION implies RECURSIVE attribute" msgstr "„LOCAL-STORAGE SECTION“ подразумева атрибут „RECURSIVE“" -#: cobc/config.def:136 +#: cobc/config.def:142 msgid "LINKAGE SECTION items remain allocated between invocations" msgstr "ставке „LINKAGE SECTION“ остају додељене између призивања" -#: cobc/config.def:139 +#: cobc/config.def:145 msgid "MOVE operates as on IBM (left to right, byte by byte)" msgstr "„MOVE“ ради као на IBM-у (с лева на десно, бит по бит)" -#: cobc/config.def:142 +#: cobc/config.def:148 msgid "exit point of any currently executing perform is recognized if reached" msgstr "излазна тачка било које тренутно извршене изведбе је препозната ако се достигне" -#: cobc/config.def:145 +#: cobc/config.def:151 msgid "limit precision in intermediate results to precision of final result (less accurate)" msgstr "тачност ограничења у посредничким резултатима за тачност крајњег резултата (мање тачности)" -#: cobc/config.def:148 +#: cobc/config.def:154 msgid "evaluate constant expressions at compile time" msgstr "процењује изразе константе у време превођења" -#: cobc/config.def:151 +#: cobc/config.def:157 msgid "allow hexadecimal value 'F' for NUMERIC test of signed PACKED DECIMAL field" msgstr "дозвољава хексадецималну вредност „F“ за „NUMERIC“ тест означеног „PACKED DECIMAL“ поља" -#: cobc/config.def:154 +#: cobc/config.def:160 msgid "program names don't lead to a reserved identifier" msgstr "називи програма не воде до резервисаног одредника" -#: cobc/config.def:157 +#: cobc/config.def:163 msgid "set WITH UPDATE clause as default for ACCEPT dest-item, instead of WITH NO UPDATE" msgstr "поставља „WITH UPDATE“ клаузулу као основно за одредиште ставке „ACCEPT“, уместо „WITH NO UPDATE“" -#: cobc/config.def:160 +#: cobc/config.def:166 msgid "set WITH AUTO clause as default for ACCEPT dest-item, instead of WITH TAB" msgstr "поставља „WITH AUTO“ клаузулу као основну за одредиште ставке „ACCEPT“, уместо „WITH TAB“" -#: cobc/config.def:163 +#: cobc/config.def:169 msgid "assume CONSOLE IS CRT if not set otherwise" msgstr "подразумева „CONSOLE IS CRT“ ако није постављено другачије" -#: cobc/config.def:166 +#: cobc/config.def:172 msgid "NO-ECHO hides input with asterisks like SECURE" msgstr "„NO-ECHO“ скрива улаз са звездицама као „SECURE“" -#: cobc/config.def:169 +#: cobc/config.def:175 msgid "assume a field DISPLAY starts at LINE 0 COL 0 (i.e. at the cursor), not LINE 1 COL 1" msgstr "подразумева да поље „DISPLAY“ почиње у РЕДУ 0 СТУБАЦ 0 (нпр. на курзору), а не РЕД 1 СТУБАЦ 1" -#: cobc/config.def:172 +#: cobc/config.def:178 msgid "special behaviour of DISPLAY SPACE/ALL X'01'/ALL X'02'/ALL X'07'" msgstr "посебно понашање за DISPLAY SPACE/ALL X'01'/СВИ X'02'/СВИ X'07'" -#: cobc/config.def:175 +#: cobc/config.def:181 msgid "COMP-1 is a 16-bit signed integer" msgstr "„COMP-1“ је 16-битни додељени цео број" -#: cobc/config.def:178 +#: cobc/config.def:184 msgid "POINTER is a 64-bit unsigned integer" msgstr "„POINTER“ је 64-битни недодељени цео број" -#: cobc/config.def:181 +#: cobc/config.def:187 msgid "imply zero in move of non-numeric literal to numeric items" msgstr "примењује нулу у премештању не-бројевне словности у бројне ставке" -#: cobc/config.def:184 +#: cobc/config.def:190 msgid "implicitly define a variable if an ASSIGN DYNAMIC does not match any data item" msgstr "изричито дефинише променљиву ако „ASSIGN DYNAMIC“ не поклапа ниједну ставку података" -#: cobc/config.def:187 +#: cobc/config.def:193 #, fuzzy #| msgid "specifying call-convention by mnemonic" msgid "specifying device by mnemonic" msgstr "наводи договоре позива тастером пречице" -#: cobc/config.def:193 +#: cobc/config.def:199 msgid "" "check contents of Area A (when reference format supports Area A enforcement),\n" -" enabled checks include:\n" -" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" -" and toplevel numbers (01 and 77) must start in Area A;\n" -" * statements must not start in Area A; and\n" -" * separator periods must not be within Area A." +" enabled checks include:\n" +" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" +" and toplevel numbers (01 and 77) must start in Area A;\n" +" * statements must not start in Area A; and\n" +" * separator periods must not be within Area A" msgstr "" -#: cobc/config.def:203 +#: cobc/config.def:209 msgid "comment paragraphs in IDENTIFICATION DIVISION (AUTHOR, DATE-WRITTEN, ...)" msgstr "напомене пасуса у „IDENTIFICATION DIVISION“ (АУТОР, ДАТУМ ПИСАЊА, ...)" -#: cobc/config.def:207 -msgid "CONTROL DIVISION" +#: cobc/config.def:217 +msgid "" +"apply partial replacing with literal source operand even when it replaces with spaces only;\n" +" * \"skip\" prevents such replacements" msgstr "" -#: cobc/config.def:211 cobc/ppparse.y:101 cobc/ppparse.y:104 -#, fuzzy -#| msgid "zero-length literal" -msgid "partial replacing with literal" -msgstr "словност нулте дужине" - -#: cobc/config.def:214 +#: cobc/config.def:221 msgid "MEMORY-SIZE clause" msgstr "клаузула ВЕЛИЧИНА МЕМОРИЈЕ" -#: cobc/config.def:217 +#: cobc/config.def:224 msgid "MULTIPLE-FILE-TAPE clause" msgstr "клаузула ВИШЕСТРУКА-ДАТОТЕКА-ТРАКА" -#: cobc/config.def:220 +#: cobc/config.def:227 msgid "LABEL-RECORDS clause" msgstr "клаузула ЗАПИСИ НАТПИСА" -#: cobc/config.def:223 +#: cobc/config.def:230 msgid "VALUE-OF clause" msgstr "клаузула ВРЕДНОСТ" -#: cobc/config.def:226 +#: cobc/config.def:233 msgid "DATA-RECORDS clause" msgstr "клаузула ЗАПИСИ ДАТУМА" -#: cobc/config.def:229 +#: cobc/config.def:236 msgid "OCCURS clause on top-level" msgstr "клаузула ДОГАЂАЊА на највишем нивоу" -#: cobc/config.def:232 cobc/parser.y:7285 +#: cobc/config.def:239 cobc/parser.y:7566 msgid "SAME AS clause" msgstr "клаузула ИСТО КАО" -#: cobc/config.def:235 cobc/parser.y:7621 +#: cobc/config.def:242 cobc/parser.y:7904 msgid "TYPE TO clause" msgstr "клаузула УКУЦАЈ У" -#: cobc/config.def:238 cobc/parser.y:7644 +#: cobc/config.def:245 cobc/parser.y:7927 msgid "USAGE type-name" msgstr "назив-врста КОРИШЋЕЊА" -#: cobc/config.def:241 cobc/parser.y:8190 +#: cobc/config.def:248 cobc/parser.y:8563 msgid "SYNCHRONIZED clause" msgstr "клаузула СИНХРОНИЗОВАНО" -#: cobc/config.def:244 cobc/parser.y:8193 +#: cobc/config.def:251 cobc/parser.y:8566 #, fuzzy #| msgid "SYNCHRONIZED clause" msgid "LEFT/RIGHT phrases in SYNCHRONIZED clause" msgstr "клаузула СИНХРОНИЗОВАНО" -#: cobc/config.def:247 +#: cobc/config.def:254 msgid "SPECIAL-NAMES clause" msgstr "клаузула СПЕЦИЈАЛНИ НАЗИВИ" -#: cobc/config.def:250 -msgid "GOTO statement without name" +#: cobc/config.def:257 +#, fuzzy +#| msgid "GOTO statement without name" +msgid "GO TO statement without name" msgstr "тврдња „GOTO“ без назива" -#: cobc/config.def:253 +#: cobc/config.def:260 msgid "STOP-literal statement" msgstr "тврдња STOP-словности" -#: cobc/config.def:256 +#: cobc/config.def:263 msgid "STOP-identifier statement" msgstr "тврдња STOP-одредника" -#: cobc/config.def:259 +#: cobc/config.def:266 #, fuzzy #| msgid "ALTER statement" msgid "STOP ERROR statement" msgstr "тврдња ALTER" -#: cobc/config.def:262 +#: cobc/config.def:269 msgid "DEBUGGING MODE and debugging indicator" msgstr "РЕЖИМ ПРОЧИШЋАВАЊА и показивач прочишћавања" -#: cobc/config.def:268 +#: cobc/config.def:275 msgid "PADDING CHARACTER clause" msgstr "ЗНАК ПОПУЊАВАЊА клаузула" -#: cobc/config.def:271 +#: cobc/config.def:278 msgid "NEXT SENTENCE phrase" msgstr "израз СЛЕДЕЋА РЕЧЕНИЦА" -#: cobc/config.def:274 +#: cobc/config.def:281 msgid "listing-directive statements EJECT, SKIP1, SKIP2, SKIP3" msgstr "тврдње директиве списка „EJECT“, „SKIP1“, „SKIP2“, „SKIP3“" -#: cobc/config.def:277 +#: cobc/config.def:284 msgid "listing-directive statement TITLE" msgstr "тврдња директиве списка „TITLE“" -#: cobc/config.def:280 +#: cobc/config.def:287 msgid "ENTRY statement" msgstr "тврдња „ENTRY“" -#: cobc/config.def:283 +#: cobc/config.def:290 msgid "move noninteger to alphanumeric" msgstr "премешта не-цео број у алфанумерички" -#: cobc/config.def:286 +#: cobc/config.def:293 msgid "move figurative constants to numeric" msgstr "премешта фигуративне константе у бројевне" -#: cobc/config.def:289 +#: cobc/config.def:296 msgid "move figurative constant SPACE to numeric" msgstr "премешта фигуративну константу „SPACE“ у бројевну" -#: cobc/config.def:292 +#: cobc/config.def:299 msgid "move figurative constant QUOTE to numeric" msgstr "премешта фигуративну константу „QUOTE“ у бројевну" -#: cobc/config.def:295 +#: cobc/config.def:302 msgid "OCCURS DEPENDING ON without to" msgstr "OCCURS DEPENDING ON без „to“" -#: cobc/config.def:298 cobc/parser.y:11102 +#: cobc/config.def:305 cobc/parser.y:11443 msgid "section segments" msgstr "подеоци одељка" -#: cobc/config.def:301 +#: cobc/config.def:308 msgid "ALTER statement" msgstr "тврдња ALTER" -#: cobc/config.def:304 +#: cobc/config.def:311 msgid "OVERFLOW clause for CALL" msgstr "OVERFLOW клаузула за CALL" -#: cobc/config.def:307 +#: cobc/config.def:314 msgid "boolean literals (B'1010')" msgstr "логичка словност (B„1010“)" -#: cobc/config.def:310 +#: cobc/config.def:317 msgid "hexadecimal-boolean literals (BX'A')" msgstr "хексадецимална-логичка словност (BX„A“)" -#: cobc/config.def:313 +#: cobc/config.def:320 msgid "national literals (N'UTF-16 string')" msgstr "национална словност (N„UTF-16 ниска“)" -#: cobc/config.def:316 +#: cobc/config.def:323 msgid "hexadecimal-national literals (NX'265E')" msgstr "хексадецимална-национална словност (NX„265E“)" -#: cobc/config.def:319 +#: cobc/config.def:326 msgid "non-standard national literals (NC'UTF-16 string')" msgstr "нестандардна национална словност (NC„UTF-16 ниска“)" -#: cobc/config.def:322 +#: cobc/config.def:329 msgid "HP COBOL octal literals (%377)" msgstr "HP COBOL октална словност (%377)" -#: cobc/config.def:325 +#: cobc/config.def:332 msgid "ACUCOBOL-GT literals (#B #O #H #X)" msgstr "ACUCOBOL-GT словност (#B #O #H #X)" -#: cobc/config.def:328 cobc/pplex.l:2199 +#: cobc/config.def:335 +msgid "EBCDIC symbolic characters in literals (\" \"135,151,151\"bar\"195, 194\"Z\" for \" foobarBAZ\")" +msgstr "" + +#: cobc/config.def:338 cobc/pplex.l:2428 msgid "continuation of COBOL words" msgstr "настављивост COBOL речи" -#: cobc/config.def:331 +#: cobc/config.def:341 msgid "NOT ON EXCEPTION before ON EXCEPTION" msgstr "NOT ON EXCEPTION пре ON EXCEPTION" -#: cobc/config.def:334 +#: cobc/config.def:344 msgid "extensions to ACCEPT and DISPLAY" msgstr "проширења за ACCEPT и DISPLAY" -#: cobc/config.def:337 cobc/field.c:3357 +#: cobc/config.def:347 cobc/field.c:3645 msgid "RENAMES of 01-, 66- and 77-level items" msgstr "RENAMES ставки 01-, 66- и 77-нивоа" -#: cobc/config.def:341 +#: cobc/config.def:351 msgid "allow larger REDEFINES items" msgstr "дозвољава веће ставке „REDEFINES“" -#: cobc/config.def:344 +#: cobc/config.def:354 msgid "constants defined in SPECIAL-NAMES" msgstr "константе дефинисане у SPECIAL-NAMES" -#: cobc/config.def:347 +#: cobc/config.def:357 msgid "constant with level 78 item (note: has left to right precedence in expressions)" msgstr "константа са ставком 78 нивоа (напомена: има предност с лева на десно у изразима)" -#: cobc/config.def:350 +#: cobc/config.def:360 msgid "constant with level 01 CONSTANT AS/FROM item" msgstr "константа са ставком нивоа 01 CONSTANT AS/FROM" -#: cobc/config.def:353 +#: cobc/config.def:363 msgid "PERFORM VARYING without BY phrase (implies BY 1)" msgstr "PERFORM VARYING без BY речи (подразумева BY 1)" -#: cobc/config.def:356 +#: cobc/config.def:366 msgid "references to sections not in DECLARATIVES from within DECLARATIVES" msgstr "упуте ка одељцима нису у DECLARATIVES из DECLARATIVES" -#: cobc/config.def:359 cobc/parser.y:12225 cobc/parser.y:12521 +#: cobc/config.def:369 cobc/parser.y:12614 cobc/parser.y:12913 msgid "CALL/CANCEL with program-prototype-name" msgstr "CALL/CANCEL са називом-прототипа-програма" -#: cobc/config.def:362 +#: cobc/config.def:372 msgid "specifying call-convention by mnemonic" msgstr "наводи договоре позива тастером пречице" -#: cobc/config.def:365 +#: cobc/config.def:375 msgid "specifying call-convention by WITH ... LINKAGE" msgstr "наводи договор позива са WITH ... LINKAGE" -#: cobc/config.def:368 +#: cobc/config.def:378 +msgid "support for PROCEDURE DIVISION USING OPTIONAL" +msgstr "" + +#: cobc/config.def:381 msgid "numeric literals in VALUE clause of numeric-edited items" msgstr "бројевна словност у VALUE клаузули бројевно уређеним ставкама" -#: cobc/config.def:371 +#: cobc/config.def:384 msgid "incorrect order of CONFIGURATION SECTION paragraphs" msgstr "нетачан редослед параграфа CONFIGURATION SECTION" -#: cobc/config.def:374 +#: cobc/config.def:387 msgid "allow >> DEFINE CONSTANT var AS literal" msgstr "дозвољава >> DEFINE CONSTANT вар AS словност" -#: cobc/config.def:377 +#: cobc/config.def:390 msgid "REDEFINES clause not following entry-name in definition" msgstr "REDEFINES клаузула не прати називе уноса у дефиницији" -#: cobc/config.def:380 +#: cobc/config.def:393 msgid "record sizes does not match RECORD clause" msgstr "величине записа не одговарају RECORD клаузули" -#: cobc/config.def:383 cobc/parser.y:5736 cobc/parser.y:5750 cobc/parser.y:5763 -#: cobc/parser.y:5774 +#: cobc/config.def:396 cobc/parser.y:5991 cobc/parser.y:6005 cobc/parser.y:6018 +#: cobc/parser.y:6029 msgid "RECORD DELIMITER clause" msgstr "RECORD DELIMITER клаузула" -#: cobc/config.def:386 +#: cobc/config.def:399 msgid "BINARY-SEQUENTIAL and LINE-SEQUENTIAL phrases in RECORD DELIMITER" msgstr "BINARY-SEQUENTIAL и LINE-SEQUENTIAL реченице у RECORD DELIMITER" -#: cobc/config.def:389 cobc/tree.c:4805 +#: cobc/config.def:402 cobc/tree.c:4873 msgid "RECORD DELIMITER clause on file with fixed-length records" msgstr "RECORD DELIMITER клаузула на датотеци са записима непромењиве дужине" -#: cobc/config.def:392 +#: cobc/config.def:405 msgid "missing statement (e.g. empty IF / PERFORM)" msgstr "недостаје тврдња (нпр. празно IF / PERFORM)" -#: cobc/config.def:395 +#: cobc/config.def:408 msgid "missing period in PROCEDURE DIVISION (when reference format supports Area A enforcement)" msgstr "" -#: cobc/config.def:398 +#: cobc/config.def:411 msgid "zero-length literals, e.g. '' and \"\"" msgstr "словност нулте дужине, нпр. '' и \"\"" -#: cobc/config.def:401 +#: cobc/config.def:414 msgid "XML GENERATE's phrases other than COUNT IN" msgstr "XML GENERATE речи осим COUNT IN" -#: cobc/config.def:404 cobc/typeck.c:8565 +#: cobc/config.def:417 cobc/typeck.c:9017 msgid "AFTER phrase in CONTINUE statement" msgstr "фраза AFTER у тврдњи CONTINUE" -#: cobc/config.def:407 -msgid "ENTRY FOR GOTO and GOTO ENTRY statements" +#: cobc/config.def:420 +#, fuzzy +#| msgid "ENTRY FOR GOTO and GOTO ENTRY statements" +msgid "ENTRY FOR GO TO and GO TO ENTRY statements" msgstr "тврдње ENTRY FOR GOTO и GOTO ENTRY" -#: cobc/config.def:410 +#: cobc/config.def:423 cobc/typeck.c:4642 msgid "ASSIGN [TO] variable in SELECT" msgstr "„ASSIGN [TO]“ променљива у „SELECT“" -#: cobc/config.def:413 +#: cobc/config.def:426 msgid "ASSIGN USING/VARYING variable in SELECT" msgstr "„ASSIGN USING/VARYING“ променљива у „SELECT“" -#: cobc/config.def:416 +#: cobc/config.def:429 msgid "ASSIGN EXTERNAL/DYNAMIC in SELECT" msgstr "„ASSIGN EXTERNAL/DYNAMIC“ у „SELECT“" -#: cobc/config.def:419 +#: cobc/config.def:432 msgid "ASSIGN DISK FROM variable in SELECT" msgstr "„ASSIGN DISK FROM“ променљива у „SELECT“" -#: cobc/config.def:422 +#: cobc/config.def:435 msgid "VSAM status in FILE STATUS" msgstr "„VSAM“ стање у „FILE STATUS“" -#: cobc/config.def:425 +#: cobc/config.def:438 #, fuzzy #| msgid "LOCAL-STORAGE SECTION implies RECURSIVE attribute" msgid "CALL to own PROGRAM-ID implies RECURSIVE attribute" msgstr "„LOCAL-STORAGE SECTION“ подразумева атрибут „RECURSIVE“" -#: cobc/config.def:428 +#: cobc/config.def:441 msgid "DEPENDING clause in RECORD CONTAINS" msgstr "" -#: cobc/config.def:431 cobc/tree.c:3584 +#: cobc/config.def:444 cobc/tree.c:3623 msgid "PICTURE string with 'L' character" msgstr "" -#: cobc/error.c:83 +#: cobc/error.c:141 libcob/common.c:1379 libcob/common.c:8715 +#: libcob/common.c:8766 +#, c-format +msgid "warning: " +msgstr "упозорење: " + +#: cobc/error.c:142 libcob/common.c:8784 +msgid "note: " +msgstr "напомена: " + +#: cobc/error.c:162 #, c-format msgid "in section '%s':" msgstr "у одељку „%s“:" -#: cobc/error.c:94 +#: cobc/error.c:173 #, c-format msgid "in paragraph '%s':" msgstr "у пасусу „%s“:" -#: cobc/error.c:129 cobc/error.c:133 cobc/error.c:136 +#: cobc/error.c:227 cobc/error.c:231 cobc/error.c:234 msgid "too many errors" msgstr "превише грешака" -#: cobc/error.c:145 +#: cobc/error.c:243 #, c-format msgid "in file included from " msgstr "у датотеци укљученој из " -#: cobc/error.c:163 libcob/common.c:8325 +#: cobc/error.c:261 libcob/common.c:9146 msgid "configuration error:" msgstr "грешка подешавања:" -#: cobc/error.c:176 libcob/common.c:861 +#: cobc/error.c:274 libcob/common.c:920 #, c-format msgid "system error %d" msgstr "системска грешка %d" -#: cobc/error.c:346 cobc/error.c:413 cobc/error.c:475 cobc/error.c:631 -#: cobc/error.c:675 cobc/error.c:785 libcob/common.c:1318 libcob/common.c:7900 -#: libcob/common.c:7951 -#, c-format -msgid "warning: " -msgstr "упозорење: " - -#: cobc/error.c:518 cobc/error.c:534 cobc/error.c:868 cobc/error.c:889 +#: cobc/error.c:616 cobc/error.c:632 cobc/error.c:971 cobc/error.c:992 #, c-format msgid "%s used" msgstr "%s коришћено" -#: cobc/error.c:521 cobc/error.c:871 +#: cobc/error.c:619 cobc/error.c:974 #, c-format msgid "%s is archaic in %s" msgstr "„%s“ је архаично у „%s“" -#: cobc/error.c:525 cobc/error.c:875 +#: cobc/error.c:623 cobc/error.c:978 #, c-format msgid "%s is obsolete in %s" msgstr "„%s“ је застарело у „%s“" -#: cobc/error.c:531 cobc/error.c:881 cobc/parser.y:5738 +#: cobc/error.c:629 cobc/error.c:984 cobc/parser.y:5993 #, c-format msgid "%s ignored" msgstr "„%s“ занемарено" -#: cobc/error.c:537 cobc/error.c:891 +#: cobc/error.c:635 cobc/error.c:994 #, c-format msgid "%s does not conform to %s" msgstr "„%s“ није у складу са „%s“" -#: cobc/error.c:553 +#: cobc/error.c:651 msgid "configuration warning:" msgstr "упозорење подешавања:" -#: cobc/error.c:728 cobc/error.c:731 cobc/error.c:755 cobc/error.c:758 -#: libcob/common.c:7969 -msgid "note: " -msgstr "напомена: " - -#: cobc/error.c:933 cobc/error.c:962 +#: cobc/error.c:1040 cobc/error.c:1069 #, c-format msgid "redefinition of '%s'" msgstr "поновно дефинисање за „%s“" -#: cobc/error.c:939 cobc/error.c:973 +#: cobc/error.c:1046 cobc/error.c:1080 #, c-format msgid "'%s' previously defined here" msgstr "„%s“ претходно дефинисано овде" -#: cobc/error.c:1017 cobc/error.c:1023 +#: cobc/error.c:1124 cobc/error.c:1130 #, c-format msgid "'%s' is not defined" msgstr "„%s“ није дефинисано" -#: cobc/error.c:1019 +#: cobc/error.c:1126 #, c-format msgid "'%s' cannot be used here" msgstr "„%s“ се не може коришстити овде" -#: cobc/error.c:1021 cobc/parser.y:7658 +#: cobc/error.c:1128 cobc/parser.y:7941 #, c-format msgid "'%s' is not defined, but is a reserved word in another dialect" msgstr "„%s“ није дефинисано, али је резервисана реч у другом дијалекту" -#: cobc/error.c:1060 +#: cobc/error.c:1167 #, c-format msgid "'%s' is ambiguous; needs qualification" msgstr "„%s“ је нејасно; потребна је квалификација" -#: cobc/error.c:1090 +#: cobc/error.c:1197 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "'%s' is a special register" msgstr "„%s“ није цео број" -#: cobc/error.c:1093 +#: cobc/error.c:1200 #, fuzzy, c-format #| msgid "'%s' is not defined" msgid "'%s' internally defined" msgstr "„%s“ није дефинисано" -#: cobc/error.c:1097 cobc/parser.y:18176 cobc/parser.y:18181 cobc/typeck.c:5000 -#: cobc/typeck.c:5047 cobc/typeck.c:5048 +#: cobc/error.c:1204 cobc/parser.y:18772 cobc/parser.y:18777 cobc/typeck.c:5166 +#: cobc/typeck.c:5213 cobc/typeck.c:5214 #, c-format msgid "'%s' defined here" msgstr "„%s“ је дефинисано овде" -#: cobc/error.c:1108 +#: cobc/error.c:1215 #, c-format msgid "fatal error: %s" msgstr "кобна грешка: %s" -#: cobc/error.c:1117 +#: cobc/error.c:1224 #, c-format msgid "group item '%s' cannot have %s clause" msgstr "ставка групе „%s“ не може имати %s клаузулу" -#: cobc/error.c:1132 +#: cobc/error.c:1239 #, c-format msgid "constant item '%s' requires a %s clause" msgstr "ставка константе „%s“ захтева %s клаузулу" -#: cobc/error.c:1136 +#: cobc/error.c:1243 #, c-format msgid "level %02d item '%s' requires a %s clause" msgstr "ставка нивоа %02d „%s“ захтева %s клаузулу" -#: cobc/error.c:1151 +#: cobc/error.c:1258 #, c-format msgid "constant item '%s' can only have a %s clause" msgstr "ставка константе „%s“ може имати само %s клаузулу" -#: cobc/error.c:1155 +#: cobc/error.c:1262 #, c-format msgid "level %02d item '%s' can only have a %s clause" msgstr "ставка нивоа %02d „%s“ може имати само %s клаузулу" -#: cobc/field.c:136 +#: cobc/field.c:139 msgid "constant expression has Divide by ZERO" msgstr "израз константе има дељење НУЛОМ" -#: cobc/field.c:192 cobc/field.c:329 cobc/field.c:337 +#: cobc/field.c:195 cobc/field.c:332 cobc/field.c:340 msgid "missing right parenthesis" msgstr "недостаје десна заграда" -#: cobc/field.c:221 +#: cobc/field.c:224 #, c-format msgid "expression stack overflow at %d entries for operation '%c'" msgstr "прекорачење спремника израза код %d уноса за радњу „%c“" -#: cobc/field.c:262 +#: cobc/field.c:265 #, c-format msgid "expression stack overflow at %d entries" msgstr "прекорачење спремника израза код %d уноса" -#: cobc/field.c:279 +#: cobc/field.c:282 msgid "missing left parenthesis" msgstr "недостаје лева заграда" -#: cobc/field.c:320 +#: cobc/field.c:323 #, c-format msgid "invalid operator '%s' in expression" msgstr "неисправан оператор „%s“ у изразу" -#: cobc/field.c:339 +#: cobc/field.c:342 #, c-format msgid "'%c' operator misplaced" msgstr "„%c“ оператор је лоше постављен" -#: cobc/field.c:400 +#: cobc/field.c:403 #, c-format msgid "invalid level number '%s'" msgstr "неисправан број нивоа „%s“" -#: cobc/field.c:460 cobc/field.c:498 +#: cobc/field.c:463 cobc/field.c:502 msgid "level number must begin with 01 or 77" msgstr "број нивоа мора почети са 01 или 77" -#: cobc/field.c:558 cobc/field.c:562 +#: cobc/field.c:562 cobc/field.c:566 #, c-format msgid "no previous data item of level %02d" msgstr "нема претходне ставке података нивоа %02d" -#: cobc/field.c:620 +#: cobc/field.c:631 #, c-format msgid "'%s' cannot be qualified here" msgstr "„%s“ се не може квалификовати овде" -#: cobc/field.c:626 +#: cobc/field.c:637 #, c-format msgid "'%s' cannot be subscripted here" msgstr "„%s“ се не може подскриптовати овде" -#: cobc/field.c:642 cobc/field.c:653 +#: cobc/field.c:653 cobc/field.c:664 #, c-format msgid "'%s' is not defined in '%s'" msgstr "„%s“ није дефинисано у „%s“" -#: cobc/field.c:660 +#: cobc/field.c:671 msgid "level number of REDEFINES entries must be identical" msgstr "број нивоа REDEFINES уноса мора бити идентичан" -#: cobc/field.c:665 +#: cobc/field.c:676 #, c-format msgid "'%s' is not the original definition" msgstr "„%s“ није узворна дефиниција" -#: cobc/field.c:826 cobc/parser.y:659 +#: cobc/field.c:720 cobc/parser.y:1051 +#, c-format +msgid "duplicate %s" +msgstr "удвостручено %s" + +#: cobc/field.c:878 cobc/parser.y:733 #, c-format msgid "duplicate %s clause" msgstr "двострука %s клаузула" -#: cobc/field.c:906 +#: cobc/field.c:988 #, c-format msgid "%s clause not compatible with PIC %s" msgstr "%s клаузула није сагласна са PIC %s" -#: cobc/field.c:917 cobc/field.c:953 +#: cobc/field.c:999 cobc/field.c:1036 #, c-format msgid "%s clause not compatible with USAGE %s" msgstr "%s клаузула није сагласна са USAGE %s" -#: cobc/field.c:1053 cobc/field.c:1069 cobc/field.c:1131 cobc/field.c:1142 +#: cobc/field.c:1140 cobc/field.c:1159 cobc/field.c:1227 cobc/field.c:1238 #, c-format msgid "PICTURE clause required for '%s'" msgstr "PICTURE клаузула се захтева за „%s“" -#: cobc/field.c:1138 +#: cobc/field.c:1234 #, c-format msgid "a non-numeric literal is expected for '%s'" msgstr "не бројевна словност је очекивана за „%s“" -#: cobc/field.c:1150 +#: cobc/field.c:1247 #, c-format msgid "defining implicit picture size %d for '%s'" msgstr "дефинишем изричиту величину слике %d за „%s“" -#: cobc/field.c:1171 +#: cobc/field.c:1271 #, c-format msgid "'%s' ANY LENGTH only allowed in LINKAGE" msgstr "„%s“ ANY LENGTH је дозвољено само у LINKAGE" -#: cobc/field.c:1175 +#: cobc/field.c:1275 #, c-format msgid "'%s' ANY LENGTH must be 01 level" msgstr "„%s“ ANY LENGTH мора бити 01 ниво" -#: cobc/field.c:1179 +#: cobc/field.c:1279 #, c-format msgid "'%s' ANY LENGTH cannot be BASED/EXTERNAL" msgstr "„%s“ ANY LENGTH не може бити BASED/EXTERNAL" -#: cobc/field.c:1184 cobc/field.c:1210 +#: cobc/field.c:1283 cobc/field.c:1313 #, c-format msgid "'%s' ANY LENGTH has invalid definition" msgstr "„%s“ ANY LENGTH има неисправну дефиницију" -#: cobc/field.c:1192 +#: cobc/field.c:1295 #, c-format msgid "'%s' ANY NUMERIC must be PIC 9" msgstr "„%s“ ANY NUMERIC мора бити PIC 9" -#: cobc/field.c:1198 -#, c-format -msgid "'%s' ANY LENGTH must be PIC X, PIC N or PIC 1" +#: cobc/field.c:1301 +#, fuzzy, c-format +#| msgid "'%s' ANY LENGTH must be PIC X, PIC N or PIC 1" +msgid "'%s' ANY LENGTH must be PIC X, PIC U, PIC N or PIC 1" msgstr "„%s“ ANY LENGTH мора бити „PIC X“, „PIC N“ или „PIC 1“" -#: cobc/field.c:1208 +#: cobc/field.c:1311 #, c-format msgid "'%s' ANY NUMERIC has invalid definition" msgstr "„%s“ ANY NUMERIC има неисправну дефиницију" -#: cobc/field.c:1224 +#: cobc/field.c:1327 #, c-format msgid "'%s' EXTERNAL must be specified at 01/77 level" msgstr "„%s“ EXTERNAL мора бити наведено на нивоу 01/77" -#: cobc/field.c:1228 +#: cobc/field.c:1331 #, c-format msgid "'%s' EXTERNAL can only be specified in WORKING-STORAGE section" msgstr "„%s“ EXTERNAL може бити наведено само у одељку WORKING-STORAGE" -#: cobc/field.c:1232 +#: cobc/field.c:1335 #, c-format msgid "'%s' EXTERNAL and BASED are mutually exclusive" msgstr "„%s“ EXTERNAL и BASED се узајамно искључују" -#: cobc/field.c:1235 +#: cobc/field.c:1338 #, c-format msgid "'%s' EXTERNAL not allowed with REDEFINES" msgstr "„%s“ EXTERNAL није дозвољено са REDEFINES" -#: cobc/field.c:1247 +#: cobc/field.c:1350 #, c-format msgid "'%s' BASED not allowed here" msgstr "„%s“ BASED није дозвољено овде" -#: cobc/field.c:1250 +#: cobc/field.c:1353 #, c-format msgid "'%s' BASED not allowed with REDEFINES" msgstr "„%s“ BASED није дозвољено са REDEFINES" -#: cobc/field.c:1253 +#: cobc/field.c:1356 #, c-format msgid "'%s' BASED only allowed at the 01 and 77 levels" msgstr "„%s“ BASED је дозвољено само на нивоима 01 и 77" -#: cobc/field.c:1279 +#: cobc/field.c:1383 #, fuzzy, c-format #| msgid "'%s' cannot have the OCCURS clause due to '%s'" msgid "'%s' cannot have an OCCURS clause due to '%s'" msgstr "„%s“ не може имати OCCURS клаузулу због „%s“" -#: cobc/field.c:1298 +#: cobc/field.c:1402 #, fuzzy, c-format #| msgid "the original definition '%s' should not have OCCURS clause" msgid "the original definition '%s' should not have an OCCURS clause" msgstr "изворна дефиниција „%s“ не треба имати OCCURS клаузулу" -#: cobc/field.c:1305 +#: cobc/field.c:1408 +#, fuzzy, c-format +#| msgid "the original definition '%s' should not have OCCURS clause" +msgid "the original definition '%s' should not have an ANY LENGTH clause" +msgstr "изворна дефиниција „%s“ не треба имати OCCURS клаузулу" + +#: cobc/field.c:1415 msgid "REDEFINES must follow the original definition" msgstr "REDEFINES мора следити оригиналну дефиницију" -#: cobc/field.c:1313 +#: cobc/field.c:1423 #, c-format msgid "'%s' cannot be variable length" msgstr "„%s“ не може бити дужина променљиве" -#: cobc/field.c:1316 +#: cobc/field.c:1426 #, c-format msgid "the original definition '%s' cannot be variable length" msgstr "оригинална дефиниција „%s“ не може бити дужина променљиве" -#: cobc/field.c:1335 +#: cobc/field.c:1445 cobc/field.c:1708 #, fuzzy, c-format #| msgid "'%s' cannot have JUSTIFIED RIGHT" msgid "'%s' cannot have JUSTIFIED RIGHT clause" msgstr "„%s“ не може имати JUSTIFIED RIGHT" -#: cobc/field.c:1342 +#: cobc/field.c:1453 #, fuzzy, c-format #| msgid "cannot have BLANK WHEN ZERO without PIC" msgid "'%s' cannot have BLANK WHEN ZERO clause" msgstr "не можете имати BLANK WHEN ZERO без PIC" -#: cobc/field.c:1348 +#: cobc/field.c:1460 #, c-format msgid "SCREEN group item '%s' has invalid clause" msgstr "ставка SCREEN групе „%s“ има неисправну клаузулу" -#: cobc/field.c:1436 +#: cobc/field.c:1548 #, fuzzy, c-format #| msgid "%s clause not compatible with USAGE %s" msgid "%s USAGE %s incompatible with %s USAGE %s" msgstr "%s клаузула није сагласна са USAGE %s" -#: cobc/field.c:1516 +#: cobc/field.c:1629 #, c-format msgid "'%s' cannot have PICTURE clause" msgstr "„%s“ не може имати PICTURE клаузулу" -#: cobc/field.c:1533 -#, c-format -msgid "%s item '%s' should be USAGE DISPLAY" -msgstr "%s ставка „%s“ треба бити USAGE DISPLAY" - -#: cobc/field.c:1556 +#: cobc/field.c:1662 #, c-format msgid "'%s' COMP-6 with sign - changing to COMP-3" msgstr "„%s“ COMP-6 са знаком - мењам у COMP-3" -#: cobc/field.c:1582 +#: cobc/field.c:1688 msgid "elementary items with SIGN clause must have S in PICTURE" msgstr "основне ставке са SIGN клаузулом морају имати S у PICTURE" -#: cobc/field.c:1585 +#: cobc/field.c:1691 msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgstr "основне ставке са SIGN клаузулом морају бити USAGE DISPLAY или NATIONAL" -#: cobc/field.c:1602 -#, c-format -msgid "'%s' cannot have JUSTIFIED RIGHT" -msgstr "„%s“ не може имати JUSTIFIED RIGHT" - -#: cobc/field.c:1614 +#: cobc/field.c:1720 #, c-format msgid "'%s' cannot have S in PICTURE string and BLANK WHEN ZERO" msgstr "„%s“ не може имати S у нисци PICTURE и BLANK WHEN ZERO" -#: cobc/field.c:1619 +#: cobc/field.c:1725 #, c-format msgid "'%s' cannot have BLANK WHEN ZERO without being USAGE DISPLAY or NATIONAL" msgstr "„%s“ не може имати BLANK WHEN ZERO а да није USAGE DISPLAY или NATIONAL" -#: cobc/field.c:1631 +#: cobc/field.c:1737 #, c-format msgid "'%s' cannot have * in PICTURE string and BLANK WHEN ZERO" msgstr "„%s“ не може имати * у нисци PICTURE и BLANK WHEN ZERO" -#: cobc/field.c:1638 +#: cobc/field.c:1744 #, c-format msgid "'%s' is not numeric, so cannot have BLANK WHEN ZERO" msgstr "„%s“ није бројно, тако да не може имати BLANK WHEN ZERO" -#: cobc/field.c:1691 +#: cobc/field.c:1798 #, c-format msgid "elements in VALUE clause for '%s' (%d) exceed max amount (%d)" msgstr "" -#: cobc/field.c:1708 cobc/field.c:1712 +#: cobc/field.c:1822 +msgid "unexpected VALUES ARE for elementary item" +msgstr "" + +#: cobc/field.c:1836 cobc/field.c:1840 #, c-format msgid "initial VALUE clause ignored for %s item '%s'" msgstr "почетна VALUE клаузула је занемарена за %s ставку „%s“" -#: cobc/field.c:1725 +#: cobc/field.c:1853 msgid "FULL has no effect on numeric items; you may want REQUIRED or PIC Z" msgstr "FULL нема дејства на бројне вредности; можете желети REQUIRED или PIC Z" -#: cobc/field.c:1755 +#: cobc/field.c:1884 msgid "VALUE may not contain a figurative constant" msgstr "VALUE не може садржати фигуративну константу" -#: cobc/field.c:1763 -msgid "cannot specify both FULL and JUSTIFIED" -msgstr "не можете навести и FULL и JUSTIFIED" +#: cobc/field.c:1893 cobc/field.c:1935 cobc/parser.y:750 cobc/parser.y:1823 +#: cobc/parser.y:1826 +#, c-format +msgid "cannot specify both %s and %s" +msgstr "не можете навести и %s и %s" -#: cobc/field.c:1775 +#: cobc/field.c:1905 #, c-format msgid "'%s' has FROM, TO or USING without PIC; PIC will be implied" msgstr "„%s“ има FROM, TO или USING без PIC; PIC ће бити примењено" -#: cobc/field.c:1792 +#: cobc/field.c:1922 #, c-format msgid "'%s' has numeric VALUE without PIC; PIC will be implied" msgstr "„%s“ има бројну VALUE без PIC; PIC ће бити примењено" -#: cobc/field.c:1805 -msgid "cannot specify both PIC and VALUE" -msgstr "не можете навести и PIC и VALUE" - -#: cobc/field.c:1813 +#: cobc/field.c:1943 msgid "cannot have PIC without FROM, TO or USING" msgstr "не можете имати PIC без FROM, TO или USING" -#: cobc/field.c:1822 +#: cobc/field.c:1952 #, fuzzy #| msgid "cannot have JUSTIFIED without PIC" msgid "cannot have numeric VALUE without PIC" msgstr "не можете имати JUSTIFIED без PIC" -#: cobc/field.c:1831 +#: cobc/field.c:1961 msgid "cannot have FROM, TO or USING without PIC" msgstr "не можете имати FROM, TO или USING без PIC" -#: cobc/field.c:1841 +#: cobc/field.c:1971 msgid "VALUE item may not be numeric" msgstr "VALUE ставка не може бити бројна" -#: cobc/field.c:1856 +#: cobc/field.c:1986 #, c-format msgid "'%s' needs a PIC, COL, LINE, VALUE, BELL or BLANK clause" msgstr "за „%s“ је потребна PIC, COL, LINE, VALUE, BELL или BLANK клаузула" -#: cobc/field.c:1868 +#: cobc/field.c:1998 #, c-format msgid "'%s' cannot have PIC without FROM, TO, USING or numeric VALUE" msgstr "„%s“ не може имати PIC без FROM, TO, USING или бројну VALUE" -#: cobc/field.c:1876 +#: cobc/field.c:2006 #, c-format msgid "'%s' needs a PIC, FROM, TO, USING, VALUE, BELL, BLANK or ERASE clause" msgstr "за „%s“ је потребна PIC, FROM, TO, USING, VALUE, BELL, BLANK или ERASE клаузула" -#: cobc/field.c:1912 +#: cobc/field.c:2042 msgid "cannot use AUTO, FULL, PROMPT, REQUIRED or SECURE on elementary item without TO or USING" msgstr "не можете користити AUTO, FULL, PROMPT, REQUIRED или SECURE на основној ставци без TO или USING" -#: cobc/field.c:1919 +#: cobc/field.c:2049 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED, OCCURS or SIGN on item without FROM, TO or USING" msgstr "не можете користити BLANK WHEN ZERO, JUSTIFIED, OCCURS или SIGN на ставци без FROM, TO или USING" -#: cobc/field.c:1938 +#: cobc/field.c:2068 msgid "cannot use AUTO, FULL, REQUIRED or SECURE on elementary item without FROM, TO or USING" msgstr "не можете користити AUTO, FULL, REQUIRED или SECURE на основној ставци без FROM, TO или USING" -#: cobc/field.c:1943 +#: cobc/field.c:2073 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED or SIGN without FROM, TO or USING" msgstr "не можете користити BLANK WHEN ZERO, JUSTIFIED или SIGN без FROM, TO или USING" -#: cobc/field.c:1960 +#: cobc/field.c:2090 msgid "cannot have BLANK WHEN ZERO without PIC" msgstr "не можете имати BLANK WHEN ZERO без PIC" -#: cobc/field.c:1963 +#: cobc/field.c:2093 msgid "cannot have JUSTIFIED without PIC" msgstr "не можете имати JUSTIFIED без PIC" -#: cobc/field.c:1983 +#: cobc/field.c:2113 msgid "cannot have AUTO without FROM, TO or USING" msgstr "не можете имати AUTO без FROM, TO или USING" -#: cobc/field.c:1988 +#: cobc/field.c:2118 msgid "cannot use FULL or REQUIRED on item without TO or USING" msgstr "не можете користити FULL или REQUIRED на ставци без TO или USING" -#: cobc/field.c:1995 +#: cobc/field.c:2125 msgid "SECURE can be used with TO only" msgstr "SECURE се може користити само са TO" -#: cobc/field.c:1997 +#: cobc/field.c:2127 msgid "SECURE must be used with TO" msgstr "SECURE се мора користити са TO" -#: cobc/field.c:2016 +#: cobc/field.c:2146 #, c-format msgid "'%s' does nothing" msgstr "„%s“ не ради ништа" -#: cobc/field.c:2235 +#: cobc/field.c:2361 #, c-format msgid "'%s' 77 level is not allowed here" msgstr "„%s“ 77 ниво није дозвољен овде" -#: cobc/field.c:2627 +#: cobc/field.c:2399 msgid "OCCURS and multi COLUMNs is not allowed" msgstr "OCCURS и више COLUMN-а није дозвољено" -#: cobc/field.c:2655 +#: cobc/field.c:2419 #, c-format msgid "duplicate LINE %d ignored" msgstr "удвостручено „LINE %d“ – занемарено" -#: cobc/field.c:2672 +#: cobc/field.c:2870 #, c-format msgid "ignoring SYNCHRONIZED for group item '%s'" msgstr "занемарујем SYNCHRONIZED за ставку групе „%s“" -#: cobc/field.c:2686 cobc/field.c:2954 +#: cobc/field.c:2884 cobc/field.c:3219 #, fuzzy #| msgid "allow larger REDEFINES items" msgid "larger REDEFINES" msgstr "дозвољава веће ставке „REDEFINES“" -#: cobc/field.c:2699 cobc/field.c:2957 cobc/field.c:2962 +#: cobc/field.c:2898 cobc/field.c:3222 cobc/field.c:3227 #, c-format msgid "size of '%s' larger than size of '%s'" msgstr "величина „%s“ је већа од величине „%s“" -#: cobc/field.c:2812 cobc/field.c:2879 +#: cobc/field.c:3045 cobc/field.c:3129 cobc/parser.y:832 #, c-format msgid "'%s' cannot be larger than %d bytes" msgstr "„%s“ не може бити веће од %d бајта" -#: cobc/field.c:2850 cobc/field.c:2858 +#: cobc/field.c:3086 cobc/field.c:3094 #, c-format msgid "'%s' binary field cannot be larger than %d digits" msgstr "„%s“ бинарно поље не може бити веће од %d цифара" -#: cobc/field.c:2940 cobc/field.c:3522 -#, c-format -msgid "unexpected USAGE: %d" -msgstr "неочекивано USAGE: %d" - -#: cobc/field.c:3067 cobc/parser.y:710 cobc/parser.y:712 cobc/parser.y:6274 -#: cobc/parser.y:6284 cobc/parser.y:7344 cobc/parser.y:7347 cobc/parser.y:7349 -#: cobc/parser.y:7351 cobc/parser.y:7386 cobc/parser.y:8237 cobc/parser.y:8239 -#: cobc/parser.y:8241 cobc/parser.y:8243 cobc/parser.y:8558 cobc/parser.y:8567 -#: cobc/parser.y:10564 cobc/parser.y:12075 cobc/parser.y:13492 -#: cobc/parser.y:14902 cobc/typeck.c:5034 +#: cobc/field.c:3353 cobc/parser.y:791 cobc/parser.y:793 cobc/parser.y:6529 +#: cobc/parser.y:6539 cobc/parser.y:7625 cobc/parser.y:7628 cobc/parser.y:7630 +#: cobc/parser.y:7632 cobc/parser.y:7667 cobc/parser.y:8610 cobc/parser.y:8612 +#: cobc/parser.y:8614 cobc/parser.y:8616 cobc/parser.y:8958 cobc/parser.y:8967 +#: cobc/parser.y:10897 cobc/parser.y:12460 cobc/parser.y:13920 +#: cobc/parser.y:15390 cobc/typeck.c:5200 #, c-format msgid "%s and %s are mutually exclusive" msgstr "%s и %s се међусобно искључују" -#: cobc/field.c:3068 cobc/parser.y:7529 cobc/parser.y:7566 +#: cobc/field.c:3354 cobc/parser.y:7810 cobc/parser.y:7847 msgid "variable-length PICTURE" msgstr "" -#: cobc/field.c:3187 +#: cobc/field.c:3475 msgid "literal type does not match numeric data type" msgstr "врста словности не одговара врсти бројевних података" -#: cobc/field.c:3261 +#: cobc/field.c:3549 #, c-format msgid "THRU item '%s' may not come before '%s'" msgstr "THRU ставка „%s“ не може доћи пре „%s“" -#: cobc/field.c:3284 +#: cobc/field.c:3572 #, c-format msgid "RENAMES cannot start/end at the OCCURS item '%s'" msgstr "RENAMES не може почети/завршити на ставци OCCURS „%s“" -#: cobc/field.c:3292 +#: cobc/field.c:3580 #, c-format msgid "cannot use RENAMES on part of the table '%s'" msgstr "не можете користити RENAMES на делу табеле „%s“" -#: cobc/field.c:3330 +#: cobc/field.c:3618 #, c-format msgid "RENAMES may not contain '%s' as it is a pointer or object reference" msgstr "RENAMES не може садржати „%s“ јер је показивач или упута објекта" -#: cobc/field.c:3335 +#: cobc/field.c:3623 #, c-format msgid "RENAMES may not contain '%s' as it is an OCCURS DEPENDING table" msgstr "RENAMES не може садржати „%s“ јер је OCCURS DEPENDING табела" -#: cobc/field.c:3359 +#: cobc/field.c:3647 msgid "RENAMES may not reference a level 88" msgstr "RENAMES не може да упућује ниво 88" -#: cobc/field.c:3383 +#: cobc/field.c:3671 #, c-format msgid "'%s' must immediately follow the record '%s'" msgstr "„%s“ мора одмах да прати запис „%s“" -#: cobc/field.c:3391 +#: cobc/field.c:3679 #, c-format msgid "THRU item must be different to '%s'" msgstr "THRU ставка мора бити другачија од „%s“" -#: cobc/field.c:3397 +#: cobc/field.c:3685 #, c-format msgid "'%s' and '%s' must be in the same record" msgstr "„%s“ и „%s“ морају бити у истом запису" -#: cobc/field.c:3408 +#: cobc/field.c:3696 #, c-format msgid "THRU item '%s' may not be subordinate to '%s'" msgstr "THRU ставка „%s“ не може бити подређена „%s“" @@ -1894,19 +1923,7 @@ msgstr "" " -fintrinsics=[СВЕ|суштински назив функције(,назив,...)]\n" " „intrinsics“ да се користи безкључне речи FUNCTION" -#: cobc/flag.def:78 -msgid "" -" -fec=<exception-name>\tenable code generation for <exception-name>,\n" -" sets -fsource-location" -msgstr "" -" -fec=<назив-изузетка>\t укључује стварање кода за <назив-изузетка>,\n" -" поставља „-fsource-“ место" - -#: cobc/flag.def:81 cobc/help.c:96 -msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" -msgstr " -fno-ec=<назив-изузетка>\tискључује стварање кода за <назив-изузетка>" - -#: cobc/flag.def:84 +#: cobc/flag.def:85 msgid "" " -fdump=<scope> dump data fields on abort, <scope> may be\n" " a combination of: ALL, WS, LS, RD, FD, SC, LO" @@ -1914,15 +1931,20 @@ msgstr "" " -fdump=<сврха> исписује поља података на прекид, <сврха> може бити\n" " комбинација: ALL, WS, LS, RD, FD, SC, LO" -#: cobc/flag.def:87 +#: cobc/flag.def:88 +#, fuzzy +#| msgid "" +#| " -fno-dump=<scope> exclude data fields from dumping on abort, <scope> may\n" +#| " be a combination of: ALL, WS, LS, RD, FD, SC, LO" msgid "" " -fno-dump=<scope> exclude data fields from dumping on abort, <scope> may\n" -" be a combination of: ALL, WS, LS, RD, FD, SC, LO" +" be a combination of: ALL, WS, LS, RD, FD, SC, LO\n" +" default if no scope specified: ALL" msgstr "" " -fno-dump=<сврха> искључује поља података из исписа при прекиду, <сврха> може\n" " бити комбинација од: ALL, WS, LS, RD, FD, SC, LO" -#: cobc/flag.def:92 +#: cobc/flag.def:94 msgid "" " -fcallfh=<name> specifies <name> to be used for I/O\n" " as external provided EXTFH interface module" @@ -1930,16 +1952,25 @@ msgstr "" " -fcallfh=<назив> наводи <назив> за коришћење за У/И\n" " као спољно достављени модул „EXTFH“ сучеља" -#: cobc/flag.def:96 +#: cobc/flag.def:98 msgid "" -" -febcdic-table=[DEFAULT|RESTRICTED-GC|IBM|GCOS]\tdefine EBCDIC translation table:\n" -" * default: translation to extended ASCII as per MF\n" -" * restricted-gc: translation from restricted ASCII only\n" -" * ibm: translation to restricted ASCII as per IBM\n" -" * gcos: translation to extended ASCII as per GCOS7" +" -febcdic-table=<cconv-table>/<file>\tEBCDIC/ASCII translation table\n" +" * e.g. default, ebcdic500_latin1..." msgstr "" -#: cobc/flag.def:107 +#: cobc/flag.def:102 +#, fuzzy +#| msgid "" +#| " -fsign=[ASCII|EBCDIC]\tdefine display sign representation\n" +#| " * default: machine native" +msgid "" +" -fdefault-colseq=[ASCII|EBCDIC|NATIVE]\tdefine default collating sequence\n" +" * default: NATIVE" +msgstr "" +" -fsign=[ASCII|EBCDIC]\t дефинише представљање знака приказа\n" +" * основно: изворно машинско" + +#: cobc/flag.def:110 msgid "" " -fwinmain generate WinMain instead of main when compiling\n" " as executable" @@ -1947,35 +1978,39 @@ msgstr "" " -fwinmain ствара „WinMain“ уместо „main“ приликом превођења\n" " као извршног" -#: cobc/flag.def:111 +#: cobc/flag.def:114 msgid " -fcomputed-goto generate computed goto C statements" msgstr " -fcomputed-goto ствара израчунате „goto C“ тврдње" -#: cobc/flag.def:114 +#: cobc/flag.def:117 msgid " -fextra-brace generate extra braces in C source" msgstr " -fextra-brace ствара додатне заграде у C извору" -#: cobc/flag.def:117 +#: cobc/flag.def:120 msgid " -fcorrect-numeric attempt correction of invalid numeric display items" msgstr " -fcorrect-numeric покушава исправку неисправних ставки бројног приказа" -#: cobc/flag.def:120 +#: cobc/flag.def:123 msgid " -fstack-on-heap PERFORM stack allocated on heap" msgstr " -fstack-on-heap PERFORM спремник додељен на гомили" -#: cobc/flag.def:123 +#: cobc/flag.def:126 #, fuzzy #| msgid "" #| " -fstack-check PERFORM stack checking\n" #| " * turned on by -debug or -g" msgid "" " -fstack-extended store origin of entrypoints and PERFORM\n" -" * turned on by -debug/-dump" +" * turned on by --debug/-fdump" msgstr "" " -fstack-check ОБАВЉА проверу спремника\n" " * укључује га „-debug“ или „-g“" -#: cobc/flag.def:128 +#: cobc/flag.def:130 +msgid " -fno-fast-compare disables inline comparisions" +msgstr "" + +#: cobc/flag.def:135 msgid "" " -fno-remove-unreachable\tdisable remove of unreachable code\n" " * turned off by -g" @@ -1983,7 +2018,7 @@ msgstr "" " -fno-remove-unreachable\tискључује уклањање недохватљивог кода\n" " * искључује га „-g“" -#: cobc/flag.def:132 +#: cobc/flag.def:139 msgid "" " -ftrace generate trace code\n" " * scope: executed SECTION/PARAGRAPH" @@ -1991,7 +2026,7 @@ msgstr "" " -ftrace ствара код праћења\n" " * сврха: извршено SECTION/PARAGRAPH" -#: cobc/flag.def:136 +#: cobc/flag.def:143 msgid "" " -ftraceall generate trace code\n" " * scope: executed SECTION/PARAGRAPH/STATEMENTS" @@ -1999,11 +2034,11 @@ msgstr "" " -ftraceall ствара код праћења\n" " * сврха: извршено SECTION/PARAGRAPH/STATEMENTS" -#: cobc/flag.def:140 +#: cobc/flag.def:147 msgid " -fsyntax-only syntax error checking only; don't emit any output" msgstr " -fsyntax-only грешка синтаксе проверавања само; не издаје никакав излаз" -#: cobc/flag.def:143 +#: cobc/flag.def:150 msgid "" " -fdebugging-line enable debugging lines\n" " * 'D' in indicator column or floating >>D" @@ -2011,23 +2046,23 @@ msgstr "" " -fdebugging-line укључује редове прочишћавања\n" " * „D“ у ступцу указивача или покретно >>D" -#: cobc/flag.def:147 +#: cobc/flag.def:154 #, fuzzy #| msgid "" #| " -fsource-location generate source location code\n" #| " * turned on by -debug/-g/-ftraceall/-fec" msgid "" " -fsource-location generate source location code\n" -" * turned on by -debug/-ftraceall/-fec/-dump" +" * turned on by --debug/-ftraceall/-fec/-fdump" msgstr "" " -fsource-location ствара код места извора\n" " * укључује га „-debug/-g/-ftraceall/-fec“" -#: cobc/flag.def:151 +#: cobc/flag.def:158 msgid " -fimplicit-init automatic initialization of the COBOL runtime system" msgstr " -fimplicit-init аутоматско започињање COBOL система извршног времена" -#: cobc/flag.def:154 +#: cobc/flag.def:161 msgid "" " -fno-recursive-check disable check of recursive program call;\n" " effectively compiling as RECURSIVE program" @@ -2035,27 +2070,34 @@ msgstr "" " -fno-recursive-check искључује проверу дубинског позива програма;\n" " ефективно преводи као RECURSIVE програм" -#: cobc/flag.def:158 +#: cobc/flag.def:165 #, fuzzy #| msgid "" #| " -fstack-check PERFORM stack checking\n" #| " * turned on by -debug or -g" msgid "" " -fstack-check PERFORM stack checking\n" -" * turned on by -debug/-g" +" * turned on by --debug/-g" msgstr "" " -fstack-check ОБАВЉА проверу спремника\n" " * укључује га „-debug“ или „-g“" -#: cobc/flag.def:162 +#: cobc/flag.def:169 +msgid "" +" -fmemory-check=<scope> checks for invalid writes to internal storage,\n" +" <scope> may be one of: all, pointer, using, none\n" +" * default: none, set to all by --debug" +msgstr "" + +#: cobc/flag.def:174 msgid " -fsection-exit-check check that code execution does not leave the scope of SECTIONs" msgstr "" -#: cobc/flag.def:165 +#: cobc/flag.def:177 msgid " -fimplicit-goback-check\tcheck that code execution does not end implicit at end of PROCEDURE DIVISION" msgstr "" -#: cobc/flag.def:168 +#: cobc/flag.def:180 msgid "" " -fwrite-after use AFTER 1 for WRITE of LINE SEQUENTIAL\n" " * default: BEFORE 1" @@ -2063,15 +2105,19 @@ msgstr "" " -fwrite-after користи AFTER 1 за ПИСАЊЕ „LINE SEQUENTIAL“\n" " * основно: BEFORE 1" -#: cobc/flag.def:172 +#: cobc/flag.def:184 +#, fuzzy +#| msgid "" +#| " -fmfcomment '*' or '/' in column 1 treated as comment\n" +#| " * FIXED format only" msgid "" -" -fmfcomment '*' or '/' in column 1 treated as comment\n" -" * FIXED format only" +" -fmfcomment '*' in column 1 treated as comment with listing suppression\n" +" * FIXED/COBOL85/VARIABLE format only" msgstr "" " -fmfcomment „*“ или „/“ у ступцу 1 се сматра напоменом\n" " * FIXED формат само" -#: cobc/flag.def:176 +#: cobc/flag.def:188 msgid "" " -facucomment '$' in indicator area treated as '*',\n" " '|' treated as floating comment" @@ -2079,7 +2125,7 @@ msgstr "" " -facucomment „$“ у области указивача се сматра „*“,\n" " „|“ се сматра покретном напоменом" -#: cobc/flag.def:181 +#: cobc/flag.def:193 #, fuzzy #| msgid "" #| " -fnotrunc allow numeric field overflow\n" @@ -2091,7 +2137,7 @@ msgstr "" " -fnotrunc дозвољава прекорачење бројног поља\n" " * не-ANSI понашање" -#: cobc/flag.def:185 +#: cobc/flag.def:197 msgid "" " -fsingle-quote use a single quote (apostrophe) for QUOTE\n" " * default: double quote" @@ -2099,7 +2145,7 @@ msgstr "" " -fsingle-quote користи један наводник (апостроф) за QUOTE\n" " * основно: двоструки наводник" -#: cobc/flag.def:195 +#: cobc/flag.def:207 msgid "" " -foptional-file treat all files as OPTIONAL\n" " * unless NOT OPTIONAL specified" @@ -2107,11 +2153,11 @@ msgstr "" " -foptional-file сматра све датотеке ка OPTIONAL\n" " * осим ако је NOT OPTIONAL наведено" -#: cobc/flag.def:199 +#: cobc/flag.def:211 msgid " -fstatic-call output static function calls for the CALL statement" msgstr " -fstatic-call исписује позиве статичке функције за CALL тврдњу" -#: cobc/flag.def:202 +#: cobc/flag.def:214 #, fuzzy #| msgid "" #| " -fno-gen-c-decl-static-call\tdisable generation of C function declations\n" @@ -2123,15 +2169,19 @@ msgstr "" " -fno-gen-c-decl-static-call\tискључује стварање декларације C функције\n" " за подрутине са статичким CALL" -#: cobc/flag.def:206 +#: cobc/flag.def:218 +#, fuzzy +#| msgid "" +#| " -fgen-c-line-directives\tgenerate source location directives in C code;\n" +#| " * turned on by -g" msgid "" " -fgen-c-line-directives\tgenerate source location directives in C code;\n" -" * turned on by -g" +" * turned on by -g/--coverage" msgstr "" " -fgen-c-line-directives\tствара директиве места извора у C коду;\n" " * укључено са „-g“" -#: cobc/flag.def:210 +#: cobc/flag.def:222 msgid "" " -fgen-c-labels generate extra labels in C sources;\n" " * turned on by -g" @@ -2139,27 +2189,49 @@ msgstr "" " -fgen-c-labels ствара додатне натписе у C изворима;\n" " * укључено са „-g“" -#: cobc/flag.def:214 +#: cobc/flag.def:226 +#, fuzzy +#| msgid "" +#| " -fno-theaders suppress all headers and output of compilation\n" +#| " options from listing while keeping page breaks" msgid "" -" -fno-theaders suppress all headers and output of compilation\n" -" options from listing while keeping page breaks" +" -fno-theaders suppress all headers from listing while keeping\n" +" page breaks" msgstr "" " -fno-theaders потискује сва заглавља и излаз опција\n" " превођења са списка док задржава прекиде страница" -#: cobc/flag.def:218 +#: cobc/flag.def:230 msgid " -fno-tsource suppress source from listing" msgstr " -fno-tsource потискује извор са списка" -#: cobc/flag.def:221 +#: cobc/flag.def:233 msgid " -fno-tmessages suppress warning and error summary from listing" msgstr " -fno-tmessages потискује сажетак упозорења и грешке са списка" -#: cobc/flag.def:224 +#: cobc/flag.def:236 msgid " -ftsymbols specify symbols in listing" msgstr " -ftsymbols наводи симболе на списку" -#: cobc/flag.def:227 +#: cobc/flag.def:239 +#, fuzzy +#| msgid " -Xref specify cross reference in listing" +msgid " -ftcmd specify command line in listing" +msgstr " -Xref наводи унакрсну упуту на списку" + +#: cobc/flag.def:242 +#, fuzzy +#| msgid " -fno-tmessages suppress warning and error summary from listing" +msgid " -fno-ttimestamp suppress timestamp in listing headers" +msgstr " -fno-tmessages потискује сажетак упозорења и грешке са списка" + +#: cobc/flag.def:245 +msgid "" +" -fttitle=<title> set listing title with '_' replaced by spaces;\n" +" defaults to package name and version" +msgstr "" + +#: cobc/flag.def:249 msgid "" " -fno-diagnostics-show-option\tsuppress output of option that directly\n" " controls the diagnostic" @@ -2167,16 +2239,24 @@ msgstr "" " -fno-diagnostics-show-option\tпотискује излаз опције која непосредно\n" " контролише дијагностику" -#: cobc/help.c:32 +#: cobc/flag.def:253 +msgid " -fno-diagnostics-show-caret\tdo not display source context on warning/error diagnostic" +msgstr "" + +#: cobc/flag.def:256 +msgid " -fno-diagnostics-show-line-numbers\tsuppress display of line numbers in diagnostics" +msgstr "" + +#: cobc/help.c:33 msgid "GnuCOBOL compiler for most COBOL dialects with lots of extensions" msgstr "GnuCOBOL преводилац за већину COBOL дијалеката са много проширења" -#: cobc/help.c:34 +#: cobc/help.c:35 #, c-format msgid "Usage: %s [options]... file..." msgstr "Употреба: %s [опције]... датотека..." -#: cobc/help.c:47 bin/cobcrun.c:143 +#: cobc/help.c:48 bin/cobcrun.c:143 #, c-format msgid "" "Report bugs to: %s\n" @@ -2185,37 +2265,41 @@ msgstr "" "Пријавите грешке на: %s\n" "или (пожељније) користите пратиоца проблема на матичној страници." -#: cobc/help.c:51 -msgid "GnuCOBOL home page: <https://www.gnu.org/software/gnucobol/>" -msgstr "Матична страница GnuCOBOL-а: <https://www.gnu.org/software/gnucobol/>" +#: cobc/help.c:52 bin/cobcrun.c:146 +#, fuzzy, c-format +#| msgid "GnuCOBOL module loader" +msgid "GnuCOBOL home page: <%s>" +msgstr "учитавач ГнуКОБОЛ модула" -#: cobc/help.c:52 -msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" +#: cobc/help.c:54 bin/cobcrun.c:148 +#, fuzzy, c-format +#| msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" +msgid "General help using GNU software: <%s>" msgstr "Општа помоћ при коришћењу ГНУ софтвера: <https://www.gnu.org/gethelp/>" -#: cobc/help.c:58 bin/cobcrun.c:125 +#: cobc/help.c:61 bin/cobcrun.c:125 msgid "Options:" msgstr "Опције:" -#: cobc/help.c:59 +#: cobc/help.c:62 #, fuzzy #| msgid " -h, -help display this help and exit" msgid " -h, --help display this help and exit" msgstr " -h, -help приказује ову помоћ и излази" -#: cobc/help.c:60 +#: cobc/help.c:63 #, fuzzy #| msgid " -V, -version display compiler version and exit" msgid " -V, --version display compiler version information and exit" msgstr " -V, -version приказује податке преводиоца и излази" -#: cobc/help.c:61 +#: cobc/help.c:64 #, fuzzy #| msgid " -V, -version display compiler version and exit" msgid " -dumpversion display compiler version and exit" msgstr " -V, -version приказује податке преводиоца и излази" -#: cobc/help.c:62 +#: cobc/help.c:65 #, fuzzy #| msgid "" #| " -i, -info display compiler information (build/environment)\n" @@ -2227,7 +2311,7 @@ msgstr "" " -i, -info приказује податке преводиоца (изградња/окружење)\n" " и излази" -#: cobc/help.c:64 +#: cobc/help.c:67 #, fuzzy #| msgid "" #| " -v, -verbose verbose mode, display additional information;\n" @@ -2254,31 +2338,31 @@ msgstr "" " (2) прослеђује опширну опцију асемблеру/преводиоцу\n" " (3) прослеђује опширну опцију повезивачу" -#: cobc/help.c:71 +#: cobc/help.c:74 #, fuzzy #| msgid " -q, -brief reduced displays, commands invoked not shown" msgid " -q, --brief reduced displays, commands invoked not shown" msgstr " -q, -brief умањени прикази, призване наредбе нису приказане" -#: cobc/help.c:72 +#: cobc/help.c:75 msgid " -### like -v but commands not executed" msgstr " -### као „-v“ али наредбе се не извршавају" -#: cobc/help.c:73 +#: cobc/help.c:76 msgid " -x build an executable program" msgstr " -x гради извршни програм" -#: cobc/help.c:74 +#: cobc/help.c:77 msgid " -m build a dynamically loadable module (default)" msgstr " -m гради динамички учитљив модул (основно)" -#: cobc/help.c:75 +#: cobc/help.c:78 #, fuzzy #| msgid " -j [<args>], -job[=<args>]\trun program after build, passing <args>" msgid " -j [<args>], --job[=<args>]\trun program after build, passing <args>" msgstr " -j [<арг>], -job[=<арг>] покреће програм након изградње, прослеђујући <аргументе>" -#: cobc/help.c:76 +#: cobc/help.c:79 #, fuzzy #| msgid "" #| " -std=<dialect> warnings/features for a specific dialect\n" @@ -2306,13 +2390,13 @@ msgstr "" " acu-strict, acu, rm-strict, rm;\n" " видите датотеке подешавања у подешавању директоријума" -#: cobc/help.c:84 +#: cobc/help.c:87 #, fuzzy #| msgid " -F, -free use free source format" msgid " -F, --free use free source format (alias for -fformat=free)" msgstr " -F, -free користи слободни формат извора" -#: cobc/help.c:85 +#: cobc/help.c:88 #, fuzzy #| msgid " -fixed use fixed source format (default)" msgid "" @@ -2320,19 +2404,19 @@ msgid "" " -fformat=fixed)" msgstr " -fixed користи непроменљиви формат извора (основно)" -#: cobc/help.c:87 +#: cobc/help.c:90 msgid " -O, -O2, -O3, -Os enable optimization" msgstr " -O, -O2, -O3, -Os укључује оптимизацију" -#: cobc/help.c:88 +#: cobc/help.c:91 msgid " -O0 disable optimization" msgstr " -O0 искључује оптимизацију" -#: cobc/help.c:89 +#: cobc/help.c:92 msgid " -g enable C compiler debug and stack check" msgstr " -g укључује прочишћавање и проверу спремника" -#: cobc/help.c:90 +#: cobc/help.c:93 #, fuzzy #| msgid "" #| " -d, -debug enable all run-time error checking,\n" @@ -2344,7 +2428,7 @@ msgstr "" " -d, -debug укључује читаву проверу грешака времена извршавања,\n" " исто је као „-fstack-check -fec=EC-ALL“" -#: cobc/help.c:93 +#: cobc/help.c:97 #, fuzzy #| msgid "" #| " -fec=<exception-name>\tenable code generation for <exception-name>,\n" @@ -2357,11 +2441,15 @@ msgstr "" " -fec=<назив-изузетка>\t укључује стварање кода за <назив-изузетка>,\n" " поставља „-fsource-“ место" -#: cobc/help.c:97 +#: cobc/help.c:100 +msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" +msgstr " -fno-ec=<назив-изузетка>\tискључује стварање кода за <назив-изузетка>" + +#: cobc/help.c:101 msgid " -o <file> place the output into <file>" msgstr " -o <дттка> ставља излаз у <датотеку>" -#: cobc/help.c:98 +#: cobc/help.c:102 msgid "" " -b combine all input files into a single\n" " dynamically loadable module" @@ -2369,43 +2457,39 @@ msgstr "" " -b обједињује све улазне датотеке у један\n" " динамички учитљив модул" -#: cobc/help.c:100 +#: cobc/help.c:104 msgid " -E preprocess only; do not compile or link" msgstr " -E само предобрада; без превођења или повезивања" -#: cobc/help.c:101 +#: cobc/help.c:105 msgid " -C translation only; convert COBOL to C" msgstr " -C само превођење; претвара COBOL у C" -#: cobc/help.c:102 +#: cobc/help.c:106 msgid " -S compile only; output assembly file" msgstr " -S само превођење; резултира датотеком асемблера" -#: cobc/help.c:103 +#: cobc/help.c:107 msgid " -c compile and assemble, but do not link" msgstr " -c преводи и саставља, али не повезује" -#: cobc/help.c:104 +#: cobc/help.c:108 msgid " -T <file> generate and place a wide program listing into <file>" msgstr " -T <дттка> ствара и ставља велики списак програма у <датотеку>" -#: cobc/help.c:105 +#: cobc/help.c:109 msgid " -t <file> generate and place a program listing into <file>" msgstr " -t <дттка> ствара и ставља списак програма у <датотеку>" -#: cobc/help.c:106 +#: cobc/help.c:110 msgid " --tlines=<lines> specify lines per page in listing, default = 55" msgstr " --tlines=<редови> наводи редове по страници на списку, основно = 55" -#: cobc/help.c:108 -msgid " --tsymbols specify symbols in listing, use -ftsymbols instead" -msgstr " --tsymbols наводи симболе на списку, користите „-ftsymbols“ уместо тога" - -#: cobc/help.c:110 +#: cobc/help.c:111 msgid " -P[=<dir or file>] generate preprocessed program listing (.lst)" msgstr " -P[=<дир или дттка>] ствара предобрађени списак програма (.lst)" -#: cobc/help.c:112 +#: cobc/help.c:113 #, fuzzy #| msgid "" #| " -Xref generate cross reference through 'cobxref'\n" @@ -2417,77 +2501,81 @@ msgstr "" " -Xref ствара унакрсну упуту кроз „cobxref“\n" " (В. Коенов „cobxref“ мора бити у путањи)" -#: cobc/help.c:115 +#: cobc/help.c:116 #, fuzzy #| msgid " -Xref specify cross reference in listing" msgid " -X, --Xref specify cross reference in listing" msgstr " -Xref наводи унакрсну упуту на списку" -#: cobc/help.c:117 +#: cobc/help.c:118 msgid " -I <directory> add <directory> to copy/include search path" msgstr " -I <директоријум> додаје <директоријум> у путању претраге умножавања/укључивања" -#: cobc/help.c:118 +#: cobc/help.c:119 msgid " -L <directory> add <directory> to library search path" msgstr " -L <директоријум> додаје <директоријум> у путању претраге библиотеке" -#: cobc/help.c:119 +#: cobc/help.c:120 msgid " -l <lib> link the library <lib>" msgstr " -l <библ> везује библиотеку <библ>" -#: cobc/help.c:120 -msgid " -A <options> add <options> to the C compile phase" -msgstr " -A <опције> додаје <опције> у фазу C превођења" - #: cobc/help.c:121 -msgid " -Q <options> add <options> to the C link phase" -msgstr " -Q <опције> додаје <опције> у фазу C везивања" +msgid " -K <entry> generate CALL to <entry> as static" +msgstr " -K <унос> ствара CALL за <унос> као статички" #: cobc/help.c:122 msgid " -D <define> define <define> for COBOL compilation" msgstr " -D <дефин> дефинише <дефин> за COBOL превођење" #: cobc/help.c:123 -msgid " -K <entry> generate CALL to <entry> as static" -msgstr " -K <унос> ствара CALL за <унос> као статички" +msgid " -A <options> add <options> to the C compile phase" +msgstr " -A <опције> додаје <опције> у фазу C превођења" #: cobc/help.c:124 +msgid " -Q <options> add <options> to the C link phase" +msgstr " -Q <опције> додаје <опције> у фазу C везивања" + +#: cobc/help.c:125 +msgid " --coverage instrument generated binaries for coverage" +msgstr "" + +#: cobc/help.c:126 #, fuzzy #| msgid " -conf=<file> user-defined dialect configuration; see -std" msgid " --conf=<file> user-defined dialect configuration; see -std" msgstr " -conf=<дттка> подешавање дијалекта које дефинише корисник; видите „-std“" -#: cobc/help.c:125 +#: cobc/help.c:127 #, fuzzy #| msgid " -list-reserved display reserved words" msgid " --list-reserved display reserved words" msgstr " -list-reserved приказује резервисане речи" -#: cobc/help.c:126 +#: cobc/help.c:128 #, fuzzy #| msgid " -list-intrinsics display intrinsic functions" msgid " --list-intrinsics display intrinsic functions" msgstr " -list-intrinsics приказује суштинске функције" -#: cobc/help.c:127 +#: cobc/help.c:129 #, fuzzy #| msgid " -list-mnemonics display mnemonic names" msgid " --list-mnemonics display mnemonic names" msgstr " -list-mnemonics приказује мнемоничке називе" -#: cobc/help.c:128 +#: cobc/help.c:130 #, fuzzy #| msgid " -list-mnemonics display mnemonic names" msgid " --list-exceptions display exception names" msgstr " -list-mnemonics приказује мнемоничке називе" -#: cobc/help.c:129 +#: cobc/help.c:131 #, fuzzy #| msgid " -list-system display system routines" msgid " --list-system display system routines" msgstr " -list-system приказује рутине система" -#: cobc/help.c:130 +#: cobc/help.c:132 #, fuzzy #| msgid "" #| " -save-temps[=<dir>] save intermediate files\n" @@ -2499,61 +2587,75 @@ msgstr "" " -save-temps[=<дир>] чува посредничке датотеке\n" " * основно: текући директоријум" -#: cobc/help.c:132 +#: cobc/help.c:134 +msgid " -MT <target> set/add target file used in dependency list" +msgstr "" + +#: cobc/help.c:135 +#, fuzzy +#| msgid " -o <file> place the output into <file>" +msgid " -MF <file> place dependency list into <file>" +msgstr " -o <дттка> ставља излаз у <датотеку>" + +#: cobc/help.c:136 msgid " -ext <extension> add file extension for resolving COPY" msgstr " -ext <проширење> додаје проширење датотеке за решавање COPY" -#: cobc/help.c:139 +#: cobc/help.c:143 msgid "Warning options:" msgstr "Опције упозорења:" -#: cobc/help.c:140 +#: cobc/help.c:144 msgid " -Wall enable most warnings (all except as noted below)" msgstr " -Wall укључује већину упозорења (сва осим као што је напоменуто испод)" -#: cobc/help.c:141 +#: cobc/help.c:145 msgid " -Wextra like -Wall but enable some extra warning flags" msgstr " -Wextra као „-Wall“ али укључује неке додатне опције упозорења" -#: cobc/help.c:142 +#: cobc/help.c:146 msgid " -w disable all warnings" msgstr " -w искључује сва упозорења" -#: cobc/help.c:143 +#: cobc/help.c:147 msgid " -Wno-<warning> disable warning enabled by default, -Wall or -Wextra" msgstr " -Wno-<упозорење> искључије упозорење укључено по основи, „-Wall“ или „-Wextra“" #. TRANSLATORS: This msgid is appended to msgid for -Wno-pending and others -#: cobc/help.c:149 +#: cobc/help.c:153 msgid " * ALWAYS active" msgstr " * УВЕК активан" #. TRANSLATORS: This msgid is appended to msgid for -Wpossible-truncate and others -#: cobc/help.c:153 +#: cobc/help.c:157 msgid " * NOT set with -Wall" msgstr " * НИЈЕ постављено са „-Wall“" -#: cobc/help.c:161 +#: cobc/help.c:165 +msgid " -fdiagnostics-plain-output\tmake diagnostic output as plain as possible" +msgstr "" + +#: cobc/help.c:166 msgid " -Werror treat all warnings as errors" msgstr " -Werror сматра сва упозорења грешкама" -#: cobc/help.c:162 +#: cobc/help.c:167 msgid " -Wno-error don't treat warnings as errors" msgstr " -Wno-error не сматра упозорења грешкама" -#: cobc/help.c:163 +#: cobc/help.c:168 msgid " -Werror=<warning> treat specified <warning> as error" msgstr " -Werror=<упозорење> сматра наведено <упозорење> грешком" -#: cobc/help.c:164 +#: cobc/help.c:169 msgid " -Wno-error=<warning> don't treat specified <warning> as error" msgstr " -Wno-error=<упозорење> не сматра наведено <упозорење> грешком" -#: cobc/help.c:180 +#: cobc/help.c:185 msgid "Compiler options:" msgstr "Опције преводиоца:" -#: cobc/help.c:198 +#: cobc/help.c:203 msgid "" " -fibmcomp sets -fbinary-size=2-4-8 -fsynchronized-clause=ok\n" " -fno-ibmcomp sets -fbinary-size=1--8 -fsynchronized-clause=ignore" @@ -2561,7 +2663,7 @@ msgstr "" " -fibmcomp поставља „-fbinary-size=2-4-8“ „-fsynchronized-clause=у реду“\n" " -fno-ibmcomp поставља „-fbinary-size=1--8“ „-fsynchronized-clause=занемари“" -#: cobc/help.c:201 +#: cobc/help.c:206 #, fuzzy #| msgid " -falternate-ebcdic use restricted ASCII to EBCDIC translate" msgid "" @@ -2569,1702 +2671,1816 @@ msgid "" " -fno-alternate-ebcdic use extended ASCII to EBCDIC translate" msgstr " -falternate-ebcdic користи ограничено ASCII у EBCDIC превођење" -#: cobc/help.c:230 +#: cobc/help.c:235 msgid "Compiler dialect configuration options:" msgstr "Опције подешавања дијалекта превођења:" -#: cobc/help.c:232 cobc/help.c:238 +#: cobc/help.c:237 cobc/help.c:243 msgid "<value>" msgstr "<вредност>" -#: cobc/help.c:242 +#: cobc/help.c:247 msgid "<support>" msgstr "<подршка>" -#: cobc/help.c:251 +#: cobc/help.c:256 msgid "where <support> is one of the following:" msgstr "када је <подршка> нешто од следећег:" #. TRANSLATORS: This msgid is used when a variable name #. or label is referenced in a compiler message. -#: cobc/help.c:254 cobc/help.c:257 cobc/help.c:260 cobc/help.c:263 -#: cobc/help.c:266 cobc/help.c:269 cobc/help.c:272 cobc/help.c:275 -#: cobc/typeck.c:2361 +#: cobc/help.c:259 cobc/help.c:262 cobc/help.c:265 cobc/help.c:268 +#: cobc/help.c:271 cobc/help.c:274 cobc/help.c:277 cobc/help.c:280 +#: cobc/typeck.c:2378 #, c-format msgid "'%s'" msgstr "„%s“" -#: cobc/help.c:277 +#: cobc/help.c:282 msgid "word to be taken out of the reserved words list" msgstr "реч која ће бити изнесена са списка резервисаних речи" -#: cobc/help.c:277 cobc/help.c:278 cobc/help.c:280 +#: cobc/help.c:282 cobc/help.c:283 cobc/help.c:285 msgid "<word>" msgstr "<реч>" -#: cobc/help.c:278 +#: cobc/help.c:283 msgid "word to be added to reserved words list" msgstr "реч која ће бити додата на списак резервисаних речи" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "word to be added to reserved words list as alias" msgstr "реч која ће бити додата на списак резервисаних речи као алијас" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "<word>:<alias>" msgstr "<реч>:<алијас>" -#: cobc/help.c:280 +#: cobc/help.c:285 msgid "special register to disable" msgstr "посебни регистар за искључивање" -#: cobc/help.c:281 +#: cobc/help.c:286 msgid "special register to enable" msgstr "посебни регистар за укључивање" -#: cobc/help.c:282 +#: cobc/help.c:287 msgid "<word> or <word>:<definition>, where definition uses backslash escaped spaces" msgstr "" -#: cobc/parser.y:315 cobc/parser.y:323 +#: cobc/parser.y:307 #, c-format msgid "'%s' should start in Area A" msgstr "" -#: cobc/parser.y:331 cobc/parser.y:333 +#: cobc/parser.y:315 +#, c-format +msgid "%s should start in Area A" +msgstr "" + +#: cobc/parser.y:322 +#, fuzzy, c-format +#| msgid "should not contain '%c'" +msgid "%s should not start in Area A" +msgstr "не треба да садржи '%c'" + +#: cobc/parser.y:330 cobc/parser.y:332 msgid "start of statement in Area A" msgstr "" -#: cobc/parser.y:344 cobc/parser.y:379 +#: cobc/parser.y:428 #, c-format msgid "unreachable statement '%s'" msgstr "недостижна тврдња „%s“" -#: cobc/parser.y:470 +#: cobc/parser.y:542 #, c-format msgid "ENTRY '%s' duplicated" msgstr "ENTRY „%s“ је удвостручено" -#: cobc/parser.y:520 +#: cobc/parser.y:594 #, c-format msgid "ENTRY FOR GO TO '%s' duplicated" msgstr "ENTRY FOR GO TO „%s“ је удвостручено" -#: cobc/parser.y:536 +#: cobc/parser.y:610 #, c-format msgid "maximum nested program depth exceeded (%d)" msgstr "премашена је највећа дубина угнежденог програма (%d)" -#: cobc/parser.y:562 cobc/parser.y:589 +#: cobc/parser.y:636 cobc/parser.y:663 #, c-format msgid "%s statement not terminated by %s" msgstr "%s тврдња није окончана са %s" -#: cobc/parser.y:592 +#: cobc/parser.y:666 #, c-format msgid "%s statement not terminated" msgstr "%s тврдња није окончана" -#: cobc/parser.y:634 -msgid "USE statement invalid for SORT file" +#: cobc/parser.y:708 +#, fuzzy +#| msgid "USE statement invalid for SORT file" +msgid "USE statement invalid for SD file" msgstr "тврдња USE није исправна за SORT датотеку" -#: cobc/parser.y:676 cobc/parser.y:1670 cobc/parser.y:1673 -#, c-format -msgid "cannot specify both %s and %s" -msgstr "не можете навести и %s и %s" - -#: cobc/parser.y:677 +#: cobc/parser.y:751 #, fuzzy, c-format #| msgid "%s ignored" msgid "%s is ignored" msgstr "„%s“ занемарено" -#: cobc/parser.y:686 -#, c-format -msgid "Cannot specify %s without number of lines on page" +#: cobc/parser.y:760 +#, fuzzy, c-format +#| msgid "Cannot specify %s without number of lines on page" +msgid "cannot specify %s without number of lines on page" msgstr "Не можете навести %s без броја редова по страници" -#: cobc/parser.y:696 +#: cobc/parser.y:770 #, c-format msgid "maximum OCCURS depth exceeded (%d)" msgstr "максимум OCCURS дубине је премашен (%d)" -#: cobc/parser.y:704 cobc/typeck.c:3037 +#: cobc/parser.y:785 cobc/typeck.c:3127 #, c-format msgid "'%s' is not in LINKAGE SECTION" msgstr "„%s“ није у LINKAGE SECTION" -#: cobc/parser.y:725 +#: cobc/parser.y:806 msgid "TO phrase without DEPENDING phrase" msgstr "реч TO без речи DEPENDING" -#: cobc/parser.y:727 +#: cobc/parser.y:808 msgid "maximum number of occurrences assumed to be exact number" msgstr "највећи број понављања је узето да буде тачан број" -#: cobc/parser.y:732 cobc/parser.y:8032 +#: cobc/parser.y:813 cobc/parser.y:8398 msgid "OCCURS TO must be greater than OCCURS FROM" msgstr "OCCURS TO мора бити веће од OCCURS FROM" -#: cobc/parser.y:741 +#: cobc/parser.y:823 msgid "OCCURS DEPENDING ON without TO phrase" msgstr "OCCURS DEPENDING ON без речи TO" -#: cobc/parser.y:806 +#: cobc/parser.y:899 #, c-format msgid "%s header missing" msgstr "%s заглавље недостаје" -#: cobc/parser.y:807 +#: cobc/parser.y:900 #, fuzzy, c-format #| msgid "%s header missing - assumed" msgid "%s header assumed" msgstr "%s заглавље недостаје – подразумева се" -#: cobc/parser.y:939 -#, c-format -msgid "duplicate %s" -msgstr "удвостручено %s" - -#: cobc/parser.y:941 +#: cobc/parser.y:1053 #, c-format msgid "%s incorrectly after %s" msgstr "%s нетачно након %s" -#: cobc/parser.y:1078 +#: cobc/parser.y:1208 #, c-format msgid "redefinition of program name '%s'" msgstr "поновно дефинисање назива програма „%s“" -#: cobc/parser.y:1083 +#: cobc/parser.y:1213 #, c-format msgid "redefinition of program ID '%s'" msgstr "поновно дефинисање ИБ-а програма „%s“" -#: cobc/parser.y:1117 +#: cobc/parser.y:1247 #, c-format msgid "FUNCTION '%s' has no PROCEDURE DIVISION" msgstr "FUNCTION „%s“ нема PROCEDURE DIVISION" -#: cobc/parser.y:1228 +#: cobc/parser.y:1372 msgid "functions may not be defined within a program/function" msgstr "функције не могу бити дефинисане унутар програма/функције" -#: cobc/parser.y:1278 +#: cobc/parser.y:1426 #, c-format msgid "END FUNCTION '%s' is different from FUNCTION-ID '%s'" msgstr "END FUNCTION „%s“ се разликује од FUNCTION-ID „%s“" -#: cobc/parser.y:1292 +#: cobc/parser.y:1440 #, c-format msgid "END PROGRAM '%s' is different from PROGRAM-ID '%s'" msgstr "END PROGRAM „%s“ се разликује од PROGRAM-ID „%s“" -#: cobc/parser.y:1341 +#: cobc/parser.y:1489 msgid "currency symbol must be one character long" msgstr "симбол валуте мора бити дужине једног знака" -#: cobc/parser.y:1398 +#: cobc/parser.y:1546 #, c-format msgid "invalid character '%c' in currency symbol" msgstr "неисправан знак „%c“ у симболу валуте" -#: cobc/parser.y:1414 +#: cobc/parser.y:1562 msgid "prototype has same name as current function and will be ignored" msgstr "прототип има исти назив као текућа функција и биће занемарен" -#: cobc/parser.y:1441 +#: cobc/parser.y:1589 #, c-format msgid "duplicate REPOSITORY entries for '%s' do not match" msgstr "удвостручени REPOSITORY уноси за „%s“ се не поклапају" -#: cobc/parser.y:1445 +#: cobc/parser.y:1593 #, c-format msgid "duplicate REPOSITORY entry for '%s'" msgstr "удвостручени REPOSITORY унос за „%s“" -#: cobc/parser.y:1510 +#: cobc/parser.y:1658 #, c-format msgid "ORGANIZATION %s is incompatible with RECORD DELIMITER" msgstr "ORGANIZATION %s није сагласно са RECORD DELIMITER-ом" -#: cobc/parser.y:1548 cobc/parser.y:1939 cobc/typeck.c:829 +#: cobc/parser.y:1694 cobc/parser.y:2142 cobc/typeck.c:835 #, c-format msgid "condition-name not allowed here: '%s'" msgstr "назив услова није дозвољен овде: „%s“" -#: cobc/parser.y:1554 cobc/parser.y:2127 +#: cobc/parser.y:1700 cobc/parser.y:2345 msgid "SCREEN item cannot be used here" msgstr "SCREEN ставка се не може користити овде" -#: cobc/parser.y:1557 +#: cobc/parser.y:1703 msgid "REPORT item cannot be used here" msgstr "REPORT ставка се не може користити овде" -#: cobc/parser.y:1563 +#: cobc/parser.y:1709 msgid "TYPEDEF item cannot be used here" msgstr "TYPEDEF ставка се не може користити овде" -#: cobc/parser.y:1572 +#: cobc/parser.y:1718 msgid "elementary item expected" msgstr "очекивана је основна ставка" -#: cobc/parser.y:1579 +#: cobc/parser.y:1725 msgid "item may not reference itself" msgstr "ставка не може да упућује на себе" -#: cobc/parser.y:1586 +#: cobc/parser.y:1733 msgid "item may not be subordinate to any item with USAGE clause" msgstr "ставка не може бити подређена било којој ставци са USAGE клаузулом" -#: cobc/parser.y:1588 +#: cobc/parser.y:1735 msgid "item may not be subordinate to any item with SIGN clause" msgstr "ставка не може бити подређена било којој ставци са SIGN клаузулом" -#: cobc/parser.y:1631 +#: cobc/parser.y:1780 #, c-format msgid "illegal combination of %s with other clauses" msgstr "неисправна комбинација %s са другим клаузулама" -#: cobc/parser.y:1641 +#: cobc/parser.y:1794 #, c-format msgid "entry following %s may not be subordinate to it" msgstr "унос који следи %s не може му бити подређен" -#: cobc/parser.y:1859 +#: cobc/parser.y:2042 +msgid "INITIAL specified on non-input field" +msgstr "INITIAL је наведено на пољу не-улаза" + +#: cobc/parser.y:2054 +msgid "relative LINE/COLUMN clause required with OCCURS" +msgstr "релативна LINE/COLUMN клаузула се захтева са OCCURS" + +#: cobc/parser.y:2072 msgid "FOR phrase cannot immediately follow ALL/LEADING/TRAILING" msgstr "FOR фраза не може одмах да следи ALL/LEADING/TRAILING" -#: cobc/parser.y:1861 +#: cobc/parser.y:2074 msgid "missing CHARACTERS/ALL/LEADING/TRAILING phrase after FOR phrase" msgstr "недостаје CHARACTERS/ALL/LEADING/TRAILING након FOR" -#: cobc/parser.y:1868 +#: cobc/parser.y:2081 msgid "missing value between ALL/LEADING/TRAILING words" msgstr "недостаје вредност између речи ALL/LEADING/TRAILING" -#: cobc/parser.y:1873 +#: cobc/parser.y:2086 msgid "missing FOR phrase before CHARACTERS/ALL/LEADING/TRAILING phrase" msgstr "недостаје FOR пре CHARACTERS/ALL/LEADING/TRAILING" -#: cobc/parser.y:1880 +#: cobc/parser.y:2093 msgid "missing ALL/LEADING/TRAILING before value" msgstr "недостаје ALL/LEADING/TRAILING пре вредности" -#: cobc/parser.y:1935 +#: cobc/parser.y:2138 msgid "use of condition-name in place of data-name" msgstr "коришћење „услов-назив“ уместо „датум-назив“" -#: cobc/parser.y:1966 +#: cobc/parser.y:2169 msgid "cannot specify NO ADVANCING in screen DISPLAY" msgstr "не можете навести NO ADVANCING у екрану DISPLAY" -#: cobc/parser.y:2029 cobc/parser.y:2046 +#: cobc/parser.y:2232 cobc/parser.y:2249 msgid "non-standard DISPLAY" msgstr "нестандардно DISPLAY" -#: cobc/parser.y:2033 +#: cobc/parser.y:2236 msgid "screens may only be displayed on CRT" msgstr "екрани могу бити приказани на CRT" -#: cobc/parser.y:2038 cobc/parser.y:2081 +#: cobc/parser.y:2241 cobc/parser.y:2284 msgid "cannot mix screens and fields in the same DISPLAY statement" msgstr "не можете мешати екране и поља у истој DISPLAY тврдњи" -#: cobc/parser.y:2042 +#: cobc/parser.y:2245 msgid "screen clauses may only be used for DISPLAY on CRT" msgstr "клаузула екрана се може користити само за DISPLAY на CRT" -#: cobc/parser.y:2087 +#: cobc/parser.y:2290 msgid "ambiguous DISPLAY; put items to display on device in separate DISPLAY" msgstr "нејасно DISPLAY; ставите ставке за приказ на уређају у одвојеном DISPLAY-у" -#: cobc/parser.y:2103 +#: cobc/parser.y:2301 #, c-format msgid "%s is not an alphanumeric literal" msgstr "%s није алфанумеричка словност" -#: cobc/parser.y:2105 +#: cobc/parser.y:2305 #, c-format msgid "'%s' is not USAGE DISPLAY" msgstr "„%s“ није USAGE DISPLAY" -#: cobc/parser.y:2120 cobc/typeck.c:9790 +#: cobc/parser.y:2322 cobc/parser.y:19534 +#, c-format +msgid "'%s' is not a field" +msgstr "„%s“ није поље" + +#: cobc/parser.y:2338 cobc/typeck.c:10231 #, c-format msgid "invalid target for %s" msgstr "неисправна мета за „%s“" -#: cobc/parser.y:2129 +#: cobc/parser.y:2347 msgid "RENAMES item may not be used here" msgstr "RENAMES ставка се не може користити овде" -#: cobc/parser.y:2131 cobc/typeck.c:2737 cobc/typeck.c:2828 +#: cobc/parser.y:2349 cobc/typeck.c:2822 cobc/typeck.c:2913 msgid "ANY LENGTH item not allowed here" msgstr "ANY LENGTH ставка није дозвољена овде" -#: cobc/parser.y:2135 +#: cobc/parser.y:2353 #, c-format msgid "item '%s' has wrong class for VALIDATE" msgstr "ставка „%s“ има погрешну класу за VALIDATE" -#: cobc/parser.y:2144 +#: cobc/parser.y:2362 msgid "WHEN clause must follow EVERY clause" msgstr "WHEN клаузула мора да прати EVERY клаузулу" -#: cobc/parser.y:2229 cobc/parser.y:18631 +#: cobc/parser.y:2447 cobc/parser.y:19251 msgid "non-zero value expected" msgstr "очекивана је ненулта вредност" -#: cobc/parser.y:2235 cobc/tree.c:4735 +#: cobc/parser.y:2453 cobc/tree.c:4803 #, c-format msgid "RECORD size (IDX) exceeds maximum allowed (%d)" msgstr "RECORD величина (IDX) премашује дозвољени максимум (%d)" -#: cobc/parser.y:2239 cobc/tree.c:4739 +#: cobc/parser.y:2457 cobc/tree.c:4807 #, c-format msgid "RECORD size exceeds maximum allowed (%d)" msgstr "RECORD величина премашује дозвољени максимум (%d)" -#: cobc/parser.y:2244 +#: cobc/parser.y:2462 msgid "RECORD clause invalid" msgstr "RECORD клаузула је неисправна" -#: cobc/parser.y:3368 +#: cobc/parser.y:3595 msgid "multiple PROGRAM-ID's without matching END PROGRAM" msgstr "више PROGRAM-ID-ова без поклапања са END PROGRAM" -#: cobc/parser.y:3371 +#: cobc/parser.y:3598 msgid "executable requested but no program found" msgstr "затражен је извршни али прогрма није нађен" -#: cobc/parser.y:3488 +#: cobc/parser.y:3717 msgid "prototypes must be come before any program/function definitions" msgstr "" -#: cobc/parser.y:3691 +#: cobc/parser.y:3930 msgid "COMMON may only be used in a contained program" msgstr "COMMON се може користити само у садржаном програму" -#: cobc/parser.y:3778 +#: cobc/parser.y:4017 msgid "CALL prototypes" msgstr "CALL протоврсте" -#: cobc/parser.y:3953 cobc/parser.y:4235 cobc/parser.y:4281 cobc/parser.y:4394 -#: cobc/parser.y:4608 cobc/parser.y:4705 cobc/parser.y:4744 cobc/parser.y:4803 -#: cobc/parser.y:4824 cobc/parser.y:4867 cobc/parser.y:4946 cobc/parser.y:4965 -#: cobc/parser.y:4981 cobc/parser.y:4999 cobc/parser.y:5017 cobc/parser.y:5034 -#: cobc/parser.y:5052 cobc/parser.y:7404 cobc/parser.y:8628 +#: cobc/parser.y:4192 cobc/parser.y:4471 cobc/parser.y:4517 cobc/parser.y:4632 +#: cobc/parser.y:4846 cobc/parser.y:4943 cobc/parser.y:4982 cobc/parser.y:5041 +#: cobc/parser.y:5062 cobc/parser.y:5105 cobc/parser.y:5184 cobc/parser.y:5203 +#: cobc/parser.y:5219 cobc/parser.y:5237 cobc/parser.y:5255 cobc/parser.y:5272 +#: cobc/parser.y:5290 cobc/parser.y:7685 cobc/parser.y:9028 #, c-format msgid "%s not allowed in nested programs" msgstr "%s није дозвољено у угнежденим програмима" -#: cobc/parser.y:4109 +#: cobc/parser.y:4345 msgid "segment-number must be in range of values 1 to 49" msgstr "број подеока мора бити у опсегу вредности од 1 до 49" -#: cobc/parser.y:4121 +#: cobc/parser.y:4357 msgid "duplicate CLASSIFICATION clause" msgstr "двострука CLASSIFICATION клаузула" -#: cobc/parser.y:4200 +#: cobc/parser.y:4436 msgid "PROGRAM phrase" msgstr "реч PROGRAM" -#: cobc/parser.y:4302 cobc/parser.y:4313 cobc/parser.y:4657 +#: cobc/parser.y:4538 cobc/parser.y:4549 cobc/parser.y:4895 #, c-format msgid "invalid %s clause" msgstr "неисправна %s клаузула" -#: cobc/parser.y:4616 cobc/parser.y:4754 +#: cobc/parser.y:4854 cobc/parser.y:4992 #, fuzzy #| msgid "literal type does not match numeric data type" msgid "type does not match alphabet" msgstr "врста словности не одговара врсти бројевних података" -#: cobc/parser.y:4760 +#: cobc/parser.y:4998 msgid "CLASS IS integer IN alphabet-name" msgstr "CLASS ЈЕ цео број У називу алфабета" -#: cobc/parser.y:4780 cobc/parser.y:4784 +#: cobc/parser.y:5018 cobc/parser.y:5022 msgid "CLASS literal with THRU must have size 1" msgstr "CLASS словност са THRU мора имати величину 1" -#: cobc/parser.y:4879 +#: cobc/parser.y:5117 msgid "separate currency symbol and currency string" msgstr "раздваја симбол валуте и ниску валуте" -#: cobc/parser.y:4912 +#: cobc/parser.y:5150 #, c-format msgid "invalid CURRENCY SIGN '%s'" msgstr "неисправан CURRENCY SIGN „%s“" -#: cobc/parser.y:5139 +#: cobc/parser.y:5377 msgid "cannot use RELATIVE KEY clause on INDEXED files" msgstr "не можете користити RELATIVE KEY клаузулу на INDEXED датотекама" -#: cobc/parser.y:5143 +#: cobc/parser.y:5381 msgid "cannot use RECORD KEY clause on RELATIVE files" msgstr "не можете користити RECORD KEY клаузулу на RELATIVE датотекама" -#: cobc/parser.y:5215 +#: cobc/parser.y:5453 msgid "EXTERNAL/DYNAMIC cannot be used with literals" msgstr "EXTERNAL/DYNAMIC се не може користити са дословностима" -#: cobc/parser.y:5235 +#: cobc/parser.y:5473 msgid "EXTERNAL/DYNAMIC cannot be used with USING/VARYING" msgstr "EXTERNAL/DYNAMIC се не може користити са USING/VARYING" -#: cobc/parser.y:5246 +#: cobc/parser.y:5484 msgid "EXTERNAL/DYNAMIC cannot be used with DISK FROM" msgstr "EXTERNAL/DYNAMIC се не може користити са DISK FROM" -#: cobc/parser.y:5248 -msgid "ASSIGN DISK FROM" -msgstr "ДОДЕЉУЈЕ ДИСК ИЗ" - -#: cobc/parser.y:5370 +#: cobc/parser.y:5608 msgid "ASSIGN EXTERNAL/DYNAMIC" msgstr "ДОДЕЉУЈЕ СПОЉНИ/ДИНАМИЧКИ" -#: cobc/parser.y:5486 cobc/parser.y:5666 +#: cobc/parser.y:5724 cobc/parser.y:5921 #, c-format msgid "%s only valid with ORGANIZATION %s" msgstr "%s је исправно само са ORGANIZATION %s" -#: cobc/parser.y:5583 +#: cobc/parser.y:5818 cobc/typeck.c:3818 #, c-format msgid "'%s' is not an alphabet-name" msgstr "„%s“ није назив алфабета" -#: cobc/parser.y:5599 +#: cobc/parser.y:5854 msgid "VSAM status" msgstr "VSAM стање" -#: cobc/parser.y:5733 cobc/parser.y:5758 +#: cobc/parser.y:5988 cobc/parser.y:6013 #, c-format msgid "RECORD DELIMITER %s only allowed with SEQUENTIAL files" msgstr "RECORD DELIMITER %s је дозвољено само са датотекама SEQUENTIAL" -#: cobc/parser.y:5745 +#: cobc/parser.y:6000 #, c-format msgid "RECORD DELIMITER %s only allowed with (LINE) SEQUENTIAL files" msgstr "RECORD DELIMITER %s је дозвољено само са датотекама (LINE) SEQUENTIAL" -#: cobc/parser.y:5751 +#: cobc/parser.y:6006 msgid "LINE-SEQUENTIAL phrase" msgstr "реч LINE-SEQUENTIAL" -#: cobc/parser.y:5764 +#: cobc/parser.y:6019 msgid "BINARY-SEQUENTIAL phrase" msgstr "реч BINARY-SEQUENTIAL" -#: cobc/parser.y:5772 +#: cobc/parser.y:6027 msgid "RECORD DELIMITER clause only allowed with (LINE) SEQUENTIAL files" msgstr "RECORD DELIMITER клаузула је дозвољена само са датотекама (LINE) SEQUENTIAL" -#: cobc/parser.y:5776 +#: cobc/parser.y:6031 #, c-format msgid "RECORD DELIMITER %s not recognized; will be ignored" msgstr "RECORD DELIMITER %s није препознато; биће занемарено" -#: cobc/parser.y:5814 +#: cobc/parser.y:6069 msgid "DUPLICATES for primary keys" msgstr "DUPLICATES за примарне кључеве" -#: cobc/parser.y:6058 +#: cobc/parser.y:6313 msgid "DOS/VS APPLY phrase" msgstr "реч DOS/VS APPLY" -#: cobc/parser.y:6212 +#: cobc/parser.y:6467 msgid "RECORD description missing or invalid" msgstr "опис RECORD недостаје или је неисправно" -#: cobc/parser.y:6239 +#: cobc/parser.y:6494 #, c-format msgid "duplicate file description for %s" msgstr "удвостручени опис датотеке за %s" -#: cobc/parser.y:6288 cobc/parser.y:6893 cobc/parser.y:7389 cobc/parser.y:13485 -#: cobc/parser.y:16686 +#: cobc/parser.y:6543 cobc/parser.y:7170 cobc/parser.y:7670 cobc/parser.y:13913 +#: cobc/parser.y:17210 #, c-format msgid "%s is invalid in a user FUNCTION" msgstr "%s је неисправно у корисничкој FUNCTION" -#: cobc/parser.y:6326 cobc/parser.y:6336 +#: cobc/parser.y:6581 cobc/parser.y:6591 msgid "RECORD clause ignored for LINE SEQUENTIAL" msgstr "RECORD клаузула је занемарена за LINE SEQUENTIAL" -#: cobc/parser.y:6433 +#: cobc/parser.y:6688 msgid "LINAGE clause with wrong file type" msgstr "LINAGE клаузула је са погрешном врстом датотеке" -#: cobc/parser.y:6495 +#: cobc/parser.y:6750 msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgstr "RECORDING MODE U или S се може користити само са RECORD SEQUENTIAL датотекама" -#: cobc/parser.y:6532 +#: cobc/parser.y:6787 #, c-format msgid "ignoring CODE-SET '%s'" msgstr "занемарујем CODE-SET „%s“" -#: cobc/parser.y:6541 +#: cobc/parser.y:6796 msgid "CODE-SET clause invalid for file type" msgstr "CODE-SET клаузула је неисправна за врсту датотеке" -#: cobc/parser.y:6562 +#: cobc/parser.y:6817 msgid "REPORT clause with wrong file type" msgstr "REPORT клаузула је са погрешном врстом датотеке" -#: cobc/parser.y:6641 +#: cobc/parser.y:6899 msgid "CD record missing" msgstr "CD снимак недостаје" -#: cobc/parser.y:7091 +#: cobc/parser.y:7372 msgid "CONSTANT item not at 01 level" msgstr "CONSTANT ставка није на нивоу 01" -#: cobc/parser.y:7236 +#: cobc/parser.y:7517 msgid "REDEFINES clause not following entry-name" msgstr "REDEFINES клаузула не прати називе уноса" -#: cobc/parser.y:7309 cobc/parser.y:7339 cobc/parser.y:7381 cobc/parser.y:7470 -#: cobc/parser.y:8233 +#: cobc/parser.y:7590 cobc/parser.y:7620 cobc/parser.y:7662 cobc/parser.y:7751 +#: cobc/parser.y:8606 #, c-format msgid "%s only allowed at 01/77 level" msgstr "%s је дозвољено само на нивоу 01/77" -#: cobc/parser.y:7312 cobc/parser.y:7341 cobc/parser.y:7383 cobc/parser.y:8235 -#: cobc/parser.y:8587 cobc/parser.y:8609 +#: cobc/parser.y:7593 cobc/parser.y:7622 cobc/parser.y:7664 cobc/parser.y:8608 +#: cobc/parser.y:8987 cobc/parser.y:9009 #, c-format msgid "%s requires a data name" msgstr "%s захтева назив податка" -#: cobc/parser.y:7316 cobc/parser.y:7565 +#: cobc/parser.y:7597 cobc/parser.y:7846 #, c-format msgid "%s not allowed in %s" msgstr "%s није дозвољено у %s" -#: cobc/parser.y:7337 cobc/parser.y:7391 cobc/parser.y:8231 cobc/parser.y:8583 -#: cobc/parser.y:8607 +#: cobc/parser.y:7618 cobc/parser.y:7672 cobc/parser.y:8604 cobc/parser.y:8983 +#: cobc/parser.y:9007 #, c-format msgid "%s not allowed here" msgstr "%s није дозвољено овде" -#: cobc/parser.y:7528 +#: cobc/parser.y:7809 #, fuzzy, c-format #| msgid "%s FILE requires a FROM clause" msgid "%s requires DEPENDING clause" msgstr "%s FILE захтева FROM клаузулу" -#: cobc/parser.y:7544 +#: cobc/parser.y:7825 msgid "a locale-format PICTURE string must only consist of '9', '.', '+', 'Z' and the currency-sign" msgstr "ниска PICTURE формата језика мора садржати само „9“, „.“, „+“, „Z“ и знака валуте" -#: cobc/parser.y:7554 +#: cobc/parser.y:7835 msgid "DEPENDING clause needs either an OCCURS clause or a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7560 +#: cobc/parser.y:7841 msgid "only USAGE DISPLAY may specify a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7610 cobc/typeck.c:4752 +#: cobc/parser.y:7893 cobc/typeck.c:4916 #, c-format msgid "'%s' is not a locale-name" msgstr "„%s“ није назив језика" -#: cobc/parser.y:7656 +#: cobc/parser.y:7939 #, c-format msgid "'%s' is not a valid USAGE" msgstr "„%s“ није исправно USAGE" -#: cobc/parser.y:7661 +#: cobc/parser.y:7944 #, c-format msgid "unknown USAGE: %s" msgstr "непознато USAGE: %s" -#: cobc/parser.y:7808 +#: cobc/parser.y:8139 #, c-format msgid "unknown HANDLE type: %s" msgstr "непозната HANDLE врста: %s" -#: cobc/parser.y:8082 +#: cobc/parser.y:8347 +#, fuzzy, c-format +#| msgid "'%s' is not USAGE DISPLAY" +msgid "'%s' is not USAGE UTF-8" +msgstr "„%s“ није USAGE DISPLAY" + +#: cobc/parser.y:8448 msgid "INDEXED should follow ASCENDING/DESCENDING" msgstr "INDEXED треба да иде за ASCENDING/DESCENDING" -#: cobc/parser.y:8317 +#: cobc/parser.y:8658 cobc/parser.y:8660 +#, fuzzy, c-format +#| msgid "unexpected size: %d" +msgid "unexpected %s" +msgstr "неочекивана величина: %d" + +#: cobc/parser.y:8709 msgid "amount of entries in FROM and TO must match" msgstr "" -#: cobc/parser.y:8326 +#: cobc/parser.y:8718 #, c-format msgid "entry in FROM (%d) must be <= entry in TO (%d)" msgstr "" -#: cobc/parser.y:8585 +#: cobc/parser.y:8985 #, c-format msgid "%s only allowed at 01 level" msgstr "%s је дозвољено само на нивоу 01" -#: cobc/parser.y:8589 cobc/parser.y:8611 +#: cobc/parser.y:8989 cobc/parser.y:9011 #, c-format msgid "%s and %s combination not allowed" msgstr "%s и %s комбинација није дозвољена" -#: cobc/parser.y:8723 +#: cobc/parser.y:9127 msgid "GLOBAL is not allowed with RD" msgstr "GLOBAL није дозвољено са RD" -#: cobc/parser.y:9247 +#: cobc/parser.y:9650 #, fuzzy, c-format #| msgid "'%s' is not a valid USAGE" msgid "%s is not valid for VARYING" msgstr "„%s“ није исправно USAGE" -#: cobc/parser.y:9283 +#: cobc/parser.y:9686 #, fuzzy #| msgid "Nested OCCURS in report" msgid "LINE with OCCURS is not supported" msgstr "Угнеждено „OCCURS“ у извештају" -#: cobc/parser.y:9323 +#: cobc/parser.y:9726 msgid "PLUS is not recommended with LEFT, RIGHT or CENTER" msgstr "PLUS није препоручљиво са LEFT, RIGHT или CENTER" -#: cobc/parser.y:9325 +#: cobc/parser.y:9728 msgid "PLUS is not allowed with LEFT, RIGHT or CENTER" msgstr "PLUS није дозвољено са LEFT, RIGHT или CENTER" -#: cobc/parser.y:9363 +#: cobc/parser.y:9766 msgid "PLUS is ignored on first field of line" msgstr "PLUS је занемарено у првом пољу у реду" -#: cobc/parser.y:9394 +#: cobc/parser.y:9797 msgid "invalid COLUMN integer; must be > 0" msgstr "неисправан COLUMN цео број; мора бити > 0" -#: cobc/parser.y:9396 +#: cobc/parser.y:9799 msgid "COLUMN numbers should increase" msgstr "COLUMN бројеви треба да се повећавају" -#: cobc/parser.y:9492 cobc/parser.y:9547 -msgid "INITIAL specified on non-input field" -msgstr "INITIAL је наведено на пољу не-улаза" - -#: cobc/parser.y:9504 cobc/parser.y:9559 -msgid "relative LINE/COLUMN clause required with OCCURS" -msgstr "релативна LINE/COLUMN клаузула се захтева са OCCURS" - -#: cobc/parser.y:9661 cobc/parser.y:9665 +#: cobc/parser.y:9990 cobc/parser.y:9994 msgid "screen positions from data-item" msgstr "положаји екрана из ставке података" -#: cobc/parser.y:9821 +#: cobc/parser.y:10153 #, fuzzy, c-format #| msgid "missing definitions:" msgid "missing %s" msgstr "недостају дефиниције:" -#: cobc/parser.y:10508 +#: cobc/parser.y:10840 msgid "OCCURS screen items" msgstr "ставке OCCURS екрана" -#: cobc/parser.y:10520 +#: cobc/parser.y:10852 msgid "GLOBAL screen items" msgstr "ставке GLOBAL екрана" -#: cobc/parser.y:10571 +#: cobc/parser.y:10904 msgid "overriding convention specified in ENTRY-CONVENTION" msgstr "прескаче договор наведен у ENTRY-CONVENTION" -#: cobc/parser.y:10586 +#: cobc/parser.y:10917 msgid "executable program requested but PROCEDURE/ENTRY has USING clause" msgstr "извршни програм је затражен али PROCEDURE/ENTRY има USING клаузулу" -#: cobc/parser.y:10654 cobc/parser.y:10671 cobc/parser.y:12278 +#: cobc/parser.y:10987 cobc/parser.y:11004 cobc/parser.y:12667 #, c-format msgid "number of arguments exceeds maximum %d" msgstr "број аргумената превазилази максимум %d" -#: cobc/parser.y:10663 +#: cobc/parser.y:10996 msgid "CHAINING invalid in user FUNCTION" msgstr "CHAINING је неисправно у корисничкој FUNCTION" -#: cobc/parser.y:10699 +#: cobc/parser.y:11032 msgid "ANY LENGTH items may only be BY REFERENCE formal parameters" msgstr "ANY LENGTH ставке могу бити само по REFERENCE формалним параметрима" -#: cobc/parser.y:10716 cobc/parser.y:12337 cobc/parser.y:12350 +#: cobc/parser.y:11049 cobc/parser.y:12728 cobc/parser.y:12741 #, c-format msgid "%s not allowed in CHAINED programs" msgstr "%s није дозвољено у CHAINED програмима" -#: cobc/parser.y:10718 +#: cobc/parser.y:11051 msgid "parameters passed BY VALUE" msgstr "параметри које прослеђује BY VALUE" -#: cobc/parser.y:10733 cobc/parser.y:10742 cobc/parser.y:10750 -#: cobc/parser.y:10771 +#: cobc/parser.y:11066 cobc/parser.y:11075 cobc/parser.y:11083 +#: cobc/parser.y:11104 msgid "SIZE only allowed for BY VALUE items" msgstr "SIZE је дозвољена само за BY VALUE ставке" -#: cobc/parser.y:10773 cobc/parser.y:10798 +#: cobc/parser.y:11106 cobc/parser.y:11131 msgid "invalid value for SIZE" msgstr "неисправна вредност за SIZE" -#: cobc/parser.y:10813 +#: cobc/parser.y:11146 msgid "MEMORY SIZE phrase in CALL statement" msgstr "MEMORY SIZE фраза у CALL тврдњи" -#: cobc/parser.y:10825 +#: cobc/parser.y:11162 msgid "OPTIONAL only allowed for BY REFERENCE items" msgstr "OPTIONAL је дозвољено само за BY REFERENCE ставке" -#: cobc/parser.y:10837 +#: cobc/parser.y:11177 msgid "RETURNING clause is required for a FUNCTION" msgstr "RETURNING клаузула се захтева за FUNCTION" -#: cobc/parser.y:10843 +#: cobc/parser.y:11183 msgid "RETURNING clause cannot be OMITTED for main program" msgstr "RETURNING клаузула не може бити OMITTED за главни програм" -#: cobc/parser.y:10846 +#: cobc/parser.y:11186 msgid "RETURNING clause cannot be OMITTED for a FUNCTION" msgstr "RETURNING клаузула не може бити OMITTED за FUNCTION" -#: cobc/parser.y:10859 +#: cobc/parser.y:11199 msgid "RETURNING item is not defined in LINKAGE SECTION" msgstr "RETURNING ставка није дефинисана у LINKAGE SECTION" -#: cobc/parser.y:10861 +#: cobc/parser.y:11201 msgid "RETURNING item must have level 01" msgstr "RETURNING ставка мора имати ниво 01" -#: cobc/parser.y:10863 +#: cobc/parser.y:11203 msgid "RETURNING item should not have OCCURS" msgstr "RETURNING ставка не треба имати OCCURS" -#: cobc/parser.y:10867 +#: cobc/parser.y:11207 msgid "function RETURNING item may not be ANY LENGTH" msgstr "ставка функције RETURNING не може бити ANY LENGTH" -#: cobc/parser.y:11080 +#: cobc/parser.y:11421 #, c-format msgid "'%s' is not a statement" msgstr "„%s“ није тврдња" -#: cobc/parser.y:11083 +#: cobc/parser.y:11424 #, c-format msgid "unknown statement '%s'; it may exist in another dialect" msgstr "непозната тврдња „%s“; може постојати у другом дијалекту" -#: cobc/parser.y:11087 +#: cobc/parser.y:11428 #, c-format msgid "unknown statement '%s'" msgstr "непозната тврдња „%s“" -#: cobc/parser.y:11105 +#: cobc/parser.y:11446 msgid "SECTION segment-number must be less than or equal to 99" msgstr "SECTION број подеока мора бити мањи од 99 или исти" -#: cobc/parser.y:11108 +#: cobc/parser.y:11449 msgid "SECTION segment-number in DECLARATIVES must be less than 50" msgstr "SECTION број подеока у DECLARATIVES мора бити мањи од 50" -#: cobc/parser.y:11116 +#: cobc/parser.y:11457 msgid "SECTION segment within DECLARATIVES" msgstr "SECTION подеок унутар DECLARATIVES" -#: cobc/parser.y:11313 cobc/parser.y:11448 +#: cobc/parser.y:11667 cobc/parser.y:11806 msgid "non-standard ACCEPT" msgstr "нестандардно ACCEPT" -#: cobc/parser.y:11325 +#: cobc/parser.y:11679 msgid "PROMPT clause" msgstr "PROMPT клаузула" -#: cobc/parser.y:11329 +#: cobc/parser.y:11683 msgid "SIZE IS clause" msgstr "ВЕЛИЧИНА ЈЕ клаузула" -#: cobc/parser.y:11549 cobc/parser.y:11842 +#: cobc/parser.y:11907 cobc/parser.y:12226 msgid "TIME-OUT or BEFORE TIME clauses" msgstr "TIME-OUT или BEFORE TIME клаузуле" -#: cobc/parser.y:11575 cobc/parser.y:11591 cobc/parser.y:11606 +#: cobc/parser.y:11937 cobc/parser.y:11960 cobc/parser.y:11978 msgid "AT screen-location" msgstr "AT место екрана" -#: cobc/parser.y:11607 +#: cobc/parser.y:11979 msgid "LINE or COLUMN" msgstr "LINE или COLUMN" -#: cobc/parser.y:11972 +#: cobc/parser.y:12358 msgid "ALLOCATE CHARACTERS requires RETURNING clause" msgstr "ALLOCATE CHARACTERS захтева RETURNING клаузулу" -#: cobc/parser.y:11987 cobc/parser.y:13289 +#: cobc/parser.y:12373 #, c-format msgid "ignoring %s phrase" msgstr "занемарује %s реченицу" -#: cobc/parser.y:11989 +#: cobc/parser.y:12375 msgid "addressing mode should be either 24 or 31 bit" msgstr "режим адресирања треба бити или 24 или 31 бита" -#: cobc/parser.y:12061 +#: cobc/parser.y:12446 msgid "CALL to own PROGRAM-ID" msgstr "" -#: cobc/parser.y:12062 +#: cobc/parser.y:12447 #, fuzzy #| msgid "recursive program call - assuming RECURSIVE attribute" msgid "assuming RECURSIVE attribute" msgstr "дубински позив програма – подразумевам RECURSIVE атрибут" -#: cobc/parser.y:12082 +#: cobc/parser.y:12467 msgid "STATIC CALL convention ignored because of ON EXCEPTION" msgstr "STATIC CALL договор је занемарен због ON EXCEPTION" -#: cobc/parser.y:12091 +#: cobc/parser.y:12476 msgid "ON EXCEPTION ignored because of STATIC CALL" msgstr "ON EXCEPTION је занемарено због STATIC CALL" -#: cobc/parser.y:12205 cobc/typeck.c:13644 +#: cobc/parser.y:12594 cobc/typeck.c:14450 msgid "invalid mnemonic name" msgstr "неисправан назив мнемоника" -#: cobc/parser.y:12229 +#: cobc/parser.y:12618 msgid "id/literal ignored, using prototype name" msgstr "иб/словност је занемарено, користим назив прототипа" -#: cobc/parser.y:12235 +#: cobc/parser.y:12624 msgid "NESTED phrase is only valid with literal" msgstr "NESTED реч је исправна само са словношћу" -#: cobc/parser.y:12296 +#: cobc/parser.y:12685 #, fuzzy, c-format #| msgid "OMITTED only allowed when arguments are passed BY REFERENCE" msgid "%s only allowed when arguments are passed %s" msgstr "OMITTED је дозвољено само када су аргументи прослеђени BY REFERENCE" -#: cobc/parser.y:12385 +#: cobc/parser.y:12776 msgid "RETURNING item must have level 01 or 77" msgstr "RETURNING ставка мора имати ниво 01 или 77" -#: cobc/parser.y:12389 +#: cobc/parser.y:12780 msgid "RETURNING item must be a LINKAGE SECTION item or have BASED clause" msgstr "RETURNING ставка мора бити LINKAGE SECTION ставка или да има BASED клаузулу" -#: cobc/parser.y:12423 cobc/parser.y:17409 cobc/parser.y:17464 +#: cobc/parser.y:12814 cobc/parser.y:17937 cobc/parser.y:18000 msgid "NOT EXCEPTION before EXCEPTION" msgstr "NOT EXCEPTION пре EXCEPTION" -#: cobc/parser.y:13162 +#: cobc/parser.y:13572 #, c-format msgid "HANDLE must be a %s HANDLE" msgstr "HANDLE мора бити %s HANDLE" -#: cobc/parser.y:13174 +#: cobc/parser.y:13584 msgid "HANDLE must be a generic HANDLE" msgstr "HANDLE мора бити општа HANDLE" -#: cobc/parser.y:13251 +#: cobc/parser.y:13661 #, c-format msgid "HANDLE clause invalid for %s" msgstr "HANDLE клаузула је неисправна за %s" -#: cobc/parser.y:13483 cobc/parser.y:16876 +#: cobc/parser.y:13911 cobc/parser.y:17400 #, c-format msgid "%s is invalid in nested program" msgstr "%s је неисправно у угнежденом програму" -#: cobc/parser.y:13521 cobc/parser.y:13564 cobc/parser.y:13575 -#: cobc/parser.y:13586 +#: cobc/parser.y:13940 cobc/parser.y:13983 cobc/parser.y:13994 +#: cobc/parser.y:14005 #, c-format msgid "maximum evaluate depth exceeded (%d)" msgstr "највећа дубина процене је премашена (%d)" -#: cobc/parser.y:13627 cobc/parser.y:13637 +#: cobc/parser.y:14048 cobc/parser.y:14089 cobc/parser.y:14633 +#: cobc/parser.y:14644 cobc/parser.y:14653 cobc/parser.y:17959 +#: cobc/parser.y:17981 cobc/parser.y:18022 cobc/parser.y:18038 +#: cobc/parser.y:18078 cobc/parser.y:18095 cobc/parser.y:18132 +#: cobc/parser.y:18149 cobc/parser.y:18199 cobc/parser.y:18216 +#: cobc/parser.y:18252 cobc/parser.y:18269 cobc/parser.y:18310 +#: cobc/parser.y:18327 +#, fuzzy, c-format +#| msgid "IF without imperative statement" +msgid "%s without imperative statement" +msgstr "IF без императивне тврдње" + +#: cobc/parser.y:14056 cobc/parser.y:14066 msgid "WHEN without imperative statement" msgstr "WHEN без императивне тврдње" -#: cobc/parser.y:13655 cobc/parser.y:13665 +#: cobc/parser.y:14097 cobc/parser.y:14107 msgid "WHEN OTHER without imperative statement" msgstr "WHEN OTHER без императивне тврдње" -#: cobc/parser.y:13745 +#: cobc/parser.y:14191 msgid "invalid THROUGH usage" msgstr "неисправан THROUGH корисник" -#: cobc/parser.y:13909 +#: cobc/parser.y:14372 msgid "EXIT PROGRAM is not allowed within a USE GLOBAL procedure" msgstr "EXIT PROGRAM није дозвољено унутар USE GLOBAL процедуре" -#: cobc/parser.y:13913 +#: cobc/parser.y:14376 msgid "EXIT PROGRAM not allowed within a FUNCTION" msgstr "EXIT PROGRAM није дозвољено унутар FUNCTION" -#: cobc/parser.y:13927 +#: cobc/parser.y:14390 msgid "EXIT FUNCTION is not allowed within a USE GLOBAL procedure" msgstr "EXIT FUNCTION није дозвољено унутар USE GLOBAL процедуре" -#: cobc/parser.y:13931 +#: cobc/parser.y:14394 msgid "EXIT FUNCTION only allowed within a FUNCTION" msgstr "EXIT FUNCTION је дозвољено само унутар FUNCTION" -#: cobc/parser.y:13945 cobc/parser.y:13968 +#: cobc/parser.y:14408 cobc/parser.y:14431 msgid "EXIT PERFORM is only valid with inline PERFORM" msgstr "EXIT PERFORM је исправно само са унутарњим PERFORM" -#: cobc/parser.y:13990 +#: cobc/parser.y:14453 msgid "EXIT SECTION is only valid with an active SECTION" msgstr "EXIT SECTION је исправно само са радном SECTION" -#: cobc/parser.y:14011 +#: cobc/parser.y:14474 msgid "EXIT PARAGRAPH is only valid with an active PARAGRAPH" msgstr "EXIT PARAGRAPH је исправно само са радним PARAGRAPH" -#: cobc/parser.y:14034 +#: cobc/parser.y:14497 msgid "RETURNING/GIVING not allowed for non-returning runtime elements" msgstr "RETURNING/GIVING није дозвољено за невраћајуће елеемнте времена извршења" -#: cobc/parser.y:14166 +#: cobc/parser.y:14640 msgid "IF without imperative statement" msgstr "IF без императивне тврдње" -#: cobc/parser.y:14497 cobc/parser.y:14506 +#: cobc/parser.y:14983 cobc/parser.y:14992 msgid "single-character literal or data item expected" msgstr "" -#: cobc/parser.y:14524 +#: cobc/parser.y:15010 msgid "TALLYING clause is incomplete" msgstr "TALLYING клаузула је непотпуна" -#: cobc/parser.y:14640 +#: cobc/parser.y:15126 msgid "INSPECT missing ALL/FIRST/LEADING/TRAILING" msgstr "INSPECT-у недостаје ALL/FIRST/LEADING/TRAILING" -#: cobc/parser.y:14902 +#: cobc/parser.y:15390 msgid "LOCK clauses" msgstr "LOCK клаузула" -#: cobc/parser.y:15059 +#: cobc/parser.y:15547 msgid "inline PERFORM without imperative statement" msgstr "унутарње PERFORM без императивне тврдње" -#: cobc/parser.y:15180 cobc/parser.y:15188 cobc/parser.y:15196 +#: cobc/parser.y:15670 cobc/parser.y:15678 cobc/parser.y:15686 #, c-format msgid "PERFORM VARYING '%s' (line %d of %s) is not a numeric field" msgstr "PERFORM VARYING „%s“ (%d. ред од %s) није бројно поље" -#: cobc/parser.y:15212 +#: cobc/parser.y:15702 msgid "PERFORM VARYING without BY phrase" msgstr "PERFORM VARYING је без BY речи" -#: cobc/parser.y:15252 +#: cobc/parser.y:15742 #, c-format msgid "'%s' is not an object-reference" msgstr "„%s“ није упута објекта" -#: cobc/parser.y:15292 cobc/typeck.c:12295 cobc/typeck.c:13552 +#: cobc/parser.y:15782 cobc/typeck.c:13066 cobc/typeck.c:14358 msgid "LOCK clause invalid with file LOCK AUTOMATIC" msgstr "LOCK клаузула је неисправна са датотеком LOCK AUTOMATIC" -#: cobc/parser.y:15297 +#: cobc/parser.y:15787 msgid "KEY clause invalid with this file type" msgstr "KEY клаузула је неисправна са овом врстом датотеке" -#: cobc/parser.y:15302 cobc/typeck.c:12291 cobc/typeck.c:13548 +#: cobc/parser.y:15792 cobc/typeck.c:13062 cobc/typeck.c:14354 msgid "INVALID KEY clause invalid with this file type" msgstr "INVALID KEY клаузула је неисправна са овом врстом датотеке" -#: cobc/parser.y:15986 -msgid "file sort requires KEY phrase" -msgstr "ређање датотеке захтева KEY реч" +#: cobc/parser.y:16494 +#, fuzzy +#| msgid "table SORT requires KEY phrase" +msgid "MERGE requires KEY phrase" +msgstr "SORT табеле захтева KEY реч" + +#: cobc/parser.y:16498 +#, fuzzy +#| msgid "table SORT requires KEY phrase" +msgid "file SORT requires KEY phrase" +msgstr "SORT табеле захтева KEY реч" -#: cobc/parser.y:16010 +#: cobc/parser.y:16522 msgid "table SORT requires KEY phrase" msgstr "SORT табеле захтева KEY реч" -#: cobc/parser.y:16072 -msgid "file sort requires USING or INPUT PROCEDURE" +#: cobc/parser.y:16527 +#, fuzzy +#| msgid "%s must be an integer" +msgid "must be an SD filename" +msgstr "„%s“ мора бити цео број" + +#: cobc/parser.y:16585 +msgid "MERGE requires USING files" +msgstr "" + +#: cobc/parser.y:16587 +#, fuzzy +#| msgid "file sort requires USING or INPUT PROCEDURE" +msgid "file SORT requires USING or INPUT PROCEDURE" msgstr "ређање датотеке захтева USING или INPUT PROCEDURE" -#: cobc/parser.y:16079 +#: cobc/parser.y:16595 msgid "USING invalid with table SORT" msgstr "USING је неисправно са табелом SORT" -#: cobc/parser.y:16089 +#: cobc/parser.y:16605 msgid "INPUT PROCEDURE invalid with table SORT" msgstr "INPUT PROCEDURE је неисправно са табелом SORT" -#: cobc/parser.y:16091 +#: cobc/parser.y:16607 msgid "INPUT PROCEDURE invalid with MERGE" msgstr "INPUT PROCEDURE је неисправно са MERGE" -#: cobc/parser.y:16104 -msgid "file sort requires GIVING or OUTPUT PROCEDURE" +#: cobc/parser.y:16621 +#, fuzzy +#| msgid "file sort requires GIVING or OUTPUT PROCEDURE" +msgid "MERGE requires GIVING or OUTPUT PROCEDURE" +msgstr "ређање датотеке захтева GIVING или OUTPUT PROCEDURE" + +#: cobc/parser.y:16623 +#, fuzzy +#| msgid "file sort requires GIVING or OUTPUT PROCEDURE" +msgid "file SORT requires GIVING or OUTPUT PROCEDURE" msgstr "ређање датотеке захтева GIVING или OUTPUT PROCEDURE" -#: cobc/parser.y:16111 +#: cobc/parser.y:16631 msgid "GIVING invalid with table SORT" msgstr "GIVING је неисправно са табелом SORT" -#: cobc/parser.y:16121 +#: cobc/parser.y:16641 msgid "OUTPUT PROCEDURE invalid with table SORT" msgstr "OUTPUT PROCEDURE је неисправно са табелом SORT" -#: cobc/parser.y:16148 +#: cobc/parser.y:16668 msgid "SIZE/LENGTH invalid here" msgstr "SIZE/LENGTH је неисправно овде" -#: cobc/parser.y:16197 +#: cobc/parser.y:16717 msgid "NOT EQUAL condition not allowed on START statement" msgstr "NOT EQUAL услов није дозвољен на START тврдњи" -#: cobc/parser.y:16255 +#: cobc/parser.y:16776 #, c-format msgid "%s is replaced by %s" msgstr "%s је замењено са %s" -#: cobc/parser.y:16304 +#: cobc/parser.y:16825 msgid "STOP literal" msgstr "STOP словност" -#: cobc/parser.y:16308 +#: cobc/parser.y:16829 msgid "STOP identifier" msgstr "STOP одредник" -#: cobc/parser.y:16446 +#: cobc/parser.y:16969 msgid "SUPPRESS statement must be within DECLARATIVES" msgstr "SUPPRESS тврдња мора бит унутар DECLARATIVES" -#: cobc/parser.y:16520 -msgid "UNLOCK invalid for SORT files" +#: cobc/parser.y:17043 +#, fuzzy +#| msgid "UNLOCK invalid for SORT files" +msgid "UNLOCK invalid for SD files" msgstr "UNLOCK је неисправно за SORT датотеке" -#: cobc/parser.y:16656 cobc/parser.y:16736 +#: cobc/parser.y:17180 cobc/parser.y:17260 msgid "USE statement must be within DECLARATIVES" msgstr "USE тврдња мора бит унутар DECLARATIVES" -#: cobc/parser.y:16658 +#: cobc/parser.y:17182 msgid "SECTION header missing before USE statement" msgstr "SECTION заглавље недостаје пре USE тврдње" -#: cobc/parser.y:16738 +#: cobc/parser.y:17262 msgid "USE DEBUGGING not supported in contained program" msgstr "USE DEBUGGING није подржано у садржаном програму" -#: cobc/parser.y:16786 cobc/parser.y:16795 cobc/parser.y:16813 -#: cobc/parser.y:16849 cobc/typeck.c:4886 +#: cobc/parser.y:17310 cobc/parser.y:17319 cobc/parser.y:17337 +#: cobc/parser.y:17373 cobc/typeck.c:5050 #, c-format msgid "duplicate DEBUGGING target: '%s'" msgstr "удвостручена DEBUGGING мета: „%s“" -#: cobc/parser.y:16811 +#: cobc/parser.y:17335 msgid "constant item cannot be used here" msgstr "ставка константе се не може користити овде" -#: cobc/parser.y:16837 +#: cobc/parser.y:17361 msgid "duplicate USE DEBUGGING ON ALL PROCEDURES" msgstr "двоструко USE DEBUGGING ON ALL PROCEDURES" -#: cobc/parser.y:17089 +#: cobc/parser.y:17614 msgid "ENCODING clause must come before XML-DECLARATION" msgstr "ENCODING клаузула мора бити пре XML-DECLARATION" -#: cobc/parser.y:17091 +#: cobc/parser.y:17616 msgid "ENCODING clause must come before ATTRIBUTES" msgstr "ENCODING клаузула мора бити пре ATTRIBUTES" -#: cobc/parser.y:17094 +#: cobc/parser.y:17619 msgid "XML GENERATE ENCODING clause" msgstr "XML GENERATE ENCODING клаузула" -#: cobc/parser.y:17101 +#: cobc/parser.y:17626 msgid "XML-DECLARATION clause must come before ATTRIBUTES" msgstr "XML-DECLARATION клаузула мора бити пре ATTRIBUTES" -#: cobc/parser.y:17104 +#: cobc/parser.y:17629 msgid "XML GENERATE XML-DECLARATION clause" msgstr "XML GENERATE XML-DECLARATION клаузула" -#: cobc/parser.y:17110 +#: cobc/parser.y:17635 msgid "XML GENERATE WITH ATTRIBUTES clause" msgstr "XML GENERATE WITH ATTRIBUTES клаузула" -#: cobc/parser.y:17123 +#: cobc/parser.y:17648 msgid "XML GENERATE NAMESPACE clause" msgstr "XML GENERATE NAMESPACE клаузула" -#: cobc/parser.y:17147 +#: cobc/parser.y:17672 msgid "XML GENERATE NAME OF clause" msgstr "XML GENERATE NAME OF клаузула" -#: cobc/parser.y:17211 +#: cobc/parser.y:17736 msgid "XML GENERATE TYPE OF clause" msgstr "XML GENERATE TYPE OF клаузула" -#: cobc/parser.y:17252 +#: cobc/parser.y:17777 msgid "XML GENERATE SUPPRESS clause" msgstr "XML GENERATE SUPPRESS клаузула" -#: cobc/parser.y:17392 +#: cobc/parser.y:17920 #, fuzzy, c-format #| msgid "'%s' is not a locale name" msgid "'%s' is not a schema name" msgstr "„%s“ није назив језика" -#: cobc/parser.y:17510 +#: cobc/parser.y:18055 msgid "NOT SIZE ERROR before SIZE ERROR" msgstr "NOT SIZE ERROR пре SIZE ERROR" -#: cobc/parser.y:17556 +#: cobc/parser.y:18109 msgid "NOT OVERFLOW before OVERFLOW" msgstr "NOT OVERFLOW пре OVERFLOW" -#: cobc/parser.y:17655 +#: cobc/parser.y:18161 cobc/parser.y:18176 +#, fuzzy +#| msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" +msgid "NOT AT END before AT END" +msgstr "NOT AT END-OF-PAGE пре AT END-OF-PAGE" + +#: cobc/parser.y:18229 msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" msgstr "NOT AT END-OF-PAGE пре AT END-OF-PAGE" -#: cobc/parser.y:17705 +#: cobc/parser.y:18287 msgid "NOT INVALID KEY before INVALID KEY" msgstr "NOT INVALID KEY пре INVALID KEY" -#: cobc/parser.y:18048 +#: cobc/parser.y:18644 msgid "LINAGE-COUNTER must be qualified here" msgstr "LINAGE-COUNTER мора бити квалификовано овде" -#: cobc/parser.y:18051 +#: cobc/parser.y:18647 msgid "invalid LINAGE-COUNTER usage" msgstr "неисправно LINAGE-COUNTER коришћење" -#: cobc/parser.y:18062 cobc/parser.y:18158 cobc/parser.y:18247 +#: cobc/parser.y:18658 cobc/parser.y:18754 cobc/parser.y:18843 #, c-format msgid "'%s' is not a file name" msgstr "„%s“ није назив датотеке" -#: cobc/parser.y:18072 +#: cobc/parser.y:18668 msgid "LINE-COUNTER must be qualified here" msgstr "LINE-COUNTER мора бити квалификовано овде" -#: cobc/parser.y:18076 +#: cobc/parser.y:18672 msgid "invalid LINE-COUNTER usage" msgstr "неисправно LINE-COUNTER коришћење" -#: cobc/parser.y:18087 cobc/parser.y:18112 +#: cobc/parser.y:18683 cobc/parser.y:18708 #, c-format msgid "'%s' is not a report name" msgstr "„%s“ није назив извештаја" -#: cobc/parser.y:18097 +#: cobc/parser.y:18693 msgid "PAGE-COUNTER must be qualified here" msgstr "PAGE-COUNTER мора бити квалификовано овде" -#: cobc/parser.y:18101 +#: cobc/parser.y:18697 msgid "invalid PAGE-COUNTER usage" msgstr "неисправно PAGE-COUNTER коришћење" -#: cobc/parser.y:18148 cobc/typeck.c:12256 cobc/typeck.c:12339 -#: cobc/typeck.c:13516 +#: cobc/parser.y:18744 cobc/typeck.c:13027 cobc/typeck.c:13110 +#: cobc/typeck.c:14322 #, c-format msgid "%s requires a record name as subject" msgstr "%s захтева назив записа као субјекат" -#: cobc/parser.y:18175 +#: cobc/parser.y:18771 #, c-format msgid "'%s' not indexed" msgstr "„%s“ није индексирано" -#: cobc/parser.y:18180 +#: cobc/parser.y:18776 #, fuzzy #| msgid "table SORT requires KEY phrase" msgid "SEARCH ALL requires KEY phrase" msgstr "SORT табеле захтева KEY реч" -#: cobc/parser.y:18204 cobc/parser.y:18229 +#: cobc/parser.y:18800 cobc/parser.y:18825 #, c-format msgid "multiple reference to '%s' " msgstr "вишеструка упута на „%s“ " -#: cobc/parser.y:18259 +#: cobc/parser.y:18855 #, c-format msgid "'%s' is not a CD name" msgstr "„%s“ није CD назив" -#: cobc/parser.y:18273 +#: cobc/parser.y:18869 #, c-format msgid "'%s' is not a valid report name" msgstr "„%s“ није исправан назив извештаја" -#: cobc/parser.y:18526 +#: cobc/parser.y:19134 msgid "invalid mnemonic identifier" msgstr "неисправан одредник мнемоника" -#: cobc/parser.y:18606 +#: cobc/parser.y:19214 +#, fuzzy +#| msgid "a numeric literal is expected here" +msgid "an alphanumeric literal is expected here" +msgstr "бројевна словност је очекивана овде" + +#: cobc/parser.y:19226 msgid "a numeric literal is expected here" msgstr "бројевна словност је очекивана овде" -#: cobc/parser.y:18618 cobc/parser.y:19366 +#: cobc/parser.y:19238 cobc/parser.y:19979 msgid "a non-numeric literal is expected here" msgstr "не бројевна словност је очекивана овде" -#: cobc/parser.y:18784 cobc/typeck.c:7302 cobc/typeck.c:7309 +#: cobc/parser.y:19404 cobc/typeck.c:993 cobc/typeck.c:4825 cobc/typeck.c:7679 +#: cobc/typeck.c:7686 #, c-format msgid "'%s' is not numeric" msgstr "„%s“ није број" -#: cobc/parser.y:18800 +#: cobc/parser.y:19420 #, c-format msgid "'%s' is not a field or file" msgstr "„%s“ није поље или датотека" -#: cobc/parser.y:18820 cobc/parser.y:18859 cobc/parser.y:18935 -#, c-format -msgid "'%s' is not a field" -msgstr "„%s“ није поље" - -#: cobc/parser.y:18841 +#: cobc/parser.y:19446 #, c-format msgid "'%s' is not a type-name" msgstr "„%s“ није назив врсте" -#: cobc/parser.y:18927 cobc/typeck.c:2328 cobc/typeck.c:2407 +#: cobc/parser.y:19526 cobc/typeck.c:2345 cobc/typeck.c:2401 cobc/typeck.c:2550 #, c-format msgid "'%s' cannot be reference modified" msgstr "„%s“ не може бити измењена упута" -#: cobc/parser.y:19015 +#: cobc/parser.y:19627 #, c-format msgid "'%s' is not a field or alphabet" msgstr "„%s“ није поље или алфабет" -#: cobc/parser.y:19041 +#: cobc/parser.y:19653 msgid "a subscripted data-item cannot be used here" msgstr "подскриптована ставка података се не може користити овде" -#: cobc/parser.y:19089 +#: cobc/parser.y:19701 msgid "unsigned integer value expected" msgstr "очекивана је вредност целог броја без знака" -#: cobc/parser.y:19101 cobc/parser.y:19105 cobc/parser.y:19155 +#: cobc/parser.y:19713 cobc/parser.y:19717 cobc/parser.y:19767 msgid "integer value expected" msgstr "очекивана је вредност целог броја" -#: cobc/parser.y:19110 +#: cobc/parser.y:19722 msgid "invalid symbolic integer" msgstr "неисправан симболички цео број" -#: cobc/parser.y:19126 cobc/parser.y:19130 +#: cobc/parser.y:19738 cobc/parser.y:19742 msgid "unsigned positive integer value expected" msgstr "очекивана је вредност позитивног целог броја без знака" -#: cobc/parser.y:19159 -msgid "invalid CLASS value" -msgstr "неисправна CLASS вредност" +#: cobc/parser.y:19772 +#, c-format +msgid "CLASS value %d outside of range for the used character set" +msgstr "" -#: cobc/parser.y:19246 +#: cobc/parser.y:19859 msgid "PHYSICAL argument for LENGTH functions" msgstr "PHYSICAL аргумент за LENGTH функције" -#: cobc/parser.y:19418 cobc/parser.y:19435 +#: cobc/parser.y:20031 cobc/parser.y:20048 msgid "cannot specify offset and SYSTEM-OFFSET at the same time" msgstr "не можете навести померај и SYSTEM-OFFSET у исто време" -#: cobc/parser.y:19702 cobc/parser.y:19711 cobc/parser.y:19721 -#: cobc/parser.y:19731 cobc/parser.y:19751 cobc/parser.y:19771 -#: cobc/parser.y:19777 +#: cobc/parser.y:20228 +msgid "terminator" +msgstr "" + +#: cobc/parser.y:20317 cobc/parser.y:20327 cobc/parser.y:20338 +#: cobc/parser.y:20348 cobc/parser.y:20369 cobc/parser.y:20389 +#: cobc/parser.y:20396 msgid "optional period" msgstr "" -#: cobc/pplex.l:257 cobc/pplex.l:2219 cobc/pplex.l:2233 +#: cobc/pplex.l:261 cobc/pplex.l:2448 cobc/pplex.l:2462 msgid "debugging indicator" msgstr "указивач прочишћавања" -#: cobc/pplex.l:334 +#: cobc/pplex.l:348 msgid "ignoring empty directive" msgstr "занемарујем празну смерницу" -#: cobc/pplex.l:344 cobc/pplex.l:411 +#: cobc/pplex.l:358 cobc/pplex.l:431 #, c-format msgid "ignoring invalid directive: '%s'" msgstr "занемарујем неисправну смерницу: „%s“" -#: cobc/pplex.l:351 +#: cobc/pplex.l:365 msgid "ignoring invalid directive" msgstr "занемарујем неисправну смерницу" -#: cobc/pplex.l:358 +#: cobc/pplex.l:372 msgid "VCS directive" msgstr "VCS смерница" -#: cobc/pplex.l:420 cobc/pplex.l:441 +#: cobc/pplex.l:440 cobc/pplex.l:461 #, c-format msgid "ignoring unknown directive: '%s'" msgstr "занемарујем непознату смерницу: „%s“" -#: cobc/pplex.l:1065 +#: cobc/pplex.l:1164 msgid "IF/ELIF/ELSE directive without matching END-IF" msgstr "IF/ELIF/ELSE смерница без одговарајућег END-IF" -#: cobc/pplex.l:1409 +#: cobc/pplex.l:1332 +msgid "free format detected" +msgstr "" + +#: cobc/pplex.l:1608 #, c-format msgid "copybook not found in library '%s', library-name ignored" msgstr "„copybook“ нисам нашао у библиотеци „%s“, „library-name“ је занемарено" -#: cobc/pplex.l:1469 +#: cobc/pplex.l:1667 #, fuzzy, c-format #| msgid "ignoring invalid directive: '%s'" msgid "ignoring %s directive because of %s" msgstr "занемарујем неисправну смерницу: „%s“" -#: cobc/pplex.l:1645 +#: cobc/pplex.l:1854 #, c-format msgid "directive nest depth exceeded: %d" msgstr "премашена је дубина гнезда смернице: %d" -#: cobc/pplex.l:1663 +#: cobc/pplex.l:1872 msgid "ELSE directive without matching IF/ELIF" msgstr "ELSE смерница без одговарајућег IF/ELIF" -#: cobc/pplex.l:1679 +#: cobc/pplex.l:1888 msgid "END-IF directive without matching IF/ELIF/ELSE" msgstr "END-IF смерница без одговарајућег IF/ELIF/ELSE" -#: cobc/pplex.l:1695 +#: cobc/pplex.l:1904 msgid "ELIF directive without matching IF/ELIF" msgstr "ELIF смерница без одговарајућег IF/ELIF" -#: cobc/pplex.l:1717 +#: cobc/pplex.l:1926 #, c-format msgid "invalid internal case: %u" msgstr "неисправно унутрашње слово: %u" -#: cobc/pplex.l:1914 +#: cobc/pplex.l:2139 msgid "buffer overrun - too many continuation lines" msgstr "прекорачење међумеморије – превише редова настављања" -#: cobc/pplex.l:2009 cobc/pplex.l:2019 +#: cobc/pplex.l:2236 cobc/pplex.l:2246 msgid "line not terminated by a newline" msgstr "ред није окончан новим редом" -#: cobc/pplex.l:2013 cobc/pplex.l:2023 +#: cobc/pplex.l:2240 cobc/pplex.l:2250 #, c-format msgid "source text exceeds %d bytes, will be truncated" msgstr "изворни текст премашује %d бајта, биће скраћен" -#: cobc/pplex.l:2042 +#: cobc/pplex.l:2269 msgid "version control conflict marker in file" msgstr "контрола издања се сукобљава са маркером у датотеци" -#: cobc/pplex.l:2194 +#: cobc/pplex.l:2423 msgid "invalid continuation in comment entry" msgstr "неисправно настављање у уносу напомене" -#: cobc/pplex.l:2241 +#: cobc/pplex.l:2470 #, fuzzy, c-format #| msgid "invalid indicator '%c' at column 7" msgid "invalid indicator '\\' at column %d" msgstr "неисправан указивач '%c' у 7. ступцу" -#: cobc/pplex.l:2253 +#: cobc/pplex.l:2482 #, fuzzy, c-format #| msgid "invalid indicator '%c' at column 7" msgid "invalid indicator '%c' at column %d" msgstr "неисправан указивач '%c' у 7. ступцу" -#: cobc/pplex.l:2312 cobc/pplex.l:2323 +#: cobc/pplex.l:2541 cobc/pplex.l:2552 msgid "invalid line continuation" msgstr "неисправно настављање реда" -#: cobc/pplex.l:2331 +#: cobc/pplex.l:2560 msgid "continuation character expected" msgstr "знак настављања је очекиван" -#: cobc/pplex.l:2399 +#: cobc/pplex.l:2628 #, c-format msgid "source text after program-text area (column %d)" msgstr "текст извора након области програмског текста (%d. стубац)" -#: cobc/ppparse.y:107 +#: cobc/ppparse.y:102 cobc/ppparse.y:106 +#, fuzzy +#| msgid "zero-length literal" +msgid "partial replacing with literal" +msgstr "словност нулте дужине" + +#: cobc/ppparse.y:109 msgid "unexpected COBOL word in partial replacement phrase" msgstr "" -#: cobc/ppparse.y:256 +#: cobc/ppparse.y:176 +#, fuzzy +#| msgid "invalid national literal" +msgid "invalid partial replacing operand" +msgstr "неисправна национална словност" + +#: cobc/ppparse.y:291 msgid "directive comparison on different types" msgstr "поређење смернице на различитим врстама" -#: cobc/ppparse.y:324 +#: cobc/ppparse.y:359 #, c-format msgid "duplicate DEFINE directive '%s'" msgstr "удвостручена DEFINE смерница „%s“" -#: cobc/ppparse.y:331 cobc/ppparse.y:341 +#: cobc/ppparse.y:366 cobc/ppparse.y:376 #, fuzzy, c-format #| msgid "invalid constant in DEFINE directive" msgid "invalid constant %s in DEFINE directive" msgstr "неисправна константа у DEFINE смерници" -#: cobc/ppparse.y:439 +#: cobc/ppparse.y:474 #, c-format msgid "compiler flag '%s' unknown" msgstr "заставица преводиоца „%s“ није позната" -#: cobc/ppparse.y:486 +#: cobc/ppparse.y:521 #, c-format msgid "invalid %s directive option '%s'" msgstr "неисправна %s смернице опција „%s“" -#: cobc/ppparse.y:488 +#: cobc/ppparse.y:523 #, c-format msgid "invalid %s directive option" msgstr "неисправна опција смернице „%s“" -#: cobc/ppparse.y:839 cobc/ppparse.y:848 cobc/ppparse.y:1258 +#: cobc/ppparse.y:875 cobc/ppparse.y:884 cobc/ppparse.y:1294 #, c-format msgid "invalid %s directive" msgstr "неисправна %s смерница" -#: cobc/ppparse.y:1330 +#: cobc/ppparse.y:1366 msgid "LEAP-SECOND ON directive" msgstr "LEAP-SECOND ON смерница" -#: cobc/ppparse.y:1439 cobc/ppparse.y:1471 +#: cobc/ppparse.y:1475 cobc/ppparse.y:1507 msgid "invalid constant" msgstr "неисправна константа" -#: cobc/reserved.c:4012 +#: cobc/reserved.c:4029 msgid "device name" msgstr "назив уређаја" -#: cobc/reserved.c:4015 +#: cobc/reserved.c:4032 msgid "switch name" msgstr "назив прекидача" -#: cobc/reserved.c:4018 +#: cobc/reserved.c:4035 msgid "feature name" msgstr "назив склопа" -#: cobc/reserved.c:4129 +#: cobc/reserved.c:4146 #, fuzzy, c-format #| msgid "reserved word must have less than %d characters" msgid "reserved word (%s) must have less than %d characters" msgstr "резервисана реч мора имати мање од %d знака" -#: cobc/reserved.c:4149 +#: cobc/reserved.c:4166 #, fuzzy, c-format #| msgid "should not contain '%c'" msgid "reserved word (%s) may not contain '%c'" msgstr "не треба да садржи '%c'" -#: cobc/reserved.c:4166 +#: cobc/reserved.c:4183 msgid "ignored asterisk at end of alias target" msgstr "занемарена звездица на крају мете алијаса" -#: cobc/reserved.c:4229 +#: cobc/reserved.c:4248 #, c-format msgid "alias target '%s' is not a default reserved word" msgstr "мета алијаса „%s“ није основна резервисана реч" -#: cobc/reserved.c:4719 +#: cobc/reserved.c:4738 #, c-format msgid "invalid system-name '%s'" msgstr "неисправан назив система „%s“" -#: cobc/reserved.c:4883 +#: cobc/reserved.c:4902 #, c-format msgid "'%s' is a reserved word, but isn't supported" msgstr "„%s“ је резервисана реч, али није подржана" -#: cobc/reserved.c:4988 +#: cobc/reserved.c:5005 #, c-format msgid "intrinsic function %s is unknown" msgstr "суштинска функција %s је непозната" -#: cobc/reserved.c:5016 +#: cobc/reserved.c:5033 msgid "Intrinsic Function" msgstr "Суштинска функција" -#: cobc/reserved.c:5016 cobc/reserved.c:5249 cobc/reserved.c:5386 +#: cobc/reserved.c:5033 cobc/reserved.c:5266 cobc/reserved.c:5403 msgid "Implemented" msgstr "Примењено" -#: cobc/reserved.c:5016 cobc/typeck.c:1163 +#: cobc/reserved.c:5033 cobc/typeck.c:1178 msgid "Parameters" msgstr "Параметри" -#: cobc/reserved.c:5020 cobc/reserved.c:5253 cobc/reserved.c:5400 -#: cobc/reserved.c:5406 +#: cobc/reserved.c:5037 cobc/reserved.c:5270 cobc/reserved.c:5417 +#: cobc/reserved.c:5423 msgid "Yes" msgstr "Да" -#: cobc/reserved.c:5023 cobc/reserved.c:5256 cobc/reserved.c:5410 +#: cobc/reserved.c:5040 cobc/reserved.c:5273 cobc/reserved.c:5427 msgid "No" msgstr "Не" -#: cobc/reserved.c:5029 +#: cobc/reserved.c:5046 msgid "Unlimited" msgstr "Неограничено" -#: cobc/reserved.c:5046 +#: cobc/reserved.c:5063 msgid "Exception Name" msgstr "" -#: cobc/reserved.c:5148 +#: cobc/reserved.c:5165 #, fuzzy, c-format #| msgid "special register %s is unknown, needs a definition" msgid "special register '%s' is unknown, needs a definition" msgstr "издвојени регистар %s је непознат, треба му дефиниција" -#: cobc/reserved.c:5155 +#: cobc/reserved.c:5172 #, fuzzy, c-format #| msgid "special register %s is unknown, needs a definition" msgid "special register '%s' has a bad definition: %s" msgstr "издвојени регистар %s је непознат, треба му дефиниција" -#: cobc/reserved.c:5159 +#: cobc/reserved.c:5176 #, fuzzy, c-format #| msgid "special register %s is unknown" msgid "special register '%s' is unknown" msgstr "издвојени регистар %s је непознат" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Internal registers" msgstr "Унутрашњи регистри" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Definition" msgstr "Одредница" -#: cobc/reserved.c:5337 +#: cobc/reserved.c:5354 #, c-format msgid "unknown system-name '%s'" msgstr "непознат назив система „%s“" -#: cobc/reserved.c:5363 +#: cobc/reserved.c:5380 msgid "System names" msgstr "Називи система" -#: cobc/reserved.c:5386 +#: cobc/reserved.c:5403 msgid "Reserved Words" msgstr "Резервисане речи" -#: cobc/reserved.c:5398 +#: cobc/reserved.c:5415 msgid "Yes (Context sensitive)" msgstr "Да (Осетљиво на контекст)" -#: cobc/reserved.c:5408 +#: cobc/reserved.c:5425 msgid "No (Context sensitive)" msgstr "Не (Осетљиво на контекст)" -#: cobc/scanner.l:272 +#: cobc/scanner.l:281 #, fuzzy, c-format #| msgid "'%s' is not a default reserved word, so cannot be aliased" msgid "'%s' is not a reserved word, so cannot be removed" msgstr "„%s“ није основна резервисана реч, тако да не може имати алијас" -#: cobc/scanner.l:320 +#: cobc/scanner.l:329 msgid "separator period in Area A" msgstr "" -#: cobc/scanner.l:1067 +#: cobc/scanner.l:1096 #, c-format msgid "a constant may not be used here - '%s'" msgstr "константа се не може користити овде – „%s“" -#: cobc/scanner.l:1137 +#: cobc/scanner.l:1170 msgid "ignoring redundant ." msgstr "занемарујем поновљиву ." -#: cobc/scanner.l:1195 +#: cobc/scanner.l:1249 #, c-format msgid "invalid symbol '%s' - skipping word" msgstr "неисправан симбол „%s“ – прескачем реч" -#: cobc/scanner.l:1289 +#: cobc/scanner.l:1323 msgid "invalid national literal" msgstr "неисправна национална словност" -#: cobc/scanner.l:1293 cobc/tree.c:2800 +#: cobc/scanner.l:1327 cobc/tree.c:2822 #, c-format msgid "invalid literal: '%s'" msgstr "неисправна словност: „%s“" -#: cobc/scanner.l:1295 +#: cobc/scanner.l:1329 #, c-format msgid "invalid hexadecimal literal: '%s'" msgstr "неисправна хексадецимална словност: „%s“" -#: cobc/scanner.l:1297 cobc/tree.c:1779 +#: cobc/scanner.l:1331 cobc/tree.c:1803 #, c-format msgid "invalid numeric literal: '%s'" msgstr "неисправна бројевна словност: „%s“" -#: cobc/scanner.l:1299 +#: cobc/scanner.l:1333 #, c-format msgid "invalid floating-point literal: '%s'" msgstr "неисправна словност покретног зареза: „%s“" -#: cobc/scanner.l:1301 +#: cobc/scanner.l:1335 cobc/scanner.l:1337 #, c-format msgid "invalid %s literal: '%s'" msgstr "неисправна %s словност: „%s“" -#: cobc/scanner.l:1350 +#: cobc/scanner.l:1365 +#, fuzzy, c-format +#| msgid "parameter %d is not within range of %d" +msgid "character code %s out of encoding range %s" +msgstr "параметар %d није унутар опсега %d" + +#: cobc/scanner.l:1422 +msgid "extraneous separator ',' at end of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1435 +msgid "extraneous character ',' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1440 +#, fuzzy, c-format +#| msgid "invalid character '%c' in currency symbol" +msgid "invalid character '%c' in sequence of symbolic EBCDIC characters" +msgstr "неисправан знак „%c“ у симболу валуте" + +#: cobc/scanner.l:1470 #, fuzzy, c-format #| msgid "literal length exceeds %d characters" msgid "literal length exceeds %u characters" msgstr "дужина словности премашује %d знака" -#: cobc/scanner.l:1365 +#: cobc/scanner.l:1485 #, c-format msgid "missing terminating %c character" msgstr "недостаје завршни „%c“ знак" -#: cobc/scanner.l:1382 cobc/scanner.l:1444 cobc/scanner.l:1729 +#: cobc/scanner.l:1502 cobc/scanner.l:1569 cobc/scanner.l:1868 msgid "zero-length literal" msgstr "словност нулте дужине" -#: cobc/scanner.l:1385 +#: cobc/scanner.l:1505 msgid "national literal has zero length; a SPACE will be assumed" msgstr "национална словност има нулту дужину; SPACE ће се подразумети" -#: cobc/scanner.l:1386 +#: cobc/scanner.l:1506 msgid "alphanumeric literal has zero length; a SPACE will be assumed" msgstr "алфанумеричка словност има нулту дужину; SPACE ће се подразумети" -#: cobc/scanner.l:1412 cobc/scanner.l:1413 cobc/scanner.l:1417 -#: cobc/scanner.l:1494 +#: cobc/scanner.l:1519 +#, fuzzy +#| msgid "STOP literal" +msgid "UTF-8 literal" +msgstr "STOP словност" + +#: cobc/scanner.l:1536 cobc/scanner.l:1537 cobc/scanner.l:1541 +#: cobc/scanner.l:1624 msgid "national literal" msgstr "национална словност" -#: cobc/scanner.l:1416 +#: cobc/scanner.l:1540 msgid "national-character literal" msgstr "словност националног знака" -#: cobc/scanner.l:1447 +#: cobc/scanner.l:1571 msgid "hexadecimal literal has zero length; X'00' will be assumed" msgstr "хексадецимална словност има нулту дужину; X„00“ ће се подразумети" -#: cobc/scanner.l:1472 +#: cobc/scanner.l:1575 cobc/scanner.l:1601 msgid "hexadecimal-boolean literal" msgstr "хексадецимална-логичка словност" -#: cobc/scanner.l:1480 cobc/scanner.l:1499 cobc/scanner.l:1608 -#: cobc/scanner.l:1659 cobc/scanner.l:1754 cobc/scanner.l:1824 +#: cobc/scanner.l:1579 cobc/scanner.l:1619 +msgid "hexadecimal-national literal" +msgstr "хексадецимална-национална словност" + +#: cobc/scanner.l:1609 cobc/scanner.l:1629 cobc/scanner.l:1744 +#: cobc/scanner.l:1798 cobc/scanner.l:1893 cobc/scanner.l:1963 #, fuzzy, c-format #| msgid "literal length %d exceeds %d characters" msgid "literal length %lu exceeds %u characters" msgstr "дужина словности %d премашује %d знака" -#: cobc/scanner.l:1490 -msgid "hexadecimal-national literal" -msgstr "хексадецимална-национална словност" - -#: cobc/scanner.l:1521 cobc/scanner.l:1551 cobc/scanner.l:1674 -#: cobc/scanner.l:1771 cobc/scanner.l:1835 +#: cobc/scanner.l:1651 cobc/scanner.l:1680 cobc/scanner.l:1813 +#: cobc/scanner.l:1910 cobc/scanner.l:1974 #, c-format msgid "literal contains invalid character '%c'" msgstr "словност садржи неисправан знак '%c'" @@ -4276,69 +4492,67 @@ msgstr "словност садржи неисправан знак '%c'" # For consistent translation, here is the English text: # msgstr "you must give an even number of files to this command" # Please translate the English msgstr, not the msgid. -#: cobc/scanner.l:1573 +#: cobc/scanner.l:1704 #, c-format msgid "literal does not have an even number of digits" msgstr "словност нема паран број цифара" -#: cobc/scanner.l:1599 +#: cobc/scanner.l:1735 cobc/scanner.l:1788 #, c-format msgid "%s literals must contain at least one character" msgstr "%s словности морају садржати барем један знак" -#: cobc/scanner.l:1639 cobc/scanner.l:1739 cobc/scanner.l:1813 +#: cobc/scanner.l:1775 cobc/scanner.l:1878 cobc/scanner.l:1952 msgid "ACUCOBOL numeric literal" msgstr "ACUCOBOL бројевна словност" -#: cobc/scanner.l:1651 -msgid "H literals must contain at least one character" -msgstr "Н словности морају садржати барем један знак" - -#: cobc/scanner.l:1690 cobc/scanner.l:1783 cobc/scanner.l:1846 +#: cobc/scanner.l:1829 cobc/scanner.l:1922 cobc/scanner.l:1985 #, c-format msgid "literal exceeds limit %u" msgstr "словност премашује ограничење од %u" -#: cobc/scanner.l:1724 +#: cobc/scanner.l:1863 msgid "numeric boolean literal" msgstr "бројевна логичка словност" -#: cobc/scanner.l:1731 -msgid "Boolean literal has zero length; B'0' will be assumed" +#: cobc/scanner.l:1870 +#, fuzzy +#| msgid "Boolean literal has zero length; B'0' will be assumed" +msgid "boolean literal has zero length; B'0' will be assumed" msgstr "Логичка словност има нулту дужину; В„0“ ће се подразумети" -#: cobc/scanner.l:1807 +#: cobc/scanner.l:1946 msgid "HP COBOL octal literal" msgstr "HP COBOL октална словност" -#: cobc/scanner.l:1921 +#: cobc/scanner.l:2059 #, fuzzy, c-format #| msgid "literal length %d exceeds maximum of %d digits" msgid "literal length %lu exceeds maximum of %u digits" msgstr "дужина словности од %d премашује максимум од %d цифре" -#: cobc/scanner.l:1927 +#: cobc/scanner.l:2065 #, fuzzy, c-format #| msgid "literal length %d exceeds %d digits" msgid "literal length %lu exceeds %u digits" msgstr "дужина словности од %d премашује %d цифре" -#: cobc/scanner.l:2039 cobc/tree.c:3845 +#: cobc/scanner.l:2177 cobc/tree.c:3888 #, c-format msgid "significand has more than %d digits" msgstr "значајник има више од %d цифре" -#: cobc/scanner.l:2044 +#: cobc/scanner.l:2182 #, c-format msgid "exponent has decimal point" msgstr "изложилац има децимални зарез" -#: cobc/scanner.l:2050 cobc/tree.c:3853 +#: cobc/scanner.l:2188 cobc/tree.c:3896 #, c-format msgid "exponent has more than 4 digits" msgstr "изложилац има више од 4 цифре" -#: cobc/scanner.l:2080 +#: cobc/scanner.l:2218 #, c-format msgid "exponent not between -6143 and 6144" msgstr "изложилац није између -6143 и 6144" @@ -4352,12 +4566,12 @@ msgstr "изложилац није између -6143 и 6144" # For consistent translation, here is the English text: # msgstr "the $name environment variable must be a positive decimal number" # Please translate the English msgstr, not the msgid. -#: cobc/scanner.l:2089 +#: cobc/scanner.l:2227 #, c-format msgid "significand of 0 must be positive" msgstr "значајник 0 мора бити позитиван" -#: cobc/scanner.l:2094 +#: cobc/scanner.l:2232 #, c-format msgid "exponent of 0 must be 0" msgstr "изложилац 0 мора бити 0" @@ -4371,792 +4585,776 @@ msgstr "изложилац 0 мора бити 0" # For consistent translation, here is the English text: # msgstr "the $name environment variable must be a positive decimal number" # Please translate the English msgstr, not the msgid. -#: cobc/scanner.l:2099 +#: cobc/scanner.l:2237 #, c-format msgid "exponent of 0 must be positive" msgstr "изложилац 0 мора бити позитиван" -#: cobc/scanner.l:2261 +#: cobc/scanner.l:2399 #, c-format msgid "invalid CONSTANT: %s" msgstr "неисправна CONSTANT: %s" -#: cobc/scanner.l:2271 +#: cobc/scanner.l:2409 #, c-format msgid "invalid alphanumeric CONSTANT: %s" msgstr "неисправна алфанумеричка CONSTANT: %s" -#: cobc/scanner.l:2275 +#: cobc/scanner.l:2413 #, c-format msgid "empty alphanumeric CONSTANT: %s" msgstr "празна алфанумеричка CONSTANT: %s" -#: cobc/scanner.l:2292 cobc/scanner.l:2300 cobc/scanner.l:2305 +#: cobc/scanner.l:2430 cobc/scanner.l:2438 cobc/scanner.l:2443 #, c-format msgid "invalid numeric CONSTANT: %s" msgstr "неисправна нумеричка CONSTANT: %s" -#: cobc/scanner.l:2384 cobc/scanner.l:2411 +#: cobc/scanner.l:2522 cobc/scanner.l:2549 #, c-format msgid "'%s' is not a default reserved word, so cannot be aliased" msgstr "„%s“ није основна резервисана реч, тако да не може имати алијас" -#: cobc/scanner.l:2387 +#: cobc/scanner.l:2525 #, fuzzy, c-format #| msgid "'%s' is already reserved; you may want MAKESYN instead" msgid "'%s' is already reserved" msgstr "„%s“ је већ резервисано; можете желети MAKESYN уместо тога" -#: cobc/scanner.l:2389 +#: cobc/scanner.l:2527 #, fuzzy #| msgid "'%s' is already reserved; you may want MAKESYN instead" msgid "you may want MAKESYN instead" msgstr "„%s“ је већ резервисано; можете желети MAKESYN уместо тога" -#: cobc/scanner.l:2414 +#: cobc/scanner.l:2552 #, fuzzy, c-format #| msgid "alias target '%s' is not a default reserved word" msgid "'%s' is not a reserved word" msgstr "мета алијаса „%s“ није основна резервисана реч" -#: cobc/scanner.l:2415 +#: cobc/scanner.l:2553 #, fuzzy #| msgid "'%s' is not a reserved word; you may want ADDSYN or OVERRIDE instead" msgid "you may want ADDSYN or OVERRIDE instead" msgstr "„%s“ није резервисана реч; можете желети ADDSYN или OVERRIDE уместо тога" -#: cobc/tree.c:391 +#: cobc/tree.c:392 #, c-format msgid "%s clause is required for file '%s'" msgstr "%s клаузула се захтева за датотеку „%s“" -#: cobc/tree.c:395 +#: cobc/tree.c:396 #, c-format msgid "%s clause is invalid for file '%s' (file type)" msgstr "%s клаузула је неисправна за датотеку „%s“ (врста датотеке)" -#: cobc/tree.c:399 +#: cobc/tree.c:400 #, c-format msgid "%s clause is invalid for file '%s'" msgstr "%s клаузула је неисправна за датотеку „%s“" -#: cobc/tree.c:426 +#: cobc/tree.c:427 #, c-format msgid "FOR item '%s' is a record" msgstr "FOR ставка „%s“ је запис" -#: cobc/tree.c:435 +#: cobc/tree.c:436 #, c-format msgid "FOR item '%s' is in different record to '%s'" msgstr "FOR ставка „%s“ је у другачијем запису од „%s“" -#: cobc/tree.c:444 +#: cobc/tree.c:445 #, c-format msgid "FOR item '%s' is not in a record associated with '%s'" msgstr "FOR ставка „%s“ није у запису удруженом са „%s“" -#: cobc/tree.c:558 +#: cobc/tree.c:559 msgid "internal error node" msgstr "унутрашња грешка чвора" -#: cobc/tree.c:560 +#: cobc/tree.c:561 msgid "unknown constant" msgstr "непозната константа" -#: cobc/tree.c:571 +#: cobc/tree.c:572 #, c-format msgid "literal \"%s\"" msgstr "словност „%s“" -#: cobc/tree.c:842 -#, c-format -msgid "FUNCTION %s has invalid/not supported arguments - tag %d" -msgstr "FUNCTION %s има неисправне/неподржане аргументе – ознака %d" - -#: cobc/tree.c:963 +#: cobc/tree.c:969 #, c-format msgid "invalid date/time function: '%d'" msgstr "неисправна функција датума/времена: %d" -#: cobc/tree.c:995 +#: cobc/tree.c:1001 #, c-format msgid "FUNCTION '%s' has invalid date/time format" msgstr "FUNCTION „%s“ има неисправан запис датума/времена" -#: cobc/tree.c:1002 +#: cobc/tree.c:1008 #, c-format msgid "FUNCTION '%s' has format in variable" msgstr "FUNCTION „%s“ има запис у променљивој" -#: cobc/tree.c:1482 +#: cobc/tree.c:1488 #, c-format msgid "unknown tree tag: %d, category: %d" msgstr "непозната ознака стабла: %d, категорија: %d" -#: cobc/tree.c:1577 +#: cobc/tree.c:1590 #, c-format msgid "unexpected numeric USAGE: %d" msgstr "неочекивано бројевно USAGE: %d" -#: cobc/tree.c:1591 +#: cobc/tree.c:1604 #, c-format msgid "unexpected category: %d" msgstr "неочекивана категорија: %d" -#: cobc/tree.c:1790 +#: cobc/tree.c:1814 #, c-format msgid "literal length %d exceeds maximum of %d digits" msgstr "дужина словности од %d премашује максимум од %d цифре" -#: cobc/tree.c:1795 +#: cobc/tree.c:1819 #, c-format msgid "literal length %d exceeds %d digits" msgstr "дужина словности од %d премашује %d цифре" -#: cobc/tree.c:1844 cobc/tree.c:1856 cobc/tree.c:1913 cobc/tree.c:1963 +#: cobc/tree.c:1868 cobc/tree.c:1880 cobc/tree.c:1937 cobc/tree.c:1987 #, c-format msgid "numeric literal '%s' exceeds limit '%s'" msgstr "бројевна словност „%s“ премашује ограничење „%s“" -#: cobc/tree.c:2655 +#: cobc/tree.c:2676 msgid "invalid LOCALE literal" msgstr "неисправна LOCALE словност" -#: cobc/tree.c:2782 +#: cobc/tree.c:2803 msgid "only literals with the same category can be concatenated" msgstr "само словности са истом категоријом могу бити надовезане" -#: cobc/tree.c:2789 -msgid "only alphanumeric, national or boolean literals may be concatenated" +#: cobc/tree.c:2811 +#, fuzzy +#| msgid "only alphanumeric, national or boolean literals may be concatenated" +msgid "only alphanumeric, utf-8, national or boolean literals may be concatenated" msgstr "само алфанумеричка, национална или логичка словност се могу надовезати" -#: cobc/tree.c:2801 +#: cobc/tree.c:2823 #, c-format msgid "literal length %d exceeds %d characters" msgstr "дужина словности %d премашује %d знака" -#: cobc/tree.c:3078 +#: cobc/tree.c:3103 msgid "B, 0 or /" msgstr "B, 0 или /" -#: cobc/tree.c:3092 +#: cobc/tree.c:3117 msgid "the sign of the floating-point exponent" msgstr "знак изложиоца покретног зареза" -#: cobc/tree.c:3094 +#: cobc/tree.c:3119 msgid "a leading +/- sign" msgstr "водећи +/- знак" -#: cobc/tree.c:3096 +#: cobc/tree.c:3121 msgid "a trailing +/- sign" msgstr "пратећи +/- знак" -#: cobc/tree.c:3098 +#: cobc/tree.c:3123 msgid "CR or DB" msgstr "CR или DB" -#: cobc/tree.c:3100 +#: cobc/tree.c:3125 msgid "a leading currency symbol" msgstr "водећи симбол валуте" -#: cobc/tree.c:3102 +#: cobc/tree.c:3127 msgid "a trailing currency symbol" msgstr "пратећи симбол валуте" -#: cobc/tree.c:3104 +#: cobc/tree.c:3129 msgid "a Z or * which is before the decimal point" msgstr "Z или * које је пре децималног зареза" -#: cobc/tree.c:3106 +#: cobc/tree.c:3131 msgid "a Z or * which is after the decimal point" msgstr "Z или * које је после децималног зареза" -#: cobc/tree.c:3108 +#: cobc/tree.c:3133 msgid "a floating +/- string which is before the decimal point" msgstr "покретна +/- ниска која је пре децималног зареза" -#: cobc/tree.c:3110 +#: cobc/tree.c:3135 msgid "a floating +/- string which is after the decimal point" msgstr "покретна +/- ниска која је после децималног зареза" -#: cobc/tree.c:3112 +#: cobc/tree.c:3137 msgid "a floating currency symbol string which is before the decimal point" msgstr "покретна ниска симбола валуте која је пре децималног зареза" -#: cobc/tree.c:3114 +#: cobc/tree.c:3139 msgid "a floating currency symbol string which is after the decimal point" msgstr "покретни симбол валуте која је после децималног зареза" -#: cobc/tree.c:3118 +#: cobc/tree.c:3143 msgid "A or X" msgstr "A или X" -#: cobc/tree.c:3126 +#: cobc/tree.c:3151 msgid "a P which is before the decimal point" msgstr "„P“ које је пре децималног зареза" -#: cobc/tree.c:3128 +#: cobc/tree.c:3153 msgid "a P which is after the decimal point" msgstr "„P“ које је после децималног зареза" -#: cobc/tree.c:3149 cobc/tree.c:3599 +#: cobc/tree.c:3176 cobc/tree.c:3638 #, c-format msgid "%s may only occur once in a PICTURE string" msgstr "%s се може појавити само једном у PICTURE нисци" -#: cobc/tree.c:3151 cobc/tree.c:3541 +#: cobc/tree.c:3178 cobc/tree.c:3570 #, c-format msgid "%s cannot follow %s" msgstr "%s не може да иде за %s" -#: cobc/tree.c:3154 +#: cobc/tree.c:3181 msgid "invalid PICTURE string detected" msgstr "откривена је неисправна PICTURE ниска" -#: cobc/tree.c:3271 +#: cobc/tree.c:3299 msgid "number or constant in parentheses is not an unsigned integer" msgstr "број или константа у загради није цео број без знака" -#: cobc/tree.c:3280 +#: cobc/tree.c:3308 #, fuzzy, c-format #| msgid "only up to 9 significant digits are permitted within parentheses" msgid "only up to %d significant digits are permitted within parentheses" msgstr "само до 9 значајних цифара је допуштено унутар заграде" -#: cobc/tree.c:3288 +#: cobc/tree.c:3316 msgid "number or constant in parentheses must be greater than zero" msgstr "број или константа у загради мора бити веће од нуле" -#: cobc/tree.c:3299 +#: cobc/tree.c:3327 msgid "parentheses must be preceded by a picture symbol" msgstr "загради мора претходити симбол слике" -#: cobc/tree.c:3329 +#: cobc/tree.c:3353 msgid "unbalanced parentheses" msgstr "неуравнотежене заграде" -#: cobc/tree.c:3337 +#: cobc/tree.c:3361 msgid "parentheses must contain an unsigned integer" msgstr "заграда мора да садржи цео број без знака" -#: cobc/tree.c:3375 +#: cobc/tree.c:3409 #, c-format msgid "'%s' is not a constant-name" msgstr "„%s“ није назив константе" -#: cobc/tree.c:3382 -#, c-format -msgid "'%s' is not a numeric literal" -msgstr "„%s“ није бројевна словност" - -#: cobc/tree.c:3386 -#, c-format -msgid "'%s' is not an integer" +#: cobc/tree.c:3422 +#, fuzzy, c-format +#| msgid "'%s' is not an integer" +msgid "'%s' is not an unsigned positive integer" msgstr "„%s“ није цео број" -#: cobc/tree.c:3390 -#, c-format -msgid "'%s' is not unsigned" -msgstr "„%s“ није без знака" - -#: cobc/tree.c:3450 +#: cobc/tree.c:3479 msgid "missing PICTURE string" msgstr "недостаје ниска PICTURE" -#: cobc/tree.c:3479 +#: cobc/tree.c:3508 msgid "C must be followed by R" msgstr "након C мора да следи R" -#: cobc/tree.c:3482 +#: cobc/tree.c:3511 msgid "D must be followed by B" msgstr "након D мора да следи B" -#: cobc/tree.c:3497 cobc/tree.c:3596 cobc/tree.c:3622 cobc/tree.c:3733 +#: cobc/tree.c:3526 cobc/tree.c:3635 cobc/tree.c:3661 cobc/tree.c:3773 msgid "uncommon parentheses" msgstr "неуобичајене мале заграде" -#: cobc/tree.c:3541 +#: cobc/tree.c:3570 msgid "exponent" msgstr "изложилац" -#: cobc/tree.c:3586 +#: cobc/tree.c:3625 #, fuzzy #| msgid "S must be at start of PICTURE string" msgid "L must be at start of PICTURE string" msgstr "S мора бити на почетку ниске PICTURE" -#: cobc/tree.c:3604 +#: cobc/tree.c:3643 msgid "S must be at start of PICTURE string" msgstr "S мора бити на почетку ниске PICTURE" -#: cobc/tree.c:3660 +#: cobc/tree.c:3699 msgid "P must be at start or end of PICTURE string" msgstr "P мора бити на почетку или крају ниске PICTURE" -#: cobc/tree.c:3690 +#: cobc/tree.c:3730 msgid "cannot have both Z and * in PICTURE string" msgstr "не можете имати и Z и * у нисци PICTURE" -#: cobc/tree.c:3768 +#: cobc/tree.c:3808 #, c-format msgid "invalid PICTURE character '%c'" msgstr "неисправан PICTURE знак '%c'" -#: cobc/tree.c:3798 +#: cobc/tree.c:3841 #, c-format msgid "PICTURE string may not contain more than %d characters; contains %d characters" msgstr "PICTURE ниска не може садржати више од %d знака; садржи %d знака" -#: cobc/tree.c:3803 -msgid "PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" +#: cobc/tree.c:3846 +#, fuzzy +#| msgid "PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" +msgid "PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" msgstr "PICTURE ниска мора да садржи барем један из скупа A, N, X, Z, 1, 9 и *; или барем два из скупа +, - и симбол валуте" -#: cobc/tree.c:3830 +#: cobc/tree.c:3873 #, c-format msgid "numeric field cannot be larger than %d digits" msgstr "бријно поље не може бити веће од %d цифара" -#: cobc/tree.c:4267 +#: cobc/tree.c:4333 #, fuzzy, c-format #| msgid "PICTURE clause required for '%s'" msgid "needs PICTURE clause for SUM %s" msgstr "PICTURE клаузула се захтева за „%s“" -#: cobc/tree.c:4274 +#: cobc/tree.c:4340 #, fuzzy, c-format #| msgid "PICTURE clause required for '%s'" msgid "non-numeric PICTURE clause for SUM %s" msgstr "PICTURE клаузула се захтева за „%s“" -#: cobc/tree.c:4346 cobc/tree.c:4359 +#: cobc/tree.c:4412 cobc/tree.c:4425 #, c-format msgid "no DETAIL line defined in report %s" msgstr "ниједан DETAIL ред није дефинисан у извештају „%s“" -#: cobc/tree.c:4361 +#: cobc/tree.c:4427 msgid "PAGE LIMIT FIRST DETAIL should be >= HEADING" msgstr "PAGE LIMIT FIRST DETAIL треба бити >= HEADING" -#: cobc/tree.c:4364 +#: cobc/tree.c:4430 msgid "PAGE LIMIT FOOTING should be >= HEADING" msgstr "PAGE LIMIT FOOTING треба бити >= HEADING" -#: cobc/tree.c:4366 +#: cobc/tree.c:4432 msgid "PAGE LIMIT LAST DETAIL should be >= FIRST DETAIL" msgstr "PAGE LIMIT LAST DETAIL треба бити >= FIRST DETAIL" -#: cobc/tree.c:4368 +#: cobc/tree.c:4434 msgid "PAGE LIMIT FOOTING should be >= LAST DETAIL" msgstr "PAGE LIMIT FOOTING треба бити >= LAST DETAIL" -#: cobc/tree.c:4370 +#: cobc/tree.c:4436 msgid "PAGE LIMIT LINES should be >= FOOTING" msgstr "PAGE LIMIT LINES треба бити >= FOOTING" -#: cobc/tree.c:4563 libcob/fileio.c:8999 +#: cobc/tree.c:4631 libcob/fileio.c:9358 #, c-format msgid "maximum keys (%d/%d) exceeded for file '%s'" msgstr "максимум кључева (%d/%d) је премашен за датотеку „%s“" -#: cobc/tree.c:4627 cobc/tree.c:4650 +#: cobc/tree.c:4695 cobc/tree.c:4718 #, c-format msgid "invalid KEY item '%s', not in file '%s'" msgstr "неисправна KEY ставка „%s“, није у датотеци „%s“" -#: cobc/tree.c:4661 +#: cobc/tree.c:4729 #, c-format msgid "minimal record length %d can not hold the key item '%s'; needs to be at least %d" msgstr "најмања дужина записа %d не може да држи ставку кључа „%s“; треба да буде барем %d" -#: cobc/tree.c:4696 +#: cobc/tree.c:4764 #, c-format msgid "missing file description for %s" msgstr "недостаје опис датотеке за „%s“" -#: cobc/tree.c:4745 +#: cobc/tree.c:4813 #, c-format msgid "size of record '%s' (%d) smaller than minimum of file '%s' (%d)" msgstr "величина записа „%s“ (%d) је мања од минимума датотеке „%s“ (%d)" -#: cobc/tree.c:4748 cobc/tree.c:4765 +#: cobc/tree.c:4816 cobc/tree.c:4833 msgid "file size adjusted" msgstr "величина датотеке је поправљена" -#: cobc/tree.c:4760 +#: cobc/tree.c:4828 #, c-format msgid "size of record '%s' (%d) larger than maximum of file '%s' (%d)" msgstr "величина записа „%s“ (%d) је већа од миксимума датотеке „%s“ (%d)" -#: cobc/tree.c:4793 +#: cobc/tree.c:4861 msgid "RECORD VARYING specified without limits, but implied limits are equal" msgstr "RECORD VARYING је наведено без ограничења, али су подразумевана ограничења једнака" -#: cobc/tree.c:4795 +#: cobc/tree.c:4863 #, c-format msgid "%s clause ignored" msgstr "„%s“ клаузула је занемарена" -#: cobc/tree.c:4890 cobc/typeck.c:7695 cobc/typeck.c:14389 cobc/typeck.c:14441 -#: cobc/typeck.c:14477 libcob/fileio.c:4598 libcob/screenio.c:3720 -#: libcob/screenio.c:3750 +#: cobc/tree.c:4958 cobc/typeck.c:8128 cobc/typeck.c:15186 cobc/typeck.c:15238 +#: cobc/typeck.c:15275 libcob/fileio.c:4724 libcob/screenio.c:4613 +#: libcob/screenio.c:4639 #, fuzzy, c-format #| msgid "compiler is not configured to support %s" msgid "runtime is not configured to support %s" msgstr "преводилац није подешен да подржава „%s“" -#: cobc/tree.c:5395 +#: cobc/tree.c:5474 #, c-format msgid "literal '%.38s' is longer than '%s'" msgstr "словност „%.38s“ је дужа од „%s“" -#: cobc/tree.c:5399 +#: cobc/tree.c:5478 #, c-format msgid "literal '%.38s' is longer than reference-modification of '%s'" msgstr "словност „%.38s“ је дужа од измена упуте од „%s“" -#: cobc/tree.c:5424 +#: cobc/tree.c:5508 #, c-format msgid "literal '%s' is alphanumeric but '%s' is numeric" msgstr "словност „%s“ је алфанумеричка али „%s“ је бројевна" -#: cobc/tree.c:5466 +#: cobc/tree.c:5550 #, c-format msgid "literal '%s' has more decimals than '%s'" msgstr "словност „%s“ има више децимала од „%s“" -#: cobc/tree.c:5508 +#: cobc/tree.c:5598 #, c-format msgid "literal '%s' has more digits than '%s'" msgstr "словност „%s“ има више цифара од „%s“" -#: cobc/tree.c:5548 cobc/tree.c:5572 +#: cobc/tree.c:5646 cobc/tree.c:5676 #, c-format msgid "unsigned '%s' may not be %s %s" msgstr "неозначено „%s“ не може бити „%s %s“" -#: cobc/tree.c:5558 cobc/tree.c:5581 +#: cobc/tree.c:5658 cobc/tree.c:5689 #, c-format msgid "unsigned '%s' may always be %s %s" msgstr "неозначено „%s“ може увек бити „%s %s“" -#: cobc/tree.c:5614 cobc/tree.c:5639 +#: cobc/tree.c:5726 cobc/tree.c:5756 #, c-format msgid "'%s' may not be %s %s" msgstr "„%s“ не може бити „%s %s“" -#: cobc/tree.c:5625 cobc/tree.c:5650 +#: cobc/tree.c:5738 cobc/tree.c:5768 #, c-format msgid "'%s' may always be %s %s" msgstr "„%s“ може увек бити „%s %s“" -#: cobc/tree.c:5795 +#: cobc/tree.c:5917 msgid "divide by constant ZERO" msgstr "дели константом ZERO" -#: cobc/tree.c:5879 cobc/tree.c:5886 +#: cobc/tree.c:6001 cobc/tree.c:6008 #, c-format msgid "%s should be COMP-X/COMP-5 for logical operator" msgstr "" -#: cobc/tree.c:5927 cobc/tree.c:5932 cobc/tree.c:6151 cobc/typeck.c:5675 -#: cobc/typeck.c:5684 cobc/typeck.c:5691 cobc/typeck.c:6772 cobc/typeck.c:6913 -msgid "invalid expression" -msgstr "неисправан израз" - -#: cobc/tree.c:6148 +#: cobc/tree.c:6283 #, c-format msgid "invalid expression: %s %s %s" msgstr "неисправан израз; %s %s %s" -#: cobc/tree.c:6195 +#: cobc/tree.c:6286 +msgid "invalid expression: boolean expected with logical operator" +msgstr "" + +#: cobc/tree.c:6330 #, c-format msgid "unexpected operator: %d" msgstr "неочекиван операнд: %d" -#: cobc/tree.c:6206 +#: cobc/tree.c:6341 #, c-format msgid "expression '%.38s' %s '%.38s' is always TRUE" msgstr "израз „%.38s“ %s „%.38s“ је увек ТАЧНО" -#: cobc/tree.c:6212 +#: cobc/tree.c:6347 msgid "expression is always TRUE" msgstr "израз је увек ТАЧНО" -#: cobc/tree.c:6225 +#: cobc/tree.c:6360 #, c-format msgid "expression '%.38s' %s '%.38s' is always FALSE" msgstr "израз „%.38s“ %s „%.38s“ је увек НЕТАЧНО" -#: cobc/tree.c:6231 +#: cobc/tree.c:6366 msgid "expression is always FALSE" msgstr "израз је увек НЕТАЧНО" -#: cobc/tree.c:6443 +#: cobc/tree.c:6588 msgid "invalid file name reference" msgstr "неисправна упута назива датотеке" -#: cobc/tree.c:6451 +#: cobc/tree.c:6596 #, c-format msgid "BY CONTENT assumed for alphanumeric item '%s'" msgstr "BY CONTENT је усвојено за алфанумеричку ставку „%s“" -#: cobc/tree.c:6456 +#: cobc/tree.c:6601 #, c-format msgid "BY CONTENT assumed for national item '%s'" msgstr "BY CONTENT је усвојено за националну ставку „%s“" -#: cobc/tree.c:6595 +#: cobc/tree.c:6740 msgid "PERFORM FOREVER since UNTIL is always FALSE" msgstr "PERFORM FOREVER док UNTIL је увек НЕТАЧНО" -#: cobc/tree.c:6599 +#: cobc/tree.c:6744 msgid "PERFORM ONCE since UNTIL is always TRUE" msgstr "PERFORM ONCE док UNTIL је увек ТАЧНО" -#: cobc/tree.c:6602 +#: cobc/tree.c:6747 msgid "PERFORM NEVER since UNTIL is always TRUE" msgstr "PERFORM NEVER док UNTIL је увек ТАЧНО" -#: cobc/tree.c:6726 +#: cobc/tree.c:6871 #, c-format msgid "no definition/prototype seen for FUNCTION '%s'" msgstr "није виђена дефиниција/прототип за FUNCTION „%s“" -#: cobc/tree.c:6728 +#: cobc/tree.c:6873 #, c-format msgid "no definition/prototype seen for PROGRAM '%s'" msgstr "није виђена дефиниција/прототип за PROGRAM „%s“" -#: cobc/tree.c:6737 +#: cobc/tree.c:6882 #, c-format msgid "no definition/prototype seen for FUNCTION with external name '%s'" msgstr "није виђена дефиниција/прототип за FUNCTION са спољним називом „%s“" -#: cobc/tree.c:6739 +#: cobc/tree.c:6884 #, c-format msgid "no definition/prototype seen for PROGRAM with external name '%s'" msgstr "није виђена дефиниција/прототип за PROGRAM са спољним називом „%s“" -#: cobc/tree.c:6831 +#: cobc/tree.c:6976 cobc/tree.c:7158 cobc/tree.c:7233 cobc/tree.c:7239 +#: cobc/tree.c:7247 cobc/tree.c:7255 cobc/tree.c:7277 cobc/tree.c:7287 +#: cobc/tree.c:7292 #, c-format -msgid "FUNCTION %s has invalid argument" -msgstr "FUNCTION %s има неисправан аргумент" +msgid "FUNCTION '%s' has invalid argument" +msgstr "FUNCTION „%s“ има неисправан аргумент" -#: cobc/tree.c:6833 -#, c-format -msgid "either all arguments or none should be if type %s" +#: cobc/tree.c:6978 +#, fuzzy, c-format +#| msgid "either all arguments or none should be if type %s" +msgid "either all arguments or none should be of type %s" msgstr "или сви аргументи или ниједан требају бити „if“ врсте %s" -#: cobc/tree.c:6863 cobc/tree.c:6869 cobc/tree.c:6911 cobc/tree.c:6916 +#: cobc/tree.c:7010 cobc/tree.c:7016 cobc/tree.c:7057 cobc/tree.c:7063 #, c-format msgid "FUNCTION '%s' has invalid reference modification" msgstr "FUNCTION „%s“ има неисправну измену упуте" -#: cobc/tree.c:6880 cobc/tree.c:7194 +#: cobc/tree.c:7027 cobc/tree.c:7344 #, c-format msgid "FUNCTION '%s' unknown" msgstr "FUNCTION „%s“ није позната" -#: cobc/tree.c:6884 +#: cobc/tree.c:7031 #, c-format msgid "FUNCTION '%s' is not implemented" msgstr "FUNCTION „%s“ није примењена" -#: cobc/tree.c:6891 cobc/tree.c:6898 cobc/tree.c:7179 +#: cobc/tree.c:7037 cobc/tree.c:7044 cobc/tree.c:7329 #, c-format msgid "FUNCTION '%s' has wrong number of arguments" msgstr "FUNCTION „%s“ има погрешан број аргумената" -#: cobc/tree.c:6905 +#: cobc/tree.c:7051 #, c-format msgid "FUNCTION '%s' cannot have reference modification" msgstr "FUNCTION „%s“ не може имати измену упуте" -#: cobc/tree.c:7008 cobc/tree.c:7083 cobc/tree.c:7089 cobc/tree.c:7097 -#: cobc/tree.c:7105 cobc/tree.c:7127 cobc/tree.c:7137 cobc/tree.c:7142 -#, c-format -msgid "FUNCTION '%s' has invalid argument" -msgstr "FUNCTION „%s“ има неисправан аргумент" - -#: cobc/tree.c:7185 +#: cobc/tree.c:7335 #, c-format msgid "FUNCTION '%s' has invalid first argument" msgstr "FUNCTION „%s“ има неисправан први аргумент" -#: cobc/typeck.c:584 +#: cobc/typeck.c:590 #, c-format msgid "%s should be COMP-5/COMP-X for logical operator" msgstr "" -#: cobc/typeck.c:850 +#: cobc/typeck.c:856 #, c-format msgid "%s item not allowed here: '%s'" msgstr "%s ставка није дозвољена овде: „%s“" -#: cobc/typeck.c:892 +#: cobc/typeck.c:898 #, c-format msgid "'%s' is not a group name" msgstr "„%s“ није назив групе" -#: cobc/typeck.c:911 +#: cobc/typeck.c:921 #, c-format msgid "'%s' is not a numeric name" msgstr "„%s“ није бројевни назив" -#: cobc/typeck.c:934 +#: cobc/typeck.c:944 #, c-format msgid "'%s' is not a numeric or numeric-edited name" msgstr "„%s“ није бројевни или бројевно уређен назив" -#: cobc/typeck.c:974 +#: cobc/typeck.c:1043 #, c-format -msgid "'%s' is Alpha, instead of a numeric value" -msgstr "„%s“ је Алфа, уместо бројне вредности" - -#: cobc/typeck.c:977 -#, c-format -msgid "'%s' is Alpha Edited, instead of a numeric value" -msgstr "„%s“ је Алфа Уређено, уместо бројне вредности" - -#: cobc/typeck.c:990 -#, c-format -msgid "'%s' is not a numeric value" -msgstr "„%s“ није бројевна вредност" - -#: cobc/typeck.c:1040 -#, c-format -msgid "'%s' is not an integer value" -msgstr "„%s“ није вредност целог броја" +msgid "'%s' is not an integer" +msgstr "„%s“ није цео број" -#: cobc/typeck.c:1044 +#: cobc/typeck.c:1047 msgid "positive numeric integer is required here" msgstr "позитивни цео број се захтева овде" -#: cobc/typeck.c:1163 +#: cobc/typeck.c:1178 msgid "System routine" msgstr "Рутина система" -#: cobc/typeck.c:2054 libcob/call.c:1180 +#: cobc/typeck.c:2037 libcob/call.c:1172 #, c-format msgid "'%s' literal includes leading spaces which are omitted" msgstr "„%s“ словност укључује водеће размке који су изостављени" -#: cobc/typeck.c:2058 +#: cobc/typeck.c:2041 #, c-format msgid "'%s' literal includes trailing spaces which are omitted" msgstr "„%s“ словност укључује пратеће размке који су изостављени" -#: cobc/typeck.c:2125 +#: cobc/typeck.c:2108 msgid "ON/OFF usage requires a SWITCH name" msgstr "ON/OFF коришћење захтева SWITCH назив" -#: cobc/typeck.c:2143 +#: cobc/typeck.c:2126 #, c-format msgid "word length exceeds maximum of %d characters: '%s'" msgstr "дужина речи премашује максимум од %d знака: „%s“" -#: cobc/typeck.c:2146 +#: cobc/typeck.c:2129 #, c-format msgid "word length exceeds %d characters: '%s'" msgstr "дужина речи премашује %d знака: „%s“" -#: cobc/typeck.c:2223 +#: cobc/typeck.c:2206 #, c-format msgid "ASSIGN %s interpreted as '%s'" msgstr "ASSIGN %s је протумачено као „%s“" -#: cobc/typeck.c:2315 cobc/typeck.c:2487 +#: cobc/typeck.c:2332 cobc/typeck.c:2631 #, c-format msgid "subscript missing for '%s' - defaulting to 1" msgstr "подскрипта недостаје за „%s“ – подразумевам 1" -#: cobc/typeck.c:2338 cobc/typeck.c:2403 cobc/typeck.c:2659 +#: cobc/typeck.c:2355 cobc/typeck.c:2546 cobc/typeck.c:2746 #, c-format msgid "'%s' cannot be subscripted" msgstr "„%s“ не може бити подскриптовано" -#: cobc/typeck.c:2342 cobc/typeck.c:2663 +#: cobc/typeck.c:2359 cobc/typeck.c:2750 #, c-format msgid "'%s' requires one subscript" msgstr "„%s“ захтева једну подскрипту" -#: cobc/typeck.c:2345 cobc/typeck.c:2666 +#: cobc/typeck.c:2362 cobc/typeck.c:2753 #, c-format msgid "'%s' requires %d subscripts" msgstr "„%s“ захтева %d подскрипте" -#: cobc/typeck.c:2363 +#: cobc/typeck.c:2380 #, c-format msgid "'%s' (accessed by '%s')" msgstr "„%s“ (приступио му је „%s“)" -#: cobc/typeck.c:2471 +#: cobc/typeck.c:2399 cobc/typeck.c:4987 #, c-format -msgid "'%s' has no OCCURS clause" -msgstr "„%s“ нема OCCURS клаузулу" +msgid "%s may not be reference modified" +msgstr "„%s“ не може бити измењена упута" -#: cobc/typeck.c:2537 libcob/common.c:3941 libcob/common.c:3952 +#: cobc/typeck.c:2437 cobc/typeck.c:2442 cobc/typeck.c:2466 +#: libcob/common.c:4477 libcob/common.c:4521 #, c-format -msgid "subscript of '%s' out of bounds: %d" -msgstr "подскрипта „%s“ је изван граница: %d" +msgid "length of '%s' out of bounds: %d" +msgstr "дужина „%s“ је изван граница: %d" -#: cobc/typeck.c:2587 cobc/typeck.c:2598 libcob/common.c:3976 -#: libcob/common.c:4027 +#: cobc/typeck.c:2453 cobc/typeck.c:2462 libcob/common.c:4462 +#: libcob/common.c:4513 #, c-format msgid "offset of '%s' out of bounds: %d" msgstr "померај „%s“ је изван граница: %d" -#: cobc/typeck.c:2592 cobc/typeck.c:2603 cobc/typeck.c:2612 -#: libcob/common.c:3991 libcob/common.c:4035 +#: cobc/typeck.c:2458 +msgid "suspicious reference-modification: always using max. position" +msgstr "" + +#: cobc/typeck.c:2475 +msgid "suspicious reference-modification: always using max. length" +msgstr "" + +#: cobc/typeck.c:2615 #, c-format -msgid "length of '%s' out of bounds: %d" -msgstr "дужина „%s“ је изван граница: %d" +msgid "'%s' has no OCCURS clause" +msgstr "„%s“ нема OCCURS клаузулу" -#: cobc/typeck.c:2727 cobc/typeck.c:2806 +#: cobc/typeck.c:2694 libcob/common.c:4427 libcob/common.c:4438 +#, c-format +msgid "subscript of '%s' out of bounds: %d" +msgstr "подскрипта „%s“ је изван граница: %d" + +#: cobc/typeck.c:2812 cobc/typeck.c:2891 msgid "reference modification not allowed here" msgstr "измена упуте није дозвољена овде" -#: cobc/typeck.c:2741 cobc/typeck.c:2832 +#: cobc/typeck.c:2826 cobc/typeck.c:2917 msgid "88 level item not allowed here" msgstr "ставка 88 нивоа није дозвољена овде" -#: cobc/typeck.c:2745 cobc/typeck.c:2836 cobc/typeck.c:2844 cobc/typeck.c:2906 +#: cobc/typeck.c:2830 cobc/typeck.c:2921 cobc/typeck.c:2929 cobc/typeck.c:2991 msgid "variable length item not allowed here" msgstr "ставка променљиве дужине није дозвољена овде" -#: cobc/typeck.c:2774 +#: cobc/typeck.c:2859 #, c-format msgid "'%s' has not been DEFINEd" msgstr "„%s“ није DEFINED" -#: cobc/typeck.c:2810 +#: cobc/typeck.c:2895 msgid "only field names allowed here" msgstr "само називи поља су дозвољени овде" -#: cobc/typeck.c:2821 +#: cobc/typeck.c:2906 #, c-format msgid "VALUE of '%s': %s target '%s' is invalid" msgstr "VALUE од „%s“: %s мета „%s“ је неисправна" -#: cobc/typeck.c:2823 cobc/typeck.c:2889 +#: cobc/typeck.c:2908 cobc/typeck.c:2974 msgid "target must be in FILE SECTION or LINKAGE SECTION or have the EXTERNAL clause" msgstr "мета мора бити у FILE SECTION или LINKAGE SECTION или да има EXTERNAL клаузулу" -#: cobc/typeck.c:2879 cobc/typeck.c:2888 +#: cobc/typeck.c:2964 cobc/typeck.c:2973 #, c-format msgid "VALUE of '%s': %s target is invalid" msgstr "VALUE од „%s“: %s мета је неисправна" -#: cobc/typeck.c:2881 +#: cobc/typeck.c:2966 msgid "no previous data-item found" msgstr "нисам нашао претходну ставку података" -#: cobc/typeck.c:3040 cobc/typeck.c:4799 +#: cobc/typeck.c:3130 cobc/typeck.c:4963 #, c-format msgid "'%s' cannot be BASED/EXTERNAL" msgstr "„%s“ не може бити BASED/EXTERNAL" -#: cobc/typeck.c:3045 +#: cobc/typeck.c:3135 #, c-format msgid "'%s' is not in WORKING-STORAGE SECTION" msgstr "„%s“ није у WORKING-STORAGE SECTION" @@ -5170,973 +5368,971 @@ msgstr "„%s“ није у WORKING-STORAGE SECTION" # "user \"$user\" was not the developer of this change, only user \"$developer" # "\" may undo develop end" # Please translate the English msgstr, not the msgid. -#: cobc/typeck.c:3052 cobc/typeck.c:4796 +#: cobc/typeck.c:3142 cobc/typeck.c:4960 #, c-format msgid "'%s' not level 01 or 77" msgstr "„%s“ није ниво 01 или 77" -#: cobc/typeck.c:3055 cobc/typeck.c:3090 cobc/typeck.c:4802 +#: cobc/typeck.c:3145 cobc/typeck.c:3180 cobc/typeck.c:4966 #, c-format msgid "'%s' REDEFINES field not allowed here" msgstr "„%s“ REDEFINES поље није дозвољено овде" -#: cobc/typeck.c:3075 cobc/typeck.c:8423 +#: cobc/typeck.c:3165 cobc/typeck.c:8876 #, c-format msgid "duplicate USING BY REFERENCE item '%s'" msgstr "удвостручена USING BY REFERENCE ставка „%s“" -#: cobc/typeck.c:3103 +#: cobc/typeck.c:3193 #, c-format msgid "'%s' USING item duplicates RETURNING item" msgstr "„%s“ USING ставка удвостручава RETURNING ставку" -#: cobc/typeck.c:3177 +#: cobc/typeck.c:3268 #, fuzzy, c-format #| msgid "redefinition of '%s'" msgid "prototype and definition of '%s' do not match" msgstr "поновно дефинисање за „%s“" -#: cobc/typeck.c:3256 +#: cobc/typeck.c:3389 cobc/typeck.c:3486 #, c-format msgid "parameters #%d ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3259 +#: cobc/typeck.c:3393 #, c-format msgid "returning items ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3295 +#: cobc/typeck.c:3429 msgid "definition is a program but the prototype is a function" msgstr "" -#: cobc/typeck.c:3299 +#: cobc/typeck.c:3433 msgid "definition is a function but the prototype is a program" msgstr "" -#: cobc/typeck.c:3306 -msgid "DECIMAL-POINT IS COMMA clauses differ" -msgstr "" - -#: cobc/typeck.c:3312 -msgid "CURRENCY clauses differ" -msgstr "" - -#: cobc/typeck.c:3348 +#: cobc/typeck.c:3496 #, fuzzy #| msgid "wrong number of WHEN parameters" msgid "number of parameters differ" msgstr "погрешан број WHEN параметара" -#: cobc/typeck.c:3358 +#: cobc/typeck.c:3506 msgid "definition has a RETURNING item but prototype does not" msgstr "" -#: cobc/typeck.c:3362 +#: cobc/typeck.c:3510 msgid "definition does not have a RETURNING item but prototype does" msgstr "" -#: cobc/typeck.c:3411 +#: cobc/typeck.c:3560 #, c-format msgid "unexpected tree tag: %d" msgstr "неочекивана ознака стабла: %d" -#: cobc/typeck.c:3433 +#: cobc/typeck.c:3584 #, fuzzy, c-format #| msgid "parameters passed BY VALUE" msgid "expected argument #%d, %s, to be passed BY VALUE" msgstr "параметри које прослеђује BY VALUE" -#: cobc/typeck.c:3437 +#: cobc/typeck.c:3589 #, c-format msgid "expected argument #%d, %s, to be passed BY REFERENCE/CONTENT" msgstr "" -#: cobc/typeck.c:3455 cobc/typeck.c:3580 cobc/typeck.c:3583 +#: cobc/typeck.c:3608 cobc/typeck.c:3733 cobc/typeck.c:3736 #, fuzzy, c-format #| msgid "parameter %d is not within range of %d" msgid "argument #%d is not optional" msgstr "параметар %d није унутар опсега %d" -#: cobc/typeck.c:3468 +#: cobc/typeck.c:3622 #, c-format msgid "argument #%d must be at least %d bytes long" msgstr "" -#: cobc/typeck.c:3483 +#: cobc/typeck.c:3637 #, c-format msgid "argument #%d is a different type of pointer than the parameter" msgstr "" -#: cobc/typeck.c:3490 +#: cobc/typeck.c:3644 #, c-format msgid "argument #%d is ANY LENGTH, but expecting a fixed size item" msgstr "" -#: cobc/typeck.c:3518 +#: cobc/typeck.c:3672 #, c-format msgid "argument #%d, %s, does not conform to the parameter definition" msgstr "" -#: cobc/typeck.c:3566 +#: cobc/typeck.c:3719 #, c-format msgid "expecting up to %d arguments, but found %d" msgstr "" -#: cobc/typeck.c:3598 +#: cobc/typeck.c:3752 #, fuzzy #| msgid "function RETURNING item may not be ANY LENGTH" msgid "the RETURNING item is of a fixed size, not ANY LENGTH" msgstr "ставка функције RETURNING не може бити ANY LENGTH" -#: cobc/typeck.c:3603 +#: cobc/typeck.c:3758 #, fuzzy, c-format #| msgid "RETURNING item must have level 01" msgid "RETURNING item %s is not a valid type" msgstr "RETURNING ставка мора имати ниво 01" -#: cobc/typeck.c:3609 +#: cobc/typeck.c:3764 #, fuzzy #| msgid "unexpected CONSTANT item" msgid "unexpected RETURNING item" msgstr "неочекивана ставка „CONSTANT“" -#: cobc/typeck.c:3612 +#: cobc/typeck.c:3767 msgid "expecting a RETURNING item, but none provided" msgstr "" -#: cobc/typeck.c:3663 -#, c-format -msgid "'%s' is not an alphabet name" -msgstr "„%s“ није назив алфабета" - -#: cobc/typeck.c:3939 +#: cobc/typeck.c:4091 #, c-format msgid "duplicate character values in alphabet '%s': %s" msgstr "двострука вредност знака у алфабету „%s“: %s" -#: cobc/typeck.c:3944 +#: cobc/typeck.c:4096 #, c-format msgid "invalid character values in alphabet '%s', starting at position %d" msgstr "неисправна вредност знака у алфабету „%s“, са почетком на месту %d" -#: cobc/typeck.c:4045 +#: cobc/typeck.c:4198 #, c-format msgid "duplicate character values in class '%s'" msgstr "двострука вредност знака у класи „%s“" -#: cobc/typeck.c:4074 +#: cobc/typeck.c:4227 msgid "invalid ALPHABET name" msgstr "неисправан ALPHABET назив" -#: cobc/typeck.c:4103 +#: cobc/typeck.c:4256 #, c-format msgid "'%s' is not a locale name" msgstr "„%s“ није назив језика" -#: cobc/typeck.c:4257 +#: cobc/typeck.c:4410 msgid "invalid RECORD DEPENDING item" msgstr "неисправна RECORD DEPENDING ставка" -#: cobc/typeck.c:4262 +#: cobc/typeck.c:4415 msgid "RECORD DEPENDING must reference a data-item" msgstr "RECORD DEPENDING мора да упућује на ставку података" -#: cobc/typeck.c:4285 +#: cobc/typeck.c:4438 #, c-format msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgstr "RECORD DEPENDING ставка „%s“ треба бити дефинисана у WORKING-STORAGE, LOCAL-STORAGE или LINKAGE SECTION" -#: cobc/typeck.c:4298 +#: cobc/typeck.c:4451 #, c-format msgid "file %s: RELATIVE KEY %s is not numeric" msgstr "датотека „%s“: RELATIVE KEY %s није број" -#: cobc/typeck.c:4307 +#: cobc/typeck.c:4460 #, c-format msgid "file %s: RELATIVE KEY %s must be integer" msgstr "датотека „%s“: RELATIVE KEY %s мора бити цео број" -#: cobc/typeck.c:4312 +#: cobc/typeck.c:4465 #, c-format msgid "file %s: RELATIVE KEY %s must be unsigned" msgstr "датотека „%s“: RELATIVE KEY %s мора бити без знака" -#: cobc/typeck.c:4319 +#: cobc/typeck.c:4472 #, c-format msgid "file %s: RELATIVE KEY %s cannot have OCCURS" msgstr "датотека „%s“: RELATIVE KEY %s не може имати OCCURS" -#: cobc/typeck.c:4325 +#: cobc/typeck.c:4478 #, c-format msgid "RELATIVE KEY %s cannot be in file record belonging to %s" msgstr "RELATIVE KEY %s не може бити у запису датотеке која припада „%s“" -#: cobc/typeck.c:4334 +#: cobc/typeck.c:4487 #, c-format msgid "file %s: RELATIVE KEY %s declared outside WORKING-STORAGE" msgstr "датотека „%s“: RELATIVE KEY %s је објављен изван WORKING-STORAGE" -#: cobc/typeck.c:4356 cobc/typeck.c:8396 +#: cobc/typeck.c:4509 cobc/typeck.c:8833 #, c-format msgid "'%s' is not a valid data name" msgstr "„%s“ није исправан назив података" -#: cobc/typeck.c:4363 +#: cobc/typeck.c:4516 #, c-format msgid "CRT STATUS item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "CRT STATUS ставка „%s“ треба бити дефинисана у WORKING-STORAGE или LOCAL-STORAGE" -#: cobc/typeck.c:4369 +#: cobc/typeck.c:4522 #, fuzzy, c-format #| msgid "'%s' CRT STATUS must have at least 4 digits" msgid "'%s' numeric CRT STATUS must have at least 4 digits" msgstr "„%s“ CRT STATUS мора имати најмање 4 цифре" -#: cobc/typeck.c:4375 +#: cobc/typeck.c:4528 #, fuzzy, c-format #| msgid "'%s' CRT STATUS must be 4 characters long" msgid "'%s' CRT STATUS must be 3 or 4 characters long" msgstr "„%s“ CRT STATUS мора бити дужине 4 знака" -#: cobc/typeck.c:4397 +#: cobc/typeck.c:4550 #, c-format msgid "FILE STATUS '%s' is not a field" msgstr "FILE STATUS „%s“ није у пољу" -#: cobc/typeck.c:4409 +#: cobc/typeck.c:4562 #, c-format msgid "FILE STATUS '%s' may not be a decimal or have a PIC with a P" msgstr "FILE STATUS „%s“ не може бити децимала или да има PIC са P" -#: cobc/typeck.c:4414 +#: cobc/typeck.c:4567 #, c-format msgid "FILE STATUS '%s' is a numeric field, but I-O status codes are not numeric in general" msgstr "FILE STATUS „%s“ је бројевно поље, али кодови У-И стања нису бројевни у опште" -#: cobc/typeck.c:4418 +#: cobc/typeck.c:4571 #, fuzzy, c-format #| msgid "FILE STATUS '%s' must be alphanumeric or numeric field" msgid "FILE STATUS '%s' must be an alphanumeric or numeric field" msgstr "FILE STATUS „%s“ мора бити алфанумеричко или бројевно поље" -#: cobc/typeck.c:4425 +#: cobc/typeck.c:4578 #, c-format msgid "FILE STATUS '%s' must be USAGE DISPLAY" msgstr "FILE STATUS „%s“ мора бити USAGE DISPLAY" -#: cobc/typeck.c:4432 +#: cobc/typeck.c:4585 #, c-format msgid "FILE STATUS '%s' must be 2 characters long" msgstr "FILE STATUS „%s“ мора бити дужине 2 знака" -#: cobc/typeck.c:4440 +#: cobc/typeck.c:4593 #, c-format msgid "FILE STATUS '%s' must be in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE" msgstr "FILE STATUS „%s“ мора бити у WORKING-STORAGE, LOCAL-STORAGE или LINKAGE" -#: cobc/typeck.c:4446 +#: cobc/typeck.c:4599 #, c-format msgid "FILE STATUS '%s' may not be located after an OCCURS DEPENDING field" msgstr "FILE STATUS „%s“ се не може налазити након поља OCCURS DEPENDING" -#: cobc/typeck.c:4460 +#: cobc/typeck.c:4613 #, c-format msgid "variable '%s' will be implicitly defined" msgstr "променљива „%s“ биће изричито дефинисана" -#: cobc/typeck.c:4489 cobc/typeck.c:4550 +#: cobc/typeck.c:4703 msgid "ASSIGN variable" msgstr "ASSIGN променљива" -#: cobc/typeck.c:4555 +#: cobc/typeck.c:4708 #, c-format msgid "ASSIGN data item '%s' is invalid" msgstr "ставка ASSIGN података „%s“ је неисправна" -#: cobc/typeck.c:4619 +#: cobc/typeck.c:4773 #, c-format msgid "'%s' CURSOR must be 4 or 6 characters long" msgstr "„%s“ CURSOR мора бити дужине 4 или 6 знака" -#: cobc/typeck.c:4680 +#: cobc/typeck.c:4844 #, c-format msgid "'%s' cannot have nested OCCURS DEPENDING" msgstr "„%s“ не може имати угнеждено OCCURS DEPENDING" -#: cobc/typeck.c:4694 +#: cobc/typeck.c:4858 #, c-format msgid "'%s' OCCURS DEPENDING ON field item invalid here" msgstr "„%s“ ставка поља OCCURS DEPENDING ОД је неисправно овде" -#: cobc/typeck.c:4704 +#: cobc/typeck.c:4868 #, c-format msgid "'%s' cannot have OCCURS DEPENDING because of '%s'" msgstr "„%s“ не може имати OCCURS DEPENDING услед „%s“" -#: cobc/typeck.c:4716 +#: cobc/typeck.c:4880 #, c-format msgid "'%s' OCCURS DEPENDING ON item must have GLOBAL attribute" msgstr "„%s“ ставка OCCURS DEPENDING ON мора имати GLOBAL атрибут" -#: cobc/typeck.c:4730 +#: cobc/typeck.c:4894 #, c-format msgid "PASSWORD '%s' for EXTERNAL file '%s' must have EXTERNAL attribute" msgstr "PASSWORD „%s“ за EXTERNAL датотеку „%s“ мора имати EXTERNAL атрибут" -#: cobc/typeck.c:4768 +#: cobc/typeck.c:4932 #, c-format msgid "duplicate APPLY COMMIT target: '%s'" msgstr "двострука APPLY COMMIT мета: „%s“" -#: cobc/typeck.c:4782 +#: cobc/typeck.c:4946 msgid "APPLY COMMIT statement invalid for SORT file" msgstr "APPLY COMMIT изјава није исправна за SORT датотеку" -#: cobc/typeck.c:4785 +#: cobc/typeck.c:4949 msgid "APPLY COMMIT statement invalid for REPORT file" msgstr "APPLY COMMIT изјава није исправна за REPORT датотеку" -#: cobc/typeck.c:4792 +#: cobc/typeck.c:4956 #, c-format msgid "APPLY COMMIT item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "APPLY COMMIT ставка „%s“ треба бити дефинисана у WORKING-STORAGE или LOCAL-STORAGE" -#: cobc/typeck.c:4806 +#: cobc/typeck.c:4970 #, c-format msgid "item not allowed here: '%s'" msgstr "ставка није дозвољена овде: „%s“" -#: cobc/typeck.c:4819 +#: cobc/typeck.c:4983 #, c-format msgid "%s may not be subscripted" msgstr "„%s“ не може бити подскриптовано" -#: cobc/typeck.c:4823 -#, c-format -msgid "%s may not be reference modified" -msgstr "„%s“ не може бити измењена упута" - -#: cobc/typeck.c:4883 +#: cobc/typeck.c:5047 #, c-format msgid "DEBUGGING target invalid: '%s'" msgstr "DEBUGGING мета је неисправна: „%s“" -#: cobc/typeck.c:4889 +#: cobc/typeck.c:5053 #, c-format msgid "DEBUGGING target already specified with ALL PROCEDURES: '%s'" msgstr "DEBUGGING мета је већ наведена са ALL PROCEDURES: „%s“" -#: cobc/typeck.c:4909 +#: cobc/typeck.c:5073 msgid "DEBUGGING target" msgstr "DEBUGGING мета" -#: cobc/typeck.c:4916 +#: cobc/typeck.c:5080 #, c-format msgid "'%s' is not a valid DEBUGGING target" msgstr "„%s“ није исправна DEBUGGING мета" -#: cobc/typeck.c:4962 cobc/typeck.c:4970 +#: cobc/typeck.c:5126 cobc/typeck.c:5134 #, c-format msgid "'%s' is not in DECLARATIVES" msgstr "„%s“ није у DECLARATIVES" -#: cobc/typeck.c:4984 +#: cobc/typeck.c:5148 #, c-format msgid "invalid reference to '%s' (in DECLARATIVES)" msgstr "неисправна упута ка „%s“ (у DECLARATIVES)" -#: cobc/typeck.c:4996 +#: cobc/typeck.c:5162 #, c-format msgid "GO TO paragraph '%s' which is defined in another SECTION" msgstr "" -#: cobc/typeck.c:5006 +#: cobc/typeck.c:5172 #, c-format msgid "'%s' is not a procedure name" msgstr "„%s“ није назив поступка" -#: cobc/typeck.c:5041 +#: cobc/typeck.c:5207 #, fuzzy, c-format #| msgid "'%s' and '%s' must be in the same record" msgid "%s and %s are not in the same SECTION" msgstr "„%s“ и „%s“ морају бити у истом запису" -#: cobc/typeck.c:5046 +#: cobc/typeck.c:5212 #, fuzzy, c-format #| msgid "'%s' defined here" msgid "%s is defined before %s" msgstr "„%s“ је дефинисано овде" -#: cobc/typeck.c:5088 +#: cobc/typeck.c:5254 #, c-format msgid "'%s' ANY LENGTH item must be a formal parameter" msgstr "„%s“ ANY LENGTH ставка мора бити формални параметар" -#: cobc/typeck.c:5136 +#: cobc/typeck.c:5302 #, c-format msgid "LINKAGE item '%s' is not a PROCEDURE USING parameter" msgstr "LINKAGE ставка „%s“ није PROCEDURE USING параметар" -#: cobc/typeck.c:5192 +#: cobc/typeck.c:5358 #, c-format msgid "'%s' is not an alterable paragraph" msgstr "„%s“ није измењиви пасус" -#: cobc/typeck.c:5802 cobc/typeck.c:5806 +#: cobc/typeck.c:5852 +#, fuzzy +#| msgid "invalid expression: %s %s %s" +msgid "invalid expression: unfinished expression" +msgstr "неисправан израз; %s %s %s" + +#: cobc/typeck.c:5858 cobc/typeck.c:5865 +msgid "invalid expression" +msgstr "неисправан израз" + +#: cobc/typeck.c:5990 cobc/typeck.c:5994 #, c-format msgid "suggest parentheses around %s within %s" msgstr "саветује заграде око %s унутар %s" -#: cobc/typeck.c:5815 +#: cobc/typeck.c:6003 msgid "invalid conditional expression" msgstr "неисправан условни израз" -#: cobc/typeck.c:5932 +#: cobc/typeck.c:6120 #, c-format msgid "internal decimal structure size exceeded: %d" msgstr "величина унутрашње децималне структуре је премашена: %d" -#: cobc/typeck.c:5935 +#: cobc/typeck.c:6123 msgid "Try to minimize the number of parentheses or split into multiple computations." msgstr "Покушава да минимизује број малих заграда или да подели на више прорачуна." -#: cobc/typeck.c:5959 +#: cobc/typeck.c:6147 #, c-format msgid "more than %d nested expressions" msgstr "више од %d угнеждена израза" -#: cobc/typeck.c:6000 +#: cobc/typeck.c:6188 msgid "precision of result may change with arithmetic-osvs" msgstr "тачност резултата се може променити са „arithmetic-osvs“" -#: cobc/typeck.c:6080 +#: cobc/typeck.c:6268 #, c-format msgid "unexpected operation: %c (%d)" msgstr "неочекивана радња: %c (%d)" -#: cobc/typeck.c:6085 +#: cobc/typeck.c:6273 #, c-format msgid "%s operator may be misplaced" msgstr "%s оператер може бити лоше постављен" -#: cobc/typeck.c:6160 +#: cobc/typeck.c:6349 msgid "unexpected constant expansion" msgstr "неочекиван израз константе" -#: cobc/typeck.c:6882 cobc/typeck.c:11024 +#: cobc/typeck.c:7106 cobc/typeck.c:11656 cobc/typeck.c:11661 msgid "alphanumeric value is expected" msgstr "алфанумеричка вредност је очекивана" -#: cobc/typeck.c:6884 cobc/typeck.c:11019 +#: cobc/typeck.c:7109 cobc/typeck.c:11651 msgid "numeric value is expected" msgstr "бројна вредност је очекивана" -#: cobc/typeck.c:6954 +#: cobc/typeck.c:7203 +#, fuzzy +#| msgid "invalid conditional expression" +msgid "invalid expression: condition expected" +msgstr "неисправан условни израз" + +#: cobc/typeck.c:7271 +#, fuzzy +#| msgid "invalid expression" +msgid "incomplete expression" +msgstr "неисправан израз" + +#: cobc/typeck.c:7312 #, c-format msgid "more than %d nested conditions" msgstr "више од %d угнеждена услова" -#: cobc/typeck.c:7290 cobc/typeck.c:7371 +#: cobc/typeck.c:7667 cobc/typeck.c:7748 msgid "no CORRESPONDING items found" msgstr "нисам нашао CORRESPONDING ставке" -#: cobc/typeck.c:7443 +#: cobc/typeck.c:7820 msgid "no items to ACCEPT found" msgstr "нисам нашао ставке за ACCEPT" -#: cobc/typeck.c:7493 +#: cobc/typeck.c:7870 msgid "no items to DISPLAY found" msgstr "нисам нашао ставке за DISPLAY" -#: cobc/typeck.c:7605 +#: cobc/typeck.c:7981 msgid "cannot specify figurative constant ZERO in AT clause" msgstr "не можете навести фигуративну константу ZERO у AT клаузули" -#: cobc/typeck.c:7609 +#: cobc/typeck.c:7985 msgid "value in AT clause is not numeric" msgstr "вредност у AT клаузули није бројевна" -#: cobc/typeck.c:7615 +#: cobc/typeck.c:7991 msgid "value in AT clause must have 4 or 6 digits" msgstr "вредност у AT клаузули мора имати 4 или 6 цифре" -#: cobc/typeck.c:7737 +#: cobc/typeck.c:8168 msgid "invalid PROMPT literal" msgstr "неисправна PROMPT словност" -#: cobc/typeck.c:7742 +#: cobc/typeck.c:8173 msgid "invalid PROMPT identifier" msgstr "неисправан PROMPT одредник" -#: cobc/typeck.c:8032 +#: cobc/typeck.c:8465 #, c-format msgid "'%s' is not an input device" msgstr "„%s“ није улазни уређај" -#: cobc/typeck.c:8059 cobc/typeck.c:9242 +#: cobc/typeck.c:8492 cobc/typeck.c:9708 #, c-format msgid "'%s' is not defined in SPECIAL-NAMES" msgstr "„%s“ није дефинисано у SPECIAL-NAMES" -#: cobc/typeck.c:8064 +#: cobc/typeck.c:8497 #, c-format msgid "invalid input device '%s'" msgstr "неисправан улазни уређај „%s“" -#: cobc/typeck.c:8069 cobc/typeck.c:9246 +#: cobc/typeck.c:8502 cobc/typeck.c:9712 #, c-format msgid "unknown device '%s'; it may exist in another dialect" msgstr "непознат уређај „%s“; може постојати у другом дијалекту" -#: cobc/typeck.c:8072 cobc/typeck.c:9249 +#: cobc/typeck.c:8505 cobc/typeck.c:9715 #, c-format msgid "unknown device '%s'; not defined in SPECIAL-NAMES" msgstr "непознат уређај „%s“; није дефинисано у SPECIAL-NAMES" -#: cobc/typeck.c:8088 +#: cobc/typeck.c:8524 msgid "target of RETURNING is not a data pointer" msgstr "мета RETURNING није показивач података" -#: cobc/typeck.c:8115 cobc/typeck.c:12634 cobc/typeck.c:12700 -#: cobc/typeck.c:12768 +#: cobc/typeck.c:8551 cobc/typeck.c:13410 cobc/typeck.c:13479 +#: cobc/typeck.c:13547 #, c-format msgid "cannot change address of '%s', which is not BASED or a LINKAGE item" msgstr "не могу изменити адресу „%s“, која није BASED или LINKAGE ставка" -#: cobc/typeck.c:8121 +#: cobc/typeck.c:8557 #, fuzzy #| msgid "target of ALLOCATE is not a BASED item" msgid "target of ALLOCATE must have BASED clause" msgstr "мета ALLOCATE није BASED ставка" -#: cobc/typeck.c:8155 cobc/typeck.c:8571 +#: cobc/typeck.c:8591 cobc/typeck.c:9023 msgid "amount must be specified as a numeric expression" msgstr "износ мора бити наведен као бројевни израз" -#: cobc/typeck.c:8161 +#: cobc/typeck.c:8597 msgid "INITIALIZED TO item is not alphanumeric" msgstr "INITIALIZED TO ставка није алфанумеричка" -#: cobc/typeck.c:8232 +#: cobc/typeck.c:8667 msgid "only alphanumeric FUNCTION types are allowed here" msgstr "само алфанумеричке FUNCTION врсте су дозвољене овде" -#: cobc/typeck.c:8240 +#: cobc/typeck.c:8675 msgid "invalid RETURNING field" msgstr "неисправно RETURNING поље" -#: cobc/typeck.c:8259 +#: cobc/typeck.c:8694 msgid "STDCALL not available on this platform" msgstr "STDCALL није доступно на овој платформи" -#: cobc/typeck.c:8263 +#: cobc/typeck.c:8698 msgid "STDCALL used on 64-bit Windows platform" msgstr "STDCALL се користи на 64-битној Виндоуз платформи" -#: cobc/typeck.c:8268 +#: cobc/typeck.c:8703 msgid "STATIC CALL convention requires a literal program name" msgstr "STATIC CALL договор захтева словни назив програма" -#: cobc/typeck.c:8273 cobc/typeck.c:11975 cobc/typeck.c:12900 -#: cobc/typeck.c:13271 +#: cobc/typeck.c:8708 cobc/typeck.c:12746 cobc/typeck.c:13681 +#: cobc/typeck.c:14077 msgid "HANDLE must be either a generic or a THREAD HANDLE" msgstr "HANDLE мора бити или општа или THREAD HANDLE" -#: cobc/typeck.c:8291 +#: cobc/typeck.c:8726 msgid "numeric literal is negative" msgstr "бројевнс словност је негативна" -#: cobc/typeck.c:8370 +#: cobc/typeck.c:8805 msgid "numeric literal exceeds size limits" msgstr "бројевна словност премашује ограничење величине" -#: cobc/typeck.c:8385 +#: cobc/typeck.c:8820 #, c-format msgid "figurative constant %s invalid here" msgstr "фигуративна константа %s је неисправна овде" -#: cobc/typeck.c:8403 +#: cobc/typeck.c:8840 #, c-format msgid "'%s' is not a 01 or 77 level item" msgstr "„%s“ није ставка нивоа 01 или 77" -#: cobc/typeck.c:8407 +#: cobc/typeck.c:8856 #, c-format msgid "'%s' ANY LENGTH item not passed BY REFERENCE" msgstr "„%s“ ANY LENGTH ставка није прослеђена BY REFERENCE" -#: cobc/typeck.c:8457 cobc/typeck.c:8462 +#: cobc/typeck.c:8909 cobc/typeck.c:8914 #, c-format msgid "wrong number of CALL parameters for '%s', %d given, %d expected" msgstr "погрешан број CALL параметара за „%s“, %d је дато, %d је очекивано" -#: cobc/typeck.c:8529 cobc/typeck.c:8603 cobc/typeck.c:8607 cobc/typeck.c:8637 -#: cobc/typeck.c:11932 cobc/typeck.c:12092 cobc/typeck.c:12281 -#: cobc/typeck.c:12285 cobc/typeck.c:13206 cobc/typeck.c:13539 -#: cobc/typeck.c:13542 +#: cobc/typeck.c:8981 cobc/typeck.c:9055 cobc/typeck.c:9059 cobc/typeck.c:9095 +#: cobc/typeck.c:12703 cobc/typeck.c:12863 cobc/typeck.c:13052 +#: cobc/typeck.c:13056 cobc/typeck.c:14012 cobc/typeck.c:14345 +#: cobc/typeck.c:14348 #, c-format msgid "%s not allowed on %s files" msgstr "„%s“ није дозвољено на „%s“ датотекама" -#: cobc/typeck.c:8704 +#: cobc/typeck.c:9172 msgid "positions cannot be specified for main windows" msgstr "положаји не могу бити наведени за главне прозоре" -#: cobc/typeck.c:8714 cobc/typeck.c:8718 cobc/typeck.c:8740 +#: cobc/typeck.c:9183 cobc/typeck.c:9187 cobc/typeck.c:9211 msgid "HANDLE must be either a generic or a WINDOW HANDLE or X(10)" msgstr "HANDLE мора бити или општа или WINDOW HANDLE или X(10)" -#: cobc/typeck.c:8849 +#: cobc/typeck.c:9324 #, c-format msgid "'%s' is an invalid type for DISPLAY operand" msgstr "„%s“ је неисправна врста за DISPLAY операнд" -#: cobc/typeck.c:8854 +#: cobc/typeck.c:9329 msgid "invalid type for DISPLAY operand" msgstr "неисправна врста за DISPLAY операнд" -#: cobc/typeck.c:9202 cobc/typeck.c:9235 +#: cobc/typeck.c:9668 cobc/typeck.c:9701 #, c-format msgid "'%s' is not an output device" msgstr "„%s“ није излазни уређај" -#: cobc/typeck.c:9335 +#: cobc/typeck.c:9800 msgid "invalid use of 88 level in WHEN expression" msgstr "неисправно коришћење 88 нивоа у WHEN изразу" -#: cobc/typeck.c:9396 +#: cobc/typeck.c:9861 msgid "wrong number of WHEN parameters" msgstr "погрешан број WHEN параметара" -#: cobc/typeck.c:9518 cobc/typeck.c:9530 +#: cobc/typeck.c:9983 cobc/typeck.c:9995 #, c-format msgid "target %d of FREE is not a BASED data item" msgstr "мета %d од FREE није ставка BASED података" -#: cobc/typeck.c:9536 +#: cobc/typeck.c:10001 #, c-format msgid "target %d of FREE must be a data pointer" msgstr "мета %d одof FREE мора бити показивач података" -#: cobc/typeck.c:9550 +#: cobc/typeck.c:10015 msgid "GO TO without procedure-name" msgstr "GO TO без назива поступка" -#: cobc/typeck.c:9560 +#: cobc/typeck.c:10023 msgid "GO TO with multiple procedure-names" msgstr "GO TO са више назива поступка" -#: cobc/typeck.c:9582 -msgid "GO TO ENTRY with multiple entry-names" -msgstr "GO TO ENTRY са више назива уноса" - -#: cobc/typeck.c:9646 +#: cobc/typeck.c:10088 msgid "invalid INITIALIZE statement" msgstr "неисправна INITIALIZE тврдња" -#: cobc/typeck.c:9752 cobc/typeck.c:9755 +#: cobc/typeck.c:10193 cobc/typeck.c:10196 #, c-format msgid "%s operands differ in size" msgstr "%s операнди се разликују у величини" -#: cobc/typeck.c:9785 +#: cobc/typeck.c:10226 #, c-format msgid "unexpected clause %d" msgstr "неочекивана клаузула %d" -#: cobc/typeck.c:9860 cobc/typeck.c:9871 cobc/typeck.c:9882 cobc/typeck.c:9893 +#: cobc/typeck.c:10301 cobc/typeck.c:10312 cobc/typeck.c:10323 +#: cobc/typeck.c:10334 #, c-format msgid "data name expected before %s" msgstr "назив података је очекиван пре „%s“" -#: cobc/typeck.c:9903 +#: cobc/typeck.c:10344 #, c-format msgid "ALL, LEADING or TRAILING expected before '%s'" msgstr "ALL, LEADING или TRAILING је очекивано пре „%s“" -#: cobc/typeck.c:9913 +#: cobc/typeck.c:10354 msgid "operand has wrong size" msgstr "операнд је погрешне величине" -#: cobc/typeck.c:10007 +#: cobc/typeck.c:10448 #, c-format msgid "'%s' defined here as PIC %s" msgstr "„%s“ је дефинисано овде као PIC %s" -#: cobc/typeck.c:10011 +#: cobc/typeck.c:10452 #, c-format msgid "'%s' defined here as a group of length %d" msgstr "„%s“ је дефинисано овде као група дужине %d" -#: cobc/typeck.c:10017 +#: cobc/typeck.c:10458 #, c-format msgid "internal register '%s' defined as USAGE %s" msgstr "унутрашњи регистар „%s“ је дефинисан као USAGE %s" -#: cobc/typeck.c:10020 +#: cobc/typeck.c:10461 #, c-format msgid "'%s' defined here as USAGE %s" msgstr "„%s“ је дефинисано овде као USAGE %s" -#: cobc/typeck.c:10045 cobc/typeck.c:10063 +#: cobc/typeck.c:10486 cobc/typeck.c:10504 #, c-format msgid "value size is %d" msgstr "величина вредности је %d" -#: cobc/typeck.c:10059 +#: cobc/typeck.c:10500 #, c-format msgid "value is %s" msgstr "вредност је „%s“" -#: cobc/typeck.c:10338 -msgid "invalid destination for MOVE" -msgstr "неисправно одредиште за MOVE" - -#: cobc/typeck.c:10380 +#: cobc/typeck.c:10824 msgid "MOVE of figurative constant SPACE to numeric item" msgstr "MOVE фигуративне константе SPACE у бројевну ставку" -#: cobc/typeck.c:10395 +#: cobc/typeck.c:10839 msgid "MOVE of figurative constant QUOTE to numeric item" msgstr "MOVE фигуративне константе QUOTE у бројевну ставку" -#: cobc/typeck.c:10400 cobc/typeck.c:10411 +#: cobc/typeck.c:10844 cobc/typeck.c:10855 msgid "MOVE of figurative constant to numeric item" msgstr "MOVE фигуративне константе у бројевну ставку" -#: cobc/typeck.c:10469 +#: cobc/typeck.c:10936 msgid "numeric literal in VALUE clause of numeric-edited item" msgstr "бројевна словност у VALUE клаузули бројевно уређеном ставком" -#: cobc/typeck.c:10494 +#: cobc/typeck.c:10966 msgid "numeric move to ALPHABETIC" msgstr "бројевно премештање у ALPHABETIC" -#: cobc/typeck.c:10506 +#: cobc/typeck.c:10978 msgid "data item not signed" msgstr "ставка података није означена" -#: cobc/typeck.c:10509 +#: cobc/typeck.c:10981 msgid "ignoring sign" msgstr "занемарујем знак" -#: cobc/typeck.c:10821 +#: cobc/typeck.c:11381 msgid "overlapping MOVE may occur and produce unpredictable results" msgstr "преклапајуће MOVE се може појавити и дати непредвидиве резултате" -#: cobc/typeck.c:10828 +#: cobc/typeck.c:11388 msgid "overlapping MOVE may produce unpredictable results" msgstr "преклапајуће MOVE може дати непредвидиве резултате" -#: cobc/typeck.c:10961 +#: cobc/typeck.c:11593 msgid "invalid source for MOVE" msgstr "неисправан извор за MOVE" -#: cobc/typeck.c:10982 +#: cobc/typeck.c:11614 msgid "source is non-numeric - substituting zero" msgstr "извор је не-бројевни – замењујућа нула" -#: cobc/typeck.c:10988 cobc/typeck.c:10999 +#: cobc/typeck.c:11620 cobc/typeck.c:11631 msgid "invalid VALUE clause" msgstr "неисправна VALUE клаузула" -#: cobc/typeck.c:10991 cobc/typeck.c:12841 cobc/typeck.c:12846 -#: cobc/typeck.c:12873 cobc/typeck.c:12878 +#: cobc/typeck.c:11623 cobc/typeck.c:13622 cobc/typeck.c:13627 +#: cobc/typeck.c:13654 cobc/typeck.c:13659 msgid "invalid SET statement" msgstr "неисправна SET тврдња" -#: cobc/typeck.c:10993 +#: cobc/typeck.c:11625 msgid "invalid MOVE statement" msgstr "неисправна MOVE тврдња" -#: cobc/typeck.c:11000 +#: cobc/typeck.c:11632 msgid "literal exceeds data size" msgstr "словност премашује величину података" -#: cobc/typeck.c:11004 +#: cobc/typeck.c:11636 msgid "numeric literal exceeds data size" msgstr "бројевна словност премашује величину података" -#: cobc/typeck.c:11013 +#: cobc/typeck.c:11645 msgid "MOVE of non-integer to alphanumeric" msgstr "MOVE не-цео број у алфанумерички" -#: cobc/typeck.c:11029 +#: cobc/typeck.c:11666 cobc/typeck.c:11671 +#, fuzzy +#| msgid "numeric value is expected" +msgid "national value is expected" +msgstr "бројна вредност је очекивана" + +#: cobc/typeck.c:11676 msgid "value does not fit the picture string" msgstr "вредност не стаје у ниску слике" -#: cobc/typeck.c:11035 +#: cobc/typeck.c:11682 msgid "value size exceeds data size" msgstr "величина вредности премашује величину података" -#: cobc/typeck.c:11040 +#: cobc/typeck.c:11687 msgid "sending field larger than receiving field" msgstr "поље слања је веће од поља пријема" -#: cobc/typeck.c:11045 +#: cobc/typeck.c:11692 msgid "some digits may be truncated" msgstr "неке цифре могу бити скраћене" -#: cobc/typeck.c:11798 cobc/typeck.c:11848 +#: cobc/typeck.c:12566 cobc/typeck.c:12619 #, c-format msgid "invalid MOVE target: %s" msgstr "неисправна MOVE мета: %s" -#: cobc/typeck.c:12105 +#: cobc/typeck.c:12876 msgid "READ PREVIOUS not allowed for this file type" msgstr "READ PREVIOUS није дозвољено за ову врсту датотеке" -#: cobc/typeck.c:12113 +#: cobc/typeck.c:12884 msgid "KEY ignored with sequential READ" msgstr "KEY је занемарено са следним READ" -#: cobc/typeck.c:12209 +#: cobc/typeck.c:12980 msgid "figurative constants not allowed in FROM clause" msgstr "фигуративне константе нису дозвољене у FROM клаузули" -#: cobc/typeck.c:12216 -msgid "literal in FROM clause must be alphanumeric, national or boolean" +#: cobc/typeck.c:12987 +#, fuzzy +#| msgid "literal in FROM clause must be alphanumeric, national or boolean" +msgid "literal in FROM clause must be alphanumeric, utf-8, national or boolean" msgstr "словност у FROM клаузули мора бити алфанумеричка, национална или логичка" -#: cobc/typeck.c:12239 cobc/typeck.c:13499 +#: cobc/typeck.c:13010 cobc/typeck.c:14305 #, c-format msgid "%s FILE requires a FROM clause" msgstr "%s FILE захтева FROM клаузулу" -#: cobc/typeck.c:12261 cobc/typeck.c:12345 cobc/typeck.c:13521 +#: cobc/typeck.c:13032 cobc/typeck.c:13116 cobc/typeck.c:14327 #, c-format msgid "%s subject does not refer to a record name" msgstr "„%s“ субјект не упућује на назив записа" -#: cobc/typeck.c:12351 +#: cobc/typeck.c:13122 msgid "RELEASE not allowed on this record item" msgstr "RELEASE није дозвољено на овој ставки записа" -#: cobc/typeck.c:12433 cobc/typeck.c:12454 cobc/typeck.c:12461 +#: cobc/typeck.c:13183 cobc/typeck.c:13209 cobc/typeck.c:13237 msgid "invalid SEARCH ALL condition" msgstr "неисправан SEARCH ALL услов" -#: cobc/typeck.c:12578 cobc/typeck.c:12585 +#: cobc/typeck.c:13231 +msgid "SEARCH ALL requires comparision of KEY field" +msgstr "" + +#: cobc/typeck.c:13354 cobc/typeck.c:13361 msgid "SET targets must be PROGRAM-POINTER" msgstr "SET мете морају бити PROGRAM-POINTER" -#: cobc/typeck.c:12610 +#: cobc/typeck.c:13386 #, c-format msgid "SET target '%s' is not numeric, an INDEX or a POINTER" msgstr "SET мета „%s“ није број, INDEX или POINTER" -#: cobc/typeck.c:12627 cobc/typeck.c:12696 cobc/typeck.c:12764 +#: cobc/typeck.c:13403 cobc/typeck.c:13475 cobc/typeck.c:13543 #, c-format msgid "cannot change address of '%s', which is not level 1 or 77" msgstr "не могу изменити адресу „%s“, која није нивоа 1 или 77" -#: cobc/typeck.c:12721 +#: cobc/typeck.c:13500 #, fuzzy, c-format #| msgid "SET target '%s' is not numeric, an INDEX or a POINTER" msgid "SET target '%s' is not a POINTER for FCD" msgstr "SET мета „%s“ није број, INDEX или POINTER" -#: cobc/typeck.c:12789 +#: cobc/typeck.c:13569 #, fuzzy, c-format #| msgid "SET target '%s' is not numeric, an INDEX or a POINTER" msgid "SET target '%s' is not a POINTER for FCD-KEYDEF" msgstr "SET мета „%s“ није број, INDEX или POINTER" -#: cobc/typeck.c:12882 +#: cobc/typeck.c:13663 msgid "field does not have a FALSE clause" msgstr "поље нема FALSE клаузулу" -#: cobc/typeck.c:12913 +#: cobc/typeck.c:13694 msgid "THREAD-priority must be between 1 and 32767" msgstr "THREAD-хитност мора бити између 1 и 32767" -#: cobc/typeck.c:12933 +#: cobc/typeck.c:13714 msgid "SET ATTRIBUTE requires a screen item as subject" msgstr "SET ATTRIBUTE захтева ставку екрана као субјекат" -#: cobc/typeck.c:12939 +#: cobc/typeck.c:13720 msgid "SET ATTRIBUTE subject does not refer to a screen item" msgstr "SET ATTRIBUTE субјекат не упућује на ставку екрана" -#: cobc/typeck.c:12990 -msgid "invalid SORT filename" -msgstr "неисправан SORT назив датотеке" - -#: cobc/typeck.c:13051 -msgid "invalid SORT USING parameter" -msgstr "неисправан SORT USING параметар" - -#: cobc/typeck.c:13080 -msgid "invalid SORT GIVING parameter" -msgstr "неисправан SORT GIVING параметар" +#: cobc/typeck.c:13835 cobc/typeck.c:13875 +#, fuzzy, c-format +#| msgid "invalid parameter: %s" +msgid "invalid %s parameter" +msgstr "неисправан параметар: %s" -#: cobc/typeck.c:13134 cobc/typeck.c:13161 cobc/typeck.c:13181 +#: cobc/typeck.c:13940 cobc/typeck.c:13967 cobc/typeck.c:13987 msgid "invalid key item" msgstr "неисправна ставка кључа" -#: cobc/typeck.c:13211 +#: cobc/typeck.c:14017 msgid "LENGTH/SIZE clause only allowed on INDEXED files" msgstr "LENGTH/SIZE клаузула је дозвољена само над INDEXED датотекама" -#: cobc/typeck.c:13216 +#: cobc/typeck.c:14022 msgid "START not allowed with ACCESS MODE RANDOM" msgstr "START није дозвољено са ACCESS MODE RANDOM" -#: cobc/typeck.c:13305 -#, c-format -msgid "%s item '%s' must be numeric and an integer" -msgstr "„%s“ ставка „%s“ мора бити бројевна и цео број" - -#: cobc/typeck.c:13311 +#: cobc/typeck.c:14111 cobc/typeck.c:14117 #, c-format msgid "%s item '%s' must be an integer" msgstr "„%s“ ставка „%s“ мора бити цео број" -#: cobc/typeck.c:13315 +#: cobc/typeck.c:14121 #, c-format msgid "%s item '%s' may not have PICTURE with P in it" msgstr "%s ставка „%s“ не може имати PICTURE са P у њој" -#: cobc/typeck.c:13331 +#: cobc/typeck.c:14137 #, c-format msgid "'%s' is not an elementary item" msgstr "„%s“ није елементарна ставка" -#: cobc/typeck.c:13407 +#: cobc/typeck.c:14213 #, fuzzy #| msgid "RETURNING item must have level 01 or 77" msgid "STRING items must be all NATIONAL or none" msgstr "RETURNING ставка мора имати ниво 01 или 77" -#: cobc/typeck.c:13555 +#: cobc/typeck.c:14361 msgid "LOCK clause invalid here" msgstr "LOCK клаузула је неисправна овде" -#: cobc/typeck.c:13800 +#: cobc/typeck.c:14606 msgid "data item is not part of a report" msgstr "ставка података није део извештаја" -#: cobc/typeck.c:13820 +#: cobc/typeck.c:14626 msgid "improper use of SUPPRESS PRINTING" msgstr "неодговарајуће коришћење SUPPRESS PRINTING" -#: cobc/typeck.c:13835 +#: cobc/typeck.c:14642 #, c-format msgid "%s must be alphanumeric or national" msgstr "„%s“ мора бити алфанумеричко или национално" -#: cobc/typeck.c:13846 +#: cobc/typeck.c:14652 #, c-format msgid "%s may not be a figurative constant" msgstr "„%s“ не може бити фигуративна константа" -#: cobc/typeck.c:13885 +#: cobc/typeck.c:14690 #, c-format msgid "%s must be a child of the input record" msgstr "„%s“ мора проистећи из записа улаза" -#: cobc/typeck.c:13911 +#: cobc/typeck.c:14715 #, c-format msgid "%s may not be an ignored item in JSON/XML GENERATE" msgstr "„%s“ не може бити занемарена ставка у JSON/XML GENERATE" @@ -6148,111 +6344,111 @@ msgstr "„%s“ не може бити занемарена ставка у JSO # For consistent translation, here is the English text: # msgstr "directory must be relative (must not start with /)" # Please translate the English msgstr, not the msgid. -#: cobc/typeck.c:13922 +#: cobc/typeck.c:14725 #, c-format msgid "%s must be elementary" msgstr "„%s“ мора бти елементарно" -#: cobc/typeck.c:13935 +#: cobc/typeck.c:14737 #, fuzzy, c-format #| msgid "%s must be USAGE DISPLAY or NATIONAL" msgid "STRING item '%s' must be USAGE DISPLAY or NATIONAL" msgstr "„%s“ мора бити USAGE DISPLAY или NATIONAL" -#: cobc/typeck.c:13947 +#: cobc/typeck.c:14749 #, c-format msgid "%s must be USAGE DISPLAY or NATIONAL" msgstr "„%s“ мора бити USAGE DISPLAY или NATIONAL" -#: cobc/typeck.c:13961 +#: cobc/typeck.c:14761 #, c-format msgid "%s must be an integer" msgstr "„%s“ мора бити цео број" -#: cobc/typeck.c:13977 cobc/typeck.c:13983 +#: cobc/typeck.c:14776 cobc/typeck.c:14782 msgid "JSON/XML GENERATE receiving item" msgstr "JSON/XML GENERATE примајућу ставку" -#: cobc/typeck.c:13980 +#: cobc/typeck.c:14779 msgid "JSON/XML GENERATE receiving item may not have JUSTIFIED clause" msgstr "JSON/XML GENERATE пријемна ставка не може имати JUSTIFIED клаузулу" -#: cobc/typeck.c:14068 +#: cobc/typeck.c:14867 msgid "JSON/XML GENERATE input record may not be reference modified" msgstr "JSON/XML GENERATE запис уноса не може бити упутом измењен" -#: cobc/typeck.c:14074 +#: cobc/typeck.c:14873 msgid "JSON/XML GENERATE input record may not have RENAMES clause" msgstr "JSON/XML GENERATE запис уноса не може имати RENAMES клаузула" -#: cobc/typeck.c:14079 +#: cobc/typeck.c:14878 #, c-format msgid "all the children of '%s' are ignored in JSON/XML GENERATE" msgstr "сав пород „%s“ је занемарен у JSON/XML GENERATE" -#: cobc/typeck.c:14086 +#: cobc/typeck.c:14885 msgid "JSON/XML GENERATE input record has subrecords with non-unique names" msgstr "JSON/XML GENERATE запис уноса има садржане записе са нејединственим називима" -#: cobc/typeck.c:14091 +#: cobc/typeck.c:14890 msgid "floating-point items in JSON/XML GENERATE" msgstr "ставке покретног зареза у JSON/XML GENERATE" -#: cobc/typeck.c:14095 +#: cobc/typeck.c:14894 msgid "OCCURS items in JSON/XML GENERATE" msgstr "OCCURS ставке у JSON/XML GENERATE" -#: cobc/typeck.c:14142 +#: cobc/typeck.c:14941 msgid "NAMESPACE must be a valid URI" msgstr "NAMESPACE мора бити исправна URI" -#: cobc/typeck.c:14186 +#: cobc/typeck.c:14985 msgid "NAMESPACE-PREFIX must be a valid XML name" msgstr "NAMESPACE-PREFIX мора бити исправан XML назив" -#: cobc/typeck.c:14215 cobc/typeck.c:14223 +#: cobc/typeck.c:15014 cobc/typeck.c:15022 msgid "NAME OF item" msgstr "NAME OF ставка" -#: cobc/typeck.c:14220 +#: cobc/typeck.c:15019 msgid "NAME OF item must be the input record or a child of it" msgstr "NAME OF ставка мора бити запис улаза или његов пород" -#: cobc/typeck.c:14230 +#: cobc/typeck.c:15029 msgid "NAME OF ... OMITTED only valid for source identifier" msgstr "NAME OF ... OMITTED је исправно само за одредник извора" -#: cobc/typeck.c:14238 +#: cobc/typeck.c:15037 #, c-format msgid "NAME OF literal must be a valid %s identifier" msgstr "NAME OF словност мора бити исправан „%s“ одредник" -#: cobc/typeck.c:14265 cobc/typeck.c:14266 cobc/typeck.c:14269 -#: cobc/typeck.c:14273 +#: cobc/typeck.c:15062 cobc/typeck.c:15063 cobc/typeck.c:15066 +#: cobc/typeck.c:15070 msgid "TYPE OF item" msgstr "TYPE OF ставка" -#: cobc/typeck.c:14291 +#: cobc/typeck.c:15088 msgid "SUPPRESS WHEN SPACE item" msgstr "SUPPRESS WHEN SPACE ставка" -#: cobc/typeck.c:14294 +#: cobc/typeck.c:15091 msgid "SUPPRESS WHEN LOW-VALUE item" msgstr "SUPPRESS WHEN LOW-VALUE ставка" -#: cobc/typeck.c:14296 +#: cobc/typeck.c:15093 msgid "SUPPRESS WHEN HIGH-VALUE item" msgstr "SUPPRESS WHEN HIGH-VALUE ставка" -#: cobc/typeck.c:14325 cobc/typeck.c:14333 cobc/typeck.c:14337 +#: cobc/typeck.c:15122 cobc/typeck.c:15130 cobc/typeck.c:15134 msgid "SUPPRESS item" msgstr "SUPPRESS ставка" -#: cobc/typeck.c:14329 +#: cobc/typeck.c:15126 msgid "SUPPRESS item with WHEN clause" msgstr "SUPPRESS ставка са WHEN клаузулом" -#: cobc/typeck.c:14407 +#: cobc/typeck.c:15204 msgid "WITH ATTRIBUTES specified, but no attributes can be generated" msgstr "WITH ATTRIBUTES је наведено, али ниједан атрибут не може бити створен" @@ -6315,181 +6511,199 @@ msgid " -Wparentheses warn if parentheses are omitted around AND within msgstr " -Wparentheses упозорава о недостатку заграда око AND унутар OR" #: cobc/warning.def:70 -msgid " -Wstrict-typing warn strictly about type mismatch" +#, fuzzy +#| msgid " -Wstrict-typing warn strictly about type mismatch" +msgid " -Wstrict-typing warn strictly about type mismatch, even when same size" msgstr " -Wstrict-typing упозорава изричито о неподударању врсте" #: cobc/warning.def:73 #, fuzzy +#| msgid " -Wstrict-typing warn strictly about type mismatch" +msgid " -Wtyping warn about type mismatch" +msgstr " -Wstrict-typing упозорава изричито о неподударању врсте" + +#: cobc/warning.def:76 +#, fuzzy #| msgid " -Wimplicit-define warn about implicitly defined data items" msgid " -Wimplicit-define warn whenever data items are implicitly defined" msgstr " -Wimplicit-define упозорава о изричито дефинисаним ставкама података" -#: cobc/warning.def:76 +#: cobc/warning.def:79 msgid " -Wno-corresponding do not warn about CORRESPONDING with no matching items" msgstr " -Wno-corresponding не упозорава о CORRESPONDING са непоклапајућим ставкама" -#: cobc/warning.def:79 +#: cobc/warning.def:82 msgid " -Winitial-value warn if initial VALUE clause is ignored" msgstr " -Winitial-value упозорава ако почетна VALUE клаузула је занемарена" -#: cobc/warning.def:82 +#: cobc/warning.def:85 msgid " -Wprototypes warn about missing FUNCTION prototypes/definitions" msgstr " -Wprototypes упозорава о недостајућим FUNCTION прототиповима/дефиницијама" -#: cobc/warning.def:85 +#: cobc/warning.def:88 msgid " -Warithmetic-osvs warn if arithmetic expression precision has changed" msgstr " -Warithmetic-osvs упозорава ако је измењена тачност аритметичког израза" -#: cobc/warning.def:88 +#: cobc/warning.def:91 msgid " -Wcall-params warn about non 01/77 items for CALL parameters" msgstr " -Wcall-params упозорава о не 01/77 ставкама за CALL параметре" -#: cobc/warning.def:91 +#: cobc/warning.def:94 msgid " -Wconstant-expression warn about expressions that always resolve to true/false" msgstr " -Wconstant-expression упозорава о изразима који увек решавају на тачно/нетачно" -#: cobc/warning.def:94 +#: cobc/warning.def:97 #, fuzzy #| msgid " -Wconstant-expression warn about expressions that always resolve to true/false" msgid " -Wconstant-numlit-expression\twarn about numeric expressions that always resolve to true/false" msgstr " -Wconstant-expression упозорава о изразима који увек решавају на тачно/нетачно" -#: cobc/warning.def:97 +#: cobc/warning.def:100 msgid " -Wlarger-01-redefines warn about larger redefines allowed by COBOL standards" msgstr "" -#: cobc/warning.def:100 +#: cobc/warning.def:103 msgid " -Wcolumn-overflow warn about text after program-text area, FIXED format" msgstr " -Wcolumn-overflow упозорава о тексту након области програма-текста, FIXED запис" -#: cobc/warning.def:103 +#: cobc/warning.def:106 msgid " -Wterminator warn about lack of scope terminator END-XXX" msgstr " -Wterminator упозорава о недостатку окончавача досега END-XXX" -#: cobc/warning.def:106 +#: cobc/warning.def:109 msgid " -Wlinkage warn about dangling LINKAGE items" msgstr " -Wlinkage упозорава о сувишним LINKAGE ставкама" -#: cobc/warning.def:109 +#: cobc/warning.def:112 msgid " -Wunreachable warn about likely unreachable statements" msgstr " -Wunreachable упозорава о вероватно недостижним тврдњама" -#: cobc/warning.def:112 +#: cobc/warning.def:115 msgid " -Wno-dialect do not warn about dialect specific issues" msgstr " -Wno-dialect не упозорава о проблемима специфичним дијалекту" -#: cobc/warning.def:115 +#: cobc/warning.def:118 #, fuzzy #| msgid " -Wno-others do not warn about different issues" msgid " -Wno-goto-section do not warn about GO TO section-name" msgstr " -Wno-others не упозорава о различитим проблемима" -#: cobc/warning.def:118 +#: cobc/warning.def:121 msgid " -Wgoto-different-section\twarn about GO TO a praragraph defined in a different section" msgstr "" -#: cobc/warning.def:121 +#: cobc/warning.def:124 msgid " -Wsuspicious-perform-thru\twarn if PERFORM THRU references procedures not in ascending order or multiple sections" msgstr "" -#: cobc/warning.def:124 +#: cobc/warning.def:127 #, fuzzy #| msgid " -Wdangling-text warn source text after program-area" msgid " -Wdangling-text warn about source text after program-area" msgstr " -Wdangling-text упозорава текст извора након области програма" -#: cobc/warning.def:127 +#: cobc/warning.def:130 #, fuzzy #| msgid " -Wno-dialect do not warn about dialect specific issues" msgid " -Wno-missing-newline do not warn about missing newlines" msgstr " -Wno-dialect не упозорава о проблемима специфичним дијалекту" -#: cobc/warning.def:130 +#: cobc/warning.def:133 msgid " -Wno-others do not warn about different issues" msgstr " -Wno-others не упозорава о различитим проблемима" -#: cobc/warning.def:133 +#: cobc/warning.def:136 #, fuzzy #| msgid " -Wno-unfinished do not warn if unfinished features are used" msgid " -Wno-unsupported do not warn if runtime does not support a feature used" msgstr " -Wno-unfinished не упозорава ако се користе недовршене функције" -#: libcob/call.c:94 +#: libcob/call.c:98 #, c-format msgid "LoadLibrary/GetProcAddress error %d" msgstr "LoadLibrary/GetProcAddress грешка %d" -#: libcob/call.c:841 +#: libcob/call.c:626 +#, c-format +msgid "preloading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:817 #, c-format msgid "%s: PROGRAM name exceeds %d characters" msgstr "%s: назив ПРОГРАМА премашује %d знака" -#: libcob/call.c:842 +#: libcob/call.c:818 #, fuzzy, c-format #| msgid "%s: PROGRAM name exceeds %d characters" msgid "%s: FUNCTION name exceeds %d characters" msgstr "%s: назив ПРОГРАМА премашује %d знака" -#: libcob/call.c:1067 +#: libcob/call.c:945 libcob/call.c:978 +#, c-format +msgid "loading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:1049 msgid "indeterminable error in resolve of COBOL CALL" msgstr "неодредива грешка у решењу COBOL CALL" -#: libcob/call.c:1149 +#: libcob/call.c:1145 #, c-format msgid "user-defined FUNCTION '%s' not found" msgstr "нисам нашао кориснички дефинисану FUNCTION „%s“" -#: libcob/call.c:1239 libcob/call.c:1325 libcob/call.c:1445 libcob/call.c:1472 +#: libcob/call.c:1247 libcob/call.c:1328 libcob/call.c:1448 libcob/call.c:1475 #, c-format msgid "NULL parameter passed to '%s'" msgstr "NULL параметар је прослеђен за „%s“" -#: libcob/call.c:1329 +#: libcob/call.c:1332 #, c-format msgid "invalid number of arguments passed to '%s'" msgstr "неисправан број аргумената је прослеђен за „%s“" -#: libcob/call.c:1449 +#: libcob/call.c:1452 msgid "multiple call to 'cob_setjmp'" msgstr "више позива за 'cob_setjmp'" -#: libcob/call.c:1476 +#: libcob/call.c:1479 msgid "call to 'cob_longjmp' with no prior 'cob_setjmp'" msgstr "позив за „cob_longjmp“ без претходног „cob_setjmp“" -#: libcob/call.c:1703 libcob/call.c:1730 libcob/common.c:8144 +#: libcob/call.c:1608 +#, c-format +msgid "preloading of '%s' failed" +msgstr "" + +#: libcob/call.c:1706 libcob/call.c:1733 libcob/common.c:8965 msgid "cob_init() has not been called" msgstr "„cob_init()“ није позвано" -#: libcob/call.c:1709 +#: libcob/call.c:1712 #, c-format msgid "parameter %d is not within range of %d" msgstr "параметар %d није унутар опсега %d" -#: libcob/call.c:1715 +#: libcob/call.c:1718 #, c-format msgid "parameter %d is NULL" msgstr "параметар %d је NULL" -#: libcob/call.c:2042 +#: libcob/call.c:2045 msgid "NULL field" msgstr "NULL поље" -#: libcob/call.c:2050 +#: libcob/call.c:2053 msgid "field not allocated" msgstr "поље није додељено" -#: libcob/call.c:2116 +#: libcob/call.c:2119 #, c-format msgid "attempt to over-write constant field with '%s'" msgstr "покушава да пише преко поља константе са „%s“" -#: libcob/call.c:2156 libcob/call.c:2212 -#, c-format -msgid "attempt to over-write constant parameter %d with " -msgstr "покушава да пише преко параметра константе %d са " - -#: libcob/call.c:2263 +#: libcob/call.c:2161 libcob/call.c:2219 libcob/call.c:2270 #, c-format msgid "attempt to over-write constant parameter %d with '%s'" msgstr "покушава да пише преко параметра константе %d са „%s“" @@ -6529,320 +6743,346 @@ msgstr "%s: неисправна опција – „%c“" msgid "%s: option requires an argument -- '%c'" msgstr "%s: опција захтева аргумент – „%c“" -#: libcob/common.c:1242 +#: libcob/common.c:1074 +#, c-format +msgid "requested coredump creation failed with status %d" +msgstr "" + +#: libcob/common.c:1303 msgid "fatal arithmetic error" msgstr "кобна аритметичка грешка" -#: libcob/common.c:1245 +#: libcob/common.c:1306 msgid "interrupt from keyboard" msgstr "" -#: libcob/common.c:1249 +#: libcob/common.c:1310 msgid "hangup" msgstr "" -#: libcob/common.c:1253 +#: libcob/common.c:1314 msgid "quit" msgstr "" -#: libcob/common.c:1257 +#: libcob/common.c:1318 #, fuzzy #| msgid "Definition" msgid "termination" msgstr "Одредница" -#: libcob/common.c:1261 +#: libcob/common.c:1322 msgid "emt termination" msgstr "" -#: libcob/common.c:1265 +#: libcob/common.c:1326 msgid "broken pipe" msgstr "" -#: libcob/common.c:1269 +#: libcob/common.c:1330 #, fuzzy #| msgid "signal %s" msgid "I/O signal" msgstr "сигнал %s" -#: libcob/common.c:1273 +#: libcob/common.c:1334 #, fuzzy #| msgid "attempt to reference unallocated memory" msgid "attempt to reference invalid memory address" msgstr "покушавам да упутим не-додељену меморију" -#: libcob/common.c:1277 +#: libcob/common.c:1338 msgid "bus error" msgstr "грешка сабирнице" -#: libcob/common.c:1281 +#: libcob/common.c:1342 msgid "illegal instruction" msgstr "" -#: libcob/common.c:1285 +#: libcob/common.c:1346 #, fuzzy #| msgid "aborting" msgid "abort" msgstr "прекидам" -#: libcob/common.c:1289 +#: libcob/common.c:1350 msgid "process killed" msgstr "" -#: libcob/common.c:1293 +#: libcob/common.c:1354 #, fuzzy #| msgid "caught signal" msgid "alarm signal" msgstr "ухватих сигнал" -#: libcob/common.c:1297 +#: libcob/common.c:1358 #, fuzzy #| msgid "preprocessing:" msgid "stop process" msgstr "предобрађујем:" -#: libcob/common.c:1301 libcob/common.c:1305 +#: libcob/common.c:1362 libcob/common.c:1366 msgid "child process stopped" msgstr "" #. TRANSLATORS: This msgid is used for an OS signal like SIGABRT. -#: libcob/common.c:1312 +#: libcob/common.c:1373 #, fuzzy #| msgid "signal %s" msgid "signal" msgstr "сигнал %s" #. TRANSLATORS: This msgid is shown for a requested but not complete stack trace. -#: libcob/common.c:1314 +#: libcob/common.c:1375 msgid "(more COBOL runtime elements follow...)" msgstr "" -#: libcob/common.c:1316 libcob/common.c:8101 +#: libcob/common.c:1377 libcob/common.c:8922 #, c-format msgid "abnormal termination - file contents may be incorrect" msgstr "ненормалан завршетак – садржај датотеке може бити неисправан" -#: libcob/common.c:3145 libcob/common.c:8581 libcob/common.c:8595 +#: libcob/common.c:3441 libcob/common.c:9398 libcob/common.c:9412 msgid "version mismatch" msgstr "издање не одговара" -#: libcob/common.c:3146 libcob/common.c:3148 libcob/common.c:8582 -#: libcob/common.c:8584 +#: libcob/common.c:3442 libcob/common.c:3444 libcob/common.c:9399 +#: libcob/common.c:9401 #, c-format msgid "%s has version %s.%d" msgstr "%s је издања %s.%d" -#: libcob/common.c:3158 +#: libcob/common.c:3454 #, c-format msgid "CALL to %s requires %d arguments" msgstr "CALL за %s захтева %d аргументе" -#: libcob/common.c:3779 +#: libcob/common.c:4141 #, c-format msgid "code execution leaving %s" msgstr "" -#: libcob/common.c:3789 +#: libcob/common.c:4151 #, c-format msgid "BASED/LINKAGE item %s has NULL address" msgstr "BASED/LINKAGE ставка %s има NULL адресу" -#: libcob/common.c:3802 libcob/common.c:3806 +#: libcob/common.c:4168 +#, c-format +msgid "memory violation detected for '%s' after %s" +msgstr "" + +#: libcob/common.c:4171 +#, c-format +msgid "memory violation detected after %s" +msgstr "" + +#: libcob/common.c:4229 libcob/common.c:4244 libcob/common.c:4283 +#: libcob/common.c:4287 #, c-format msgid "LINKAGE item %s not passed by caller" msgstr "LINKAGE ставка %s није прослеђена позиваром" -#: libcob/common.c:3892 +#: libcob/common.c:4253 +#, c-format +msgid "LINKAGE item %s (size %lu) too small in the caller (size %lu)" +msgstr "" + +#: libcob/common.c:4378 #, c-format msgid "'%s' (Type: %s) not numeric: '%s'" msgstr "„%s“ (Врста: %s) није бројвна: „%s“" -#: libcob/common.c:3917 +#: libcob/common.c:4403 #, c-format msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgstr "OCCURS DEPENDING ON „%s“ је ван граница: %d" -#: libcob/common.c:3920 libcob/common.c:3958 +#: libcob/common.c:4406 libcob/common.c:4444 #, c-format msgid "maximum subscript for '%s': %d" msgstr "највише подскрипти за „%s“: %d" -#: libcob/common.c:3922 +#: libcob/common.c:4408 #, c-format msgid "minimum subscript for '%s': %d" msgstr "најмање подскрипти за „%s“: %d" -#: libcob/common.c:3955 +#: libcob/common.c:4441 #, c-format msgid "current maximum subscript for '%s': %d" msgstr "тренутно највише подскрипти за „%s“: %d" -#: libcob/common.c:3979 +#: libcob/common.c:4465 #, c-format msgid "offset of '%s' out of bounds: %d, maximum: %d" msgstr "померај „%s“ је изван граница: %d, највише: %d" -#: libcob/common.c:3994 +#: libcob/common.c:4480 #, c-format msgid "length of '%s' out of bounds: %d, maximum: %d" msgstr "дужина „%s“ је изван граница: %d, највише: %d" -#: libcob/common.c:4005 +#: libcob/common.c:4491 #, c-format msgid "length of '%s' out of bounds: %d, starting at: %d, maximum: %d" msgstr "дужина „%s“ је изван граница: %d, почиње на; %d, највише: %d" -#: libcob/common.c:4093 libcob/common.c:4098 +#: libcob/common.c:4579 libcob/common.c:4584 #, c-format msgid "EXTERNAL item '%s' previously allocated with size %d, requested size is %d" msgstr "EXTERNAL ставка „%s“ претходно додељена са величином %d, затражена величина је %d" -#: libcob/common.c:4593 +#: libcob/common.c:4961 libcob/common.c:5201 #, c-format msgid "COB_CURRENT_DATE '%s' is invalid" msgstr "COB_CURRENT_DATE „%s“ је неисправно" -#: libcob/common.c:5641 libcob/common.c:5644 +#: libcob/common.c:6321 libcob/common.c:6324 msgid "Program abandoned at user request" msgstr "" -#: libcob/common.c:5668 +#: libcob/common.c:6348 #, c-format msgid "parameter to SYSTEM call is larger than %d characters" msgstr "параметар за SYSTEM позив је веће од %d знака" -#: libcob/common.c:6202 +#: libcob/common.c:6998 #, c-format msgid "error '%s' during CBL_GC_FORK" msgstr "грешка „%s“ за време „CBL_GC_FORK“" -#: libcob/common.c:6207 libcob/common.c:6304 +#: libcob/common.c:7003 libcob/common.c:7100 #, c-format msgid "'%s' is not supported on this platform" msgstr "„%s“ није подржано на овој платформи" -#: libcob/common.c:6233 +#: libcob/common.c:7029 #, c-format msgid "error '%s' for P%d during CBL_GC_WAITPID" msgstr "грешка „%s“ за P%d за време „CBL_GC_WAITPID“" -#: libcob/common.c:6424 -msgid "Call to CBL_GC_GETOPT with wrong longoption size." +#: libcob/common.c:7220 +#, fuzzy +#| msgid "Call to CBL_GC_GETOPT with wrong longoption size." +msgid "call to CBL_GC_GETOPT with wrong longoption size" msgstr "Позив за „CBL_GC_GETOPT“ је са погрешном величином дуге опције." -#: libcob/common.c:6429 -msgid "Call to CBL_GC_GETOPT with missing longind." +#: libcob/common.c:7225 +#, fuzzy +#| msgid "Call to CBL_GC_GETOPT with missing longind." +msgid "call to CBL_GC_GETOPT with missing longind" msgstr "Позив за „CBL_GC_GETOPT“ са недостајућим „longind“." -#: libcob/common.c:6856 libcob/common.c:6877 libcob/common.c:6890 -#: libcob/common.c:9107 libcob/common.c:9111 +#: libcob/common.c:7654 libcob/common.c:7675 libcob/common.c:7688 +#: libcob/common.c:9924 libcob/common.c:9928 #, c-format msgid "(default)" msgstr "(основно)" -#: libcob/common.c:7143 libcob/common.c:7162 +#: libcob/common.c:7973 libcob/common.c:7992 msgid "should be unsigned" msgstr "треба бити неозначено" -#: libcob/common.c:7151 libcob/common.c:7200 +#: libcob/common.c:7981 libcob/common.c:8030 msgid "should be numeric" msgstr "треба бити бројно" -#: libcob/common.c:7209 +#: libcob/common.c:8039 #, c-format msgid "minimum value: %lu" msgstr "најмања вредност: %lu" -#: libcob/common.c:7261 libcob/common.c:7825 libcob/common.c:7839 +#: libcob/common.c:8069 libcob/common.c:8640 libcob/common.c:8654 +#: bin/cobcrun.c:206 #, c-format msgid "should not contain '%c'" msgstr "не треба да садржи '%c'" -#: libcob/common.c:7342 libcob/common.c:7390 libcob/common.c:7418 -#: libcob/common.c:7427 libcob/common.c:7435 libcob/common.c:7460 +#: libcob/common.c:8150 libcob/common.c:8169 libcob/common.c:8231 +#: libcob/common.c:8240 libcob/common.c:8248 libcob/common.c:8273 #, c-format msgid "not set" msgstr "није подешено" -#: libcob/common.c:7410 libcob/common.c:7413 libcob/common.c:7416 +#: libcob/common.c:8223 libcob/common.c:8226 libcob/common.c:8229 #, c-format msgid "set by %s" msgstr "подесио је „%s“" -#: libcob/common.c:7552 +#: libcob/common.c:8367 #, c-format msgid "WARNING - '%s' without a value - ignored!" msgstr "УПОЗОРЕЊЕ – „%s“ је без вредности – занемарено!" -#: libcob/common.c:7555 +#: libcob/common.c:8370 #, c-format msgid "'%s' without a value!" msgstr "„%s“ је без вредности!" -#: libcob/common.c:7582 +#: libcob/common.c:8397 #, c-format msgid "WARNING - '%s %s' without a value - ignored!" msgstr "УПОЗОРЕЊЕ – '%s %s' је без вредности – занемарено!" -#: libcob/common.c:8085 +#: libcob/common.c:8906 msgid "error" msgstr "грешка" -#: libcob/common.c:8127 +#: libcob/common.c:8948 msgid "attempt to CANCEL active program" msgstr "покушавам да ОТКАЖЕМ програм у раду" -#: libcob/common.c:8154 +#: libcob/common.c:8975 msgid "CALL of program with CHAINING clause" msgstr "CALL програма са CHAINING клаузулом" -#: libcob/common.c:8158 +#: libcob/common.c:8979 msgid "stack overflow, possible PERFORM depth exceeded" msgstr "прекорачење спремника, могуће премашење PERFORM дубине" -#: libcob/common.c:8163 +#: libcob/common.c:8984 msgid "invalid entry/exit in GLOBAL USE procedure" msgstr "неисправан унос/излаз у GLOBAL USE поступку" -#: libcob/common.c:8167 +#: libcob/common.c:8988 msgid "unable to allocate memory" msgstr "не могу да доделим меморију" -#: libcob/common.c:8172 +#: libcob/common.c:8993 msgid "invalid entry into module" msgstr "неисправан унос у модул" -#: libcob/common.c:8179 +#: libcob/common.c:9000 #, c-format msgid "recursive CALL from '%s' to '%s' which is NOT RECURSIVE" msgstr "дубинско CALL од „%s“ ка „%s“ које је NOT RECURSIVE" -#: libcob/common.c:8184 +#: libcob/common.c:9005 #, c-format msgid "invalid recursive COBOL CALL to '%s'" msgstr "неисправан дубински COBOL CALL за „%s“" -#: libcob/common.c:8199 +#: libcob/common.c:9020 msgid "end of file" msgstr "крај датотеке" -#: libcob/common.c:8202 +#: libcob/common.c:9023 msgid "key out of range" msgstr "кључ је ван опсега" -#: libcob/common.c:8205 +#: libcob/common.c:9026 msgid "key order not ascending" msgstr "поредак кључа није растући" -#: libcob/common.c:8208 +#: libcob/common.c:9029 msgid "record key already exists" msgstr "кључ записа већ постоји" -#: libcob/common.c:8211 +#: libcob/common.c:9032 msgid "record key does not exist" msgstr "кључ записа не постоји" -#: libcob/common.c:8214 +#: libcob/common.c:9035 msgid "permanent file error" msgstr "трајна грешка датотеке" @@ -6853,59 +7093,59 @@ msgstr "трајна грешка датотеке" # For consistent translation, here is the English text: # msgstr "no file names were specified on the command line" # Please translate the English msgstr, not the msgid. -#: libcob/common.c:8217 +#: libcob/common.c:9038 msgid "inconsistent file name" msgstr "недоследан назив датотеке" -#: libcob/common.c:8220 +#: libcob/common.c:9041 msgid "file does not exist" msgstr "датотека не постоји" -#: libcob/common.c:8223 +#: libcob/common.c:9044 msgid "permission denied" msgstr "приступ је забрањен" -#: libcob/common.c:8226 +#: libcob/common.c:9047 msgid "mismatch of fixed file attributes" msgstr "" -#: libcob/common.c:8229 +#: libcob/common.c:9050 msgid "file already open" msgstr "датотека је већ отворена" -#: libcob/common.c:8232 +#: libcob/common.c:9053 msgid "file not open" msgstr "датотека није отворена" -#: libcob/common.c:8235 +#: libcob/common.c:9056 msgid "READ must be executed first" msgstr "READ мора бити прво извршено" -#: libcob/common.c:8238 +#: libcob/common.c:9059 msgid "record overflow" msgstr "прекорачење записа" -#: libcob/common.c:8241 +#: libcob/common.c:9062 msgid "READ after unsuccessful READ/START" msgstr "READ након неуспешног READ/START" -#: libcob/common.c:8244 +#: libcob/common.c:9065 msgid "READ/START not allowed, file not open for input" msgstr "READ/START није дозвољено, датотека није отворена за улаз" -#: libcob/common.c:8247 +#: libcob/common.c:9068 msgid "WRITE not allowed, file not open for output" msgstr "WRITE није дозвољено, датотека није отворена за излаз" -#: libcob/common.c:8250 +#: libcob/common.c:9071 msgid "DELETE/REWRITE not allowed, file not open for I-O" msgstr "DELETE/REWRITE није дозвољено, датотека није отворена за У-И" -#: libcob/common.c:8253 +#: libcob/common.c:9074 msgid "record locked by another file connector" msgstr "запис је закључан другим саставником датотеке" -#: libcob/common.c:8256 +#: libcob/common.c:9077 msgid "LINAGE values invalid" msgstr "LINAGE вредност није исправна" @@ -6918,303 +7158,304 @@ msgstr "LINAGE вредност није исправна" # For consistent translation, here is the English text: # msgstr "$filename: this file contains unresolved merge conflicts" # Please translate the English msgstr, not the msgid. -#: libcob/common.c:8259 +#: libcob/common.c:9080 msgid "file sharing conflict" msgstr "сукоб дељења датотеке" -#: libcob/common.c:8262 +#: libcob/common.c:9083 msgid "invalid data in LINE SEQUENTIAL file" msgstr "" -#: libcob/common.c:8266 +#: libcob/common.c:9087 msgid "runtime library is not configured for this operation" msgstr "библиотека времена извршења није подешена за ову радњу" -#: libcob/common.c:8271 +#: libcob/common.c:9092 msgid "unknown file error" msgstr "непозната грешка датотеке" -#: libcob/common.c:8278 +#: libcob/common.c:9099 #, c-format msgid "%s (status = %02d) for file %s" msgstr "%s (стање = %02d) за датотеку „%s“" -#: libcob/common.c:8281 +#: libcob/common.c:9102 #, c-format msgid "%s (status = %02d) for file %s on %s" msgstr "%s (стање = %02d) за датотеку „%s“ на %s" -#: libcob/common.c:8288 +#: libcob/common.c:9109 msgid "attempt to use non-implemented function" msgstr "покушавам да користим непримењену функцију" -#: libcob/common.c:8291 +#: libcob/common.c:9112 msgid "attempt to use non-implemented XML I/O" msgstr "покушавам да користим непримењени XML У/И" -#: libcob/common.c:8294 +#: libcob/common.c:9115 msgid "attempt to use non-implemented JSON I/O" msgstr "покушавам да користим непримењени JSON У/И" -#: libcob/common.c:8341 +#: libcob/common.c:9162 msgid "environment variables" msgstr "променљиве окружења" -#: libcob/common.c:8466 libcob/common.c:8539 libcob/common.c:8554 -#: libcob/common.c:8859 libcob/common.c:8893 libcob/common.c:8910 -#: libcob/common.c:8925 +#: libcob/common.c:9283 libcob/common.c:9356 libcob/common.c:9371 +#: libcob/common.c:9676 libcob/common.c:9710 libcob/common.c:9727 +#: libcob/common.c:9742 #, c-format msgid "%s, version %d.%d.%d" msgstr "%s, издање %d.%d.%d" -#: libcob/common.c:8468 libcob/common.c:8541 libcob/common.c:8558 -#: libcob/common.c:8862 libcob/common.c:8913 libcob/common.c:8928 +#: libcob/common.c:9285 libcob/common.c:9358 libcob/common.c:9375 +#: libcob/common.c:9679 libcob/common.c:9730 libcob/common.c:9745 #, c-format msgid "%s, version %d.%d.%d (compiled with %d.%d)" msgstr "%s, издање %d.%d.%d (преведено са %d.%d)" -#: libcob/common.c:8471 +#: libcob/common.c:9288 #, c-format msgid "%s, version %s" msgstr "%s, издање %s" -#: libcob/common.c:8739 +#: libcob/common.c:9556 #, fuzzy, c-format #| msgid "License LGPLv3+: GNU LGPL version 3 or later <http://gnu.org/licenses/lgpl.html>" msgid "License LGPLv3+: GNU LGPL version 3 or later <%s>" msgstr "Дозвола ЛОЈЛи3+: Гнуова ЛОЈЛ издање 3 или касније <http://gnu.org/licenses/lgpl.html>" -#: libcob/common.c:8803 libcob/common.c:8805 +#: libcob/common.c:9620 libcob/common.c:9622 msgid "dynamic loading" msgstr "динамичко учитавање" -#: libcob/common.c:8938 +#: libcob/common.c:9755 msgid "mouse support" msgstr "подршка за миша" -#: libcob/common.c:8955 +#: libcob/common.c:9772 msgid "CALL configuration" msgstr "подешавање „CALL“" -#: libcob/common.c:8956 +#: libcob/common.c:9773 msgid "File I/O configuration" msgstr "подешавање У/И датотеке" -#: libcob/common.c:8957 +#: libcob/common.c:9774 msgid "Screen I/O configuration" msgstr "подешавање У/И екрана" -#: libcob/common.c:8958 +#: libcob/common.c:9775 msgid "Miscellaneous" msgstr "Разно" -#: libcob/common.c:8959 +#: libcob/common.c:9776 msgid "System configuration" msgstr "Подешавање система" -#: libcob/common.c:8963 +#: libcob/common.c:9780 msgid "runtime configuration" msgstr "подешавање времена извршења" -#: libcob/common.c:8965 +#: libcob/common.c:9782 msgid "via" msgstr "путем" -#: libcob/common.c:9040 libcob/common.c:9068 +#: libcob/common.c:9857 libcob/common.c:9885 msgid "... removed from environment" msgstr "... уклоњено из окружења" -#: libcob/common.c:9094 libcob/common.c:9096 +#: libcob/common.c:9911 libcob/common.c:9913 #, c-format msgid "(set by %s)" msgstr "(подесио је %s)" -#: libcob/common.c:9104 +#: libcob/common.c:9921 #, c-format msgid "(reset)" msgstr "(повраћај)" -#: libcob/common.c:9334 +#: libcob/common.c:10151 msgid "compiler was not built with --enable-debug-log; COB_DEBUG_LOG ignored" msgstr "преводилац није изграђен са „--enable-debug-log“; „COB_DEBUG_LOG“ је занемарено" -#: libcob/common.c:9524 libcob/common.c:9550 +#: libcob/common.c:10338 libcob/common.c:10364 #, c-format msgid "%s called with unknown option: %d" msgstr "%s је позвано са непознатом опцијом: %d" #. TRANSLATORS: This msgid is shown for a requested but empty stack trace. -#: libcob/common.c:9597 +#: libcob/common.c:10411 msgid "No COBOL runtime elements on stack." msgstr "" -#: libcob/common.c:9915 +#: libcob/common.c:10734 #, c-format msgid "Module dump due to %s" msgstr "Избачај модула услед „%s“" -#: libcob/common.c:9943 +#: libcob/common.c:10762 #, c-format msgid "Dump Program-Id %s from %s compiled %s" msgstr "Исписује Програм-иб %s из %s преведеног %s" -#: libcob/common.c:9969 +#: libcob/common.c:10788 #, c-format msgid "dump written to %s" msgstr "избачај је записан у „%s“" -#: libcob/fileio.c:816 libcob/fileio.c:1628 libcob/fileio.c:1882 -#: libcob/fileio.c:3812 libcob/fileio.c:4396 libcob/fileio.c:9658 -#: libcob/fileio.c:9686 libcob/numeric.c:1583 +#: libcob/fileio.c:784 libcob/fileio.c:1664 libcob/fileio.c:1926 +#: libcob/fileio.c:3938 libcob/fileio.c:4522 libcob/fileio.c:10049 +#: libcob/fileio.c:10077 libcob/numeric.c:1915 #, c-format msgid "invalid internal call of %s" msgstr "неисправан унутрашњи позив за „%s“" -#: libcob/fileio.c:3359 +#: libcob/fileio.c:3486 #, c-format msgid "BDB error: %s" msgstr "„BDB“ грешка: %s" -#: libcob/fileio.c:3369 +#: libcob/fileio.c:3496 #, c-format msgid "BDB error: %s %s" msgstr "„BDB“ грешка: %s %s" -#: libcob/fileio.c:3383 libcob/fileio.c:3403 +#: libcob/fileio.c:3510 libcob/fileio.c:3530 #, c-format msgid "cannot join BDB environment (%s), error: %d %s" msgstr "не могу да придружим „BDB“ окружење (%s), грешка: %d %s" -#: libcob/fileio.c:3458 libcob/fileio.c:3483 libcob/fileio.c:3509 -#: libcob/fileio.c:3528 +#: libcob/fileio.c:3585 libcob/fileio.c:3610 libcob/fileio.c:3636 +#: libcob/fileio.c:3655 #, fuzzy, c-format #| msgid "BDB error: %s %s" msgid "BDB (%s), error: %d %s" msgstr "„BDB“ грешка: %s %s" -#: libcob/fileio.c:6071 +#: libcob/fileio.c:6199 #, c-format msgid "ERROR FILE %s has ASSIGN field is NULL" msgstr "ERROR FILE %s има ASSIGN поље које је NULL" -#: libcob/fileio.c:6862 +#: libcob/fileio.c:7050 #, c-format msgid "call to CBL_OPEN_FILE with wrong access mode: %d" msgstr "позив за „CBL_OPEN_FILE“ са погрешним режимом приступа: %d" -#: libcob/fileio.c:6946 +#: libcob/fileio.c:7135 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_lock: %d" msgstr "позив за „CBL_CREATE_FILE“ са погрешним „file_lock“: %d" -#: libcob/fileio.c:6949 +#: libcob/fileio.c:7138 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_dev: %d" msgstr "позив за „CBL_CREATE_FILE“ са погрешним „file_dev“: %d" -#: libcob/fileio.c:7174 libcob/fileio.c:7457 +#: libcob/fileio.c:7362 libcob/fileio.c:7645 #, c-format msgid "'%s' - File detail area is too short" msgstr "„%s“ – Област појединости датотеке је прекратка" -#: libcob/fileio.c:7686 +#: libcob/fileio.c:7871 msgid "SORT is unable to acquire temporary file" msgstr "SORT није у могућности да присвоји привремену датотеку" #. TRANSLATORS: This msgid is concatenated with a filename; -#. setup translation to allow this to be followed on the right side. -#: libcob/fileio.c:8432 +#. setup translation to allow this to be followed on the right side, +#. if necessary use a colon or hyphen +#: libcob/fileio.c:8777 #, fuzzy #| msgid "implicit CLOSE of %s" msgid "implicit CLOSE of " msgstr "изричито CLOSE од %s" -#: libcob/fileio.c:9617 libcob/fileio.c:9752 +#: libcob/fileio.c:10008 libcob/fileio.c:10193 #, c-format msgid "ERROR: EXTFH called with FCD version %d" msgstr "ERROR: EXTFH је позвано са FCD издањем %d" -#: libcob/fileio.c:9886 +#: libcob/fileio.c:10310 #, c-format msgid "ERROR: EXTFH called with wrong file organization %d" msgstr "ERROR: EXTFH је позвано са погрешном организацијом датотеке %d" -#: libcob/fileio.c:9893 +#: libcob/fileio.c:10317 #, fuzzy, c-format #| msgid "ERROR: EXTFH called with FCD version %d" msgid "ERROR: EXTFH called with no %s pointer" msgstr "ERROR: EXTFH је позвано са FCD издањем %d" -#: libcob/fileio.c:10029 +#: libcob/fileio.c:10461 #, fuzzy, c-format #| msgid "ERROR: EXTFH called with FCD version %d" msgid "ERROR: EXTFH called with no %s pointer; Function %d" msgstr "ERROR: EXTFH је позвано са FCD издањем %d" -#: libcob/fileio.c:10208 +#: libcob/fileio.c:10683 #, fuzzy, c-format #| msgid "ERROR: EXTFH called with FCD version %d" msgid "ERROR: EXTFH called with unknown Function %d" msgstr "ERROR: EXTFH је позвано са FCD издањем %d" -#: libcob/reportio.c:630 +#: libcob/reportio.c:629 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT %d" msgstr "INITIATE %s LINE %d премашује PAGE LIMIT %d" -#: libcob/reportio.c:637 libcob/reportio.c:652 +#: libcob/reportio.c:636 libcob/reportio.c:651 #, c-format msgid "INITIATE %s NEXT GROUP %d exceeds PAGE LIMIT" msgstr "INITIATE %s NEXT GROUP %d премашује PAGE LIMIT" -#: libcob/reportio.c:645 +#: libcob/reportio.c:644 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT" msgstr "INITIATE %s LINE %d премашује PAGE LIMIT" -#: libcob/reportio.c:1327 +#: libcob/reportio.c:1336 #, c-format msgid "INITIATE %s was already done" msgstr "INITIATE %s је већ готово" -#: libcob/reportio.c:1343 +#: libcob/reportio.c:1352 #, c-format msgid "INITIATE %s PAGE LIMIT problem" msgstr "INITIATE %s PAGE LIMIT проблем" -#: libcob/reportio.c:1420 +#: libcob/reportio.c:1429 #, c-format msgid "TERMINATE %s but no INITIATE was done" msgstr "TERMINATE %s али INITIATE није одрађено" -#: libcob/reportio.c:1565 +#: libcob/reportio.c:1574 #, c-format msgid "GENERATE %s but no INITIATE was done" msgstr "GENERATE %s али INITIATE није одрађено" -#: libcob/reportio.c:1917 +#: libcob/reportio.c:1926 #, c-format msgid "could not find line to SUPPRESS in report %s" msgstr "не могу да нађем ред за SUPPRESS у извештају %s" -#: libcob/screenio.c:568 +#: libcob/screenio.c:1055 msgid "failed to initialize curses" msgstr "нисам успео да покренем „curses“" -#: libcob/screenio.c:4081 +#: libcob/screenio.c:5034 msgid "end of program, please press a key to exit" msgstr "крај програма, притисните тастер за излазак" -#: libcob/termio.c:78 libcob/termio.c:117 +#: libcob/termio.c:76 libcob/termio.c:136 msgid "(Not representable)" msgstr "(Није представљиво)" -#: libcob/termio.c:354 +#: libcob/termio.c:406 #, c-format msgid "cannot open %s (=%s)" msgstr "не могу да отворим %s (=%s)" -#: libcob/termio.c:369 +#: libcob/termio.c:421 msgid "COB_DISPLAY_PUNCH_FILE is invalid, output to SYSPUNCH skipped" msgstr "„COB_DISPLAY_PUNCH_FILE“ је неисправно, излаз за SYSPUNCH је прескочено" @@ -7307,37 +7548,28 @@ msgstr "" " и било ког назива основе за списак предутовара модула\n" " („COB_LIBRARY_PATH“ и/или „COB_PRELOAD“)" -#: bin/cobcrun.c:146 -#, fuzzy, c-format -#| msgid "GnuCOBOL module loader" -msgid "GnuCOBOL home page: <%s>" -msgstr "учитавач ГнуКОБОЛ модула" - -#: bin/cobcrun.c:148 -#, fuzzy, c-format -#| msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" -msgid "General help using GNU software: <%s>" -msgstr "Општа помоћ при коришћењу ГНУ софтвера: <https://www.gnu.org/gethelp/>" - -#: bin/cobcrun.c:288 +#: bin/cobcrun.c:286 msgid "invalid configuration file name" msgstr "неисправан назив датотеке подешавања" -#: bin/cobcrun.c:355 +#: bin/cobcrun.c:353 #, c-format msgid "invalid module argument '%s'" msgstr "неисправан аргумент модула „%s“" -#: bin/cobcrun.c:410 +#: bin/cobcrun.c:408 #, c-format msgid "%s: missing PROGRAM name" msgstr "%s: недостаје назив ПРОГРАМА" -#: bin/cobcrun.c:412 +#: bin/cobcrun.c:410 #, c-format msgid "Try '%s --help' for more information." msgstr "Покушајте „%s --help“ за више информација." +#~ msgid "unexpected error_node parameter" +#~ msgstr "неочекивани параметар „error_node“" + #~ msgid "set right margin for source (fixed format only)" #~ msgstr "поставља десну маргину за извор (само фиксни формати)" @@ -7345,9 +7577,23 @@ msgstr "Покушајте „%s --help“ за више информација. #~ msgid "level %02d item '%s' cannot have a %s clause" #~ msgstr "ставка нивоа %02d „%s“ не може имати %s клаузулу" +#, c-format +#~ msgid "%s item '%s' should be USAGE DISPLAY" +#~ msgstr "%s ставка „%s“ треба бити USAGE DISPLAY" + #~ msgid "only level 88 items may have multiple values" #~ msgstr "само ставке нивоа 88 могу имати више вредности" +#~ msgid "cannot specify both FULL and JUSTIFIED" +#~ msgstr "не можете навести и FULL и JUSTIFIED" + +#~ msgid "cannot specify both PIC and VALUE" +#~ msgstr "не можете навести и PIC и VALUE" + +#, c-format +#~ msgid "unexpected USAGE: %d" +#~ msgstr "неочекивано USAGE: %d" + #~ msgid "" #~ " -fdefaultbyte=<value>\tinitialize fields without VALUE to value\n" #~ " * decimal 0..255 or any quoted character\n" @@ -7357,10 +7603,19 @@ msgstr "Покушајте „%s --help“ за више информација. #~ " * децимални 0..255 или било који цитирани знак\n" #~ " * основно: започиње на слици" +#~ msgid "GnuCOBOL home page: <https://www.gnu.org/software/gnucobol/>" +#~ msgstr "Матична страница GnuCOBOL-а: <https://www.gnu.org/software/gnucobol/>" + +#~ msgid " --tsymbols specify symbols in listing, use -ftsymbols instead" +#~ msgstr " --tsymbols наводи симболе на списку, користите „-ftsymbols“ уместо тога" + #, c-format #~ msgid "cannot specify both %s and %s; %s is ignored" #~ msgstr "не можете навести и %s и %s; %s је занемарено" +#~ msgid "ASSIGN DISK FROM" +#~ msgstr "ДОДЕЉУЈЕ ДИСК ИЗ" + #~ msgid "file cannot have both EXTERNAL and GLOBAL clauses" #~ msgstr "датотека не може имати и EXTERNAL и GLOBAL клаузулу" @@ -7370,10 +7625,16 @@ msgstr "Покушајте „%s --help“ за више информација. #~ msgid "JSON PARSE" #~ msgstr "JSON PARSE" +#~ msgid "file sort requires KEY phrase" +#~ msgstr "ређање датотеке захтева KEY реч" + #, c-format #~ msgid "'%s' is not a report group" #~ msgstr "„%s“ није група извештаја" +#~ msgid "invalid CLASS value" +#~ msgstr "неисправна CLASS вредност" + #~ msgid "spurious '$' detected - ignored" #~ msgstr "лажно „$“ је откривено – занемарујем" @@ -7386,6 +7647,68 @@ msgstr "Покушајте „%s --help“ за више информација. #~ msgid "Extra (obsolete) context sensitive words" #~ msgstr "Нарочито (застарело) на контекст осетљиве речи" +#~ msgid "H literals must contain at least one character" +#~ msgstr "Н словности морају садржати барем један знак" + +#, c-format +#~ msgid "FUNCTION %s has invalid/not supported arguments - tag %d" +#~ msgstr "FUNCTION %s има неисправне/неподржане аргументе – ознака %d" + +#, c-format +#~ msgid "'%s' is not a numeric literal" +#~ msgstr "„%s“ није бројевна словност" + +#, c-format +#~ msgid "'%s' is not unsigned" +#~ msgstr "„%s“ није без знака" + +#, c-format +#~ msgid "FUNCTION %s has invalid argument" +#~ msgstr "FUNCTION %s има неисправан аргумент" + +#, c-format +#~ msgid "'%s' is Alpha, instead of a numeric value" +#~ msgstr "„%s“ је Алфа, уместо бројне вредности" + +#, c-format +#~ msgid "'%s' is Alpha Edited, instead of a numeric value" +#~ msgstr "„%s“ је Алфа Уређено, уместо бројне вредности" + +#, c-format +#~ msgid "'%s' is not a numeric value" +#~ msgstr "„%s“ није бројевна вредност" + +#, c-format +#~ msgid "'%s' is not an integer value" +#~ msgstr "„%s“ није вредност целог броја" + +#, c-format +#~ msgid "'%s' is not an alphabet name" +#~ msgstr "„%s“ није назив алфабета" + +#~ msgid "GO TO ENTRY with multiple entry-names" +#~ msgstr "GO TO ENTRY са више назива уноса" + +#~ msgid "invalid destination for MOVE" +#~ msgstr "неисправно одредиште за MOVE" + +#~ msgid "invalid SORT filename" +#~ msgstr "неисправан SORT назив датотеке" + +#~ msgid "invalid SORT USING parameter" +#~ msgstr "неисправан SORT USING параметар" + +#~ msgid "invalid SORT GIVING parameter" +#~ msgstr "неисправан SORT GIVING параметар" + +#, c-format +#~ msgid "%s item '%s' must be numeric and an integer" +#~ msgstr "„%s“ ставка „%s“ мора бити бројевна и цео број" + +#, c-format +#~ msgid "attempt to over-write constant parameter %d with " +#~ msgstr "покушава да пише преко параметра константе %d са " + #~ msgid "field with NULL address" #~ msgstr "поље са NULL адресом" diff --git a/po/sv.po b/po/sv.po index 7ce33cd3b..868eaefc5 100644 --- a/po/sv.po +++ b/po/sv.po @@ -1,5 +1,5 @@ -# Swedish translations for GnuCOBOL package -# Copyright (C) 2002-2020 Free Software Foundation, Inc. +# Swedish translation for gnucobol +# Copyright (C) 2017 Free Software Foundation, Inc. # This file is distributed under the same license as the gnucobol package. # Sebastian Rasmussen <sebras@gmail.com>, 2017. # @@ -7,7 +7,7 @@ msgid "" msgstr "" "Project-Id-Version: gnucobol 2.2-rc1\n" "Report-Msgid-Bugs-To: gnucobol-messages@gnu.org\n" -"POT-Creation-Date: 2022-10-23 03:06+0200\n" +"POT-Creation-Date: 2023-07-28 19:20+0200\n" "PO-Revision-Date: 2017-10-17 16:05+0200\n" "Last-Translator: Sebastian Rasmussen <sebras@gmail.com>\n" "Language-Team: Swedish <tp-sv@listor.tp-sv.se>\n" @@ -19,180 +19,186 @@ msgstr "" "Plural-Forms: nplurals=2; plural=(n != 1);\n" "X-Generator: Poedit 2.0.4\n" -#: cobc/cobc.c:98 +#: cobc/cobc.c:116 cobc/codegen.c:2655 cobc/scanner.l:1375 #, c-format msgid "invalid parameter: %s" msgstr "ogiltig parameter: %s" -#: cobc/cobc.c:153 cobc/cobc.c:2233 cobc/cobc.c:2236 cobc/parser.y:802 -#: cobc/reserved.c:4022 libcob/common.c:226 libcob/common.c:1308 -#: libcob/common.c:2384 libcob/common.c:2388 libcob/common.c:2426 -#: libcob/common.c:2464 libcob/common.c:2654 libcob/common.c:7351 -#: libcob/common.c:8370 libcob/common.c:9391 libcob/common.c:9470 -#: libcob/common.c:9912 +#: cobc/cobc.c:171 cobc/cobc.c:2392 cobc/cobc.c:2395 cobc/parser.y:895 +#: cobc/reserved.c:4039 libcob/common.c:235 libcob/common.c:1369 +#: libcob/common.c:2698 libcob/common.c:2702 libcob/common.c:2740 +#: libcob/common.c:2778 libcob/common.c:2939 libcob/common.c:8159 +#: libcob/common.c:9191 libcob/common.c:10209 libcob/common.c:10284 +#: libcob/common.c:10731 msgid "unknown" msgstr "okänd" -#: cobc/cobc.c:855 +#: cobc/cobc.c:905 #, fuzzy #| msgid "%s: %d: internal compiler error" msgid "internal compiler error" msgstr "%s: %d internt kompilatorfel" -#: cobc/cobc.c:921 cobc/cobc.c:1008 cobc/cobc.c:1070 cobc/cobc.c:1146 -#: cobc/cobc.c:1186 cobc/cobc.c:1262 +#: cobc/cobc.c:971 cobc/cobc.c:1058 cobc/cobc.c:1120 cobc/cobc.c:1196 +#: cobc/cobc.c:1236 cobc/cobc.c:1312 #, c-format msgid "cannot allocate %d bytes of memory" msgstr "kan inte allokera %d byte minne" -#: cobc/cobc.c:934 cobc/cobc.c:950 cobc/cobc.c:970 cobc/cobc.c:1029 -#: cobc/cobc.c:1048 cobc/cobc.c:1166 cobc/cobc.c:1281 cobc/cobc.c:1323 -#: cobc/field.c:2216 libcob/common.c:8191 +#: cobc/cobc.c:984 cobc/cobc.c:1000 cobc/cobc.c:1020 cobc/cobc.c:1079 +#: cobc/cobc.c:1098 cobc/cobc.c:1216 cobc/cobc.c:1331 cobc/cobc.c:1415 +#: cobc/field.c:2346 libcob/common.c:9012 #, c-format msgid "call to %s with NULL pointer" msgstr "anrop till %s med NULL-pekare" -#: cobc/cobc.c:991 +#: cobc/cobc.c:1041 #, c-format msgid "cannot reallocate %d bytes of memory" msgstr "kan inte omallokera %d byte minne" -#: cobc/cobc.c:1087 cobc/cobc.c:1203 +#: cobc/cobc.c:1137 cobc/cobc.c:1253 msgid "attempt to reallocate non-allocated memory" msgstr "försök att omallokera icke-allokerat minne" -#: cobc/cobc.c:1120 cobc/cobc.c:1236 +#: cobc/cobc.c:1170 cobc/cobc.c:1286 #, c-format msgid "call to %s with invalid pointer, as it is missing in list" msgstr "anrop till %s med ogiltig pekare, då det saknas i listan" -#: cobc/cobc.c:1448 +#: cobc/cobc.c:1540 #, c-format msgid "assuming literal for unquoted '%s'" msgstr "antar litteral för ”%s” utan citattecken" -#: cobc/cobc.c:1495 +#: cobc/cobc.c:1587 #, fuzzy #| msgid "literal length %d exceeds maximum of %d digits" msgid " - length exceeds maximum" msgstr "litterallängd %d överskriver maximala %d siffror" -#: cobc/cobc.c:1499 +#: cobc/cobc.c:1591 msgid " - name cannot be empty" msgstr "" -#: cobc/cobc.c:1502 -msgid " - name cannot begin with space or underscore" +#: cobc/cobc.c:1594 +#, fuzzy +#| msgid " - name cannot begin with space or underscore" +msgid " - name cannot begin with space or hyphen" msgstr " - namn kan inte börja med blanksteg eller understreck" -#: cobc/cobc.c:1505 +#: cobc/cobc.c:1597 msgid " - name cannot begin with 'cob_' or 'COB_'" msgstr " - namn kan inte börja med ”cob_” eller ”COB_”" -#: cobc/cobc.c:1508 +#: cobc/cobc.c:1600 msgid " - name duplicates a 'C' keyword" msgstr " - namn är ett duplikat av ett ”C”-nyckelord" -#: cobc/cobc.c:1511 +#: cobc/cobc.c:1603 msgid " - name cannot contain a directory separator" msgstr " - namn kan inte innehålla en katalogavskiljare" -#: cobc/cobc.c:1520 +#: cobc/cobc.c:1612 #, c-format msgid "invalid file base name '%s'%s" msgstr "ogiltigt basnamn för fil ”%s”%s" -#: cobc/cobc.c:1524 +#: cobc/cobc.c:1616 #, c-format msgid "invalid ENTRY '%s'%s" msgstr "ogiltigt ENTRY ”%s”%s" -#: cobc/cobc.c:1527 +#: cobc/cobc.c:1619 #, c-format msgid "invalid PROGRAM-ID '%s'%s" msgstr "ogiltigt PROGRAM-ID ”%s”%s" -#: cobc/cobc.c:1659 +#: cobc/cobc.c:1751 #, fuzzy, c-format #| msgid "file does not exist" msgid "file '%s' does not exist" msgstr "filen existerar inte" -#: cobc/cobc.c:1685 +#: cobc/cobc.c:1777 #, fuzzy, c-format #| msgid "duplicate DEFINE directive '%s'" msgid "duplicate exception '%s'" msgstr "duplicerat DEFINE-direktiv ”%s”" -#: cobc/cobc.c:1733 +#: cobc/cobc.c:1825 #, fuzzy, c-format #| msgid "invalid parameter: %s" msgid "invalid exception-name: %s" msgstr "ogiltig parameter: %s" -#: cobc/cobc.c:1870 cobc/cobc.c:8780 +#: cobc/cobc.c:1998 cobc/cobc.c:9211 #, fuzzy #| msgid "environment variables" msgid "please check environment variables as noted above" msgstr "miljövariabler" -#: cobc/cobc.c:1882 cobc/error.c:348 cobc/error.c:382 cobc/error.c:408 -#: cobc/error.c:411 cobc/error.c:477 cobc/error.c:631 cobc/error.c:675 -#: cobc/error.c:779 cobc/error.c:782 +#: cobc/cobc.c:2010 cobc/error.c:140 msgid "error: " msgstr "fel: " -#: cobc/cobc.c:1905 +#: cobc/cobc.c:2033 #, c-format msgid "duplicate DEFINE '%s' - ignored" msgstr "duplicerad DEFINE ”%s” - överhoppad" -#: cobc/cobc.c:1958 +#: cobc/cobc.c:2086 #, c-format msgid "environment variable '%s' is '%s'; should not contain '%c'" msgstr "miljövariabel ”%s” är ”%s”; borde innehålla ”%c”" -#: cobc/cobc.c:1988 +#: cobc/cobc.c:2116 msgid "parameter buffer size exceeded" msgstr "storlek för parameterbuffert överskreds" -#: cobc/cobc.c:2028 +#: cobc/cobc.c:2156 #, c-format msgid "warning: could not move temporary file to %s" msgstr "varning: kunde inte flytta temporärfil till %s" -#: cobc/cobc.c:2239 +#: cobc/cobc.c:2329 +#, fuzzy, c-format +#| msgid "environment variable '%s' is '%s'; should not contain '%c'" +msgid "environment variable '%s' has invalid content" +msgstr "miljövariabel ”%s” är ”%s”; borde innehålla ”%c”" + +#: cobc/cobc.c:2398 #, c-format msgid "aborting compile of %s at line %d (%s: %s)" msgstr "avbryter kompilering av %s på rad %d (%s: %s)" -#: cobc/cobc.c:2243 +#: cobc/cobc.c:2402 #, fuzzy, c-format #| msgid "aborting compile of %s at line %d (%s: %s)" msgid "aborting codegen for %s, last statement at line %d (%s: %s)" msgstr "avbryter kompilering av %s på rad %d (%s: %s)" -#: cobc/cobc.c:2246 +#: cobc/cobc.c:2405 #, c-format msgid "aborting codegen for %s (%s: %s)" msgstr "avbryter kodgenerering för %s (%s: %s)" -#: cobc/cobc.c:2251 +#: cobc/cobc.c:2410 msgid "aborting" msgstr "avbryter" -#: cobc/cobc.c:2329 libcob/common.c:2823 libcob/common.c:8149 bin/cobcrun.c:375 +#: cobc/cobc.c:2488 libcob/common.c:3107 libcob/common.c:8970 bin/cobcrun.c:373 #, c-format msgid "Please report this!" msgstr "Rapportera detta!" -#: cobc/cobc.c:2346 bin/cobcrun.c:100 +#: cobc/cobc.c:2505 bin/cobcrun.c:100 #, fuzzy, c-format #| msgid "License GPLv3+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>" msgid "License GPLv3+: GNU GPL version 3 or later <%s>" msgstr "Licens GPLv3+: GNU GPL version 3 eller senare <http://gnu.org/licenses/gpl.html>" -#: cobc/cobc.c:2348 libcob/common.c:8741 bin/cobcrun.c:102 +#: cobc/cobc.c:2507 libcob/common.c:9558 bin/cobcrun.c:102 msgid "" "This is free software; see the source for copying conditions. There is NO\n" "warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." @@ -200,400 +206,406 @@ msgstr "" "Det här är fri programvara; se källkoden för kopieringsvillkor. Det finns INGA\n" "garantier; inte ens för SÄLJBARHET eller LÄMPLIGHET FÖR NÅGOT SPECIELLT ÄNDAMÅL." -#: cobc/cobc.c:2350 libcob/common.c:8743 bin/cobcrun.c:104 +#: cobc/cobc.c:2509 libcob/common.c:9560 bin/cobcrun.c:104 #, fuzzy, c-format #| msgid "Written by %s\n" msgid "Written by %s" msgstr "Skrivet av %s\n" #. TRANSLATORS: This msgid is intended as the "Packaged" msgid, %s expands to date and time -#: cobc/cobc.c:2352 cobc/cobc.c:2365 libcob/common.c:8747 bin/cobcrun.c:106 +#: cobc/cobc.c:2511 cobc/cobc.c:2524 libcob/common.c:9564 bin/cobcrun.c:106 #, c-format msgid "Built %s" msgstr "Byggt %s" #. TRANSLATORS: This msgid is intended as the "Built" msgid, %s expands to date and time -#: cobc/cobc.c:2354 cobc/cobc.c:2367 libcob/common.c:8750 bin/cobcrun.c:108 +#: cobc/cobc.c:2513 cobc/cobc.c:2526 libcob/common.c:9567 bin/cobcrun.c:108 #, c-format msgid "Packaged %s" msgstr "Paketerat %s" -#: cobc/cobc.c:2356 cobc/cobc.c:2369 cobc/cobc.c:2478 libcob/common.c:8787 +#: cobc/cobc.c:2515 cobc/cobc.c:2528 cobc/cobc.c:2637 libcob/common.c:9604 #, fuzzy #| msgid "C version %s%s" msgid "C version" msgstr "C-version %s%s" -#: cobc/cobc.c:2382 +#: cobc/cobc.c:2541 libcob/common.c:1075 msgid "executing:" msgstr "exekverar:" -#: cobc/cobc.c:2384 +#: cobc/cobc.c:2543 msgid "to be executed:" msgstr "kommer att exekveras:" -#: cobc/cobc.c:2422 cobc/cobc.c:2423 libcob/common.c:6834 libcob/common.c:6835 -#: libcob/common.c:6866 libcob/common.c:6867 +#: cobc/cobc.c:2581 cobc/cobc.c:2582 libcob/common.c:7632 libcob/common.c:7633 +#: libcob/common.c:7664 libcob/common.c:7665 msgid "env" msgstr "env" -#: cobc/cobc.c:2474 libcob/common.c:8783 +#: cobc/cobc.c:2633 libcob/common.c:9600 msgid "build information" msgstr "bygginformation" -#: cobc/cobc.c:2475 libcob/common.c:8784 +#: cobc/cobc.c:2634 libcob/common.c:9601 msgid "build environment" msgstr "byggmiljö" -#: cobc/cobc.c:2484 libcob/common.c:8794 +#: cobc/cobc.c:2643 libcob/common.c:9611 msgid "GnuCOBOL information" msgstr "GnuCOBOL-information" -#: cobc/cobc.c:2492 cobc/cobc.c:2575 cobc/cobc.c:2591 libcob/common.c:8410 -#: libcob/common.c:8777 libcob/common.c:8778 libcob/common.c:8812 -#: libcob/common.c:8878 libcob/common.c:8900 libcob/common.c:8934 +#: cobc/cobc.c:2651 cobc/cobc.c:2739 cobc/cobc.c:2755 libcob/common.c:9233 +#: libcob/common.c:9594 libcob/common.c:9595 libcob/common.c:9629 +#: libcob/common.c:9695 libcob/common.c:9717 libcob/common.c:9751 msgid "disabled" msgstr "inaktiverad" -#: cobc/cobc.c:2523 cobc/cobc.c:2541 libcob/common.c:7397 libcob/common.c:8400 -#: libcob/common.c:8407 libcob/common.c:8816 libcob/common.c:8834 +#: cobc/cobc.c:2687 cobc/cobc.c:2705 libcob/common.c:8179 libcob/common.c:9221 +#: libcob/common.c:9230 libcob/common.c:9633 libcob/common.c:9651 msgid "yes" msgstr "ja" -#: cobc/cobc.c:2525 cobc/cobc.c:2543 libcob/common.c:7399 libcob/common.c:8402 -#: libcob/common.c:8818 libcob/common.c:8836 +#: cobc/cobc.c:2689 cobc/cobc.c:2707 libcob/common.c:8181 libcob/common.c:9223 +#: libcob/common.c:9635 libcob/common.c:9653 msgid "no" msgstr "nej" -#: cobc/cobc.c:2529 libcob/common.c:8822 +#: cobc/cobc.c:2693 libcob/common.c:9639 msgid "8 bytes" msgstr "8 byte" -#: cobc/cobc.c:2531 libcob/common.c:8824 +#: cobc/cobc.c:2695 libcob/common.c:9641 msgid "4 bytes" msgstr "4 byte" -#: cobc/cobc.c:2535 cobc/cobc.c:2537 libcob/common.c:8828 libcob/common.c:8830 +#: cobc/cobc.c:2699 cobc/cobc.c:2701 libcob/common.c:9645 libcob/common.c:9647 msgid "endianness" msgstr "" -#: cobc/cobc.c:2535 libcob/common.c:8828 +#: cobc/cobc.c:2699 libcob/common.c:9645 msgid "big-endian" msgstr "" -#: cobc/cobc.c:2537 libcob/common.c:8830 +#: cobc/cobc.c:2701 libcob/common.c:9647 msgid "little-endian" msgstr "" -#: cobc/cobc.c:2541 cobc/cobc.c:2543 libcob/common.c:8834 libcob/common.c:8836 +#: cobc/cobc.c:2705 cobc/cobc.c:2707 libcob/common.c:9651 libcob/common.c:9653 msgid "native EBCDIC" msgstr "" -#: cobc/cobc.c:2546 libcob/common.c:8937 +#: cobc/cobc.c:2710 libcob/common.c:9754 msgid "extended screen I/O" msgstr "utökad skärm-I/O" -#: cobc/cobc.c:2549 libcob/common.c:8840 +#: cobc/cobc.c:2713 libcob/common.c:9657 #, fuzzy #| msgid "variable format" msgid "variable file format" msgstr "variabelformat" -#: cobc/cobc.c:2555 cobc/cobc.c:2557 libcob/common.c:8846 libcob/common.c:8848 +#: cobc/cobc.c:2719 cobc/cobc.c:2721 libcob/common.c:9663 libcob/common.c:9665 #, fuzzy #| msgid "sequential handler" msgid "sequential file handler" msgstr "sekventiell hanterare" -#: cobc/cobc.c:2557 libcob/common.c:8848 +#: cobc/cobc.c:2721 libcob/common.c:9665 msgid "built-in" msgstr "inbyggd" -#: cobc/cobc.c:2561 cobc/cobc.c:2563 cobc/cobc.c:2565 cobc/cobc.c:2567 -#: cobc/cobc.c:2570 cobc/cobc.c:2572 cobc/cobc.c:2575 libcob/common.c:8852 -#: libcob/common.c:8866 libcob/common.c:8868 libcob/common.c:8870 -#: libcob/common.c:8873 libcob/common.c:8875 libcob/common.c:8878 +#: cobc/cobc.c:2725 cobc/cobc.c:2727 cobc/cobc.c:2729 cobc/cobc.c:2731 +#: cobc/cobc.c:2734 cobc/cobc.c:2736 cobc/cobc.c:2739 libcob/common.c:9669 +#: libcob/common.c:9683 libcob/common.c:9685 libcob/common.c:9687 +#: libcob/common.c:9690 libcob/common.c:9692 libcob/common.c:9695 #, fuzzy #| msgid "sequential handler" msgid "indexed file handler" msgstr "sekventiell hanterare" -#: cobc/cobc.c:2580 cobc/cobc.c:2582 cobc/cobc.c:2585 libcob/common.c:8884 +#: cobc/cobc.c:2744 cobc/cobc.c:2746 cobc/cobc.c:2749 libcob/common.c:9701 msgid "mathematical library" msgstr "matematikbibliotek" -#: cobc/cobc.c:2589 cobc/cobc.c:2591 libcob/common.c:8895 libcob/common.c:8900 +#: cobc/cobc.c:2753 cobc/cobc.c:2755 libcob/common.c:9712 libcob/common.c:9717 msgid "XML library" msgstr "" -#: cobc/cobc.c:2594 libcob/common.c:8917 libcob/common.c:8932 -#: libcob/common.c:8934 +#: cobc/cobc.c:2758 libcob/common.c:9734 libcob/common.c:9749 +#: libcob/common.c:9751 msgid "JSON library" msgstr "" -#: cobc/cobc.c:2597 libcob/common.c:8810 libcob/common.c:8941 +#: cobc/cobc.c:2761 libcob/common.c:9627 libcob/common.c:9758 msgid "enabled" msgstr "aktiverad" -#: cobc/cobc.c:2604 +#: cobc/cobc.c:2768 msgid "only one of options 'E', 'S', 'C', 'c' may be specified" msgstr "endast en av flaggorna ”E”, ”S”, ”C”, ”c” får anges" -#: cobc/cobc.c:2610 +#: cobc/cobc.c:2774 msgid "only one of options 'm', 'x', 'b' may be specified" msgstr "endast en av flaggorna ”m”, ”x”, ”b” får anges" -#: cobc/cobc.c:2652 +#: cobc/cobc.c:2816 #, c-format msgid "option requires one of 'ALL', 'FD', 'WS', 'LS', 'RD', 'FD', 'SC', 'LO' - not '%s'" msgstr "" -#: cobc/cobc.c:2682 +#: cobc/cobc.c:2846 #, c-format msgid "'%s' is not an intrinsic function" msgstr "”%s” är inte en inbyggd funktion" -#: cobc/cobc.c:2726 cobc/cobc.c:8094 cobc/cobc.c:8213 cobc/codegen.c:3783 -#: cobc/codegen.c:3884 cobc/codegen.c:5571 cobc/codegen.c:5700 -#: cobc/codegen.c:13034 cobc/tree.c:1391 cobc/tree.c:4497 cobc/tree.c:5067 -#: cobc/tree.c:5316 cobc/typeck.c:4344 cobc/typeck.c:9044 cobc/typeck.c:9079 -#: cobc/typeck.c:9977 cobc/typeck.c:12619 cobc/typeck.c:12690 -#: cobc/typeck.c:12758 cobc/typeck.c:13043 cobc/typeck.c:13086 -#: libcob/fileio.c:9703 libcob/fileio.c:9714 +#: cobc/cobc.c:2889 cobc/cobc.c:8507 cobc/cobc.c:8626 cobc/codegen.c:3761 +#: cobc/codegen.c:3864 cobc/codegen.c:5671 cobc/codegen.c:5816 +#: cobc/codegen.c:13429 cobc/parser.y:391 cobc/tree.c:1397 cobc/tree.c:4565 +#: cobc/tree.c:5135 cobc/tree.c:5392 cobc/typeck.c:4497 cobc/typeck.c:9504 +#: cobc/typeck.c:9541 cobc/typeck.c:10418 cobc/typeck.c:13395 +#: cobc/typeck.c:13469 cobc/typeck.c:13537 cobc/typeck.c:13825 +#: cobc/typeck.c:13887 libcob/fileio.c:10094 libcob/fileio.c:10105 #, c-format msgid "call to '%s' with invalid parameter '%s'" msgstr "anrop till ”%s” med ogiltig parameter ”%s”" -#: cobc/cobc.c:3136 +#: cobc/cobc.c:3300 msgid "loading standard configuration file 'default.conf'" msgstr "läser in standardkonfigurationsfil ”default.conf”" -#: cobc/cobc.c:3217 +#: cobc/cobc.c:3387 msgid "the used C compiler is known to not be able to generate assembler code" msgstr "" -#: cobc/cobc.c:3299 +#: cobc/cobc.c:3469 msgid "invalid output file name" msgstr "ogiltigt namn på utmatningsfil" -#: cobc/cobc.c:3361 +#: cobc/cobc.c:3531 #, c-format msgid "warning: '%s' is not a directory, defaulting to current directory" msgstr "varning: ”%s” är inte en katalog, använder aktuell katalog som standard" -#: cobc/cobc.c:3388 +#: cobc/cobc.c:3558 #, c-format msgid "warning: %d lines per listing page specified, using %d" msgstr "" -#: cobc/cobc.c:3438 +#: cobc/cobc.c:3615 #, c-format msgid "warning: assuming '%s' is a DEFINE - did you intend to use -debug?" msgstr "varning: antar ”%s” är en DEFINE - avsåg du att använda -debug?" -#: cobc/cobc.c:3699 cobc/cobc.c:3724 cobc/cobc.c:3752 +#: cobc/cobc.c:3661 cobc/cobc.c:3702 cobc/cobc.c:4281 +#, fuzzy, c-format +#| msgid "ignoring invalid directive: '%s'" +msgid "ignoring nonexistent directory \"%s\"" +msgstr "hoppar över ogiltigt direktiv: ”%s”" + +#: cobc/cobc.c:3943 cobc/cobc.c:3968 cobc/cobc.c:3996 #, c-format msgid "unknown warning option '%s'" msgstr "okänd varningsflagga ”%s”" -#: cobc/cobc.c:3813 +#: cobc/cobc.c:4063 #, c-format msgid "%s option requires a listing file" msgstr "%s-flagga kräver en listningsfil" -#: cobc/cobc.c:3820 +#: cobc/cobc.c:4070 msgid "output to stdout only valid for preprocess" msgstr "" -#: cobc/cobc.c:3829 +#: cobc/cobc.c:4085 +msgid "-MT must be given to specify target file" +msgstr "" + +#: cobc/cobc.c:4091 msgid "all runtime checks are enabled" msgstr "alla körtidskontroller är aktiverade" -#: cobc/cobc.c:4030 +#: cobc/cobc.c:4316 msgid "only one stdin input allowed" msgstr "endast en standard in tillåts" -#: cobc/cobc.c:4040 +#: cobc/cobc.c:4326 #, c-format msgid "invalid file name parameter (length > %d)" msgstr "ogiltig filnamnsparameter (längd > %d)" -#: cobc/cobc.c:4270 +#: cobc/cobc.c:4559 msgid "return status:" msgstr "returstatus:" -#: cobc/cobc.c:4306 libcob/common.c:5711 +#: cobc/cobc.c:4595 libcob/common.c:6391 #, c-format msgid "external process \"%s\" ended with signal %s (%d)" msgstr "" -#: cobc/cobc.c:4364 +#: cobc/cobc.c:4654 msgid "nothing for -j to run" msgstr "ingenting att köra för -j" -#: cobc/cobc.c:4406 cobc/cobc.c:4420 +#: cobc/cobc.c:4697 cobc/cobc.c:4711 #, fuzzy, c-format #| msgid "... removed from environment" msgid "%s is resolved by environment as: %s" msgstr "… borttagen från miljö" -#: cobc/cobc.c:4882 +#: cobc/cobc.c:5175 msgid "preprocessing:" msgstr "preprocessar:" -#: cobc/cobc.c:4952 +#: cobc/cobc.c:5244 msgid "'cobxref' execution unsuccessful" msgstr "”cobxref”-exekvering misslyckades" -#: cobc/cobc.c:4955 +#: cobc/cobc.c:5247 #, c-format msgid "check that 'cobxref' is in %s" msgstr "kontrollera att ”cobxref” finns i %s" -#: cobc/cobc.c:4957 +#: cobc/cobc.c:5249 msgid "no listing produced" msgstr "ingen listning producerad" -#: cobc/cobc.c:5882 cobc/cobc.c:5921 +#: cobc/cobc.c:6234 cobc/cobc.c:6273 msgid "No fields defined." msgstr "Inga fält definierade." -#: cobc/cobc.c:5941 +#: cobc/cobc.c:6293 msgid "No labels defined." msgstr "Inga etiketter definierade." -#: cobc/cobc.c:5963 +#: cobc/cobc.c:6324 cobc/cobc.c:9292 +msgid "command line:" +msgstr "kommandorad:" + +#: cobc/cobc.c:6342 msgid "Error/Warning summary:" msgstr "Fel-/varningssammanfattning:" -#: cobc/cobc.c:6006 +#: cobc/cobc.c:6385 msgid "0 warnings in compilation group" msgstr "0 varningar i kompileringsgrupp" -#: cobc/cobc.c:6010 +#: cobc/cobc.c:6389 msgid "1 warning in compilation group" msgstr "1 varning i kompileringsgrupp" -#: cobc/cobc.c:6014 +#: cobc/cobc.c:6393 #, c-format msgid "%d warnings in compilation group" msgstr "%d varningar i kompileringsgrupp" -#: cobc/cobc.c:6020 +#: cobc/cobc.c:6399 msgid "0 errors in compilation group" msgstr "0 fel i kompileringsgrupp" -#: cobc/cobc.c:6024 +#: cobc/cobc.c:6403 msgid "1 error in compilation group" msgstr "1 fel i kompileringsgrupp" -#: cobc/cobc.c:6028 +#: cobc/cobc.c:6407 #, c-format msgid "%d errors in compilation group" msgstr "%d fel i kompileringsgrupp" -#: cobc/cobc.c:6034 +#: cobc/cobc.c:6413 #, c-format msgid "Too many errors in compilation group: %d maximum errors" msgstr "För många fel i kompileringsgrupp: %d fel som mest" -#: cobc/cobc.c:6632 +#: cobc/cobc.c:7028 #, fuzzy, c-format #| msgid "%s: %d: Too many continuation lines" msgid "%s:%d: too many continuation lines" msgstr "%s: %d: Allt för många fortsättningsrader" -#: cobc/cobc.c:7552 +#: cobc/cobc.c:7956 msgid "parsing:" msgstr "tolkning:" -#: cobc/cobc.c:7612 +#: cobc/cobc.c:8017 msgid "translating:" msgstr "översätter:" -#: cobc/cobc.c:8786 +#: cobc/cobc.c:9217 msgid "no input files" msgstr "inga inmatningsfiler" -#: cobc/cobc.c:8816 +#: cobc/cobc.c:9248 #, c-format msgid "%s option invalid in this combination" msgstr "%s-flagga ogiltig i denna kombination" -#: cobc/cobc.c:8857 -msgid "command line:" -msgstr "kommandorad:" - -#: cobc/codegen.c:1041 cobc/codegen.c:4463 cobc/codegen.c:11648 -#: cobc/codegen.c:12186 +#: cobc/codegen.c:1040 cobc/codegen.c:4506 cobc/codegen.c:11910 +#: cobc/codegen.c:12467 msgid "unexpected CONSTANT item" msgstr "okänt CONSTANT-objekt" -#: cobc/codegen.c:2981 cobc/codegen.c:3261 cobc/codegen.c:8523 cobc/tree.c:1413 +#: cobc/codegen.c:2921 cobc/codegen.c:3207 cobc/codegen.c:8866 cobc/tree.c:1419 #, c-format msgid "unexpected cast type: %d" msgstr "okänd typkonverteringstyp: %d" -#: cobc/codegen.c:3713 cobc/codegen.c:4413 +#: cobc/codegen.c:3690 cobc/codegen.c:4455 #, c-format msgid "internal statement stack depth exceeded: %d" msgstr "internt djup för satsstack överskreds: %d" -#: cobc/codegen.c:3785 +#: cobc/codegen.c:3763 #, c-format msgid "%s is not a field" msgstr "%s är inte ett fält" -#: cobc/codegen.c:4186 cobc/codegen.c:4257 +#: cobc/codegen.c:4177 cobc/codegen.c:4279 #, c-format msgid "unexpected function: %s" msgstr "oväntad funktion: %s" -#: cobc/codegen.c:5204 +#: cobc/codegen.c:5256 #, c-format msgid "unexpected tree category: %d" msgstr "oväntad trädkategori: %d" -#: cobc/codegen.c:5971 +#: cobc/codegen.c:6108 #, c-format msgid "unexpected size: %d" msgstr "oväntad storlek: %d" -#: cobc/codegen.c:7595 +#: cobc/codegen.c:7894 #, c-format msgid "No ENTRY FOR GO TO '%s'" msgstr "" -#: cobc/codegen.c:7816 cobc/codegen.c:8163 +#: cobc/codegen.c:8283 cobc/codegen.c:8609 #, c-format msgid "unexpected handler type: %d" msgstr "oväntad hanterartyp: %d" -#: cobc/codegen.c:8254 -msgid "unexpected error_node parameter" -msgstr "oväntad error_node-parameter" - -#: cobc/codegen.c:8544 +#: cobc/codegen.c:8887 #, c-format msgid "unexpected tree type: %d" msgstr "oväntad trädtyp: %d" -#: cobc/codegen.c:9520 +#: cobc/codegen.c:9776 msgid "Nested OCCURS in report" msgstr "" -#: cobc/codeoptim.c:2777 +#: cobc/codeoptim.c:2856 #, c-format msgid "unexpected optimization value: %d" msgstr "oväntat optimeringsvärde: %d" -#: cobc/config.c:164 libcob/common.c:7824 libcob/common.c:7838 -#: libcob/common.c:8315 +#: cobc/config.c:164 libcob/common.c:8639 libcob/common.c:8653 +#: libcob/common.c:9136 #, c-format msgid "invalid value '%s' for configuration tag '%s'" msgstr "ogiltigt värde ”%s” för konfigurationstagg ”%s”" -#: cobc/config.c:167 libcob/common.c:7117 libcob/common.c:7234 +#: cobc/config.c:167 libcob/common.c:7915 libcob/common.c:7939 #, c-format msgid "should be one of the following values: %s" msgstr "borde vara endera av följande värden: %s" @@ -602,7 +614,7 @@ msgstr "borde vara endera av följande värden: %s" msgid "must be numeric" msgstr "måste vara numerisk" -#: cobc/config.c:171 libcob/common.c:7215 +#: cobc/config.c:171 libcob/common.c:8045 #, c-format msgid "maximum value: %lu" msgstr "största värde: %lu" @@ -617,45 +629,45 @@ msgstr "minsta värde: %d" msgid "unsupported value '%s' for configuration tag '%s'" msgstr "värde ”%s” för konfigurationstagg ”%s” stöds inte" -#: cobc/config.c:318 cobc/pplex.l:1185 libcob/common.c:7739 +#: cobc/config.c:319 cobc/pplex.l:1264 libcob/common.c:8554 msgid "recursive inclusion" msgstr "rekursiv inkludering" -#: cobc/config.c:393 libcob/common.c:7791 +#: cobc/config.c:394 libcob/common.c:8606 msgid "configuration file was included here" msgstr "konfigurationsfil inkluderades här" -#: cobc/config.c:422 +#: cobc/config.c:423 #, c-format msgid "The previous loaded configuration '%s' will be discarded." msgstr "Tidigare inläst konfiguration ”%s” kommer att kasseras." -#: cobc/config.c:458 +#: cobc/config.c:459 msgid "missing definitions:" msgstr "saknar definitioner:" -#: cobc/config.c:460 +#: cobc/config.c:461 #, c-format msgid "\tno definition of '%s'" msgstr "\tingen definition av ”%s”" -#: cobc/config.c:523 +#: cobc/config.c:524 #, c-format msgid "invalid configuration tag '%s'" msgstr "ogiltig konfigurationstagg ”%s”" -#: cobc/config.c:536 libcob/common.c:7545 libcob/common.c:7629 -#: libcob/common.c:7657 +#: cobc/config.c:537 libcob/common.c:8360 libcob/common.c:8444 +#: libcob/common.c:8472 #, c-format msgid "unknown configuration tag '%s'" msgstr "okänd konfigurationstagg ”%s”" -#: cobc/config.c:560 +#: cobc/config.c:561 #, c-format msgid "invalid configuration tag '%s' in word-list" msgstr "ogiltig konfigurationstagg ”%s” i ordlista" -#: cobc/config.c:622 +#: cobc/config.c:623 #, c-format msgid "Could not access word list for '%s'" msgstr "Kunde inte komma åt ordlista för ”%s”" @@ -697,11 +709,11 @@ msgstr "ogiltig numerisk litteral: ”%s”" #: cobc/config.def:73 msgid "" "default initialization for fields without VALUE, may be one of\n" -" * character in quotes\n" -" * decimal 0..255 representing a character\n" -" * \"init\" to initialize to PICTURE/USAGE\n" -" * \"none\" to do no explicit initialization\n" -" * default: \"init\"" +" * character in quotes\n" +" * decimal 0..255 representing a character\n" +" * \"init\" to initialize to PICTURE/USAGE\n" +" * \"none\" to do no explicit initialization\n" +" * default: \"init\"" msgstr "" #: cobc/config.def:83 @@ -728,25 +740,27 @@ msgstr "" msgid "whether DECIMAL-POINT IS COMMA has effect in XML/JSON GENERATE, may be one of: none, xml, json, all" msgstr "" -#: cobc/config.def:103 -msgid "resolve file names at run time using environment variables" +#: cobc/config.def:101 +msgid "checking for subscript (only done with EC-BOUND-SUBSCRIPT active), may be one of: full, max, record" msgstr "" #: cobc/config.def:106 -msgid "alternate formatting of numeric fields" +msgid "resolve file names at run time using environment variables" msgstr "" #: cobc/config.def:109 -msgid "numeric truncation according to ANSI" +msgid "alternate formatting of numeric fields" msgstr "" #: cobc/config.def:112 -#, fuzzy -#| msgid "'%s' cannot have OCCURS DEPENDING" -msgid "allow complex OCCURS DEPENDING ON" -msgstr "”%s” får inte ha OCCURS DEPENDING" +msgid "numeric truncation according to ANSI" +msgstr "" #: cobc/config.def:115 +msgid "allow non-standard OCCURS DEPENDING ON syntax" +msgstr "" + +#: cobc/config.def:118 #, fuzzy #| msgid "" #| "adjust items following OCCURS DEPENDING\n" @@ -756,11 +770,17 @@ msgstr "" "justera objekt som följer på OCCURS DEPENDING\n" "\t\t\t- kräver implicit/explicit-avslappnad syntax" -#: cobc/config.def:118 +#: cobc/config.def:121 +#, fuzzy +#| msgid "invalid VALUE clause" +msgid "applies JUSTIFY with VALUE clause" +msgstr "ogiltig VALUE-klausul" + +#: cobc/config.def:124 msgid "allow REDEFINES to other than last equal level number" msgstr "" -#: cobc/config.def:121 +#: cobc/config.def:127 #, fuzzy #| msgid "" #| "relax syntax checking\n" @@ -770,1122 +790,1120 @@ msgstr "" "lätta upp syntaxkontroll\n" "\t\t\t- t.ex. REDEFINES-plats" -#: cobc/config.def:124 +#: cobc/config.def:130 msgid "allow zero length reference-modification (only changed with EC-BOUND-REF-MOD active)" msgstr "" -#: cobc/config.def:127 +#: cobc/config.def:133 msgid "allow non-matching level numbers" msgstr "" -#: cobc/config.def:130 +#: cobc/config.def:136 msgid "require ASSIGN USING items to be in WORKING-STORAGE" msgstr "" -#: cobc/config.def:133 +#: cobc/config.def:139 msgid "LOCAL-STORAGE SECTION implies RECURSIVE attribute" msgstr "" -#: cobc/config.def:136 +#: cobc/config.def:142 msgid "LINKAGE SECTION items remain allocated between invocations" msgstr "" -#: cobc/config.def:139 +#: cobc/config.def:145 msgid "MOVE operates as on IBM (left to right, byte by byte)" msgstr "" -#: cobc/config.def:142 +#: cobc/config.def:148 msgid "exit point of any currently executing perform is recognized if reached" msgstr "" -#: cobc/config.def:145 +#: cobc/config.def:151 msgid "limit precision in intermediate results to precision of final result (less accurate)" msgstr "" -#: cobc/config.def:148 +#: cobc/config.def:154 msgid "evaluate constant expressions at compile time" msgstr "" -#: cobc/config.def:151 +#: cobc/config.def:157 msgid "allow hexadecimal value 'F' for NUMERIC test of signed PACKED DECIMAL field" msgstr "" -#: cobc/config.def:154 +#: cobc/config.def:160 msgid "program names don't lead to a reserved identifier" msgstr "" -#: cobc/config.def:157 +#: cobc/config.def:163 msgid "set WITH UPDATE clause as default for ACCEPT dest-item, instead of WITH NO UPDATE" msgstr "" -#: cobc/config.def:160 +#: cobc/config.def:166 msgid "set WITH AUTO clause as default for ACCEPT dest-item, instead of WITH TAB" msgstr "" -#: cobc/config.def:163 +#: cobc/config.def:169 msgid "assume CONSOLE IS CRT if not set otherwise" msgstr "" -#: cobc/config.def:166 +#: cobc/config.def:172 msgid "NO-ECHO hides input with asterisks like SECURE" msgstr "" -#: cobc/config.def:169 +#: cobc/config.def:175 msgid "assume a field DISPLAY starts at LINE 0 COL 0 (i.e. at the cursor), not LINE 1 COL 1" msgstr "" -#: cobc/config.def:172 +#: cobc/config.def:178 msgid "special behaviour of DISPLAY SPACE/ALL X'01'/ALL X'02'/ALL X'07'" msgstr "" -#: cobc/config.def:175 +#: cobc/config.def:181 msgid "COMP-1 is a 16-bit signed integer" msgstr "" -#: cobc/config.def:178 +#: cobc/config.def:184 msgid "POINTER is a 64-bit unsigned integer" msgstr "" -#: cobc/config.def:181 +#: cobc/config.def:187 msgid "imply zero in move of non-numeric literal to numeric items" msgstr "" -#: cobc/config.def:184 +#: cobc/config.def:190 msgid "implicitly define a variable if an ASSIGN DYNAMIC does not match any data item" msgstr "" -#: cobc/config.def:187 +#: cobc/config.def:193 msgid "specifying device by mnemonic" msgstr "" -#: cobc/config.def:193 +#: cobc/config.def:199 msgid "" "check contents of Area A (when reference format supports Area A enforcement),\n" -" enabled checks include:\n" -" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" -" and toplevel numbers (01 and 77) must start in Area A;\n" -" * statements must not start in Area A; and\n" -" * separator periods must not be within Area A." +" enabled checks include:\n" +" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" +" and toplevel numbers (01 and 77) must start in Area A;\n" +" * statements must not start in Area A; and\n" +" * separator periods must not be within Area A" msgstr "" -#: cobc/config.def:203 +#: cobc/config.def:209 msgid "comment paragraphs in IDENTIFICATION DIVISION (AUTHOR, DATE-WRITTEN, ...)" msgstr "" -#: cobc/config.def:207 -msgid "CONTROL DIVISION" -msgstr "" - -#: cobc/config.def:211 cobc/ppparse.y:101 cobc/ppparse.y:104 -msgid "partial replacing with literal" +#: cobc/config.def:217 +msgid "" +"apply partial replacing with literal source operand even when it replaces with spaces only;\n" +" * \"skip\" prevents such replacements" msgstr "" -#: cobc/config.def:214 +#: cobc/config.def:221 #, fuzzy #| msgid "SIZE IS clause" msgid "MEMORY-SIZE clause" msgstr "SIZE IS-klausul" -#: cobc/config.def:217 +#: cobc/config.def:224 msgid "MULTIPLE-FILE-TAPE clause" msgstr "" -#: cobc/config.def:220 +#: cobc/config.def:227 #, fuzzy #| msgid "RECORD clause invalid" msgid "LABEL-RECORDS clause" msgstr "RECORD-klausul ogiltig" -#: cobc/config.def:223 +#: cobc/config.def:230 #, fuzzy #| msgid "invalid VALUE clause" msgid "VALUE-OF clause" msgstr "ogiltig VALUE-klausul" -#: cobc/config.def:226 +#: cobc/config.def:233 #, fuzzy #| msgid "RECORD clause invalid" msgid "DATA-RECORDS clause" msgstr "RECORD-klausul ogiltig" -#: cobc/config.def:229 +#: cobc/config.def:236 msgid "OCCURS clause on top-level" msgstr "" -#: cobc/config.def:232 cobc/parser.y:7285 +#: cobc/config.def:239 cobc/parser.y:7566 #, fuzzy #| msgid "SIZE IS clause" msgid "SAME AS clause" msgstr "SIZE IS-klausul" -#: cobc/config.def:235 cobc/parser.y:7621 +#: cobc/config.def:242 cobc/parser.y:7904 #, fuzzy #| msgid "PROMPT clause" msgid "TYPE TO clause" msgstr "PROMPT-klausul" -#: cobc/config.def:238 cobc/parser.y:7644 +#: cobc/config.def:245 cobc/parser.y:7927 msgid "USAGE type-name" msgstr "" -#: cobc/config.def:241 cobc/parser.y:8190 +#: cobc/config.def:248 cobc/parser.y:8563 #, fuzzy #| msgid "SIZE IS clause" msgid "SYNCHRONIZED clause" msgstr "SIZE IS-klausul" -#: cobc/config.def:244 cobc/parser.y:8193 +#: cobc/config.def:251 cobc/parser.y:8566 msgid "LEFT/RIGHT phrases in SYNCHRONIZED clause" msgstr "" -#: cobc/config.def:247 +#: cobc/config.def:254 #, fuzzy #| msgid "SIZE IS clause" msgid "SPECIAL-NAMES clause" msgstr "SIZE IS-klausul" -#: cobc/config.def:250 +#: cobc/config.def:257 #, fuzzy -#| msgid "%s statement not terminated" -msgid "GOTO statement without name" -msgstr "%s sats inte avslutad" +#| msgid "GO TO without procedure-name" +msgid "GO TO statement without name" +msgstr "GO TO utan procedurnamn" -#: cobc/config.def:253 +#: cobc/config.def:260 #, fuzzy #| msgid "STOP literal" msgid "STOP-literal statement" msgstr "STOP-litteral" -#: cobc/config.def:256 +#: cobc/config.def:263 #, fuzzy #| msgid "STOP identifier" msgid "STOP-identifier statement" msgstr "STOP-identifierare" -#: cobc/config.def:259 +#: cobc/config.def:266 #, fuzzy #| msgid "*CONTROL statement" msgid "STOP ERROR statement" msgstr "*CONTROL-sats" -#: cobc/config.def:262 +#: cobc/config.def:269 #, fuzzy #| msgid "debugging indicator" msgid "DEBUGGING MODE and debugging indicator" msgstr "felsökningsindikator" -#: cobc/config.def:268 +#: cobc/config.def:275 msgid "PADDING CHARACTER clause" msgstr "" -#: cobc/config.def:271 +#: cobc/config.def:278 msgid "NEXT SENTENCE phrase" msgstr "" -#: cobc/config.def:274 +#: cobc/config.def:281 msgid "listing-directive statements EJECT, SKIP1, SKIP2, SKIP3" msgstr "" -#: cobc/config.def:277 +#: cobc/config.def:284 msgid "listing-directive statement TITLE" msgstr "" -#: cobc/config.def:280 +#: cobc/config.def:287 #, fuzzy #| msgid "*CONTROL statement" msgid "ENTRY statement" msgstr "*CONTROL-sats" -#: cobc/config.def:283 +#: cobc/config.def:290 #, fuzzy #| msgid "MOVE of non-integer to alphanumeric" msgid "move noninteger to alphanumeric" msgstr "MOVE av icke-heltal till alfanumeriskt" -#: cobc/config.def:286 +#: cobc/config.def:293 #, fuzzy #| msgid "MOVE of figurative constant to numeric item" msgid "move figurative constants to numeric" msgstr "MOVE av bildlig konstant till numeriskt objekt" -#: cobc/config.def:289 +#: cobc/config.def:296 #, fuzzy #| msgid "MOVE of figurative constant to numeric item" msgid "move figurative constant SPACE to numeric" msgstr "MOVE av bildlig konstant till numeriskt objekt" -#: cobc/config.def:292 +#: cobc/config.def:299 #, fuzzy #| msgid "MOVE of figurative constant QUOTE to numeric item" msgid "move figurative constant QUOTE to numeric" msgstr "MOVE av bildlig konstant QUOTE till numeriskt objekt" -#: cobc/config.def:295 +#: cobc/config.def:302 #, fuzzy #| msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgid "OCCURS DEPENDING ON without to" msgstr "OCCURS DEPENDING ON ”%s” utanför intervall: %d" -#: cobc/config.def:298 cobc/parser.y:11102 +#: cobc/config.def:305 cobc/parser.y:11443 msgid "section segments" msgstr "" -#: cobc/config.def:301 +#: cobc/config.def:308 #, fuzzy #| msgid "*CONTROL statement" msgid "ALTER statement" msgstr "*CONTROL-sats" -#: cobc/config.def:304 +#: cobc/config.def:311 msgid "OVERFLOW clause for CALL" msgstr "" -#: cobc/config.def:307 +#: cobc/config.def:314 #, fuzzy #| msgid "numeric boolean literal" msgid "boolean literals (B'1010')" msgstr "numerisk-boolesk litteral" -#: cobc/config.def:310 +#: cobc/config.def:317 #, fuzzy #| msgid "hexadecimal-boolean literal" msgid "hexadecimal-boolean literals (BX'A')" msgstr "hexadecimal-boolesk litteral" -#: cobc/config.def:313 +#: cobc/config.def:320 #, fuzzy #| msgid "national literal" msgid "national literals (N'UTF-16 string')" msgstr "nationell litteral" -#: cobc/config.def:316 +#: cobc/config.def:323 #, fuzzy #| msgid "hexadecimal-national literal" msgid "hexadecimal-national literals (NX'265E')" msgstr "hexadecimal-nationell litteral" -#: cobc/config.def:319 +#: cobc/config.def:326 msgid "non-standard national literals (NC'UTF-16 string')" msgstr "" -#: cobc/config.def:322 +#: cobc/config.def:329 msgid "HP COBOL octal literals (%377)" msgstr "" -#: cobc/config.def:325 +#: cobc/config.def:332 msgid "ACUCOBOL-GT literals (#B #O #H #X)" msgstr "" -#: cobc/config.def:328 cobc/pplex.l:2199 +#: cobc/config.def:335 +msgid "EBCDIC symbolic characters in literals (\" \"135,151,151\"bar\"195, 194\"Z\" for \" foobarBAZ\")" +msgstr "" + +#: cobc/config.def:338 cobc/pplex.l:2428 msgid "continuation of COBOL words" msgstr "fortsättning av COBOL-ord" -#: cobc/config.def:331 +#: cobc/config.def:341 #, fuzzy #| msgid "NOT EXCEPTION before EXCEPTION" msgid "NOT ON EXCEPTION before ON EXCEPTION" msgstr "NOT EXCEPTION före EXCEPTION" -#: cobc/config.def:334 +#: cobc/config.def:344 #, fuzzy #| msgid "non-standard DISPLAY" msgid "extensions to ACCEPT and DISPLAY" msgstr "icke-standard DISPLAY" -#: cobc/config.def:337 cobc/field.c:3357 +#: cobc/config.def:347 cobc/field.c:3645 msgid "RENAMES of 01-, 66- and 77-level items" msgstr "RENAMES av 01-, 66- och 77-nivåobjekt" -#: cobc/config.def:341 +#: cobc/config.def:351 msgid "allow larger REDEFINES items" msgstr "" -#: cobc/config.def:344 +#: cobc/config.def:354 #, fuzzy #| msgid "'%s' is not defined in SPECIAL-NAMES" msgid "constants defined in SPECIAL-NAMES" msgstr "”%s” är inte definierad i SPECIAL-NAMES" -#: cobc/config.def:347 +#: cobc/config.def:357 msgid "constant with level 78 item (note: has left to right precedence in expressions)" msgstr "" -#: cobc/config.def:350 +#: cobc/config.def:360 msgid "constant with level 01 CONSTANT AS/FROM item" msgstr "" -#: cobc/config.def:353 +#: cobc/config.def:363 msgid "PERFORM VARYING without BY phrase (implies BY 1)" msgstr "" -#: cobc/config.def:356 +#: cobc/config.def:366 msgid "references to sections not in DECLARATIVES from within DECLARATIVES" msgstr "" -#: cobc/config.def:359 cobc/parser.y:12225 cobc/parser.y:12521 +#: cobc/config.def:369 cobc/parser.y:12614 cobc/parser.y:12913 msgid "CALL/CANCEL with program-prototype-name" msgstr "CALL/CANCEL med programprototypnamn" -#: cobc/config.def:362 +#: cobc/config.def:372 msgid "specifying call-convention by mnemonic" msgstr "" -#: cobc/config.def:365 +#: cobc/config.def:375 msgid "specifying call-convention by WITH ... LINKAGE" msgstr "" -#: cobc/config.def:368 +#: cobc/config.def:378 +msgid "support for PROCEDURE DIVISION USING OPTIONAL" +msgstr "" + +#: cobc/config.def:381 #, fuzzy #| msgid "numeric literal in VALUE clause of numeric-edited item" msgid "numeric literals in VALUE clause of numeric-edited items" msgstr "numerisk litteral i VALUE-klausul av numeriskt redigerat objekt" -#: cobc/config.def:371 +#: cobc/config.def:384 msgid "incorrect order of CONFIGURATION SECTION paragraphs" msgstr "felaktig ordning på CONFIGURATION SECTION-stycken" -#: cobc/config.def:374 +#: cobc/config.def:387 msgid "allow >> DEFINE CONSTANT var AS literal" msgstr "" -#: cobc/config.def:377 +#: cobc/config.def:390 #, fuzzy #| msgid "REDEFINES clause must follow entry-name" msgid "REDEFINES clause not following entry-name in definition" msgstr "REDEFINES-klausul måste följa på postnamn" -#: cobc/config.def:380 +#: cobc/config.def:393 msgid "record sizes does not match RECORD clause" msgstr "" -#: cobc/config.def:383 cobc/parser.y:5736 cobc/parser.y:5750 cobc/parser.y:5763 -#: cobc/parser.y:5774 +#: cobc/config.def:396 cobc/parser.y:5991 cobc/parser.y:6005 cobc/parser.y:6018 +#: cobc/parser.y:6029 #, fuzzy #| msgid "PROMPT clause" msgid "RECORD DELIMITER clause" msgstr "PROMPT-klausul" -#: cobc/config.def:386 +#: cobc/config.def:399 msgid "BINARY-SEQUENTIAL and LINE-SEQUENTIAL phrases in RECORD DELIMITER" msgstr "" -#: cobc/config.def:389 cobc/tree.c:4805 +#: cobc/config.def:402 cobc/tree.c:4873 msgid "RECORD DELIMITER clause on file with fixed-length records" msgstr "" -#: cobc/config.def:392 +#: cobc/config.def:405 msgid "missing statement (e.g. empty IF / PERFORM)" msgstr "" -#: cobc/config.def:395 +#: cobc/config.def:408 msgid "missing period in PROCEDURE DIVISION (when reference format supports Area A enforcement)" msgstr "" -#: cobc/config.def:398 +#: cobc/config.def:411 msgid "zero-length literals, e.g. '' and \"\"" msgstr "" -#: cobc/config.def:401 +#: cobc/config.def:414 msgid "XML GENERATE's phrases other than COUNT IN" msgstr "" -#: cobc/config.def:404 cobc/typeck.c:8565 +#: cobc/config.def:417 cobc/typeck.c:9017 msgid "AFTER phrase in CONTINUE statement" msgstr "" -#: cobc/config.def:407 -msgid "ENTRY FOR GOTO and GOTO ENTRY statements" +#: cobc/config.def:420 +msgid "ENTRY FOR GO TO and GO TO ENTRY statements" msgstr "" -#: cobc/config.def:410 +#: cobc/config.def:423 cobc/typeck.c:4642 msgid "ASSIGN [TO] variable in SELECT" msgstr "" -#: cobc/config.def:413 +#: cobc/config.def:426 msgid "ASSIGN USING/VARYING variable in SELECT" msgstr "" -#: cobc/config.def:416 +#: cobc/config.def:429 msgid "ASSIGN EXTERNAL/DYNAMIC in SELECT" msgstr "" -#: cobc/config.def:419 +#: cobc/config.def:432 msgid "ASSIGN DISK FROM variable in SELECT" msgstr "" -#: cobc/config.def:422 +#: cobc/config.def:435 msgid "VSAM status in FILE STATUS" msgstr "" -#: cobc/config.def:425 +#: cobc/config.def:438 msgid "CALL to own PROGRAM-ID implies RECURSIVE attribute" msgstr "" -#: cobc/config.def:428 +#: cobc/config.def:441 msgid "DEPENDING clause in RECORD CONTAINS" msgstr "" -#: cobc/config.def:431 cobc/tree.c:3584 +#: cobc/config.def:444 cobc/tree.c:3623 msgid "PICTURE string with 'L' character" msgstr "" -#: cobc/error.c:83 +#: cobc/error.c:141 libcob/common.c:1379 libcob/common.c:8715 +#: libcob/common.c:8766 +#, c-format +msgid "warning: " +msgstr "varning: " + +#: cobc/error.c:142 libcob/common.c:8784 +msgid "note: " +msgstr "" + +#: cobc/error.c:162 #, fuzzy, c-format #| msgid "in section" msgid "in section '%s':" msgstr "i avsnitt" -#: cobc/error.c:94 +#: cobc/error.c:173 #, fuzzy, c-format #| msgid "in paragraph" msgid "in paragraph '%s':" msgstr "i stycke" -#: cobc/error.c:129 cobc/error.c:133 cobc/error.c:136 +#: cobc/error.c:227 cobc/error.c:231 cobc/error.c:234 msgid "too many errors" msgstr "för många fel" -#: cobc/error.c:145 +#: cobc/error.c:243 #, fuzzy, c-format #| msgid "configuration file was included here" msgid "in file included from " msgstr "konfigurationsfil inkluderades här" -#: cobc/error.c:163 libcob/common.c:8325 +#: cobc/error.c:261 libcob/common.c:9146 msgid "configuration error:" msgstr "konfigurationsfel:" -#: cobc/error.c:176 libcob/common.c:861 +#: cobc/error.c:274 libcob/common.c:920 #, c-format msgid "system error %d" msgstr "systemfel %d" -#: cobc/error.c:346 cobc/error.c:413 cobc/error.c:475 cobc/error.c:631 -#: cobc/error.c:675 cobc/error.c:785 libcob/common.c:1318 libcob/common.c:7900 -#: libcob/common.c:7951 -#, c-format -msgid "warning: " -msgstr "varning: " - -#: cobc/error.c:518 cobc/error.c:534 cobc/error.c:868 cobc/error.c:889 +#: cobc/error.c:616 cobc/error.c:632 cobc/error.c:971 cobc/error.c:992 #, c-format msgid "%s used" msgstr "%s använd" -#: cobc/error.c:521 cobc/error.c:871 +#: cobc/error.c:619 cobc/error.c:974 #, c-format msgid "%s is archaic in %s" msgstr "%s är ålderdomlig i %s" -#: cobc/error.c:525 cobc/error.c:875 +#: cobc/error.c:623 cobc/error.c:978 #, c-format msgid "%s is obsolete in %s" msgstr "%s är föråldrad i %s" -#: cobc/error.c:531 cobc/error.c:881 cobc/parser.y:5738 +#: cobc/error.c:629 cobc/error.c:984 cobc/parser.y:5993 #, c-format msgid "%s ignored" msgstr "%s överhoppades" -#: cobc/error.c:537 cobc/error.c:891 +#: cobc/error.c:635 cobc/error.c:994 #, c-format msgid "%s does not conform to %s" msgstr "%s följer inte %s" -#: cobc/error.c:553 +#: cobc/error.c:651 msgid "configuration warning:" msgstr "konfigurationsvarning:" -#: cobc/error.c:728 cobc/error.c:731 cobc/error.c:755 cobc/error.c:758 -#: libcob/common.c:7969 -msgid "note: " -msgstr "" - -#: cobc/error.c:933 cobc/error.c:962 +#: cobc/error.c:1040 cobc/error.c:1069 #, c-format msgid "redefinition of '%s'" msgstr "omdefinition av ”%s”" -#: cobc/error.c:939 cobc/error.c:973 +#: cobc/error.c:1046 cobc/error.c:1080 #, c-format msgid "'%s' previously defined here" msgstr "”%s” tidigare definierad här" -#: cobc/error.c:1017 cobc/error.c:1023 +#: cobc/error.c:1124 cobc/error.c:1130 #, c-format msgid "'%s' is not defined" msgstr "”%s” är inte definierad" -#: cobc/error.c:1019 +#: cobc/error.c:1126 #, c-format msgid "'%s' cannot be used here" msgstr "”%s” kan inte användas här" -#: cobc/error.c:1021 cobc/parser.y:7658 +#: cobc/error.c:1128 cobc/parser.y:7941 #, c-format msgid "'%s' is not defined, but is a reserved word in another dialect" msgstr "”%s” är inte definierad, men är ett reserverat ord i en annan dialekt" -#: cobc/error.c:1060 +#: cobc/error.c:1167 #, c-format msgid "'%s' is ambiguous; needs qualification" msgstr "”%s” är tvetydig; behöver kvalificering" -#: cobc/error.c:1090 +#: cobc/error.c:1197 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "'%s' is a special register" msgstr "”%s” är inte ett heltal" -#: cobc/error.c:1093 +#: cobc/error.c:1200 #, fuzzy, c-format #| msgid "'%s' is not defined" msgid "'%s' internally defined" msgstr "”%s” är inte definierad" -#: cobc/error.c:1097 cobc/parser.y:18176 cobc/parser.y:18181 cobc/typeck.c:5000 -#: cobc/typeck.c:5047 cobc/typeck.c:5048 +#: cobc/error.c:1204 cobc/parser.y:18772 cobc/parser.y:18777 cobc/typeck.c:5166 +#: cobc/typeck.c:5213 cobc/typeck.c:5214 #, c-format msgid "'%s' defined here" msgstr "”%s” definierad här" -#: cobc/error.c:1108 +#: cobc/error.c:1215 #, c-format msgid "fatal error: %s" msgstr "ödesdigert fel: %s" -#: cobc/error.c:1117 +#: cobc/error.c:1224 #, c-format msgid "group item '%s' cannot have %s clause" msgstr "gruppobjekt ”%s” kan inte ha en %s-klausul" -#: cobc/error.c:1132 +#: cobc/error.c:1239 #, c-format msgid "constant item '%s' requires a %s clause" msgstr "konstantobjekt ”%s” kräver en %s-klausul" -#: cobc/error.c:1136 +#: cobc/error.c:1243 #, c-format msgid "level %02d item '%s' requires a %s clause" msgstr "nivå %02d-objekt ”%s” kräver en %s-klausul" -#: cobc/error.c:1151 +#: cobc/error.c:1258 #, c-format msgid "constant item '%s' can only have a %s clause" msgstr "konstantobjekt ”%s” kan endast ha en %s-klausul" -#: cobc/error.c:1155 +#: cobc/error.c:1262 #, c-format msgid "level %02d item '%s' can only have a %s clause" msgstr "nivå %02d-objekt ”%s” kan endast ha en %s-klausul" -#: cobc/field.c:136 +#: cobc/field.c:139 #, fuzzy #| msgid "Constant expression has Divide by ZERO" msgid "constant expression has Divide by ZERO" msgstr "Konstantuttryck har division med noll" -#: cobc/field.c:192 cobc/field.c:329 cobc/field.c:337 +#: cobc/field.c:195 cobc/field.c:332 cobc/field.c:340 msgid "missing right parenthesis" msgstr "saknar högerparentes" -#: cobc/field.c:221 +#: cobc/field.c:224 #, c-format msgid "expression stack overflow at %d entries for operation '%c'" msgstr "" -#: cobc/field.c:262 +#: cobc/field.c:265 #, c-format msgid "expression stack overflow at %d entries" msgstr "" -#: cobc/field.c:279 +#: cobc/field.c:282 msgid "missing left parenthesis" msgstr "saknar vänsterparentes" -#: cobc/field.c:320 +#: cobc/field.c:323 #, c-format msgid "invalid operator '%s' in expression" msgstr "ogiltig operator ”%s” i uttryck" -#: cobc/field.c:339 +#: cobc/field.c:342 #, c-format msgid "'%c' operator misplaced" msgstr "felplacerad operator ”%c”" -#: cobc/field.c:400 +#: cobc/field.c:403 #, c-format msgid "invalid level number '%s'" msgstr "ogiltigt nivånummer ”%s”" -#: cobc/field.c:460 cobc/field.c:498 +#: cobc/field.c:463 cobc/field.c:502 msgid "level number must begin with 01 or 77" msgstr "nivånummer måste börja med 01 eller 77" -#: cobc/field.c:558 cobc/field.c:562 +#: cobc/field.c:562 cobc/field.c:566 #, c-format msgid "no previous data item of level %02d" msgstr "inget tidigare dataobjekt för nivå %02d" -#: cobc/field.c:620 +#: cobc/field.c:631 #, c-format msgid "'%s' cannot be qualified here" msgstr "”%s” kan inte kvalificeras här" -#: cobc/field.c:626 +#: cobc/field.c:637 #, c-format msgid "'%s' cannot be subscripted here" msgstr "”%s” kan inte indexeras här" -#: cobc/field.c:642 cobc/field.c:653 +#: cobc/field.c:653 cobc/field.c:664 #, c-format msgid "'%s' is not defined in '%s'" msgstr "”%s” är inte definierad i ”%s”" -#: cobc/field.c:660 +#: cobc/field.c:671 msgid "level number of REDEFINES entries must be identical" msgstr "nivånummer för REDEFINES-poster måste vara identiska" -#: cobc/field.c:665 +#: cobc/field.c:676 #, c-format msgid "'%s' is not the original definition" msgstr "”%s” är inte originaldefinitionen" -#: cobc/field.c:826 cobc/parser.y:659 +#: cobc/field.c:720 cobc/parser.y:1051 +#, fuzzy, c-format +#| msgid "duplicate %s clause" +msgid "duplicate %s" +msgstr "duplicerad %s-klausul" + +#: cobc/field.c:878 cobc/parser.y:733 #, c-format msgid "duplicate %s clause" msgstr "duplicerad %s-klausul" -#: cobc/field.c:906 +#: cobc/field.c:988 #, fuzzy, c-format #| msgid "PICTURE clause not compatible with USAGE %s" msgid "%s clause not compatible with PIC %s" msgstr "PICTURE-klausul inte kompatibel med USAGE %s" -#: cobc/field.c:917 cobc/field.c:953 +#: cobc/field.c:999 cobc/field.c:1036 #, fuzzy, c-format #| msgid "PICTURE clause not compatible with USAGE %s" msgid "%s clause not compatible with USAGE %s" msgstr "PICTURE-klausul inte kompatibel med USAGE %s" -#: cobc/field.c:1053 cobc/field.c:1069 cobc/field.c:1131 cobc/field.c:1142 +#: cobc/field.c:1140 cobc/field.c:1159 cobc/field.c:1227 cobc/field.c:1238 #, c-format msgid "PICTURE clause required for '%s'" msgstr "PICTURE-klausul krävs för ”%s”" -#: cobc/field.c:1138 +#: cobc/field.c:1234 #, c-format msgid "a non-numeric literal is expected for '%s'" msgstr "en icke-numerisk litteral förväntas för ”%s”" -#: cobc/field.c:1150 +#: cobc/field.c:1247 #, c-format msgid "defining implicit picture size %d for '%s'" msgstr "definierar implicit bildstorlek %d för ”%s”" -#: cobc/field.c:1171 +#: cobc/field.c:1271 #, c-format msgid "'%s' ANY LENGTH only allowed in LINKAGE" msgstr "”%s” ANY LENGTH tillåts endast i LINKAGE" -#: cobc/field.c:1175 +#: cobc/field.c:1275 #, c-format msgid "'%s' ANY LENGTH must be 01 level" msgstr "”%s” ANY LENGTH måste vara nivå 01" -#: cobc/field.c:1179 +#: cobc/field.c:1279 #, c-format msgid "'%s' ANY LENGTH cannot be BASED/EXTERNAL" msgstr "”%s” ANY LENGTH får inte vara BASED/EXTERNAL" -#: cobc/field.c:1184 cobc/field.c:1210 +#: cobc/field.c:1283 cobc/field.c:1313 #, c-format msgid "'%s' ANY LENGTH has invalid definition" msgstr "”%s” ANY LENGTH har ogiltig definition" -#: cobc/field.c:1192 +#: cobc/field.c:1295 #, c-format msgid "'%s' ANY NUMERIC must be PIC 9" msgstr "”%s” ANY NUMERIC måste vara PIC 9" -#: cobc/field.c:1198 +#: cobc/field.c:1301 #, fuzzy, c-format #| msgid "'%s' ANY LENGTH must be PIC X or PIC A" -msgid "'%s' ANY LENGTH must be PIC X, PIC N or PIC 1" +msgid "'%s' ANY LENGTH must be PIC X, PIC U, PIC N or PIC 1" msgstr "”%s” ANY LENGTH måste vara PIC X eller PIC A" -#: cobc/field.c:1208 +#: cobc/field.c:1311 #, c-format msgid "'%s' ANY NUMERIC has invalid definition" msgstr "”%s” ANY NUMERIC har ogiltig definition" -#: cobc/field.c:1224 +#: cobc/field.c:1327 #, c-format msgid "'%s' EXTERNAL must be specified at 01/77 level" msgstr "”%s” EXTERNAL måste anges vid 01/77-nivå" -#: cobc/field.c:1228 +#: cobc/field.c:1331 #, c-format msgid "'%s' EXTERNAL can only be specified in WORKING-STORAGE section" msgstr "”%s” EXTERNAL kan endast anges i WORKING-STORAGE-sektionen" -#: cobc/field.c:1232 +#: cobc/field.c:1335 #, c-format msgid "'%s' EXTERNAL and BASED are mutually exclusive" msgstr "”%s” EXTERNAL och BASED är ömsesidigt uteslutande" -#: cobc/field.c:1235 +#: cobc/field.c:1338 #, c-format msgid "'%s' EXTERNAL not allowed with REDEFINES" msgstr "”%s” EXTERNAL inte tillåten med REDEFINES" -#: cobc/field.c:1247 +#: cobc/field.c:1350 #, c-format msgid "'%s' BASED not allowed here" msgstr "”%s” BASED inte tillåtet här" -#: cobc/field.c:1250 +#: cobc/field.c:1353 #, c-format msgid "'%s' BASED not allowed with REDEFINES" msgstr "”%s” BASED inte tillåtet med REDEFINES" -#: cobc/field.c:1253 +#: cobc/field.c:1356 #, c-format msgid "'%s' BASED only allowed at the 01 and 77 levels" msgstr "”%s” BASED endast tillåtet vid 01- och 77-nivåerna" -#: cobc/field.c:1279 +#: cobc/field.c:1383 #, fuzzy, c-format #| msgid "'%s' cannot have the OCCURS clause due to '%s'" msgid "'%s' cannot have an OCCURS clause due to '%s'" msgstr "”%s” får inte ha OCCURS-klausulen på grund av ”%s”" -#: cobc/field.c:1298 +#: cobc/field.c:1402 #, fuzzy, c-format #| msgid "the original definition '%s' should not have OCCURS clause" msgid "the original definition '%s' should not have an OCCURS clause" msgstr "originaldefinitionen ”%s” borde inte ha en OCCURS-klausul" -#: cobc/field.c:1305 +#: cobc/field.c:1408 +#, fuzzy, c-format +#| msgid "the original definition '%s' should not have OCCURS clause" +msgid "the original definition '%s' should not have an ANY LENGTH clause" +msgstr "originaldefinitionen ”%s” borde inte ha en OCCURS-klausul" + +#: cobc/field.c:1415 msgid "REDEFINES must follow the original definition" msgstr "REDEFINES måste följa originaldefinitionen" -#: cobc/field.c:1313 +#: cobc/field.c:1423 #, c-format msgid "'%s' cannot be variable length" msgstr "”%s” får inte ha variabel längd" -#: cobc/field.c:1316 +#: cobc/field.c:1426 #, c-format msgid "the original definition '%s' cannot be variable length" msgstr "originaldefinitionen ”%s” får inte ha variabel längd" -#: cobc/field.c:1335 +#: cobc/field.c:1445 cobc/field.c:1708 #, fuzzy, c-format #| msgid "'%s' cannot have JUSTIFIED RIGHT" msgid "'%s' cannot have JUSTIFIED RIGHT clause" msgstr "”%s” får inte ha JUSTIFIED RIGHT" -#: cobc/field.c:1342 +#: cobc/field.c:1453 #, fuzzy, c-format #| msgid "'%s' cannot have PICTURE clause" msgid "'%s' cannot have BLANK WHEN ZERO clause" msgstr "”%s” får inte ha PICTURE-klausul" -#: cobc/field.c:1348 +#: cobc/field.c:1460 #, c-format msgid "SCREEN group item '%s' has invalid clause" msgstr "SCREEN-gruppobjekt ”%s” har ogiltig klausul" -#: cobc/field.c:1436 +#: cobc/field.c:1548 #, fuzzy, c-format #| msgid "PICTURE clause not compatible with USAGE %s" msgid "%s USAGE %s incompatible with %s USAGE %s" msgstr "PICTURE-klausul inte kompatibel med USAGE %s" -#: cobc/field.c:1516 +#: cobc/field.c:1629 #, c-format msgid "'%s' cannot have PICTURE clause" msgstr "”%s” får inte ha PICTURE-klausul" -#: cobc/field.c:1533 -#, fuzzy, c-format -#| msgid "'%s' is not USAGE DISPLAY" -msgid "%s item '%s' should be USAGE DISPLAY" -msgstr "”%s” är inte USAGE DISPLAY" - -#: cobc/field.c:1556 +#: cobc/field.c:1662 #, c-format msgid "'%s' COMP-6 with sign - changing to COMP-3" msgstr "”%s” COMP-6 med tecken - ändrar till COMP-3" -#: cobc/field.c:1582 +#: cobc/field.c:1688 msgid "elementary items with SIGN clause must have S in PICTURE" msgstr "elementära objekt med SIGN-klausul måste ha S i PICTURE" -#: cobc/field.c:1585 +#: cobc/field.c:1691 msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgstr "elementära objekt med SIGN-klausul måste vara USAGE DISPLAY eller NATIONAL" -#: cobc/field.c:1602 -#, c-format -msgid "'%s' cannot have JUSTIFIED RIGHT" -msgstr "”%s” får inte ha JUSTIFIED RIGHT" - -#: cobc/field.c:1614 +#: cobc/field.c:1720 #, c-format msgid "'%s' cannot have S in PICTURE string and BLANK WHEN ZERO" msgstr "”%s” får inte ha S i PICTURE-sträng och BLANK WHEN ZERO" -#: cobc/field.c:1619 +#: cobc/field.c:1725 #, c-format msgid "'%s' cannot have BLANK WHEN ZERO without being USAGE DISPLAY or NATIONAL" msgstr "”%s” får inte ha BLANK WHEN ZERO utan att vara USAGE DISPLAY eller NATIONAL" -#: cobc/field.c:1631 +#: cobc/field.c:1737 #, c-format msgid "'%s' cannot have * in PICTURE string and BLANK WHEN ZERO" msgstr "”%s” får inte ha * i PICTURE-sträng och BLANK WHEN ZERO" -#: cobc/field.c:1638 +#: cobc/field.c:1744 #, c-format msgid "'%s' is not numeric, so cannot have BLANK WHEN ZERO" msgstr "”%s” är inte numeriskt, och får därför inte ha BLANK WHEN ZERO" -#: cobc/field.c:1691 +#: cobc/field.c:1798 #, c-format msgid "elements in VALUE clause for '%s' (%d) exceed max amount (%d)" msgstr "" -#: cobc/field.c:1708 cobc/field.c:1712 +#: cobc/field.c:1822 +msgid "unexpected VALUES ARE for elementary item" +msgstr "" + +#: cobc/field.c:1836 cobc/field.c:1840 #, fuzzy, c-format #| msgid "initial VALUE clause ignored for %s item" msgid "initial VALUE clause ignored for %s item '%s'" msgstr "inledande VALUE-klausul överhoppad för %s-objekt" -#: cobc/field.c:1725 +#: cobc/field.c:1853 msgid "FULL has no effect on numeric items; you may want REQUIRED or PIC Z" msgstr "" -#: cobc/field.c:1755 +#: cobc/field.c:1884 msgid "VALUE may not contain a figurative constant" msgstr "" -#: cobc/field.c:1763 -#, fuzzy -#| msgid "cannot specify both %s and %s" -msgid "cannot specify both FULL and JUSTIFIED" +#: cobc/field.c:1893 cobc/field.c:1935 cobc/parser.y:750 cobc/parser.y:1823 +#: cobc/parser.y:1826 +#, c-format +msgid "cannot specify both %s and %s" msgstr "kan inte ange både %s och %s" -#: cobc/field.c:1775 +#: cobc/field.c:1905 #, c-format msgid "'%s' has FROM, TO or USING without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1792 +#: cobc/field.c:1922 #, c-format msgid "'%s' has numeric VALUE without PIC; PIC will be implied" msgstr "" -#: cobc/field.c:1805 -#, fuzzy -#| msgid "cannot specify both %s and %s" -msgid "cannot specify both PIC and VALUE" -msgstr "kan inte ange både %s och %s" - -#: cobc/field.c:1813 +#: cobc/field.c:1943 msgid "cannot have PIC without FROM, TO or USING" msgstr "" -#: cobc/field.c:1822 +#: cobc/field.c:1952 msgid "cannot have numeric VALUE without PIC" msgstr "" -#: cobc/field.c:1831 +#: cobc/field.c:1961 msgid "cannot have FROM, TO or USING without PIC" msgstr "" -#: cobc/field.c:1841 +#: cobc/field.c:1971 #, fuzzy #| msgid "INITIALIZED TO item is not alphanumeric" msgid "VALUE item may not be numeric" msgstr "INITIALIZED TO-objekt är inte alfanumeriskt" -#: cobc/field.c:1856 +#: cobc/field.c:1986 #, c-format msgid "'%s' needs a PIC, COL, LINE, VALUE, BELL or BLANK clause" msgstr "" -#: cobc/field.c:1868 +#: cobc/field.c:1998 #, c-format msgid "'%s' cannot have PIC without FROM, TO, USING or numeric VALUE" msgstr "" -#: cobc/field.c:1876 +#: cobc/field.c:2006 #, c-format msgid "'%s' needs a PIC, FROM, TO, USING, VALUE, BELL, BLANK or ERASE clause" msgstr "" -#: cobc/field.c:1912 +#: cobc/field.c:2042 msgid "cannot use AUTO, FULL, PROMPT, REQUIRED or SECURE on elementary item without TO or USING" msgstr "" -#: cobc/field.c:1919 +#: cobc/field.c:2049 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED, OCCURS or SIGN on item without FROM, TO or USING" msgstr "" -#: cobc/field.c:1938 +#: cobc/field.c:2068 msgid "cannot use AUTO, FULL, REQUIRED or SECURE on elementary item without FROM, TO or USING" msgstr "" -#: cobc/field.c:1943 +#: cobc/field.c:2073 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED or SIGN without FROM, TO or USING" msgstr "" -#: cobc/field.c:1960 +#: cobc/field.c:2090 #, fuzzy #| msgid "'%s' cannot have BLANK WHEN ZERO without being USAGE DISPLAY or NATIONAL" msgid "cannot have BLANK WHEN ZERO without PIC" msgstr "”%s” får inte ha BLANK WHEN ZERO utan att vara USAGE DISPLAY eller NATIONAL" -#: cobc/field.c:1963 +#: cobc/field.c:2093 #, fuzzy #| msgid "'%s' cannot have JUSTIFIED RIGHT" msgid "cannot have JUSTIFIED without PIC" msgstr "”%s” får inte ha JUSTIFIED RIGHT" -#: cobc/field.c:1983 +#: cobc/field.c:2113 msgid "cannot have AUTO without FROM, TO or USING" msgstr "" -#: cobc/field.c:1988 +#: cobc/field.c:2118 msgid "cannot use FULL or REQUIRED on item without TO or USING" msgstr "" -#: cobc/field.c:1995 +#: cobc/field.c:2125 msgid "SECURE can be used with TO only" msgstr "" -#: cobc/field.c:1997 +#: cobc/field.c:2127 #, fuzzy #| msgid "READ must be executed first" msgid "SECURE must be used with TO" msgstr "READ måste köras först" -#: cobc/field.c:2016 +#: cobc/field.c:2146 #, fuzzy, c-format #| msgid "'%s' is not defined" msgid "'%s' does nothing" msgstr "”%s” är inte definierad" -#: cobc/field.c:2235 +#: cobc/field.c:2361 #, fuzzy, c-format #| msgid "'%s' 77 level not allowed here" msgid "'%s' 77 level is not allowed here" msgstr "”%s” 77-nivå inte tillåten här" -#: cobc/field.c:2627 +#: cobc/field.c:2399 msgid "OCCURS and multi COLUMNs is not allowed" msgstr "" -#: cobc/field.c:2655 +#: cobc/field.c:2419 #, fuzzy, c-format #| msgid "duplicate DEFINE '%s' - ignored" msgid "duplicate LINE %d ignored" msgstr "duplicerad DEFINE ”%s” - överhoppad" -#: cobc/field.c:2672 +#: cobc/field.c:2870 #, c-format msgid "ignoring SYNCHRONIZED for group item '%s'" msgstr "hoppar över SYNCHRONIZED för gruppobjekt ”%s”" -#: cobc/field.c:2686 cobc/field.c:2954 +#: cobc/field.c:2884 cobc/field.c:3219 msgid "larger REDEFINES" msgstr "" -#: cobc/field.c:2699 cobc/field.c:2957 cobc/field.c:2962 +#: cobc/field.c:2898 cobc/field.c:3222 cobc/field.c:3227 #, c-format msgid "size of '%s' larger than size of '%s'" msgstr "storlek för ”%s” större än storlek för ”%s”" -#: cobc/field.c:2812 cobc/field.c:2879 +#: cobc/field.c:3045 cobc/field.c:3129 cobc/parser.y:832 #, c-format msgid "'%s' cannot be larger than %d bytes" msgstr "”%s” får inte vara större än %d byte" -#: cobc/field.c:2850 cobc/field.c:2858 +#: cobc/field.c:3086 cobc/field.c:3094 #, c-format msgid "'%s' binary field cannot be larger than %d digits" msgstr "binärfält ”%s” får inte vara större än %d siffror" -#: cobc/field.c:2940 cobc/field.c:3522 -#, c-format -msgid "unexpected USAGE: %d" -msgstr "oväntad USAGE: %d" - -#: cobc/field.c:3067 cobc/parser.y:710 cobc/parser.y:712 cobc/parser.y:6274 -#: cobc/parser.y:6284 cobc/parser.y:7344 cobc/parser.y:7347 cobc/parser.y:7349 -#: cobc/parser.y:7351 cobc/parser.y:7386 cobc/parser.y:8237 cobc/parser.y:8239 -#: cobc/parser.y:8241 cobc/parser.y:8243 cobc/parser.y:8558 cobc/parser.y:8567 -#: cobc/parser.y:10564 cobc/parser.y:12075 cobc/parser.y:13492 -#: cobc/parser.y:14902 cobc/typeck.c:5034 +#: cobc/field.c:3353 cobc/parser.y:791 cobc/parser.y:793 cobc/parser.y:6529 +#: cobc/parser.y:6539 cobc/parser.y:7625 cobc/parser.y:7628 cobc/parser.y:7630 +#: cobc/parser.y:7632 cobc/parser.y:7667 cobc/parser.y:8610 cobc/parser.y:8612 +#: cobc/parser.y:8614 cobc/parser.y:8616 cobc/parser.y:8958 cobc/parser.y:8967 +#: cobc/parser.y:10897 cobc/parser.y:12460 cobc/parser.y:13920 +#: cobc/parser.y:15390 cobc/typeck.c:5200 #, c-format msgid "%s and %s are mutually exclusive" msgstr "%s och %s är ömsesidigt uteslutande" -#: cobc/field.c:3068 cobc/parser.y:7529 cobc/parser.y:7566 +#: cobc/field.c:3354 cobc/parser.y:7810 cobc/parser.y:7847 msgid "variable-length PICTURE" msgstr "" -#: cobc/field.c:3187 +#: cobc/field.c:3475 msgid "literal type does not match numeric data type" msgstr "litteraltyp matchar inte numerisk datatyp" -#: cobc/field.c:3261 +#: cobc/field.c:3549 #, c-format msgid "THRU item '%s' may not come before '%s'" msgstr "THRU-objekt ”%s” får inte komma före ”%s”" -#: cobc/field.c:3284 +#: cobc/field.c:3572 #, c-format msgid "RENAMES cannot start/end at the OCCURS item '%s'" msgstr "RENAMES får inte starta/börja med OCCURS-objektet ”%s”" -#: cobc/field.c:3292 +#: cobc/field.c:3580 #, c-format msgid "cannot use RENAMES on part of the table '%s'" msgstr "får inte använda RENAMES för en del av tabellen ”%s”" -#: cobc/field.c:3330 +#: cobc/field.c:3618 #, c-format msgid "RENAMES may not contain '%s' as it is a pointer or object reference" msgstr "RENAMES får inte innehålla ”%s” då det är en pekare eller objektreferens" -#: cobc/field.c:3335 +#: cobc/field.c:3623 #, c-format msgid "RENAMES may not contain '%s' as it is an OCCURS DEPENDING table" msgstr "RENAMES får inte innehålla ”%s” då det är en OCCURS DEPENDING-tabell" -#: cobc/field.c:3359 +#: cobc/field.c:3647 msgid "RENAMES may not reference a level 88" msgstr "RENAMES får inte referera nivå 88" -#: cobc/field.c:3383 +#: cobc/field.c:3671 #, c-format msgid "'%s' must immediately follow the record '%s'" msgstr "”%s” måste omedelbart följa på posten ”%s”" -#: cobc/field.c:3391 +#: cobc/field.c:3679 #, c-format msgid "THRU item must be different to '%s'" msgstr "THRU-objekt måste vara annorlunda jämfört med ”%s”" -#: cobc/field.c:3397 +#: cobc/field.c:3685 #, c-format msgid "'%s' and '%s' must be in the same record" msgstr "”%s” och ”%s” måste vara i samma post" -#: cobc/field.c:3408 +#: cobc/field.c:3696 #, c-format msgid "THRU item '%s' may not be subordinate to '%s'" msgstr "THRU-objekt ”%s” får inte vara underordnat ”%s”" @@ -1933,44 +1951,38 @@ msgid "" " intrinsics to be used without FUNCTION keyword" msgstr "" -#: cobc/flag.def:78 -msgid "" -" -fec=<exception-name>\tenable code generation for <exception-name>,\n" -" sets -fsource-location" -msgstr "" - -#: cobc/flag.def:81 cobc/help.c:96 -msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" -msgstr "" - -#: cobc/flag.def:84 +#: cobc/flag.def:85 msgid "" " -fdump=<scope> dump data fields on abort, <scope> may be\n" " a combination of: ALL, WS, LS, RD, FD, SC, LO" msgstr "" -#: cobc/flag.def:87 +#: cobc/flag.def:88 msgid "" " -fno-dump=<scope> exclude data fields from dumping on abort, <scope> may\n" -" be a combination of: ALL, WS, LS, RD, FD, SC, LO" +" be a combination of: ALL, WS, LS, RD, FD, SC, LO\n" +" default if no scope specified: ALL" msgstr "" -#: cobc/flag.def:92 +#: cobc/flag.def:94 msgid "" " -fcallfh=<name> specifies <name> to be used for I/O\n" " as external provided EXTFH interface module" msgstr "" -#: cobc/flag.def:96 +#: cobc/flag.def:98 +msgid "" +" -febcdic-table=<cconv-table>/<file>\tEBCDIC/ASCII translation table\n" +" * e.g. default, ebcdic500_latin1..." +msgstr "" + +#: cobc/flag.def:102 msgid "" -" -febcdic-table=[DEFAULT|RESTRICTED-GC|IBM|GCOS]\tdefine EBCDIC translation table:\n" -" * default: translation to extended ASCII as per MF\n" -" * restricted-gc: translation from restricted ASCII only\n" -" * ibm: translation to restricted ASCII as per IBM\n" -" * gcos: translation to extended ASCII as per GCOS7" +" -fdefault-colseq=[ASCII|EBCDIC|NATIVE]\tdefine default collating sequence\n" +" * default: NATIVE" msgstr "" -#: cobc/flag.def:107 +#: cobc/flag.def:110 #, fuzzy #| msgid "generate WinMain instead of main when compiling as executable" msgid "" @@ -1978,41 +1990,45 @@ msgid "" " as executable" msgstr "generera WinMain istället för main vid kompilering som körbar fil" -#: cobc/flag.def:111 +#: cobc/flag.def:114 #, fuzzy #| msgid "generate computed goto C statements" msgid " -fcomputed-goto generate computed goto C statements" msgstr "generera beräknade C-goto-satser" -#: cobc/flag.def:114 +#: cobc/flag.def:117 msgid " -fextra-brace generate extra braces in C source" msgstr "" -#: cobc/flag.def:117 +#: cobc/flag.def:120 #, fuzzy #| msgid "attempt correction of invalid numeric display items" msgid " -fcorrect-numeric attempt correction of invalid numeric display items" msgstr "försök att rätta ogiltiga, numeriska objekt som ska visas" -#: cobc/flag.def:120 +#: cobc/flag.def:123 #, fuzzy #| msgid "PERFORM stack allocated on heap" msgid " -fstack-on-heap PERFORM stack allocated on heap" msgstr "PERFORM-stack allokerad på heap" -#: cobc/flag.def:123 +#: cobc/flag.def:126 msgid "" " -fstack-extended store origin of entrypoints and PERFORM\n" -" * turned on by -debug/-dump" +" * turned on by --debug/-fdump" msgstr "" -#: cobc/flag.def:128 +#: cobc/flag.def:130 +msgid " -fno-fast-compare disables inline comparisions" +msgstr "" + +#: cobc/flag.def:135 msgid "" " -fno-remove-unreachable\tdisable remove of unreachable code\n" " * turned off by -g" msgstr "" -#: cobc/flag.def:132 +#: cobc/flag.def:139 #, fuzzy #| msgid "" #| " -Xref generate cross reference through 'cobxref'\n" @@ -2024,19 +2040,19 @@ msgstr "" " -Xref generera korsreferens via 'cobxref'\n" " (V. Coens ”cobxref” måste finnas i sökvägen)" -#: cobc/flag.def:136 +#: cobc/flag.def:143 msgid "" " -ftraceall generate trace code\n" " * scope: executed SECTION/PARAGRAPH/STATEMENTS" msgstr "" -#: cobc/flag.def:140 +#: cobc/flag.def:147 #, fuzzy #| msgid "syntax error checking only; don't emit any output" msgid " -fsyntax-only syntax error checking only; don't emit any output" msgstr "endast syntaxfelskontroll; mata inte ut någon utdata" -#: cobc/flag.def:143 +#: cobc/flag.def:150 #, fuzzy #| msgid "" #| "enable debugging lines\n" @@ -2048,51 +2064,58 @@ msgstr "" "aktivera felsökningsrader\n" "\t\t\t- 'D' i indikatorkolumn eller flytande >>D" -#: cobc/flag.def:147 +#: cobc/flag.def:154 #, fuzzy #| msgid "" #| "generate source location code\n" #| "\t\t\t- turned on by -debug/-g/-ftraceall" msgid "" " -fsource-location generate source location code\n" -" * turned on by -debug/-ftraceall/-fec/-dump" +" * turned on by --debug/-ftraceall/-fec/-fdump" msgstr "" "generera källkodsplatskod\n" "\t\t\t- slå på via -debug/-g/-ftraceall" -#: cobc/flag.def:151 +#: cobc/flag.def:158 #, fuzzy #| msgid "automatic initialization of the COBOL runtime system" msgid " -fimplicit-init automatic initialization of the COBOL runtime system" msgstr "automatisk initialisering av COBOL-körtidssystemet" -#: cobc/flag.def:154 +#: cobc/flag.def:161 msgid "" " -fno-recursive-check disable check of recursive program call;\n" " effectively compiling as RECURSIVE program" msgstr "" -#: cobc/flag.def:158 +#: cobc/flag.def:165 #, fuzzy #| msgid "" #| "PERFORM stack checking\n" #| "\t\t\t- turned on by -debug or -g" msgid "" " -fstack-check PERFORM stack checking\n" -" * turned on by -debug/-g" +" * turned on by --debug/-g" msgstr "" "PERFORM-stackkontroll\n" "\t\t\t- slås på av -debug eller -g" -#: cobc/flag.def:162 +#: cobc/flag.def:169 +msgid "" +" -fmemory-check=<scope> checks for invalid writes to internal storage,\n" +" <scope> may be one of: all, pointer, using, none\n" +" * default: none, set to all by --debug" +msgstr "" + +#: cobc/flag.def:174 msgid " -fsection-exit-check check that code execution does not leave the scope of SECTIONs" msgstr "" -#: cobc/flag.def:165 +#: cobc/flag.def:177 msgid " -fimplicit-goback-check\tcheck that code execution does not end implicit at end of PROCEDURE DIVISION" msgstr "" -#: cobc/flag.def:168 +#: cobc/flag.def:180 #, fuzzy #| msgid "" #| "use AFTER 1 for WRITE of LINE SEQUENTIAL\n" @@ -2104,19 +2127,13 @@ msgstr "" "använd AFTER 1 istället för WRITE av LINE SEQUENTIAL\n" "\t\t\t- standard: BEFORE 1" -#: cobc/flag.def:172 -#, fuzzy -#| msgid "" -#| "'*' or '/' in column 1 treated as comment\n" -#| "\t\t\t- FIXED format only" +#: cobc/flag.def:184 msgid "" -" -fmfcomment '*' or '/' in column 1 treated as comment\n" -" * FIXED format only" +" -fmfcomment '*' in column 1 treated as comment with listing suppression\n" +" * FIXED/COBOL85/VARIABLE format only" msgstr "" -"”*” eller ”/” i kolumn 1 behandlas som kommentarer\n" -"\t\t\t- endast FIXED-format" -#: cobc/flag.def:176 +#: cobc/flag.def:188 #, fuzzy #| msgid "" #| "'$' in indicator area treated as '*',\n" @@ -2128,7 +2145,7 @@ msgstr "" "”$” i indikatorområdet behandlas som ”*”,\n" "\t\t\t”|” behandlas som en flytande kommentar" -#: cobc/flag.def:181 +#: cobc/flag.def:193 #, fuzzy #| msgid "" #| "allow numeric field overflow\n" @@ -2140,7 +2157,7 @@ msgstr "" "tillåt överspill i numeriska fält\n" "\t\t\t- icke-ANSI-beteende" -#: cobc/flag.def:185 +#: cobc/flag.def:197 #, fuzzy #| msgid "" #| "use a single quote (apostrophe) for QUOTE\n" @@ -2152,7 +2169,7 @@ msgstr "" "använd ett enkelt citationstecken (apostrof) för QUOTE\n" "\t\t\t- standard: dubbla citationstecken" -#: cobc/flag.def:195 +#: cobc/flag.def:207 #, fuzzy #| msgid "" #| "treat all files as OPTIONAL\n" @@ -2164,13 +2181,13 @@ msgstr "" "behandla alla filer som OPTIONAL\n" "\t\t\t- om inte NOT OPTIONAL angivits" -#: cobc/flag.def:199 +#: cobc/flag.def:211 #, fuzzy #| msgid "output static function calls for the CALL statement" msgid " -fstatic-call output static function calls for the CALL statement" msgstr "mata ut statiska funktionsanrop för CALL-satser" -#: cobc/flag.def:202 +#: cobc/flag.def:214 #, fuzzy #| msgid "disable generation of C function declations for subroutines with static CALL" msgid "" @@ -2178,56 +2195,80 @@ msgid "" " for subroutines with static CALL" msgstr "inaktivera generering av C-funktionsdeklarationer för subrutiner med statiska CALL" -#: cobc/flag.def:206 +#: cobc/flag.def:218 msgid "" " -fgen-c-line-directives\tgenerate source location directives in C code;\n" -" * turned on by -g" +" * turned on by -g/--coverage" msgstr "" -#: cobc/flag.def:210 +#: cobc/flag.def:222 msgid "" " -fgen-c-labels generate extra labels in C sources;\n" " * turned on by -g" msgstr "" -#: cobc/flag.def:214 +#: cobc/flag.def:226 msgid "" -" -fno-theaders suppress all headers and output of compilation\n" -" options from listing while keeping page breaks" +" -fno-theaders suppress all headers from listing while keeping\n" +" page breaks" msgstr "" -#: cobc/flag.def:218 +#: cobc/flag.def:230 #, fuzzy #| msgid " -F, -free use free source format" msgid " -fno-tsource suppress source from listing" msgstr " -F, -free använd fritt källkodsformat" -#: cobc/flag.def:221 +#: cobc/flag.def:233 msgid " -fno-tmessages suppress warning and error summary from listing" msgstr "" -#: cobc/flag.def:224 +#: cobc/flag.def:236 #, fuzzy #| msgid " --tsymbols specify symbols in listing" msgid " -ftsymbols specify symbols in listing" msgstr " --tsymbols ange symboler i listning" -#: cobc/flag.def:227 +#: cobc/flag.def:239 +#, fuzzy +#| msgid " -Xref specify cross reference in listing" +msgid " -ftcmd specify command line in listing" +msgstr " -Xref ange korsreferens i listning" + +#: cobc/flag.def:242 +msgid " -fno-ttimestamp suppress timestamp in listing headers" +msgstr "" + +#: cobc/flag.def:245 +msgid "" +" -fttitle=<title> set listing title with '_' replaced by spaces;\n" +" defaults to package name and version" +msgstr "" + +#: cobc/flag.def:249 msgid "" " -fno-diagnostics-show-option\tsuppress output of option that directly\n" " controls the diagnostic" msgstr "" -#: cobc/help.c:32 +#: cobc/flag.def:253 +msgid " -fno-diagnostics-show-caret\tdo not display source context on warning/error diagnostic" +msgstr "" + +#: cobc/flag.def:256 +msgid " -fno-diagnostics-show-line-numbers\tsuppress display of line numbers in diagnostics" +msgstr "" + +#: cobc/help.c:33 msgid "GnuCOBOL compiler for most COBOL dialects with lots of extensions" msgstr "GnuCOBOL-kompilator för de flesta COBOL-dialekter med många utökningar" -#: cobc/help.c:34 +#: cobc/help.c:35 #, c-format msgid "Usage: %s [options]... file..." msgstr "Användning: %s [flaggor]… fil…" -#: cobc/help.c:47 bin/cobcrun.c:143 +#: cobc/help.c:48 bin/cobcrun.c:143 #, c-format msgid "" "Report bugs to: %s\n" @@ -2236,41 +2277,40 @@ msgstr "" "Rapportera fel till: %s\n" "eller (hellre) via felrapporteringssystemet via webbplatsen." -#: cobc/help.c:51 -#, fuzzy -#| msgid "GnuCOBOL home page: <http://www.gnu.org/software/gnucobol/>" -msgid "GnuCOBOL home page: <https://www.gnu.org/software/gnucobol/>" -msgstr "GnuCOBOL webbplats: <http://www.gnu.org/software/gnucobol/>" +#: cobc/help.c:52 bin/cobcrun.c:146 +#, c-format +msgid "GnuCOBOL home page: <%s>" +msgstr "" -#: cobc/help.c:52 -#, fuzzy +#: cobc/help.c:54 bin/cobcrun.c:148 +#, fuzzy, c-format #| msgid "General help using GNU software: <http://www.gnu.org/gethelp/>" -msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" +msgid "General help using GNU software: <%s>" msgstr "Allmän hjälp med att använda GNU-programvara: <http://www.gnu.org/gethelp/>" -#: cobc/help.c:58 bin/cobcrun.c:125 +#: cobc/help.c:61 bin/cobcrun.c:125 msgid "Options:" msgstr "Flaggor:" -#: cobc/help.c:59 +#: cobc/help.c:62 #, fuzzy #| msgid " -h, -help display this help and exit" msgid " -h, --help display this help and exit" msgstr " -h, -help visa denna hjälp och avsluta" -#: cobc/help.c:60 +#: cobc/help.c:63 #, fuzzy #| msgid " -V, -version display compiler version and exit" msgid " -V, --version display compiler version information and exit" msgstr " -V, -version visa kompilatorversion och avsluta" -#: cobc/help.c:61 +#: cobc/help.c:64 #, fuzzy #| msgid " -V, -version display compiler version and exit" msgid " -dumpversion display compiler version and exit" msgstr " -V, -version visa kompilatorversion och avsluta" -#: cobc/help.c:62 +#: cobc/help.c:65 #, fuzzy #| msgid "" #| " -i, -info display compiler information (build/environment)\n" @@ -2282,7 +2322,7 @@ msgstr "" " -i, -info visa kompilatorinformation (bygge/miljö)\n" " och avsluta" -#: cobc/help.c:64 +#: cobc/help.c:67 msgid "" " -v, --verbose verbose mode, display additional information;\n" " multiple -v options increase the verbosity,\n" @@ -2293,33 +2333,33 @@ msgid "" " (3) pass verbose option to linker" msgstr "" -#: cobc/help.c:71 +#: cobc/help.c:74 #, fuzzy #| msgid " -q, -brief reduced displays, commands invoked not shown" msgid " -q, --brief reduced displays, commands invoked not shown" msgstr " -q, -brief reducera utskrifter, kommandon som körs visas inte" -#: cobc/help.c:72 +#: cobc/help.c:75 #, fuzzy #| msgid " -### like -v but commands not executed" msgid " -### like -v but commands not executed" msgstr " -### som -v men kommandon körs inte" -#: cobc/help.c:73 +#: cobc/help.c:76 msgid " -x build an executable program" msgstr " -x bygg ett körbart program" -#: cobc/help.c:74 +#: cobc/help.c:77 msgid " -m build a dynamically loadable module (default)" msgstr " -m bygg en dynamiskt inläsningsbar modul (standard)" -#: cobc/help.c:75 +#: cobc/help.c:78 #, fuzzy #| msgid " -j [<args>], -job[=<args>]\trun program after build, passing <args>" msgid " -j [<args>], --job[=<args>]\trun program after build, passing <args>" msgstr " -j [<arg>], -job[=<arg>]\tkör program efter bygge, skicka vidare <arg>" -#: cobc/help.c:76 +#: cobc/help.c:79 #, fuzzy #| msgid "" #| " -std=<dialect> warnings/features for a specific dialect\n" @@ -2347,13 +2387,13 @@ msgstr "" " acu-strict, acu, rm-strict, rm;\n" " se konfigurationsfiler i katalogkonfiguration" -#: cobc/help.c:84 +#: cobc/help.c:87 #, fuzzy #| msgid " -F, -free use free source format" msgid " -F, --free use free source format (alias for -fformat=free)" msgstr " -F, -free använd fritt källkodsformat" -#: cobc/help.c:85 +#: cobc/help.c:88 #, fuzzy #| msgid " -fixed use fixed source format (default)" msgid "" @@ -2361,23 +2401,23 @@ msgid "" " -fformat=fixed)" msgstr " -fixed använd fixerat källkodsformat (standard)" -#: cobc/help.c:87 +#: cobc/help.c:90 msgid " -O, -O2, -O3, -Os enable optimization" msgstr " -O, -O2, -O3, -Os aktivera optimering" -#: cobc/help.c:88 +#: cobc/help.c:91 #, fuzzy #| msgid " -W enable all warnings" msgid " -O0 disable optimization" msgstr " -W aktivera alla varningar" -#: cobc/help.c:89 +#: cobc/help.c:92 #, fuzzy #| msgid " -g enable C compiler debug / stack check / trace" msgid " -g enable C compiler debug and stack check" msgstr " -g aktivera C-kompilatorns felsökning / stackkontroll / spårning" -#: cobc/help.c:90 +#: cobc/help.c:93 #, fuzzy #| msgid " -d, -debug enable all run-time error checking" msgid "" @@ -2385,18 +2425,22 @@ msgid "" " equal to -fstack-check -fec=EC-ALL" msgstr " -d, -debug aktivera all felkontroll för körtid" -#: cobc/help.c:93 +#: cobc/help.c:97 msgid "" " -fec=<exception-name>\tenable code generation for <exception-name>,\n" " see --list-exceptions for the possible values,\n" " sets -fsource-location" msgstr "" -#: cobc/help.c:97 +#: cobc/help.c:100 +msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" +msgstr "" + +#: cobc/help.c:101 msgid " -o <file> place the output into <file>" msgstr " -o <fil> placera utmatning i <fil>" -#: cobc/help.c:98 +#: cobc/help.c:102 msgid "" " -b combine all input files into a single\n" " dynamically loadable module" @@ -2404,45 +2448,39 @@ msgstr "" " -b kombinera alla indatafiler i en enda\n" " dynamiskt inläsningsbar modul" -#: cobc/help.c:100 +#: cobc/help.c:104 msgid " -E preprocess only; do not compile or link" msgstr " -E preprocessa bara; kompilera och länka inte" -#: cobc/help.c:101 +#: cobc/help.c:105 msgid " -C translation only; convert COBOL to C" msgstr " -C översätt bara; konvertera COBOL till C" -#: cobc/help.c:102 +#: cobc/help.c:106 msgid " -S compile only; output assembly file" msgstr " -S kompilera bara; mata ut assemblerfil" -#: cobc/help.c:103 +#: cobc/help.c:107 msgid " -c compile and assemble, but do not link" msgstr " -c kompilera och assemblera, men länka inte" -#: cobc/help.c:104 +#: cobc/help.c:108 msgid " -T <file> generate and place a wide program listing into <file>" msgstr " -T <fil> generera och placera en bred programlistning i <fil>" -#: cobc/help.c:105 +#: cobc/help.c:109 msgid " -t <file> generate and place a program listing into <file>" msgstr " -t <fil> generera och placera programlistning i <fil>" -#: cobc/help.c:106 +#: cobc/help.c:110 msgid " --tlines=<lines> specify lines per page in listing, default = 55" msgstr " --tlines=<rader> ange rader per sida i listning, standard = 55" -#: cobc/help.c:108 -#, fuzzy -#| msgid " --tsymbols specify symbols in listing" -msgid " --tsymbols specify symbols in listing, use -ftsymbols instead" -msgstr " --tsymbols ange symboler i listning" - -#: cobc/help.c:110 +#: cobc/help.c:111 msgid " -P[=<dir or file>] generate preprocessed program listing (.lst)" msgstr " -P[=<kat eller fil>] generera preprocessad programlistning (.lst)" -#: cobc/help.c:112 +#: cobc/help.c:113 #, fuzzy #| msgid "" #| " -Xref generate cross reference through 'cobxref'\n" @@ -2454,77 +2492,81 @@ msgstr "" " -Xref generera korsreferens via 'cobxref'\n" " (V. Coens ”cobxref” måste finnas i sökvägen)" -#: cobc/help.c:115 +#: cobc/help.c:116 #, fuzzy #| msgid " -Xref specify cross reference in listing" msgid " -X, --Xref specify cross reference in listing" msgstr " -Xref ange korsreferens i listning" -#: cobc/help.c:117 +#: cobc/help.c:118 msgid " -I <directory> add <directory> to copy/include search path" msgstr " -I <katalog> lägg till <katalog> till kopierings-/inkluderingssökväg" -#: cobc/help.c:118 +#: cobc/help.c:119 msgid " -L <directory> add <directory> to library search path" msgstr " -L <katalog> lägg till <katalog> till bibliotekssökväg" -#: cobc/help.c:119 +#: cobc/help.c:120 msgid " -l <lib> link the library <lib>" msgstr " -l <bib> länka med bibliotek <bib>" -#: cobc/help.c:120 -msgid " -A <options> add <options> to the C compile phase" -msgstr " -A <flaggor> lägg till <flaggor> vid C-kompileringsfasen" - #: cobc/help.c:121 -msgid " -Q <options> add <options> to the C link phase" -msgstr " -Q <flaggor> lägg till <flaggor> vid C-länkningsfas" +msgid " -K <entry> generate CALL to <entry> as static" +msgstr " -K <post> generera CALL till <post> som statiskt" #: cobc/help.c:122 msgid " -D <define> define <define> for COBOL compilation" msgstr " -D <definition> definiera <definition> vid COBOL-kompilering" #: cobc/help.c:123 -msgid " -K <entry> generate CALL to <entry> as static" -msgstr " -K <post> generera CALL till <post> som statiskt" +msgid " -A <options> add <options> to the C compile phase" +msgstr " -A <flaggor> lägg till <flaggor> vid C-kompileringsfasen" #: cobc/help.c:124 +msgid " -Q <options> add <options> to the C link phase" +msgstr " -Q <flaggor> lägg till <flaggor> vid C-länkningsfas" + +#: cobc/help.c:125 +msgid " --coverage instrument generated binaries for coverage" +msgstr "" + +#: cobc/help.c:126 #, fuzzy #| msgid " -conf=<file> user-defined dialect configuration; see -std" msgid " --conf=<file> user-defined dialect configuration; see -std" msgstr " -conf=<fil> användardefinierad dialektkonfiguration; se -std" -#: cobc/help.c:125 +#: cobc/help.c:127 #, fuzzy #| msgid " -list-reserved display reserved words" msgid " --list-reserved display reserved words" msgstr " -list-reserved visa reserverade ord" -#: cobc/help.c:126 +#: cobc/help.c:128 #, fuzzy #| msgid " -list-intrinsics display intrinsic functions" msgid " --list-intrinsics display intrinsic functions" msgstr " -list-intrinsics visa inbyggda funktioner" -#: cobc/help.c:127 +#: cobc/help.c:129 #, fuzzy #| msgid " -list-mnemonics display mnemonic names" msgid " --list-mnemonics display mnemonic names" msgstr " -list-mnemonics visa mnemonic-namn" -#: cobc/help.c:128 +#: cobc/help.c:130 #, fuzzy #| msgid " -list-mnemonics display mnemonic names" msgid " --list-exceptions display exception names" msgstr " -list-mnemonics visa mnemonic-namn" -#: cobc/help.c:129 +#: cobc/help.c:131 #, fuzzy #| msgid " -list-system display system routines" msgid " --list-system display system routines" msgstr " -list-system visa systemrutiner" -#: cobc/help.c:130 +#: cobc/help.c:132 #, fuzzy #| msgid "" #| " -save-temps[=<dir>] save intermediate files\n" @@ -2536,3914 +2578,4000 @@ msgstr "" " -save-temps[=<kat>] spara intermediära filer\n" " - standard: aktuell katalog" -#: cobc/help.c:132 +#: cobc/help.c:134 +msgid " -MT <target> set/add target file used in dependency list" +msgstr "" + +#: cobc/help.c:135 +#, fuzzy +#| msgid " -o <file> place the output into <file>" +msgid " -MF <file> place dependency list into <file>" +msgstr " -o <fil> placera utmatning i <fil>" + +#: cobc/help.c:136 msgid " -ext <extension> add file extension for resolving COPY" msgstr " -ext <filslut> lägg till filslut för COPY-upplösning" -#: cobc/help.c:139 +#: cobc/help.c:143 #, fuzzy #| msgid "unknown warning option '%s'" msgid "Warning options:" msgstr "okänd varningsflagga ”%s”" -#: cobc/help.c:140 +#: cobc/help.c:144 msgid " -Wall enable most warnings (all except as noted below)" msgstr " -Wall aktivera de flesta varningar (alla förutom de som nämns nedan)" -#: cobc/help.c:141 +#: cobc/help.c:145 #, fuzzy #| msgid " -W enable all warnings" msgid " -Wextra like -Wall but enable some extra warning flags" msgstr " -W aktivera alla varningar" -#: cobc/help.c:142 +#: cobc/help.c:146 #, fuzzy #| msgid " -W enable all warnings" msgid " -w disable all warnings" msgstr " -W aktivera alla varningar" -#: cobc/help.c:143 +#: cobc/help.c:147 #, fuzzy #| msgid " -Wno-<warning> disable warning enabled by -W or -Wall" msgid " -Wno-<warning> disable warning enabled by default, -Wall or -Wextra" msgstr " -Wno-<varning> inaktivera varning aktiverad av -W eller -Wall" #. TRANSLATORS: This msgid is appended to msgid for -Wno-pending and others -#: cobc/help.c:149 +#: cobc/help.c:153 #, fuzzy #| msgid " -W enable all warnings" msgid " * ALWAYS active" msgstr " -W aktivera alla varningar" #. TRANSLATORS: This msgid is appended to msgid for -Wpossible-truncate and others -#: cobc/help.c:153 +#: cobc/help.c:157 #, fuzzy #| msgid " -W enable all warnings" msgid " * NOT set with -Wall" msgstr " -W aktivera alla varningar" -#: cobc/help.c:161 +#: cobc/help.c:165 +msgid " -fdiagnostics-plain-output\tmake diagnostic output as plain as possible" +msgstr "" + +#: cobc/help.c:166 msgid " -Werror treat all warnings as errors" msgstr " -Werror behandla alla varningar som fel" -#: cobc/help.c:162 +#: cobc/help.c:167 #, fuzzy #| msgid " -Werror treat all warnings as errors" msgid " -Wno-error don't treat warnings as errors" msgstr " -Werror behandla alla varningar som fel" -#: cobc/help.c:163 +#: cobc/help.c:168 msgid " -Werror=<warning> treat specified <warning> as error" msgstr " -Werror=<varning> behandla angiven <varning> som fel" -#: cobc/help.c:164 +#: cobc/help.c:169 #, fuzzy #| msgid " -Werror=<warning> treat specified <warning> as error" msgid " -Wno-error=<warning> don't treat specified <warning> as error" msgstr " -Werror=<varning> behandla angiven <varning> som fel" -#: cobc/help.c:180 +#: cobc/help.c:185 msgid "Compiler options:" msgstr "" -#: cobc/help.c:198 +#: cobc/help.c:203 msgid "" " -fibmcomp sets -fbinary-size=2-4-8 -fsynchronized-clause=ok\n" " -fno-ibmcomp sets -fbinary-size=1--8 -fsynchronized-clause=ignore" msgstr "" -#: cobc/help.c:201 +#: cobc/help.c:206 msgid "" " -falternate-ebcdic use restricted ASCII to EBCDIC translate\n" " -fno-alternate-ebcdic use extended ASCII to EBCDIC translate" msgstr "" -#: cobc/help.c:230 +#: cobc/help.c:235 msgid "Compiler dialect configuration options:" msgstr "" -#: cobc/help.c:232 cobc/help.c:238 +#: cobc/help.c:237 cobc/help.c:243 msgid "<value>" msgstr "<värde>" -#: cobc/help.c:242 +#: cobc/help.c:247 msgid "<support>" msgstr "<stöd>" -#: cobc/help.c:251 +#: cobc/help.c:256 msgid "where <support> is one of the following:" msgstr "där <stöd> är endera av följande:" #. TRANSLATORS: This msgid is used when a variable name #. or label is referenced in a compiler message. -#: cobc/help.c:254 cobc/help.c:257 cobc/help.c:260 cobc/help.c:263 -#: cobc/help.c:266 cobc/help.c:269 cobc/help.c:272 cobc/help.c:275 -#: cobc/typeck.c:2361 +#: cobc/help.c:259 cobc/help.c:262 cobc/help.c:265 cobc/help.c:268 +#: cobc/help.c:271 cobc/help.c:274 cobc/help.c:277 cobc/help.c:280 +#: cobc/typeck.c:2378 #, c-format msgid "'%s'" msgstr "" -#: cobc/help.c:277 +#: cobc/help.c:282 msgid "word to be taken out of the reserved words list" msgstr "ord som tas ut ur listan över reserverade ord" -#: cobc/help.c:277 cobc/help.c:278 cobc/help.c:280 +#: cobc/help.c:282 cobc/help.c:283 cobc/help.c:285 msgid "<word>" msgstr "<ord>" -#: cobc/help.c:278 +#: cobc/help.c:283 msgid "word to be added to reserved words list" msgstr "ord som läggs till listan över reserverade ord" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "word to be added to reserved words list as alias" msgstr "ord som läggs till listor över reserverade ord som alias" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "<word>:<alias>" msgstr "<ord>:<alias>" -#: cobc/help.c:280 +#: cobc/help.c:285 #, fuzzy #| msgid "special register %s is unknown" msgid "special register to disable" msgstr "specialregister %s är okänt" -#: cobc/help.c:281 +#: cobc/help.c:286 #, fuzzy #| msgid "special register %s is unknown" msgid "special register to enable" msgstr "specialregister %s är okänt" -#: cobc/help.c:282 +#: cobc/help.c:287 msgid "<word> or <word>:<definition>, where definition uses backslash escaped spaces" msgstr "" -#: cobc/parser.y:315 cobc/parser.y:323 +#: cobc/parser.y:307 #, c-format msgid "'%s' should start in Area A" msgstr "" -#: cobc/parser.y:331 cobc/parser.y:333 +#: cobc/parser.y:315 +#, c-format +msgid "%s should start in Area A" +msgstr "" + +#: cobc/parser.y:322 +#, fuzzy, c-format +#| msgid "should not contain '%c'" +msgid "%s should not start in Area A" +msgstr "borde inte innehålla ”%c”" + +#: cobc/parser.y:330 cobc/parser.y:332 msgid "start of statement in Area A" msgstr "" -#: cobc/parser.y:344 cobc/parser.y:379 +#: cobc/parser.y:428 #, c-format msgid "unreachable statement '%s'" msgstr "onåbar sats ”%s”" -#: cobc/parser.y:470 +#: cobc/parser.y:542 #, c-format msgid "ENTRY '%s' duplicated" msgstr "ENTRY ”%s” duplicerad" -#: cobc/parser.y:520 +#: cobc/parser.y:594 #, fuzzy, c-format #| msgid "ENTRY '%s' duplicated" msgid "ENTRY FOR GO TO '%s' duplicated" msgstr "ENTRY ”%s” duplicerad" -#: cobc/parser.y:536 +#: cobc/parser.y:610 #, c-format msgid "maximum nested program depth exceeded (%d)" msgstr "maximalt nästlat programdjup överskreds (%d)" -#: cobc/parser.y:562 cobc/parser.y:589 +#: cobc/parser.y:636 cobc/parser.y:663 #, c-format msgid "%s statement not terminated by %s" msgstr "%s sats inte avslutad med %s" -#: cobc/parser.y:592 +#: cobc/parser.y:666 #, c-format msgid "%s statement not terminated" msgstr "%s sats inte avslutad" -#: cobc/parser.y:634 -msgid "USE statement invalid for SORT file" +#: cobc/parser.y:708 +#, fuzzy +#| msgid "USE statement invalid for SORT file" +msgid "USE statement invalid for SD file" msgstr "USE-sats ogiltig i SORT-fil" -#: cobc/parser.y:676 cobc/parser.y:1670 cobc/parser.y:1673 -#, c-format -msgid "cannot specify both %s and %s" -msgstr "kan inte ange både %s och %s" - -#: cobc/parser.y:677 +#: cobc/parser.y:751 #, fuzzy, c-format #| msgid "%s ignored" msgid "%s is ignored" msgstr "%s överhoppades" -#: cobc/parser.y:686 +#: cobc/parser.y:760 #, c-format -msgid "Cannot specify %s without number of lines on page" +msgid "cannot specify %s without number of lines on page" msgstr "" -#: cobc/parser.y:696 +#: cobc/parser.y:770 #, c-format msgid "maximum OCCURS depth exceeded (%d)" msgstr "maximalt OCCURS-djup överskreds (%d)" -#: cobc/parser.y:704 cobc/typeck.c:3037 +#: cobc/parser.y:785 cobc/typeck.c:3127 #, c-format msgid "'%s' is not in LINKAGE SECTION" msgstr "”%s” är inte i LINKAGE SECTION" -#: cobc/parser.y:725 +#: cobc/parser.y:806 msgid "TO phrase without DEPENDING phrase" msgstr "TO-fras utan DEPENDING-fras" -#: cobc/parser.y:727 +#: cobc/parser.y:808 #, fuzzy #| msgid "maximum number of occurences assumed to be exact number" msgid "maximum number of occurrences assumed to be exact number" msgstr "maximalt antal förekomster antas vara exakt nummer" -#: cobc/parser.y:732 cobc/parser.y:8032 +#: cobc/parser.y:813 cobc/parser.y:8398 msgid "OCCURS TO must be greater than OCCURS FROM" msgstr "OCCUR TO måste vara större än OCCURS FROM" -#: cobc/parser.y:741 +#: cobc/parser.y:823 #, fuzzy #| msgid "ODO without TO phrase" msgid "OCCURS DEPENDING ON without TO phrase" msgstr "ODO utan TO-fras" -#: cobc/parser.y:806 +#: cobc/parser.y:899 #, c-format msgid "%s header missing" msgstr "%s-huvud saknas" -#: cobc/parser.y:807 +#: cobc/parser.y:900 #, fuzzy, c-format #| msgid "%s header missing - assumed" msgid "%s header assumed" msgstr "%s-huvud saknas - antas finnas" -#: cobc/parser.y:939 -#, fuzzy, c-format -#| msgid "duplicate %s clause" -msgid "duplicate %s" -msgstr "duplicerad %s-klausul" - -#: cobc/parser.y:941 +#: cobc/parser.y:1053 #, c-format msgid "%s incorrectly after %s" msgstr "" -#: cobc/parser.y:1078 +#: cobc/parser.y:1208 #, c-format msgid "redefinition of program name '%s'" msgstr "omdefinition av programnamn ”%s”" -#: cobc/parser.y:1083 +#: cobc/parser.y:1213 #, c-format msgid "redefinition of program ID '%s'" msgstr "omdefinition av program-ID ”%s”" -#: cobc/parser.y:1117 +#: cobc/parser.y:1247 #, c-format msgid "FUNCTION '%s' has no PROCEDURE DIVISION" msgstr "FUNCTION ”%s” har ingen PROCEDURE DIVISION" -#: cobc/parser.y:1228 +#: cobc/parser.y:1372 msgid "functions may not be defined within a program/function" msgstr "funktioner får inte definieras inom ett program/funktion" -#: cobc/parser.y:1278 +#: cobc/parser.y:1426 #, c-format msgid "END FUNCTION '%s' is different from FUNCTION-ID '%s'" msgstr "END FUNCTION ”%s” är inte samma som FUNCTION-ID ”%s”" -#: cobc/parser.y:1292 +#: cobc/parser.y:1440 #, c-format msgid "END PROGRAM '%s' is different from PROGRAM-ID '%s'" msgstr "END PROGRAM ”%s” är inte samma som PROGRAM-ID ”%s”" -#: cobc/parser.y:1341 +#: cobc/parser.y:1489 #, fuzzy #| msgid "'%s' CURSOR must be 4 or 6 characters long" msgid "currency symbol must be one character long" msgstr "”%s” CURSOR måste vara 4 eller 6 tecken långt" -#: cobc/parser.y:1398 +#: cobc/parser.y:1546 #, fuzzy, c-format #| msgid "a trailing currency symbol" msgid "invalid character '%c' in currency symbol" msgstr "en efterföljande valutasymbol" -#: cobc/parser.y:1414 +#: cobc/parser.y:1562 msgid "prototype has same name as current function and will be ignored" msgstr "prototyp har samma namn som aktuell funktion och kommer att hoppas över" -#: cobc/parser.y:1441 +#: cobc/parser.y:1589 #, c-format msgid "duplicate REPOSITORY entries for '%s' do not match" msgstr "duplicerade REPOSITORY-poster för ”%s” matchar inte" -#: cobc/parser.y:1445 +#: cobc/parser.y:1593 #, c-format msgid "duplicate REPOSITORY entry for '%s'" msgstr "duplicerad REPOSITORY-post för ”%s”" -#: cobc/parser.y:1510 +#: cobc/parser.y:1658 #, c-format msgid "ORGANIZATION %s is incompatible with RECORD DELIMITER" msgstr "" -#: cobc/parser.y:1548 cobc/parser.y:1939 cobc/typeck.c:829 +#: cobc/parser.y:1694 cobc/parser.y:2142 cobc/typeck.c:835 #, fuzzy, c-format #| msgid "reference modification not allowed here" msgid "condition-name not allowed here: '%s'" msgstr "referensmodifiering inte tillåten här" -#: cobc/parser.y:1554 cobc/parser.y:2127 +#: cobc/parser.y:1700 cobc/parser.y:2345 #, fuzzy #| msgid "'%s' cannot be used here" msgid "SCREEN item cannot be used here" msgstr "”%s” kan inte användas här" -#: cobc/parser.y:1557 +#: cobc/parser.y:1703 #, fuzzy #| msgid "'%s' cannot be used here" msgid "REPORT item cannot be used here" msgstr "”%s” kan inte användas här" -#: cobc/parser.y:1563 +#: cobc/parser.y:1709 #, fuzzy #| msgid "'%s' cannot be used here" msgid "TYPEDEF item cannot be used here" msgstr "”%s” kan inte användas här" -#: cobc/parser.y:1572 +#: cobc/parser.y:1718 #, fuzzy #| msgid "integer value expected" msgid "elementary item expected" msgstr "heltalsvärde förväntades" -#: cobc/parser.y:1579 +#: cobc/parser.y:1725 #, fuzzy #| msgid "RENAMES may not reference a level 88" msgid "item may not reference itself" msgstr "RENAMES får inte referera nivå 88" -#: cobc/parser.y:1586 +#: cobc/parser.y:1733 #, fuzzy #| msgid "THRU item '%s' may not be subordinate to '%s'" msgid "item may not be subordinate to any item with USAGE clause" msgstr "THRU-objekt ”%s” får inte vara underordnat ”%s”" -#: cobc/parser.y:1588 +#: cobc/parser.y:1735 #, fuzzy #| msgid "THRU item '%s' may not be subordinate to '%s'" msgid "item may not be subordinate to any item with SIGN clause" msgstr "THRU-objekt ”%s” får inte vara underordnat ”%s”" -#: cobc/parser.y:1631 +#: cobc/parser.y:1780 #, c-format msgid "illegal combination of %s with other clauses" msgstr "" -#: cobc/parser.y:1641 +#: cobc/parser.y:1794 #, fuzzy, c-format #| msgid "THRU item '%s' may not be subordinate to '%s'" msgid "entry following %s may not be subordinate to it" msgstr "THRU-objekt ”%s” får inte vara underordnat ”%s”" -#: cobc/parser.y:1859 +#: cobc/parser.y:2042 +msgid "INITIAL specified on non-input field" +msgstr "INITIAL angivet för ett icke-indatafält" + +#: cobc/parser.y:2054 +msgid "relative LINE/COLUMN clause required with OCCURS" +msgstr "relativ LINE/COLUMN-klausul krävs med OCCURS" + +#: cobc/parser.y:2072 msgid "FOR phrase cannot immediately follow ALL/LEADING/TRAILING" msgstr "FOR-fras kan inte omedelbart följa på ALL/LEADING/TRAILING" -#: cobc/parser.y:1861 +#: cobc/parser.y:2074 msgid "missing CHARACTERS/ALL/LEADING/TRAILING phrase after FOR phrase" msgstr "saknar CHARACTERS/ALL/LEADING/TRAILING-fras efter FOR-fras" -#: cobc/parser.y:1868 +#: cobc/parser.y:2081 #, fuzzy #| msgid "missing value between CHARACTERS/ALL/LEADING/TRAILING words" msgid "missing value between ALL/LEADING/TRAILING words" msgstr "saknar värde mellan CHARACTERS/ALL/LEADING/TRAILING-ord" -#: cobc/parser.y:1873 +#: cobc/parser.y:2086 msgid "missing FOR phrase before CHARACTERS/ALL/LEADING/TRAILING phrase" msgstr "saknar FOR-fras före CHARACTERS/ALL/LEADING/TRAILING-fras" -#: cobc/parser.y:1880 +#: cobc/parser.y:2093 msgid "missing ALL/LEADING/TRAILING before value" msgstr "saknar ALL/LEADING/TRAILING före värde" -#: cobc/parser.y:1935 +#: cobc/parser.y:2138 msgid "use of condition-name in place of data-name" msgstr "" -#: cobc/parser.y:1966 +#: cobc/parser.y:2169 msgid "cannot specify NO ADVANCING in screen DISPLAY" msgstr "kan inte ange NO ADVANCING i skärm DISPLAY" -#: cobc/parser.y:2029 cobc/parser.y:2046 +#: cobc/parser.y:2232 cobc/parser.y:2249 msgid "non-standard DISPLAY" msgstr "icke-standard DISPLAY" -#: cobc/parser.y:2033 +#: cobc/parser.y:2236 msgid "screens may only be displayed on CRT" msgstr "skärmar kan endast visas på CRT" -#: cobc/parser.y:2038 cobc/parser.y:2081 +#: cobc/parser.y:2241 cobc/parser.y:2284 msgid "cannot mix screens and fields in the same DISPLAY statement" msgstr "kan inte blanda skärmar och fält i samma DISPLAY-sats" -#: cobc/parser.y:2042 +#: cobc/parser.y:2245 msgid "screen clauses may only be used for DISPLAY on CRT" msgstr "skärm-klausuler kan endast användas för DISPLAY på CRT" -#: cobc/parser.y:2087 +#: cobc/parser.y:2290 msgid "ambiguous DISPLAY; put items to display on device in separate DISPLAY" msgstr "tvetydig DISPLAY; stoppa objekt att visa på enhet i separat DISPLAY" -#: cobc/parser.y:2103 +#: cobc/parser.y:2301 #, c-format msgid "%s is not an alphanumeric literal" msgstr "%s är inte en alfanumerisk litteral" -#: cobc/parser.y:2105 +#: cobc/parser.y:2305 #, c-format msgid "'%s' is not USAGE DISPLAY" msgstr "”%s” är inte USAGE DISPLAY" -#: cobc/parser.y:2120 cobc/typeck.c:9790 +#: cobc/parser.y:2322 cobc/parser.y:19534 +#, c-format +msgid "'%s' is not a field" +msgstr "”%s” är inte ett fält" + +#: cobc/parser.y:2338 cobc/typeck.c:10231 #, c-format msgid "invalid target for %s" msgstr "ogiltigt mål för %s" -#: cobc/parser.y:2129 +#: cobc/parser.y:2347 #, fuzzy #| msgid "a constant may not be used here - '%s'" msgid "RENAMES item may not be used here" msgstr "en konstant kan inte användas här - ”%s”" -#: cobc/parser.y:2131 cobc/typeck.c:2737 cobc/typeck.c:2828 +#: cobc/parser.y:2349 cobc/typeck.c:2822 cobc/typeck.c:2913 msgid "ANY LENGTH item not allowed here" msgstr "ANY LENGTH-objekt inte tillåtet här" -#: cobc/parser.y:2135 +#: cobc/parser.y:2353 #, c-format msgid "item '%s' has wrong class for VALIDATE" msgstr "" -#: cobc/parser.y:2144 +#: cobc/parser.y:2362 #, fuzzy #| msgid "REDEFINES clause must follow entry-name" msgid "WHEN clause must follow EVERY clause" msgstr "REDEFINES-klausul måste följa på postnamn" -#: cobc/parser.y:2229 cobc/parser.y:18631 +#: cobc/parser.y:2447 cobc/parser.y:19251 #, fuzzy #| msgid "integer value expected" msgid "non-zero value expected" msgstr "heltalsvärde förväntades" -#: cobc/parser.y:2235 cobc/tree.c:4735 +#: cobc/parser.y:2453 cobc/tree.c:4803 #, fuzzy, c-format #| msgid "RECORD size exceeds maximum allowed (%d)" msgid "RECORD size (IDX) exceeds maximum allowed (%d)" msgstr "RECORD-storlek överstiger största tillåtna (%d)" -#: cobc/parser.y:2239 cobc/tree.c:4739 +#: cobc/parser.y:2457 cobc/tree.c:4807 #, c-format msgid "RECORD size exceeds maximum allowed (%d)" msgstr "RECORD-storlek överstiger största tillåtna (%d)" -#: cobc/parser.y:2244 +#: cobc/parser.y:2462 msgid "RECORD clause invalid" msgstr "RECORD-klausul ogiltig" -#: cobc/parser.y:3368 +#: cobc/parser.y:3595 msgid "multiple PROGRAM-ID's without matching END PROGRAM" msgstr "multipla PROGRAM-ID:n utan matchande END PROGRAM" -#: cobc/parser.y:3371 +#: cobc/parser.y:3598 msgid "executable requested but no program found" msgstr "körbar fil begärd men inget program hittades" -#: cobc/parser.y:3488 +#: cobc/parser.y:3717 msgid "prototypes must be come before any program/function definitions" msgstr "" -#: cobc/parser.y:3691 +#: cobc/parser.y:3930 msgid "COMMON may only be used in a contained program" msgstr "COMMON får endast användas i ett inneslutet program" -#: cobc/parser.y:3778 +#: cobc/parser.y:4017 msgid "CALL prototypes" msgstr "CALL-prototyper" -#: cobc/parser.y:3953 cobc/parser.y:4235 cobc/parser.y:4281 cobc/parser.y:4394 -#: cobc/parser.y:4608 cobc/parser.y:4705 cobc/parser.y:4744 cobc/parser.y:4803 -#: cobc/parser.y:4824 cobc/parser.y:4867 cobc/parser.y:4946 cobc/parser.y:4965 -#: cobc/parser.y:4981 cobc/parser.y:4999 cobc/parser.y:5017 cobc/parser.y:5034 -#: cobc/parser.y:5052 cobc/parser.y:7404 cobc/parser.y:8628 +#: cobc/parser.y:4192 cobc/parser.y:4471 cobc/parser.y:4517 cobc/parser.y:4632 +#: cobc/parser.y:4846 cobc/parser.y:4943 cobc/parser.y:4982 cobc/parser.y:5041 +#: cobc/parser.y:5062 cobc/parser.y:5105 cobc/parser.y:5184 cobc/parser.y:5203 +#: cobc/parser.y:5219 cobc/parser.y:5237 cobc/parser.y:5255 cobc/parser.y:5272 +#: cobc/parser.y:5290 cobc/parser.y:7685 cobc/parser.y:9028 #, c-format msgid "%s not allowed in nested programs" msgstr "%s inte tillåtet i nästlade program" -#: cobc/parser.y:4109 +#: cobc/parser.y:4345 msgid "segment-number must be in range of values 1 to 49" msgstr "segmentnummer måste vara i intervallet 1 till 49" -#: cobc/parser.y:4121 +#: cobc/parser.y:4357 msgid "duplicate CLASSIFICATION clause" msgstr "duplicerad CLASSIFICATION-klausul" -#: cobc/parser.y:4200 +#: cobc/parser.y:4436 msgid "PROGRAM phrase" msgstr "PROGRAM-fras" -#: cobc/parser.y:4302 cobc/parser.y:4313 cobc/parser.y:4657 +#: cobc/parser.y:4538 cobc/parser.y:4549 cobc/parser.y:4895 #, c-format msgid "invalid %s clause" msgstr "ogiltig %s-klausul" -#: cobc/parser.y:4616 cobc/parser.y:4754 +#: cobc/parser.y:4854 cobc/parser.y:4992 #, fuzzy #| msgid "literal type does not match numeric data type" msgid "type does not match alphabet" msgstr "litteraltyp matchar inte numerisk datatyp" -#: cobc/parser.y:4760 +#: cobc/parser.y:4998 #, fuzzy #| msgid "'%s' is not an alphabet-name" msgid "CLASS IS integer IN alphabet-name" msgstr "”%s” är inte ett alfabetsnamn" -#: cobc/parser.y:4780 cobc/parser.y:4784 +#: cobc/parser.y:5018 cobc/parser.y:5022 msgid "CLASS literal with THRU must have size 1" msgstr "CLASS-litteral med THRU måste ha storlek 1" -#: cobc/parser.y:4879 +#: cobc/parser.y:5117 msgid "separate currency symbol and currency string" msgstr "" -#: cobc/parser.y:4912 +#: cobc/parser.y:5150 #, c-format msgid "invalid CURRENCY SIGN '%s'" msgstr "ogiltigt CURRENCY SIGN ”%s”" -#: cobc/parser.y:5139 +#: cobc/parser.y:5377 msgid "cannot use RELATIVE KEY clause on INDEXED files" msgstr "" -#: cobc/parser.y:5143 +#: cobc/parser.y:5381 msgid "cannot use RECORD KEY clause on RELATIVE files" msgstr "" -#: cobc/parser.y:5215 +#: cobc/parser.y:5453 msgid "EXTERNAL/DYNAMIC cannot be used with literals" msgstr "" -#: cobc/parser.y:5235 +#: cobc/parser.y:5473 msgid "EXTERNAL/DYNAMIC cannot be used with USING/VARYING" msgstr "" -#: cobc/parser.y:5246 +#: cobc/parser.y:5484 msgid "EXTERNAL/DYNAMIC cannot be used with DISK FROM" msgstr "" -#: cobc/parser.y:5248 -msgid "ASSIGN DISK FROM" -msgstr "" - -#: cobc/parser.y:5370 +#: cobc/parser.y:5608 msgid "ASSIGN EXTERNAL/DYNAMIC" msgstr "" -#: cobc/parser.y:5486 cobc/parser.y:5666 +#: cobc/parser.y:5724 cobc/parser.y:5921 #, c-format msgid "%s only valid with ORGANIZATION %s" msgstr "" -#: cobc/parser.y:5583 +#: cobc/parser.y:5818 cobc/typeck.c:3818 #, c-format msgid "'%s' is not an alphabet-name" msgstr "”%s” är inte ett alfabetsnamn" -#: cobc/parser.y:5599 +#: cobc/parser.y:5854 msgid "VSAM status" msgstr "" -#: cobc/parser.y:5733 cobc/parser.y:5758 +#: cobc/parser.y:5988 cobc/parser.y:6013 #, fuzzy, c-format #| msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgid "RECORD DELIMITER %s only allowed with SEQUENTIAL files" msgstr "RECORDING MODE U eller S får endast användas med RECORD SEQUENTIAL-filer" -#: cobc/parser.y:5745 +#: cobc/parser.y:6000 #, fuzzy, c-format #| msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgid "RECORD DELIMITER %s only allowed with (LINE) SEQUENTIAL files" msgstr "RECORDING MODE U eller S får endast användas med RECORD SEQUENTIAL-filer" -#: cobc/parser.y:5751 +#: cobc/parser.y:6006 msgid "LINE-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5764 +#: cobc/parser.y:6019 msgid "BINARY-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5772 +#: cobc/parser.y:6027 #, fuzzy #| msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgid "RECORD DELIMITER clause only allowed with (LINE) SEQUENTIAL files" msgstr "RECORDING MODE U eller S får endast användas med RECORD SEQUENTIAL-filer" -#: cobc/parser.y:5776 +#: cobc/parser.y:6031 #, c-format msgid "RECORD DELIMITER %s not recognized; will be ignored" msgstr "" -#: cobc/parser.y:5814 +#: cobc/parser.y:6069 msgid "DUPLICATES for primary keys" msgstr "" -#: cobc/parser.y:6058 +#: cobc/parser.y:6313 msgid "DOS/VS APPLY phrase" msgstr "" -#: cobc/parser.y:6212 +#: cobc/parser.y:6467 msgid "RECORD description missing or invalid" msgstr "RECORD-beskrivning saknas eller ogiltig" -#: cobc/parser.y:6239 +#: cobc/parser.y:6494 #, fuzzy, c-format #| msgid "duplicate values in class '%s'" msgid "duplicate file description for %s" msgstr "duplicerade värden i klass ”%s”" -#: cobc/parser.y:6288 cobc/parser.y:6893 cobc/parser.y:7389 cobc/parser.y:13485 -#: cobc/parser.y:16686 +#: cobc/parser.y:6543 cobc/parser.y:7170 cobc/parser.y:7670 cobc/parser.y:13913 +#: cobc/parser.y:17210 #, c-format msgid "%s is invalid in a user FUNCTION" msgstr "%s är ogiltig i en användar-FUNCTION" -#: cobc/parser.y:6326 cobc/parser.y:6336 +#: cobc/parser.y:6581 cobc/parser.y:6591 msgid "RECORD clause ignored for LINE SEQUENTIAL" msgstr "RECORD-klausul överhoppas på grund av LINE SEQUENTIAL" -#: cobc/parser.y:6433 +#: cobc/parser.y:6688 msgid "LINAGE clause with wrong file type" msgstr "LINAGE-klausul med fel filtyp" -#: cobc/parser.y:6495 +#: cobc/parser.y:6750 msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgstr "RECORDING MODE U eller S får endast användas med RECORD SEQUENTIAL-filer" -#: cobc/parser.y:6532 +#: cobc/parser.y:6787 #, c-format msgid "ignoring CODE-SET '%s'" msgstr "hoppar över CODE-SET ”%s”" -#: cobc/parser.y:6541 +#: cobc/parser.y:6796 msgid "CODE-SET clause invalid for file type" msgstr "CODE-SET-klausul ogiltig för filtyp" -#: cobc/parser.y:6562 +#: cobc/parser.y:6817 msgid "REPORT clause with wrong file type" msgstr "REPORT-klausul med fel filtyp" -#: cobc/parser.y:6641 +#: cobc/parser.y:6899 msgid "CD record missing" msgstr "CD-post saknas" -#: cobc/parser.y:7091 +#: cobc/parser.y:7372 msgid "CONSTANT item not at 01 level" msgstr "CONSTANT-objekt inte vid nivå 01" -#: cobc/parser.y:7236 +#: cobc/parser.y:7517 #, fuzzy #| msgid "REDEFINES clause must follow entry-name" msgid "REDEFINES clause not following entry-name" msgstr "REDEFINES-klausul måste följa på postnamn" -#: cobc/parser.y:7309 cobc/parser.y:7339 cobc/parser.y:7381 cobc/parser.y:7470 -#: cobc/parser.y:8233 +#: cobc/parser.y:7590 cobc/parser.y:7620 cobc/parser.y:7662 cobc/parser.y:7751 +#: cobc/parser.y:8606 #, c-format msgid "%s only allowed at 01/77 level" msgstr "%s endast tillåtet vid nivå 01/77" -#: cobc/parser.y:7312 cobc/parser.y:7341 cobc/parser.y:7383 cobc/parser.y:8235 -#: cobc/parser.y:8587 cobc/parser.y:8609 +#: cobc/parser.y:7593 cobc/parser.y:7622 cobc/parser.y:7664 cobc/parser.y:8608 +#: cobc/parser.y:8987 cobc/parser.y:9009 #, c-format msgid "%s requires a data name" msgstr "%s kräver ett datanamn" -#: cobc/parser.y:7316 cobc/parser.y:7565 +#: cobc/parser.y:7597 cobc/parser.y:7846 #, fuzzy, c-format #| msgid "%s not allowed on %s files" msgid "%s not allowed in %s" msgstr "%s inte tillåtet på %s-filer" -#: cobc/parser.y:7337 cobc/parser.y:7391 cobc/parser.y:8231 cobc/parser.y:8583 -#: cobc/parser.y:8607 +#: cobc/parser.y:7618 cobc/parser.y:7672 cobc/parser.y:8604 cobc/parser.y:8983 +#: cobc/parser.y:9007 #, c-format msgid "%s not allowed here" msgstr "%s inte tillåtet här" -#: cobc/parser.y:7528 +#: cobc/parser.y:7809 #, fuzzy, c-format #| msgid "%s FILE requires a FROM clause" msgid "%s requires DEPENDING clause" msgstr "%s FILE kräver en FROM-klausul" -#: cobc/parser.y:7544 +#: cobc/parser.y:7825 msgid "a locale-format PICTURE string must only consist of '9', '.', '+', 'Z' and the currency-sign" msgstr "" -#: cobc/parser.y:7554 +#: cobc/parser.y:7835 msgid "DEPENDING clause needs either an OCCURS clause or a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7560 +#: cobc/parser.y:7841 msgid "only USAGE DISPLAY may specify a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7610 cobc/typeck.c:4752 +#: cobc/parser.y:7893 cobc/typeck.c:4916 #, fuzzy, c-format #| msgid "'%s' is not a locale name" msgid "'%s' is not a locale-name" msgstr "”%s” är inte ett lokalnamn" -#: cobc/parser.y:7656 +#: cobc/parser.y:7939 #, fuzzy, c-format #| msgid "'%s' is not a valid data name" msgid "'%s' is not a valid USAGE" msgstr "”%s” är inte ett giltigt datanamn" -#: cobc/parser.y:7661 +#: cobc/parser.y:7944 #, fuzzy, c-format #| msgid "unknown failure: %d" msgid "unknown USAGE: %s" msgstr "okänt fel: %d" -#: cobc/parser.y:7808 +#: cobc/parser.y:8139 #, c-format msgid "unknown HANDLE type: %s" msgstr "" -#: cobc/parser.y:8082 +#: cobc/parser.y:8347 +#, fuzzy, c-format +#| msgid "'%s' is not USAGE DISPLAY" +msgid "'%s' is not USAGE UTF-8" +msgstr "”%s” är inte USAGE DISPLAY" + +#: cobc/parser.y:8448 msgid "INDEXED should follow ASCENDING/DESCENDING" msgstr "INDEXED bör följa på ASCENDING/DESCENDING" -#: cobc/parser.y:8317 +#: cobc/parser.y:8658 cobc/parser.y:8660 +#, fuzzy, c-format +#| msgid "unexpected size: %d" +msgid "unexpected %s" +msgstr "oväntad storlek: %d" + +#: cobc/parser.y:8709 msgid "amount of entries in FROM and TO must match" msgstr "" -#: cobc/parser.y:8326 +#: cobc/parser.y:8718 #, c-format msgid "entry in FROM (%d) must be <= entry in TO (%d)" msgstr "" -#: cobc/parser.y:8585 +#: cobc/parser.y:8985 #, fuzzy, c-format #| msgid "%s only allowed at 01/77 level" msgid "%s only allowed at 01 level" msgstr "%s endast tillåtet vid nivå 01/77" -#: cobc/parser.y:8589 cobc/parser.y:8611 +#: cobc/parser.y:8989 cobc/parser.y:9011 #, c-format msgid "%s and %s combination not allowed" msgstr "" -#: cobc/parser.y:8723 +#: cobc/parser.y:9127 msgid "GLOBAL is not allowed with RD" msgstr "GLOBAL är inte tillåtet med RD" -#: cobc/parser.y:9247 +#: cobc/parser.y:9650 #, fuzzy, c-format #| msgid "'%s' is not a field or file" msgid "%s is not valid for VARYING" msgstr "”%s” är inte ett fält eller en fil" -#: cobc/parser.y:9283 +#: cobc/parser.y:9686 msgid "LINE with OCCURS is not supported" msgstr "" -#: cobc/parser.y:9323 +#: cobc/parser.y:9726 msgid "PLUS is not recommended with LEFT, RIGHT or CENTER" msgstr "" -#: cobc/parser.y:9325 +#: cobc/parser.y:9728 #, fuzzy #| msgid "GLOBAL is not allowed with RD" msgid "PLUS is not allowed with LEFT, RIGHT or CENTER" msgstr "GLOBAL är inte tillåtet med RD" -#: cobc/parser.y:9363 +#: cobc/parser.y:9766 msgid "PLUS is ignored on first field of line" msgstr "" -#: cobc/parser.y:9394 +#: cobc/parser.y:9797 msgid "invalid COLUMN integer; must be > 0" msgstr "" -#: cobc/parser.y:9396 +#: cobc/parser.y:9799 msgid "COLUMN numbers should increase" msgstr "" -#: cobc/parser.y:9492 cobc/parser.y:9547 -msgid "INITIAL specified on non-input field" -msgstr "INITIAL angivet för ett icke-indatafält" - -#: cobc/parser.y:9504 cobc/parser.y:9559 -msgid "relative LINE/COLUMN clause required with OCCURS" -msgstr "relativ LINE/COLUMN-klausul krävs med OCCURS" - -#: cobc/parser.y:9661 cobc/parser.y:9665 +#: cobc/parser.y:9990 cobc/parser.y:9994 msgid "screen positions from data-item" msgstr "" -#: cobc/parser.y:9821 +#: cobc/parser.y:10153 #, fuzzy, c-format #| msgid "missing definitions:" msgid "missing %s" msgstr "saknar definitioner:" -#: cobc/parser.y:10508 +#: cobc/parser.y:10840 #, fuzzy #| msgid "GLOBAL screen items" msgid "OCCURS screen items" msgstr "GLOBAL-skärmobjekt" -#: cobc/parser.y:10520 +#: cobc/parser.y:10852 msgid "GLOBAL screen items" msgstr "GLOBAL-skärmobjekt" -#: cobc/parser.y:10571 +#: cobc/parser.y:10904 msgid "overriding convention specified in ENTRY-CONVENTION" msgstr "åsidosätter konvention angiven i ENTRY-CONVENTION" -#: cobc/parser.y:10586 +#: cobc/parser.y:10917 msgid "executable program requested but PROCEDURE/ENTRY has USING clause" msgstr "körbart program begärt men PROCEDURE/ENTRY har USING-klausul" -#: cobc/parser.y:10654 cobc/parser.y:10671 cobc/parser.y:12278 +#: cobc/parser.y:10987 cobc/parser.y:11004 cobc/parser.y:12667 #, fuzzy, c-format #| msgid "number of parameters exceeds maximum %d" msgid "number of arguments exceeds maximum %d" msgstr "antal parametrar överstiger maximala %d" -#: cobc/parser.y:10663 +#: cobc/parser.y:10996 msgid "CHAINING invalid in user FUNCTION" msgstr "CHAINING ogiltig i användar-FUNCTION" -#: cobc/parser.y:10699 +#: cobc/parser.y:11032 msgid "ANY LENGTH items may only be BY REFERENCE formal parameters" msgstr "ANY LENGTH-objekt får endast vara BY REFERENCE-formella parametrar" -#: cobc/parser.y:10716 cobc/parser.y:12337 cobc/parser.y:12350 +#: cobc/parser.y:11049 cobc/parser.y:12728 cobc/parser.y:12741 #, c-format msgid "%s not allowed in CHAINED programs" msgstr "%s inte tillåtet i CHAINED-program" -#: cobc/parser.y:10718 +#: cobc/parser.y:11051 msgid "parameters passed BY VALUE" msgstr "parametrar skickade BY VALUE" -#: cobc/parser.y:10733 cobc/parser.y:10742 cobc/parser.y:10750 -#: cobc/parser.y:10771 +#: cobc/parser.y:11066 cobc/parser.y:11075 cobc/parser.y:11083 +#: cobc/parser.y:11104 msgid "SIZE only allowed for BY VALUE items" msgstr "SIZE endast tillåtet för BY VALUE-objekt" -#: cobc/parser.y:10773 cobc/parser.y:10798 +#: cobc/parser.y:11106 cobc/parser.y:11131 msgid "invalid value for SIZE" msgstr "ogiltigt värde för SIZE" -#: cobc/parser.y:10813 +#: cobc/parser.y:11146 msgid "MEMORY SIZE phrase in CALL statement" msgstr "" -#: cobc/parser.y:10825 +#: cobc/parser.y:11162 msgid "OPTIONAL only allowed for BY REFERENCE items" msgstr "OPTIONAL endast tillåtet för BY REFERENCE-objekt" -#: cobc/parser.y:10837 +#: cobc/parser.y:11177 msgid "RETURNING clause is required for a FUNCTION" msgstr "RETURNING-klausul krävs för en FUNCTION" -#: cobc/parser.y:10843 +#: cobc/parser.y:11183 msgid "RETURNING clause cannot be OMITTED for main program" msgstr "RETURNING-klausul får inte vara OMITTED för huvudprogram" -#: cobc/parser.y:10846 +#: cobc/parser.y:11186 msgid "RETURNING clause cannot be OMITTED for a FUNCTION" msgstr "RETURNING-klausul får inte vara OMITTED för en FUNCTION" -#: cobc/parser.y:10859 +#: cobc/parser.y:11199 msgid "RETURNING item is not defined in LINKAGE SECTION" msgstr "RETURNING-objekt är inte definierat i LINKAGE SECTION" -#: cobc/parser.y:10861 +#: cobc/parser.y:11201 msgid "RETURNING item must have level 01" msgstr "RETURNING-objekt måste ha nivå 01" -#: cobc/parser.y:10863 +#: cobc/parser.y:11203 msgid "RETURNING item should not have OCCURS" msgstr "RETURNING-objekt borde inte ha OCCURS" -#: cobc/parser.y:10867 +#: cobc/parser.y:11207 msgid "function RETURNING item may not be ANY LENGTH" msgstr "funktion RETURNING-objekt får inte vara ANY LENGTH" -#: cobc/parser.y:11080 +#: cobc/parser.y:11421 #, c-format msgid "'%s' is not a statement" msgstr "”%s” är inte en sats" -#: cobc/parser.y:11083 +#: cobc/parser.y:11424 #, c-format msgid "unknown statement '%s'; it may exist in another dialect" msgstr "okänd sats ”%s”; den kanske finns i en annan dialekt" -#: cobc/parser.y:11087 +#: cobc/parser.y:11428 #, c-format msgid "unknown statement '%s'" msgstr "okänd sats ”%s”" -#: cobc/parser.y:11105 +#: cobc/parser.y:11446 msgid "SECTION segment-number must be less than or equal to 99" msgstr "SECTION segmentnummer måste vara mindre än eller lika med 99" -#: cobc/parser.y:11108 +#: cobc/parser.y:11449 msgid "SECTION segment-number in DECLARATIVES must be less than 50" msgstr "SECTION segmentnummer i DECLARATIVES måste vara mindre än 50" -#: cobc/parser.y:11116 +#: cobc/parser.y:11457 msgid "SECTION segment within DECLARATIVES" msgstr "SECTION segment inom DECLARATIVES" -#: cobc/parser.y:11313 cobc/parser.y:11448 +#: cobc/parser.y:11667 cobc/parser.y:11806 msgid "non-standard ACCEPT" msgstr "icke-standard ACCEPT" -#: cobc/parser.y:11325 +#: cobc/parser.y:11679 msgid "PROMPT clause" msgstr "PROMPT-klausul" -#: cobc/parser.y:11329 +#: cobc/parser.y:11683 msgid "SIZE IS clause" msgstr "SIZE IS-klausul" -#: cobc/parser.y:11549 cobc/parser.y:11842 +#: cobc/parser.y:11907 cobc/parser.y:12226 msgid "TIME-OUT or BEFORE TIME clauses" msgstr "TIME-OUT eller BEFORE TIME-klausuler" -#: cobc/parser.y:11575 cobc/parser.y:11591 cobc/parser.y:11606 +#: cobc/parser.y:11937 cobc/parser.y:11960 cobc/parser.y:11978 msgid "AT screen-location" msgstr "AT skärmposition" -#: cobc/parser.y:11607 +#: cobc/parser.y:11979 msgid "LINE or COLUMN" msgstr "LINE eller COLUMN" -#: cobc/parser.y:11972 +#: cobc/parser.y:12358 msgid "ALLOCATE CHARACTERS requires RETURNING clause" msgstr "ALLOCATE CHARACTERS kräver RETURNING-klausul" -#: cobc/parser.y:11987 cobc/parser.y:13289 +#: cobc/parser.y:12373 #, fuzzy, c-format #| msgid "ignoring sign" msgid "ignoring %s phrase" msgstr "hoppar över tecken" -#: cobc/parser.y:11989 +#: cobc/parser.y:12375 msgid "addressing mode should be either 24 or 31 bit" msgstr "" -#: cobc/parser.y:12061 +#: cobc/parser.y:12446 msgid "CALL to own PROGRAM-ID" msgstr "" -#: cobc/parser.y:12062 +#: cobc/parser.y:12447 #, fuzzy #| msgid "recursive program call - assuming RECURSIVE attribute" msgid "assuming RECURSIVE attribute" msgstr "rekursivt programanrop - antar RECURSIVE-attribut" -#: cobc/parser.y:12082 +#: cobc/parser.y:12467 msgid "STATIC CALL convention ignored because of ON EXCEPTION" msgstr "" -#: cobc/parser.y:12091 +#: cobc/parser.y:12476 msgid "ON EXCEPTION ignored because of STATIC CALL" msgstr "" -#: cobc/parser.y:12205 cobc/typeck.c:13644 +#: cobc/parser.y:12594 cobc/typeck.c:14450 msgid "invalid mnemonic name" msgstr "ogiltigt mnemonic-namn" -#: cobc/parser.y:12229 +#: cobc/parser.y:12618 msgid "id/literal ignored, using prototype name" msgstr "id/litteral överhoppad, använder prototypnamn" -#: cobc/parser.y:12235 +#: cobc/parser.y:12624 msgid "NESTED phrase is only valid with literal" msgstr "NESTED-fras är endast giltig med litteral" -#: cobc/parser.y:12296 +#: cobc/parser.y:12685 #, fuzzy, c-format #| msgid "OMITTED only allowed when parameters are passed BY REFERENCE" msgid "%s only allowed when arguments are passed %s" msgstr "OMITTED endast tillåten när parametrar skickas via BY REFERENCE" -#: cobc/parser.y:12385 +#: cobc/parser.y:12776 msgid "RETURNING item must have level 01 or 77" msgstr "RETURNING-objekt måste ha nivå 01 eller 77" -#: cobc/parser.y:12389 +#: cobc/parser.y:12780 msgid "RETURNING item must be a LINKAGE SECTION item or have BASED clause" msgstr "RETURNING-objekt måste vara ett LINKAGE SECTION-objekt eller ha BASED-klausul" -#: cobc/parser.y:12423 cobc/parser.y:17409 cobc/parser.y:17464 +#: cobc/parser.y:12814 cobc/parser.y:17937 cobc/parser.y:18000 msgid "NOT EXCEPTION before EXCEPTION" msgstr "NOT EXCEPTION före EXCEPTION" -#: cobc/parser.y:13162 +#: cobc/parser.y:13572 #, fuzzy, c-format #| msgid "HANDLE must be either a generic or a THREAD HANDLE" msgid "HANDLE must be a %s HANDLE" msgstr "HANDLE måste vara antingen en generisk eller ett THREAD HANDLE" -#: cobc/parser.y:13174 +#: cobc/parser.y:13584 #, fuzzy #| msgid "HANDLE must be either a generic or a THREAD HANDLE" msgid "HANDLE must be a generic HANDLE" msgstr "HANDLE måste vara antingen en generisk eller ett THREAD HANDLE" -#: cobc/parser.y:13251 +#: cobc/parser.y:13661 #, c-format msgid "HANDLE clause invalid for %s" msgstr "HANDLE-klausul ogiltig för %s" -#: cobc/parser.y:13483 cobc/parser.y:16876 +#: cobc/parser.y:13911 cobc/parser.y:17400 #, c-format msgid "%s is invalid in nested program" msgstr "%s är ogiltig i nästlat program" -#: cobc/parser.y:13521 cobc/parser.y:13564 cobc/parser.y:13575 -#: cobc/parser.y:13586 +#: cobc/parser.y:13940 cobc/parser.y:13983 cobc/parser.y:13994 +#: cobc/parser.y:14005 #, c-format msgid "maximum evaluate depth exceeded (%d)" msgstr "maximalt beräkningsdjup överskreds (%d)" -#: cobc/parser.y:13627 cobc/parser.y:13637 +#: cobc/parser.y:14048 cobc/parser.y:14089 cobc/parser.y:14633 +#: cobc/parser.y:14644 cobc/parser.y:14653 cobc/parser.y:17959 +#: cobc/parser.y:17981 cobc/parser.y:18022 cobc/parser.y:18038 +#: cobc/parser.y:18078 cobc/parser.y:18095 cobc/parser.y:18132 +#: cobc/parser.y:18149 cobc/parser.y:18199 cobc/parser.y:18216 +#: cobc/parser.y:18252 cobc/parser.y:18269 cobc/parser.y:18310 +#: cobc/parser.y:18327 +#, fuzzy, c-format +#| msgid "'%s' is not a statement" +msgid "%s without imperative statement" +msgstr "”%s” är inte en sats" + +#: cobc/parser.y:14056 cobc/parser.y:14066 msgid "WHEN without imperative statement" msgstr "" -#: cobc/parser.y:13655 cobc/parser.y:13665 +#: cobc/parser.y:14097 cobc/parser.y:14107 msgid "WHEN OTHER without imperative statement" msgstr "" -#: cobc/parser.y:13745 +#: cobc/parser.y:14191 msgid "invalid THROUGH usage" msgstr "ogiltig THROUGH-användning" -#: cobc/parser.y:13909 +#: cobc/parser.y:14372 msgid "EXIT PROGRAM is not allowed within a USE GLOBAL procedure" msgstr "EXIT PROGRAM är inte tillåtet inom en USE GLOBAL-procedur" -#: cobc/parser.y:13913 +#: cobc/parser.y:14376 msgid "EXIT PROGRAM not allowed within a FUNCTION" msgstr "EXIT PROGRAM är inte tillåtet inom en FUNCTION" -#: cobc/parser.y:13927 +#: cobc/parser.y:14390 msgid "EXIT FUNCTION is not allowed within a USE GLOBAL procedure" msgstr "EXIT FUNCTION är inte tillåtet inom en USE GLOBAL-procedur" -#: cobc/parser.y:13931 +#: cobc/parser.y:14394 msgid "EXIT FUNCTION only allowed within a FUNCTION" msgstr "EXIT FUNCTION endast tillåtet inom en FUNCTION" -#: cobc/parser.y:13945 cobc/parser.y:13968 +#: cobc/parser.y:14408 cobc/parser.y:14431 msgid "EXIT PERFORM is only valid with inline PERFORM" msgstr "EXIT PERFORM är endast giltigt med inline PERFORM" -#: cobc/parser.y:13990 +#: cobc/parser.y:14453 msgid "EXIT SECTION is only valid with an active SECTION" msgstr "EXIT SECTION är endast giltig med en aktiv SECTION" -#: cobc/parser.y:14011 +#: cobc/parser.y:14474 msgid "EXIT PARAGRAPH is only valid with an active PARAGRAPH" msgstr "EXIT PARAGRAPH är endast giltig med en aktiv PARAGRAPH" -#: cobc/parser.y:14034 +#: cobc/parser.y:14497 #, fuzzy #| msgid "RETURNING/GIVING not allowed for non-returning sources" msgid "RETURNING/GIVING not allowed for non-returning runtime elements" msgstr "RETURNING/GIVING inte tillåtet för icke-returnerande källor" -#: cobc/parser.y:14166 +#: cobc/parser.y:14640 msgid "IF without imperative statement" msgstr "" -#: cobc/parser.y:14497 cobc/parser.y:14506 +#: cobc/parser.y:14983 cobc/parser.y:14992 msgid "single-character literal or data item expected" msgstr "" -#: cobc/parser.y:14524 +#: cobc/parser.y:15010 msgid "TALLYING clause is incomplete" msgstr "TALLYING-klausul är ofullständig" -#: cobc/parser.y:14640 +#: cobc/parser.y:15126 msgid "INSPECT missing ALL/FIRST/LEADING/TRAILING" msgstr "INSPECT saknar ALL/FIRST/LEADING/TRAILING" -#: cobc/parser.y:14902 +#: cobc/parser.y:15390 msgid "LOCK clauses" msgstr "LOCK-klausuler" -#: cobc/parser.y:15059 +#: cobc/parser.y:15547 msgid "inline PERFORM without imperative statement" msgstr "" -#: cobc/parser.y:15180 cobc/parser.y:15188 cobc/parser.y:15196 +#: cobc/parser.y:15670 cobc/parser.y:15678 cobc/parser.y:15686 #, c-format msgid "PERFORM VARYING '%s' (line %d of %s) is not a numeric field" msgstr "" -#: cobc/parser.y:15212 +#: cobc/parser.y:15702 #, fuzzy #| msgid "ODO without TO phrase" msgid "PERFORM VARYING without BY phrase" msgstr "ODO utan TO-fras" -#: cobc/parser.y:15252 +#: cobc/parser.y:15742 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "'%s' is not an object-reference" msgstr "”%s” är inte ett heltal" -#: cobc/parser.y:15292 cobc/typeck.c:12295 cobc/typeck.c:13552 +#: cobc/parser.y:15782 cobc/typeck.c:13066 cobc/typeck.c:14358 msgid "LOCK clause invalid with file LOCK AUTOMATIC" msgstr "LOCK-klausul ogiltig med fil LOCK AUTOMATIC" -#: cobc/parser.y:15297 +#: cobc/parser.y:15787 msgid "KEY clause invalid with this file type" msgstr "KEY-klausul ogiltig med denna filtyp" -#: cobc/parser.y:15302 cobc/typeck.c:12291 cobc/typeck.c:13548 +#: cobc/parser.y:15792 cobc/typeck.c:13062 cobc/typeck.c:14354 msgid "INVALID KEY clause invalid with this file type" msgstr "INVALID KEY-klausul ogiltig med denna filtyp" -#: cobc/parser.y:15986 -msgid "file sort requires KEY phrase" +#: cobc/parser.y:16494 +#, fuzzy +#| msgid "file sort requires KEY phrase" +msgid "MERGE requires KEY phrase" +msgstr "filsortering kräver KEY-fras" + +#: cobc/parser.y:16498 +#, fuzzy +#| msgid "file sort requires KEY phrase" +msgid "file SORT requires KEY phrase" msgstr "filsortering kräver KEY-fras" -#: cobc/parser.y:16010 +#: cobc/parser.y:16522 #, fuzzy #| msgid "file sort requires KEY phrase" msgid "table SORT requires KEY phrase" msgstr "filsortering kräver KEY-fras" -#: cobc/parser.y:16072 -msgid "file sort requires USING or INPUT PROCEDURE" +#: cobc/parser.y:16527 +#, fuzzy +#| msgid "'%s' is not a file name" +msgid "must be an SD filename" +msgstr "”%s” är inte ett filnamn" + +#: cobc/parser.y:16585 +msgid "MERGE requires USING files" +msgstr "" + +#: cobc/parser.y:16587 +#, fuzzy +#| msgid "file sort requires USING or INPUT PROCEDURE" +msgid "file SORT requires USING or INPUT PROCEDURE" msgstr "filsortering kräver USING eller INPUT PROCEDURE" -#: cobc/parser.y:16079 +#: cobc/parser.y:16595 msgid "USING invalid with table SORT" msgstr "USING ogiltig med tabell SORT" -#: cobc/parser.y:16089 +#: cobc/parser.y:16605 msgid "INPUT PROCEDURE invalid with table SORT" msgstr "INPUT PROCEDURE ogiltig med tabell SORT" -#: cobc/parser.y:16091 +#: cobc/parser.y:16607 msgid "INPUT PROCEDURE invalid with MERGE" msgstr "INPUT PROCEDURE ogiltig med MERGE" -#: cobc/parser.y:16104 -msgid "file sort requires GIVING or OUTPUT PROCEDURE" +#: cobc/parser.y:16621 +#, fuzzy +#| msgid "file sort requires GIVING or OUTPUT PROCEDURE" +msgid "MERGE requires GIVING or OUTPUT PROCEDURE" +msgstr "filsortering kräver GIVING eller OUTPUT PROCEDURE" + +#: cobc/parser.y:16623 +#, fuzzy +#| msgid "file sort requires GIVING or OUTPUT PROCEDURE" +msgid "file SORT requires GIVING or OUTPUT PROCEDURE" msgstr "filsortering kräver GIVING eller OUTPUT PROCEDURE" -#: cobc/parser.y:16111 +#: cobc/parser.y:16631 msgid "GIVING invalid with table SORT" msgstr "GIVING ogiltig med tabell SORT" -#: cobc/parser.y:16121 +#: cobc/parser.y:16641 msgid "OUTPUT PROCEDURE invalid with table SORT" msgstr "OUTPUT PROCEDURE ogiltig med tabell SORT" -#: cobc/parser.y:16148 +#: cobc/parser.y:16668 msgid "SIZE/LENGTH invalid here" msgstr "SIZE/LENGTH ogiltigt här" -#: cobc/parser.y:16197 +#: cobc/parser.y:16717 msgid "NOT EQUAL condition not allowed on START statement" msgstr "NOT EQUAL-villkor inte tillåtet för START-sats" -#: cobc/parser.y:16255 +#: cobc/parser.y:16776 #, c-format msgid "%s is replaced by %s" msgstr "%s ersätts av %s" -#: cobc/parser.y:16304 +#: cobc/parser.y:16825 msgid "STOP literal" msgstr "STOP-litteral" -#: cobc/parser.y:16308 +#: cobc/parser.y:16829 msgid "STOP identifier" msgstr "STOP-identifierare" -#: cobc/parser.y:16446 +#: cobc/parser.y:16969 msgid "SUPPRESS statement must be within DECLARATIVES" msgstr "SUPPRESS-sats måste placeras inom DECLARATIVES" -#: cobc/parser.y:16520 -msgid "UNLOCK invalid for SORT files" +#: cobc/parser.y:17043 +#, fuzzy +#| msgid "UNLOCK invalid for SORT files" +msgid "UNLOCK invalid for SD files" msgstr "UNLOCK ogiltigt för SORT-filer" -#: cobc/parser.y:16656 cobc/parser.y:16736 +#: cobc/parser.y:17180 cobc/parser.y:17260 msgid "USE statement must be within DECLARATIVES" msgstr "USE-sats måste placeras inom DECLARATIVES" -#: cobc/parser.y:16658 +#: cobc/parser.y:17182 msgid "SECTION header missing before USE statement" msgstr "SECTION-huvud saknas före USE-sats" -#: cobc/parser.y:16738 +#: cobc/parser.y:17262 msgid "USE DEBUGGING not supported in contained program" msgstr "USE DEBUGGING stöds inte i inneslutet program" -#: cobc/parser.y:16786 cobc/parser.y:16795 cobc/parser.y:16813 -#: cobc/parser.y:16849 cobc/typeck.c:4886 +#: cobc/parser.y:17310 cobc/parser.y:17319 cobc/parser.y:17337 +#: cobc/parser.y:17373 cobc/typeck.c:5050 #, fuzzy, c-format #| msgid "duplicate DEFINE directive '%s'" msgid "duplicate DEBUGGING target: '%s'" msgstr "duplicerat DEFINE-direktiv ”%s”" -#: cobc/parser.y:16811 +#: cobc/parser.y:17335 #, fuzzy #| msgid "a constant may not be used here - '%s'" msgid "constant item cannot be used here" msgstr "en konstant kan inte användas här - ”%s”" -#: cobc/parser.y:16837 +#: cobc/parser.y:17361 msgid "duplicate USE DEBUGGING ON ALL PROCEDURES" msgstr "duplicerade USE DEBUGGING ON ALL PROCEDURES" -#: cobc/parser.y:17089 +#: cobc/parser.y:17614 msgid "ENCODING clause must come before XML-DECLARATION" msgstr "" -#: cobc/parser.y:17091 +#: cobc/parser.y:17616 msgid "ENCODING clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17094 +#: cobc/parser.y:17619 msgid "XML GENERATE ENCODING clause" msgstr "" -#: cobc/parser.y:17101 +#: cobc/parser.y:17626 msgid "XML-DECLARATION clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17104 +#: cobc/parser.y:17629 msgid "XML GENERATE XML-DECLARATION clause" msgstr "" -#: cobc/parser.y:17110 +#: cobc/parser.y:17635 msgid "XML GENERATE WITH ATTRIBUTES clause" msgstr "" -#: cobc/parser.y:17123 +#: cobc/parser.y:17648 msgid "XML GENERATE NAMESPACE clause" msgstr "" -#: cobc/parser.y:17147 +#: cobc/parser.y:17672 msgid "XML GENERATE NAME OF clause" msgstr "" -#: cobc/parser.y:17211 +#: cobc/parser.y:17736 msgid "XML GENERATE TYPE OF clause" msgstr "" -#: cobc/parser.y:17252 +#: cobc/parser.y:17777 msgid "XML GENERATE SUPPRESS clause" msgstr "" -#: cobc/parser.y:17392 +#: cobc/parser.y:17920 #, fuzzy, c-format #| msgid "'%s' is not a locale name" msgid "'%s' is not a schema name" msgstr "”%s” är inte ett lokalnamn" -#: cobc/parser.y:17510 +#: cobc/parser.y:18055 msgid "NOT SIZE ERROR before SIZE ERROR" msgstr "NOT SIZE ERROR före SIZE ERROR" -#: cobc/parser.y:17556 +#: cobc/parser.y:18109 msgid "NOT OVERFLOW before OVERFLOW" msgstr "NOT OVERFLOW före OVERFLOW" -#: cobc/parser.y:17655 +#: cobc/parser.y:18161 cobc/parser.y:18176 +#, fuzzy +#| msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" +msgid "NOT AT END before AT END" +msgstr "NOT AT END-OF-PAGE före AT END-OF-PAGE" + +#: cobc/parser.y:18229 msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" msgstr "NOT AT END-OF-PAGE före AT END-OF-PAGE" -#: cobc/parser.y:17705 +#: cobc/parser.y:18287 msgid "NOT INVALID KEY before INVALID KEY" msgstr "NOT INVALID KEY före INVALID KEY" -#: cobc/parser.y:18048 +#: cobc/parser.y:18644 msgid "LINAGE-COUNTER must be qualified here" msgstr "LINAGE-COUNTER måste kvalificeras här" -#: cobc/parser.y:18051 +#: cobc/parser.y:18647 msgid "invalid LINAGE-COUNTER usage" msgstr "ogiltig LINAGE-COUNTER-användning" -#: cobc/parser.y:18062 cobc/parser.y:18158 cobc/parser.y:18247 +#: cobc/parser.y:18658 cobc/parser.y:18754 cobc/parser.y:18843 #, c-format msgid "'%s' is not a file name" msgstr "”%s” är inte ett filnamn" -#: cobc/parser.y:18072 +#: cobc/parser.y:18668 msgid "LINE-COUNTER must be qualified here" msgstr "LINE-COUNTER måste kvalificeras här" -#: cobc/parser.y:18076 +#: cobc/parser.y:18672 msgid "invalid LINE-COUNTER usage" msgstr "ogiltig LINE-COUNTER-användning" -#: cobc/parser.y:18087 cobc/parser.y:18112 +#: cobc/parser.y:18683 cobc/parser.y:18708 #, c-format msgid "'%s' is not a report name" msgstr "”%s” är inte ett rapportnamn" -#: cobc/parser.y:18097 +#: cobc/parser.y:18693 msgid "PAGE-COUNTER must be qualified here" msgstr "PAGE-COUNTER måste kvalificeras här" -#: cobc/parser.y:18101 +#: cobc/parser.y:18697 msgid "invalid PAGE-COUNTER usage" msgstr "ogiltig PAGE-COUNTER-användning" -#: cobc/parser.y:18148 cobc/typeck.c:12256 cobc/typeck.c:12339 -#: cobc/typeck.c:13516 +#: cobc/parser.y:18744 cobc/typeck.c:13027 cobc/typeck.c:13110 +#: cobc/typeck.c:14322 #, c-format msgid "%s requires a record name as subject" msgstr "%s kräver ett postnamn som ämne" -#: cobc/parser.y:18175 +#: cobc/parser.y:18771 #, c-format msgid "'%s' not indexed" msgstr "”%s” är inte indexerat" -#: cobc/parser.y:18180 +#: cobc/parser.y:18776 #, fuzzy #| msgid "file sort requires KEY phrase" msgid "SEARCH ALL requires KEY phrase" msgstr "filsortering kräver KEY-fras" -#: cobc/parser.y:18204 cobc/parser.y:18229 +#: cobc/parser.y:18800 cobc/parser.y:18825 #, c-format msgid "multiple reference to '%s' " msgstr "flera referenser till ”%s” " -#: cobc/parser.y:18259 +#: cobc/parser.y:18855 #, c-format msgid "'%s' is not a CD name" msgstr "”%s” är inte ett CD-namn" -#: cobc/parser.y:18273 +#: cobc/parser.y:18869 #, fuzzy, c-format #| msgid "'%s' is not a report name" msgid "'%s' is not a valid report name" msgstr "”%s” är inte ett rapportnamn" -#: cobc/parser.y:18526 +#: cobc/parser.y:19134 msgid "invalid mnemonic identifier" msgstr "ogiltig mnemonic-identifierare" -#: cobc/parser.y:18606 +#: cobc/parser.y:19214 +#, fuzzy +#| msgid "alphanumeric value is expected" +msgid "an alphanumeric literal is expected here" +msgstr "alfanumeriskt värde förväntades" + +#: cobc/parser.y:19226 #, fuzzy #| msgid "a non-numeric literal is expected for '%s'" msgid "a numeric literal is expected here" msgstr "en icke-numerisk litteral förväntas för ”%s”" -#: cobc/parser.y:18618 cobc/parser.y:19366 +#: cobc/parser.y:19238 cobc/parser.y:19979 #, fuzzy #| msgid "a non-numeric literal is expected for '%s'" msgid "a non-numeric literal is expected here" msgstr "en icke-numerisk litteral förväntas för ”%s”" -#: cobc/parser.y:18784 cobc/typeck.c:7302 cobc/typeck.c:7309 +#: cobc/parser.y:19404 cobc/typeck.c:993 cobc/typeck.c:4825 cobc/typeck.c:7679 +#: cobc/typeck.c:7686 #, c-format msgid "'%s' is not numeric" msgstr "”%s” är inte numeriskt" -#: cobc/parser.y:18800 +#: cobc/parser.y:19420 #, c-format msgid "'%s' is not a field or file" msgstr "”%s” är inte ett fält eller en fil" -#: cobc/parser.y:18820 cobc/parser.y:18859 cobc/parser.y:18935 -#, c-format -msgid "'%s' is not a field" -msgstr "”%s” är inte ett fält" - -#: cobc/parser.y:18841 +#: cobc/parser.y:19446 #, fuzzy, c-format #| msgid "'%s' is not a file name" msgid "'%s' is not a type-name" msgstr "”%s” är inte ett filnamn" -#: cobc/parser.y:18927 cobc/typeck.c:2328 cobc/typeck.c:2407 +#: cobc/parser.y:19526 cobc/typeck.c:2345 cobc/typeck.c:2401 cobc/typeck.c:2550 #, c-format msgid "'%s' cannot be reference modified" msgstr "”%s” kan inte referensmodifieras" -#: cobc/parser.y:19015 +#: cobc/parser.y:19627 #, fuzzy, c-format #| msgid "'%s' is not a field or file" msgid "'%s' is not a field or alphabet" msgstr "”%s” är inte ett fält eller en fil" -#: cobc/parser.y:19041 +#: cobc/parser.y:19653 #, fuzzy #| msgid "'%s' cannot be used here" msgid "a subscripted data-item cannot be used here" msgstr "”%s” kan inte användas här" -#: cobc/parser.y:19089 +#: cobc/parser.y:19701 #, fuzzy #| msgid "unsigned positive integer value expected" msgid "unsigned integer value expected" msgstr "teckenlöst positivt heltalsvärde förväntades" -#: cobc/parser.y:19101 cobc/parser.y:19105 cobc/parser.y:19155 +#: cobc/parser.y:19713 cobc/parser.y:19717 cobc/parser.y:19767 msgid "integer value expected" msgstr "heltalsvärde förväntades" -#: cobc/parser.y:19110 +#: cobc/parser.y:19722 msgid "invalid symbolic integer" msgstr "ogiltigt symboliskt heltal" -#: cobc/parser.y:19126 cobc/parser.y:19130 +#: cobc/parser.y:19738 cobc/parser.y:19742 msgid "unsigned positive integer value expected" msgstr "teckenlöst positivt heltalsvärde förväntades" -#: cobc/parser.y:19159 -msgid "invalid CLASS value" -msgstr "ogiltigt CLASS-värde" +#: cobc/parser.y:19772 +#, c-format +msgid "CLASS value %d outside of range for the used character set" +msgstr "" -#: cobc/parser.y:19246 +#: cobc/parser.y:19859 msgid "PHYSICAL argument for LENGTH functions" msgstr "" -#: cobc/parser.y:19418 cobc/parser.y:19435 +#: cobc/parser.y:20031 cobc/parser.y:20048 msgid "cannot specify offset and SYSTEM-OFFSET at the same time" msgstr "kan inte samtidigt ange position och SYSTEM-OFFSET" -#: cobc/parser.y:19702 cobc/parser.y:19711 cobc/parser.y:19721 -#: cobc/parser.y:19731 cobc/parser.y:19751 cobc/parser.y:19771 -#: cobc/parser.y:19777 +#: cobc/parser.y:20228 +msgid "terminator" +msgstr "" + +#: cobc/parser.y:20317 cobc/parser.y:20327 cobc/parser.y:20338 +#: cobc/parser.y:20348 cobc/parser.y:20369 cobc/parser.y:20389 +#: cobc/parser.y:20396 msgid "optional period" msgstr "" -#: cobc/pplex.l:257 cobc/pplex.l:2219 cobc/pplex.l:2233 +#: cobc/pplex.l:261 cobc/pplex.l:2448 cobc/pplex.l:2462 msgid "debugging indicator" msgstr "felsökningsindikator" -#: cobc/pplex.l:334 +#: cobc/pplex.l:348 msgid "ignoring empty directive" msgstr "hoppar över tomt direktiv" -#: cobc/pplex.l:344 cobc/pplex.l:411 +#: cobc/pplex.l:358 cobc/pplex.l:431 #, c-format msgid "ignoring invalid directive: '%s'" msgstr "hoppar över ogiltigt direktiv: ”%s”" -#: cobc/pplex.l:351 +#: cobc/pplex.l:365 msgid "ignoring invalid directive" msgstr "hoppar över ogiltigt direktiv" -#: cobc/pplex.l:358 +#: cobc/pplex.l:372 msgid "VCS directive" msgstr "VCS-direktiv" -#: cobc/pplex.l:420 cobc/pplex.l:441 +#: cobc/pplex.l:440 cobc/pplex.l:461 #, fuzzy, c-format #| msgid "ignoring invalid directive: '%s'" msgid "ignoring unknown directive: '%s'" msgstr "hoppar över ogiltigt direktiv: ”%s”" -#: cobc/pplex.l:1065 +#: cobc/pplex.l:1164 msgid "IF/ELIF/ELSE directive without matching END-IF" msgstr "IF/ELIF/ELSE-direktiv utan matchande END-IF" -#: cobc/pplex.l:1409 +#: cobc/pplex.l:1332 +msgid "free format detected" +msgstr "" + +#: cobc/pplex.l:1608 #, c-format msgid "copybook not found in library '%s', library-name ignored" msgstr "" -#: cobc/pplex.l:1469 +#: cobc/pplex.l:1667 #, fuzzy, c-format #| msgid "ignoring invalid directive: '%s'" msgid "ignoring %s directive because of %s" msgstr "hoppar över ogiltigt direktiv: ”%s”" -#: cobc/pplex.l:1645 +#: cobc/pplex.l:1854 #, c-format msgid "directive nest depth exceeded: %d" msgstr "djup för direktivnästling överskreds: %d" -#: cobc/pplex.l:1663 +#: cobc/pplex.l:1872 msgid "ELSE directive without matching IF/ELIF" msgstr "ELSE-direktiv utan matchande IF/ELIF" -#: cobc/pplex.l:1679 +#: cobc/pplex.l:1888 msgid "END-IF directive without matching IF/ELIF/ELSE" msgstr "END-IF-direktiv utan matchande IF/ELIF/ELSE" -#: cobc/pplex.l:1695 +#: cobc/pplex.l:1904 msgid "ELIF directive without matching IF/ELIF" msgstr "ELIF-direktiv utan matchande IF/ELIF" -#: cobc/pplex.l:1717 +#: cobc/pplex.l:1926 #, c-format msgid "invalid internal case: %u" msgstr "ogiltigt internt fall: %u" -#: cobc/pplex.l:1914 +#: cobc/pplex.l:2139 msgid "buffer overrun - too many continuation lines" msgstr "buffertöverspill - för många fortsättningsrader" -#: cobc/pplex.l:2009 cobc/pplex.l:2019 +#: cobc/pplex.l:2236 cobc/pplex.l:2246 msgid "line not terminated by a newline" msgstr "rad inte avslutad av nyrad" -#: cobc/pplex.l:2013 cobc/pplex.l:2023 +#: cobc/pplex.l:2240 cobc/pplex.l:2250 #, c-format msgid "source text exceeds %d bytes, will be truncated" msgstr "källkodstext överstiger %d byte, kommer att trunkeras" -#: cobc/pplex.l:2042 +#: cobc/pplex.l:2269 msgid "version control conflict marker in file" msgstr "" -#: cobc/pplex.l:2194 +#: cobc/pplex.l:2423 msgid "invalid continuation in comment entry" msgstr "ogiltig fortsättning i kommentarspost" -#: cobc/pplex.l:2241 +#: cobc/pplex.l:2470 #, fuzzy, c-format #| msgid "invalid indicator '%c' at column 7" msgid "invalid indicator '\\' at column %d" msgstr "ogiltig indikator ”%c” i kolumn 7" -#: cobc/pplex.l:2253 +#: cobc/pplex.l:2482 #, fuzzy, c-format #| msgid "invalid indicator '%c' at column 7" msgid "invalid indicator '%c' at column %d" msgstr "ogiltig indikator ”%c” i kolumn 7" -#: cobc/pplex.l:2312 cobc/pplex.l:2323 +#: cobc/pplex.l:2541 cobc/pplex.l:2552 msgid "invalid line continuation" msgstr "ogiltig radfortsättning" -#: cobc/pplex.l:2331 +#: cobc/pplex.l:2560 msgid "continuation character expected" msgstr "fortsättningstecken förväntades" -#: cobc/pplex.l:2399 +#: cobc/pplex.l:2628 #, c-format msgid "source text after program-text area (column %d)" msgstr "källkodstext efter område för programtext (kolumn %d)" -#: cobc/ppparse.y:107 +#: cobc/ppparse.y:102 cobc/ppparse.y:106 +msgid "partial replacing with literal" +msgstr "" + +#: cobc/ppparse.y:109 msgid "unexpected COBOL word in partial replacement phrase" msgstr "" -#: cobc/ppparse.y:256 +#: cobc/ppparse.y:176 +#, fuzzy +#| msgid "invalid national literal" +msgid "invalid partial replacing operand" +msgstr "ogiltig nationell litteral" + +#: cobc/ppparse.y:291 msgid "directive comparison on different types" msgstr "direktivjämförelse för olika typer" -#: cobc/ppparse.y:324 +#: cobc/ppparse.y:359 #, c-format msgid "duplicate DEFINE directive '%s'" msgstr "duplicerat DEFINE-direktiv ”%s”" -#: cobc/ppparse.y:331 cobc/ppparse.y:341 +#: cobc/ppparse.y:366 cobc/ppparse.y:376 #, fuzzy, c-format #| msgid "invalid constant in DEFINE directive" msgid "invalid constant %s in DEFINE directive" msgstr "ogiltig konstant i DEFINE-direktiv" -#: cobc/ppparse.y:439 +#: cobc/ppparse.y:474 #, c-format msgid "compiler flag '%s' unknown" msgstr "" -#: cobc/ppparse.y:486 +#: cobc/ppparse.y:521 #, fuzzy, c-format #| msgid "invalid %s directive" msgid "invalid %s directive option '%s'" msgstr "ogiltigt %s-direktiv" -#: cobc/ppparse.y:488 +#: cobc/ppparse.y:523 #, fuzzy, c-format #| msgid "invalid %s directive" msgid "invalid %s directive option" msgstr "ogiltigt %s-direktiv" -#: cobc/ppparse.y:839 cobc/ppparse.y:848 cobc/ppparse.y:1258 +#: cobc/ppparse.y:875 cobc/ppparse.y:884 cobc/ppparse.y:1294 #, c-format msgid "invalid %s directive" msgstr "ogiltigt %s-direktiv" -#: cobc/ppparse.y:1330 +#: cobc/ppparse.y:1366 msgid "LEAP-SECOND ON directive" msgstr "LEAP-SECOND ON-direktiv" -#: cobc/ppparse.y:1439 cobc/ppparse.y:1471 +#: cobc/ppparse.y:1475 cobc/ppparse.y:1507 msgid "invalid constant" msgstr "ogiltig konstant" -#: cobc/reserved.c:4012 +#: cobc/reserved.c:4029 msgid "device name" msgstr "enhetsnamn" -#: cobc/reserved.c:4015 +#: cobc/reserved.c:4032 msgid "switch name" msgstr "växelnamn" -#: cobc/reserved.c:4018 +#: cobc/reserved.c:4035 msgid "feature name" msgstr "funktionsnamn" -#: cobc/reserved.c:4129 +#: cobc/reserved.c:4146 #, fuzzy, c-format #| msgid "reserved word must have less than %d characters" msgid "reserved word (%s) must have less than %d characters" msgstr "reserverat ord måste ha färre än %d tecken" -#: cobc/reserved.c:4149 +#: cobc/reserved.c:4166 #, fuzzy, c-format #| msgid "should not contain '%c'" msgid "reserved word (%s) may not contain '%c'" msgstr "borde inte innehålla ”%c”" -#: cobc/reserved.c:4166 +#: cobc/reserved.c:4183 msgid "ignored asterisk at end of alias target" msgstr "överhoppad asterisk vid slutet av alias-mål" -#: cobc/reserved.c:4229 +#: cobc/reserved.c:4248 #, c-format msgid "alias target '%s' is not a default reserved word" msgstr "alias mål ”%s” är inte ett standardreserverat ord" -#: cobc/reserved.c:4719 +#: cobc/reserved.c:4738 #, c-format msgid "invalid system-name '%s'" msgstr "ogiltigt systemnamn ”%s”" -#: cobc/reserved.c:4883 +#: cobc/reserved.c:4902 #, c-format msgid "'%s' is a reserved word, but isn't supported" msgstr "”%s” är ett reserverat ord, men det stöds inte" -#: cobc/reserved.c:4988 +#: cobc/reserved.c:5005 #, c-format msgid "intrinsic function %s is unknown" msgstr "inbyggd funktion %s är okänd" -#: cobc/reserved.c:5016 +#: cobc/reserved.c:5033 msgid "Intrinsic Function" msgstr "Inbyggd funktion" -#: cobc/reserved.c:5016 cobc/reserved.c:5249 cobc/reserved.c:5386 +#: cobc/reserved.c:5033 cobc/reserved.c:5266 cobc/reserved.c:5403 msgid "Implemented" msgstr "Implementerad" -#: cobc/reserved.c:5016 cobc/typeck.c:1163 +#: cobc/reserved.c:5033 cobc/typeck.c:1178 msgid "Parameters" msgstr "Parametrar" -#: cobc/reserved.c:5020 cobc/reserved.c:5253 cobc/reserved.c:5400 -#: cobc/reserved.c:5406 +#: cobc/reserved.c:5037 cobc/reserved.c:5270 cobc/reserved.c:5417 +#: cobc/reserved.c:5423 msgid "Yes" msgstr "Ja" -#: cobc/reserved.c:5023 cobc/reserved.c:5256 cobc/reserved.c:5410 +#: cobc/reserved.c:5040 cobc/reserved.c:5273 cobc/reserved.c:5427 msgid "No" msgstr "Nej" -#: cobc/reserved.c:5029 +#: cobc/reserved.c:5046 msgid "Unlimited" msgstr "Obegränsat" -#: cobc/reserved.c:5046 +#: cobc/reserved.c:5063 msgid "Exception Name" msgstr "" -#: cobc/reserved.c:5148 +#: cobc/reserved.c:5165 #, fuzzy, c-format #| msgid "special register %s is unknown, needs a defintion" msgid "special register '%s' is unknown, needs a definition" msgstr "specialregister %s är okänt, behöver en definition" -#: cobc/reserved.c:5155 +#: cobc/reserved.c:5172 #, fuzzy, c-format #| msgid "special register %s is unknown, needs a defintion" msgid "special register '%s' has a bad definition: %s" msgstr "specialregister %s är okänt, behöver en definition" -#: cobc/reserved.c:5159 +#: cobc/reserved.c:5176 #, fuzzy, c-format #| msgid "special register %s is unknown" msgid "special register '%s' is unknown" msgstr "specialregister %s är okänt" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Internal registers" msgstr "Interna register" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Definition" msgstr "Definition" -#: cobc/reserved.c:5337 +#: cobc/reserved.c:5354 #, fuzzy, c-format #| msgid "unknown statement '%s'" msgid "unknown system-name '%s'" msgstr "okänd sats ”%s”" -#: cobc/reserved.c:5363 +#: cobc/reserved.c:5380 msgid "System names" msgstr "Systemnamn" -#: cobc/reserved.c:5386 +#: cobc/reserved.c:5403 msgid "Reserved Words" msgstr "Reserverad ord" -#: cobc/reserved.c:5398 +#: cobc/reserved.c:5415 msgid "Yes (Context sensitive)" msgstr "Ja (sammanhangskänsligt)" -#: cobc/reserved.c:5408 +#: cobc/reserved.c:5425 msgid "No (Context sensitive)" msgstr "Nej (sammanhangskänsligt)" -#: cobc/scanner.l:272 +#: cobc/scanner.l:281 #, fuzzy, c-format #| msgid "'%s' is a reserved word, but isn't supported" msgid "'%s' is not a reserved word, so cannot be removed" msgstr "”%s” är ett reserverat ord, men det stöds inte" -#: cobc/scanner.l:320 +#: cobc/scanner.l:329 msgid "separator period in Area A" msgstr "" -#: cobc/scanner.l:1067 +#: cobc/scanner.l:1096 #, c-format msgid "a constant may not be used here - '%s'" msgstr "en konstant kan inte användas här - ”%s”" -#: cobc/scanner.l:1137 +#: cobc/scanner.l:1170 msgid "ignoring redundant ." msgstr "hoppar över överflödig ." -#: cobc/scanner.l:1195 +#: cobc/scanner.l:1249 #, c-format msgid "invalid symbol '%s' - skipping word" msgstr "ogiltig symbol ”%s” - hoppar över ord" -#: cobc/scanner.l:1289 +#: cobc/scanner.l:1323 msgid "invalid national literal" msgstr "ogiltig nationell litteral" -#: cobc/scanner.l:1293 cobc/tree.c:2800 +#: cobc/scanner.l:1327 cobc/tree.c:2822 #, c-format msgid "invalid literal: '%s'" msgstr "ogiltig litteral: ”%s”" -#: cobc/scanner.l:1295 +#: cobc/scanner.l:1329 #, c-format msgid "invalid hexadecimal literal: '%s'" msgstr "ogiltig hexadecimal litteral: ”%s”" -#: cobc/scanner.l:1297 cobc/tree.c:1779 +#: cobc/scanner.l:1331 cobc/tree.c:1803 #, c-format msgid "invalid numeric literal: '%s'" msgstr "ogiltig numerisk litteral: ”%s”" -#: cobc/scanner.l:1299 +#: cobc/scanner.l:1333 #, c-format msgid "invalid floating-point literal: '%s'" msgstr "ogiltig flyttalslitteral: ”%s”" -#: cobc/scanner.l:1301 +#: cobc/scanner.l:1335 cobc/scanner.l:1337 #, c-format msgid "invalid %s literal: '%s'" msgstr "ogiltig %s-litteral: ”%s”" -#: cobc/scanner.l:1350 +#: cobc/scanner.l:1365 +#, c-format +msgid "character code %s out of encoding range %s" +msgstr "" + +#: cobc/scanner.l:1422 +msgid "extraneous separator ',' at end of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1435 +msgid "extraneous character ',' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1440 +#, c-format +msgid "invalid character '%c' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1470 #, fuzzy, c-format #| msgid "literal length exceeds %d characters" msgid "literal length exceeds %u characters" msgstr "litterallängd överskrider %d tecken" -#: cobc/scanner.l:1365 +#: cobc/scanner.l:1485 #, c-format msgid "missing terminating %c character" msgstr "" -#: cobc/scanner.l:1382 cobc/scanner.l:1444 cobc/scanner.l:1729 +#: cobc/scanner.l:1502 cobc/scanner.l:1569 cobc/scanner.l:1868 #, fuzzy #| msgid "numeric boolean literal" msgid "zero-length literal" msgstr "numerisk-boolesk litteral" -#: cobc/scanner.l:1385 +#: cobc/scanner.l:1505 #, fuzzy #| msgid "alphanumeric literal has zero length; a SPACE will be assumed" msgid "national literal has zero length; a SPACE will be assumed" msgstr "alfanumerisk litteral har längd noll; ett SPACE antas" -#: cobc/scanner.l:1386 +#: cobc/scanner.l:1506 msgid "alphanumeric literal has zero length; a SPACE will be assumed" msgstr "alfanumerisk litteral har längd noll; ett SPACE antas" -#: cobc/scanner.l:1412 cobc/scanner.l:1413 cobc/scanner.l:1417 -#: cobc/scanner.l:1494 +#: cobc/scanner.l:1519 +#, fuzzy +#| msgid "STOP literal" +msgid "UTF-8 literal" +msgstr "STOP-litteral" + +#: cobc/scanner.l:1536 cobc/scanner.l:1537 cobc/scanner.l:1541 +#: cobc/scanner.l:1624 msgid "national literal" msgstr "nationell litteral" -#: cobc/scanner.l:1416 +#: cobc/scanner.l:1540 #, fuzzy #| msgid "national literal" msgid "national-character literal" msgstr "nationell litteral" -#: cobc/scanner.l:1447 +#: cobc/scanner.l:1571 #, fuzzy #| msgid "alphanumeric literal has zero length; a SPACE will be assumed" msgid "hexadecimal literal has zero length; X'00' will be assumed" msgstr "alfanumerisk litteral har längd noll; ett SPACE antas" -#: cobc/scanner.l:1472 +#: cobc/scanner.l:1575 cobc/scanner.l:1601 msgid "hexadecimal-boolean literal" msgstr "hexadecimal-boolesk litteral" -#: cobc/scanner.l:1480 cobc/scanner.l:1499 cobc/scanner.l:1608 -#: cobc/scanner.l:1659 cobc/scanner.l:1754 cobc/scanner.l:1824 +#: cobc/scanner.l:1579 cobc/scanner.l:1619 +msgid "hexadecimal-national literal" +msgstr "hexadecimal-nationell litteral" + +#: cobc/scanner.l:1609 cobc/scanner.l:1629 cobc/scanner.l:1744 +#: cobc/scanner.l:1798 cobc/scanner.l:1893 cobc/scanner.l:1963 #, fuzzy, c-format #| msgid "literal length %d exceeds %d characters" msgid "literal length %lu exceeds %u characters" msgstr "litterallängd %d överskrider %d tecken" -#: cobc/scanner.l:1490 -msgid "hexadecimal-national literal" -msgstr "hexadecimal-nationell litteral" - -#: cobc/scanner.l:1521 cobc/scanner.l:1551 cobc/scanner.l:1674 -#: cobc/scanner.l:1771 cobc/scanner.l:1835 +#: cobc/scanner.l:1651 cobc/scanner.l:1680 cobc/scanner.l:1813 +#: cobc/scanner.l:1910 cobc/scanner.l:1974 #, c-format msgid "literal contains invalid character '%c'" msgstr "litteral innehåller ogiltigt tecken ”%c”" -#: cobc/scanner.l:1573 +#: cobc/scanner.l:1704 #, c-format msgid "literal does not have an even number of digits" msgstr "litteral har inte ett jämnt antal siffror" -#: cobc/scanner.l:1599 +#: cobc/scanner.l:1735 cobc/scanner.l:1788 #, fuzzy, c-format #| msgid "literal contains invalid character '%c'" msgid "%s literals must contain at least one character" msgstr "litteral innehåller ogiltigt tecken ”%c”" -#: cobc/scanner.l:1639 cobc/scanner.l:1739 cobc/scanner.l:1813 +#: cobc/scanner.l:1775 cobc/scanner.l:1878 cobc/scanner.l:1952 msgid "ACUCOBOL numeric literal" msgstr "ACUCOBOL-numerisk litteral" -#: cobc/scanner.l:1651 -#, fuzzy -#| msgid "literal contains invalid character '%c'" -msgid "H literals must contain at least one character" -msgstr "litteral innehåller ogiltigt tecken ”%c”" - -#: cobc/scanner.l:1690 cobc/scanner.l:1783 cobc/scanner.l:1846 +#: cobc/scanner.l:1829 cobc/scanner.l:1922 cobc/scanner.l:1985 #, c-format msgid "literal exceeds limit %u" msgstr "litteral överskred gräns %u" -#: cobc/scanner.l:1724 +#: cobc/scanner.l:1863 msgid "numeric boolean literal" msgstr "numerisk-boolesk litteral" -#: cobc/scanner.l:1731 +#: cobc/scanner.l:1870 #, fuzzy #| msgid "alphanumeric literal has zero length; a SPACE will be assumed" -msgid "Boolean literal has zero length; B'0' will be assumed" +msgid "boolean literal has zero length; B'0' will be assumed" msgstr "alfanumerisk litteral har längd noll; ett SPACE antas" -#: cobc/scanner.l:1807 +#: cobc/scanner.l:1946 #, fuzzy #| msgid "ACUCOBOL numeric literal" msgid "HP COBOL octal literal" msgstr "ACUCOBOL-numerisk litteral" -#: cobc/scanner.l:1921 +#: cobc/scanner.l:2059 #, fuzzy, c-format #| msgid "literal length %d exceeds maximum of %d digits" msgid "literal length %lu exceeds maximum of %u digits" msgstr "litterallängd %d överskriver maximala %d siffror" -#: cobc/scanner.l:1927 +#: cobc/scanner.l:2065 #, fuzzy, c-format #| msgid "literal length %d exceeds %d digits" msgid "literal length %lu exceeds %u digits" msgstr "litterallängd %d överskriver %d siffror" -#: cobc/scanner.l:2039 cobc/tree.c:3845 +#: cobc/scanner.l:2177 cobc/tree.c:3888 #, fuzzy, c-format #| msgid "significand has more than 34 digits" msgid "significand has more than %d digits" msgstr "mantissa har fler än 34 siffror" -#: cobc/scanner.l:2044 +#: cobc/scanner.l:2182 #, c-format msgid "exponent has decimal point" msgstr "exponent har decimalpunkt" -#: cobc/scanner.l:2050 cobc/tree.c:3853 +#: cobc/scanner.l:2188 cobc/tree.c:3896 #, c-format msgid "exponent has more than 4 digits" msgstr "exponent har fler än 4 tecken" -#: cobc/scanner.l:2080 +#: cobc/scanner.l:2218 #, fuzzy, c-format #| msgid "exponent not between -78 and 76" msgid "exponent not between -6143 and 6144" msgstr "exponent inte mellan -78 och 76" -#: cobc/scanner.l:2089 +#: cobc/scanner.l:2227 #, c-format msgid "significand of 0 must be positive" msgstr "en mantissa som är 0 måste vara positiv" -#: cobc/scanner.l:2094 +#: cobc/scanner.l:2232 #, c-format msgid "exponent of 0 must be 0" msgstr "en exponent för 0 måste vara 0" -#: cobc/scanner.l:2099 +#: cobc/scanner.l:2237 #, c-format msgid "exponent of 0 must be positive" msgstr "en exponent för 0 måste vara positiv" -#: cobc/scanner.l:2261 +#: cobc/scanner.l:2399 #, c-format msgid "invalid CONSTANT: %s" msgstr "ogiltig CONSTANT: %s" -#: cobc/scanner.l:2271 +#: cobc/scanner.l:2409 #, c-format msgid "invalid alphanumeric CONSTANT: %s" msgstr "ogiltig alfanumerisk CONSTANT: %s" -#: cobc/scanner.l:2275 +#: cobc/scanner.l:2413 #, c-format msgid "empty alphanumeric CONSTANT: %s" msgstr "tom alfanumerisk CONSTANT: %s" -#: cobc/scanner.l:2292 cobc/scanner.l:2300 cobc/scanner.l:2305 +#: cobc/scanner.l:2430 cobc/scanner.l:2438 cobc/scanner.l:2443 #, c-format msgid "invalid numeric CONSTANT: %s" msgstr "ogiltig numerisk CONSTANT: %s" -#: cobc/scanner.l:2384 cobc/scanner.l:2411 +#: cobc/scanner.l:2522 cobc/scanner.l:2549 #, fuzzy, c-format #| msgid "'%s' is not defined, but is a reserved word in another dialect" msgid "'%s' is not a default reserved word, so cannot be aliased" msgstr "”%s” är inte definierad, men är ett reserverat ord i en annan dialekt" -#: cobc/scanner.l:2387 +#: cobc/scanner.l:2525 #, c-format msgid "'%s' is already reserved" msgstr "" -#: cobc/scanner.l:2389 +#: cobc/scanner.l:2527 msgid "you may want MAKESYN instead" msgstr "" -#: cobc/scanner.l:2414 +#: cobc/scanner.l:2552 #, fuzzy, c-format #| msgid "alias target '%s' is not a default reserved word" msgid "'%s' is not a reserved word" msgstr "alias mål ”%s” är inte ett standardreserverat ord" -#: cobc/scanner.l:2415 +#: cobc/scanner.l:2553 msgid "you may want ADDSYN or OVERRIDE instead" msgstr "" -#: cobc/tree.c:391 +#: cobc/tree.c:392 #, c-format msgid "%s clause is required for file '%s'" msgstr "%s-klausul krävs för fil ”%s”" -#: cobc/tree.c:395 +#: cobc/tree.c:396 #, c-format msgid "%s clause is invalid for file '%s' (file type)" msgstr "%s-klausul är ogiltig för fil ”%s” (filtyp)" -#: cobc/tree.c:399 +#: cobc/tree.c:400 #, c-format msgid "%s clause is invalid for file '%s'" msgstr "%s-klausul är ogiltig för fil ”%s”" -#: cobc/tree.c:426 +#: cobc/tree.c:427 #, c-format msgid "FOR item '%s' is a record" msgstr "FOR-objekt ”%s” är en post" -#: cobc/tree.c:435 +#: cobc/tree.c:436 #, c-format msgid "FOR item '%s' is in different record to '%s'" msgstr "FOR-objekt ”%s” är i en annan post än ”%s”" -#: cobc/tree.c:444 +#: cobc/tree.c:445 #, c-format msgid "FOR item '%s' is not in a record associated with '%s'" msgstr "FOR-objekt ”%s” är inte en post associerad med ”%s”" -#: cobc/tree.c:558 +#: cobc/tree.c:559 msgid "internal error node" msgstr "intern felnod" -#: cobc/tree.c:560 +#: cobc/tree.c:561 msgid "unknown constant" msgstr "okänd konstant" -#: cobc/tree.c:571 +#: cobc/tree.c:572 #, fuzzy, c-format #| msgid "invalid literal: '%s'" msgid "literal \"%s\"" msgstr "ogiltig litteral: ”%s”" -#: cobc/tree.c:842 -#, fuzzy, c-format -#| msgid "FUNCTION %s has invalid/not supported arguments - Tag %d" -msgid "FUNCTION %s has invalid/not supported arguments - tag %d" -msgstr "FUNCTION %s har ogiltiga argument, eller argument som inte stöds - Tagg %d" - -#: cobc/tree.c:963 +#: cobc/tree.c:969 #, c-format msgid "invalid date/time function: '%d'" msgstr "ogiltig datum-/tidsfunktion: ”%d”" -#: cobc/tree.c:995 +#: cobc/tree.c:1001 #, c-format msgid "FUNCTION '%s' has invalid date/time format" msgstr "FUNCTION ”%s” har ogiltigt datum-/tidsformat" -#: cobc/tree.c:1002 +#: cobc/tree.c:1008 #, c-format msgid "FUNCTION '%s' has format in variable" msgstr "FUNCTION ”%s” har format i variabel" -#: cobc/tree.c:1482 +#: cobc/tree.c:1488 #, c-format msgid "unknown tree tag: %d, category: %d" msgstr "okänd trädtagg: %d, kategori: %d" -#: cobc/tree.c:1577 +#: cobc/tree.c:1590 #, c-format msgid "unexpected numeric USAGE: %d" msgstr "oväntad numerisk USAGE: %d" -#: cobc/tree.c:1591 +#: cobc/tree.c:1604 #, c-format msgid "unexpected category: %d" msgstr "oväntad kategori: %d" -#: cobc/tree.c:1790 +#: cobc/tree.c:1814 #, c-format msgid "literal length %d exceeds maximum of %d digits" msgstr "litterallängd %d överskriver maximala %d siffror" -#: cobc/tree.c:1795 +#: cobc/tree.c:1819 #, c-format msgid "literal length %d exceeds %d digits" msgstr "litterallängd %d överskriver %d siffror" -#: cobc/tree.c:1844 cobc/tree.c:1856 cobc/tree.c:1913 cobc/tree.c:1963 +#: cobc/tree.c:1868 cobc/tree.c:1880 cobc/tree.c:1937 cobc/tree.c:1987 #, c-format msgid "numeric literal '%s' exceeds limit '%s'" msgstr "numerisk litteral ”%s” överskrider gräns ”%s”" -#: cobc/tree.c:2655 +#: cobc/tree.c:2676 msgid "invalid LOCALE literal" msgstr "ogiltig LOCALE-litteral" -#: cobc/tree.c:2782 +#: cobc/tree.c:2803 msgid "only literals with the same category can be concatenated" msgstr "endast litteraler med samma kategori kan konkateneras" -#: cobc/tree.c:2789 +#: cobc/tree.c:2811 #, fuzzy #| msgid "only alpanumeric, national or boolean literals may be concatenated" -msgid "only alphanumeric, national or boolean literals may be concatenated" +msgid "only alphanumeric, utf-8, national or boolean literals may be concatenated" msgstr "endast alfanumeriska, nationella eller booleska litteraler kan konkateneras" -#: cobc/tree.c:2801 +#: cobc/tree.c:2823 #, c-format msgid "literal length %d exceeds %d characters" msgstr "litterallängd %d överskrider %d tecken" -#: cobc/tree.c:3078 +#: cobc/tree.c:3103 msgid "B, 0 or /" msgstr "B, 0 eller /" -#: cobc/tree.c:3092 +#: cobc/tree.c:3117 msgid "the sign of the floating-point exponent" msgstr "tecknet på flyttalsexponenten" -#: cobc/tree.c:3094 +#: cobc/tree.c:3119 msgid "a leading +/- sign" msgstr "ett inledande +/--tecken" -#: cobc/tree.c:3096 +#: cobc/tree.c:3121 msgid "a trailing +/- sign" msgstr "ett efterföljande +/--tecken" -#: cobc/tree.c:3098 +#: cobc/tree.c:3123 msgid "CR or DB" msgstr "CR eller DB" -#: cobc/tree.c:3100 +#: cobc/tree.c:3125 msgid "a leading currency symbol" msgstr "en inledande valutasymbol" -#: cobc/tree.c:3102 +#: cobc/tree.c:3127 msgid "a trailing currency symbol" msgstr "en efterföljande valutasymbol" -#: cobc/tree.c:3104 +#: cobc/tree.c:3129 msgid "a Z or * which is before the decimal point" msgstr "ett Z eller * som kommer före decimalpunkten" -#: cobc/tree.c:3106 +#: cobc/tree.c:3131 msgid "a Z or * which is after the decimal point" msgstr "ett Z eller * som kommer efter decimalpunkten" -#: cobc/tree.c:3108 +#: cobc/tree.c:3133 msgid "a floating +/- string which is before the decimal point" msgstr "en flytande +/--sträng som kommer före decimalpunkten" -#: cobc/tree.c:3110 +#: cobc/tree.c:3135 msgid "a floating +/- string which is after the decimal point" msgstr "en flytande +/--sträng som kommer efter decimalpunkten" -#: cobc/tree.c:3112 +#: cobc/tree.c:3137 msgid "a floating currency symbol string which is before the decimal point" msgstr "en flytande valutasymbolsträng som kommer före decimalpunkten" -#: cobc/tree.c:3114 +#: cobc/tree.c:3139 msgid "a floating currency symbol string which is after the decimal point" msgstr "en flytande valutasymbolsträng som kommer efter decimalpunkten" -#: cobc/tree.c:3118 +#: cobc/tree.c:3143 msgid "A or X" msgstr "A eller X" -#: cobc/tree.c:3126 +#: cobc/tree.c:3151 msgid "a P which is before the decimal point" msgstr "ett P som kommer före decimalpunkten" -#: cobc/tree.c:3128 +#: cobc/tree.c:3153 msgid "a P which is after the decimal point" msgstr "ett P som kommer efter decimalpunkten" -#: cobc/tree.c:3149 cobc/tree.c:3599 +#: cobc/tree.c:3176 cobc/tree.c:3638 #, c-format msgid "%s may only occur once in a PICTURE string" msgstr "%s får endast förekomma en gång i en PICTURE-sträng" -#: cobc/tree.c:3151 cobc/tree.c:3541 +#: cobc/tree.c:3178 cobc/tree.c:3570 #, c-format msgid "%s cannot follow %s" msgstr "%s kan inte följa på %s" -#: cobc/tree.c:3154 +#: cobc/tree.c:3181 msgid "invalid PICTURE string detected" msgstr "ogiltig PICTURE-sträng hittad" -#: cobc/tree.c:3271 +#: cobc/tree.c:3299 msgid "number or constant in parentheses is not an unsigned integer" msgstr "nummer eller konstant i parenteser är inte ett teckenlöst heltal" -#: cobc/tree.c:3280 +#: cobc/tree.c:3308 #, fuzzy, c-format #| msgid "only up to 9 significant digits are permitted within parentheses" msgid "only up to %d significant digits are permitted within parentheses" msgstr "endast upp till 9 signifikanta siffror är tillåtna inom parenteser" -#: cobc/tree.c:3288 +#: cobc/tree.c:3316 msgid "number or constant in parentheses must be greater than zero" msgstr "nummer eller konstant i parenteser måste vara större än noll" -#: cobc/tree.c:3299 +#: cobc/tree.c:3327 msgid "parentheses must be preceded by a picture symbol" msgstr "" -#: cobc/tree.c:3329 +#: cobc/tree.c:3353 msgid "unbalanced parentheses" msgstr "obalanserade parenteser" -#: cobc/tree.c:3337 +#: cobc/tree.c:3361 #, fuzzy #| msgid "parentheses must contain (a constant-name defined as) a positive integer" msgid "parentheses must contain an unsigned integer" msgstr "parenteser måste innehålla (ett konstantnamn definierat som) ett positivt heltal" -#: cobc/tree.c:3375 +#: cobc/tree.c:3409 #, c-format msgid "'%s' is not a constant-name" msgstr "”%s” är inte ett konstantnamn" -#: cobc/tree.c:3382 -#, c-format -msgid "'%s' is not a numeric literal" -msgstr "”%s” är inte en numerisk litteral" - -#: cobc/tree.c:3386 -#, c-format -msgid "'%s' is not an integer" +#: cobc/tree.c:3422 +#, fuzzy, c-format +#| msgid "'%s' is not an integer" +msgid "'%s' is not an unsigned positive integer" msgstr "”%s” är inte ett heltal" -#: cobc/tree.c:3390 -#, c-format -msgid "'%s' is not unsigned" -msgstr "”%s” är inte teckenlöst" - -#: cobc/tree.c:3450 +#: cobc/tree.c:3479 msgid "missing PICTURE string" msgstr "saknar PICTURE-sträng" -#: cobc/tree.c:3479 +#: cobc/tree.c:3508 msgid "C must be followed by R" msgstr "C måste följas av R" -#: cobc/tree.c:3482 +#: cobc/tree.c:3511 msgid "D must be followed by B" msgstr "D måste följas av B" -#: cobc/tree.c:3497 cobc/tree.c:3596 cobc/tree.c:3622 cobc/tree.c:3733 +#: cobc/tree.c:3526 cobc/tree.c:3635 cobc/tree.c:3661 cobc/tree.c:3773 #, fuzzy #| msgid "unbalanced parentheses" msgid "uncommon parentheses" msgstr "obalanserade parenteser" -#: cobc/tree.c:3541 +#: cobc/tree.c:3570 msgid "exponent" msgstr "" -#: cobc/tree.c:3586 +#: cobc/tree.c:3625 #, fuzzy #| msgid "S must be at start of PICTURE string" msgid "L must be at start of PICTURE string" msgstr "S måste vara i början av PICTURE-sträng" -#: cobc/tree.c:3604 +#: cobc/tree.c:3643 msgid "S must be at start of PICTURE string" msgstr "S måste vara i början av PICTURE-sträng" -#: cobc/tree.c:3660 +#: cobc/tree.c:3699 msgid "P must be at start or end of PICTURE string" msgstr "P måste vara i början eller slutet av PICTURE-sträng" -#: cobc/tree.c:3690 +#: cobc/tree.c:3730 msgid "cannot have both Z and * in PICTURE string" msgstr "kan inte ha både Z och * i PICTURE-sträng" -#: cobc/tree.c:3768 +#: cobc/tree.c:3808 #, c-format msgid "invalid PICTURE character '%c'" msgstr "ogiltigt PICTURE-tecken ”%c”" -#: cobc/tree.c:3798 +#: cobc/tree.c:3841 #, c-format msgid "PICTURE string may not contain more than %d characters; contains %d characters" msgstr "PICTURE-sträng får inte innehålla mer än %d tecken; innehåller %d tecken" -#: cobc/tree.c:3803 -msgid "PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" +#: cobc/tree.c:3846 +#, fuzzy +#| msgid "PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" +msgid "PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" msgstr "PICTURE-sträng måste innehålla åtminstone ett tecken från uppsättningen A, N, X, Z, 1, 9, eller *; eller åtminstone två i mängden +, - och valutasymbolen" -#: cobc/tree.c:3830 +#: cobc/tree.c:3873 #, c-format msgid "numeric field cannot be larger than %d digits" msgstr "numeriskt fält kan inte vara större än %d siffror" -#: cobc/tree.c:4267 +#: cobc/tree.c:4333 #, fuzzy, c-format #| msgid "PICTURE clause required for '%s'" msgid "needs PICTURE clause for SUM %s" msgstr "PICTURE-klausul krävs för ”%s”" -#: cobc/tree.c:4274 +#: cobc/tree.c:4340 #, fuzzy, c-format #| msgid "PICTURE clause required for '%s'" msgid "non-numeric PICTURE clause for SUM %s" msgstr "PICTURE-klausul krävs för ”%s”" -#: cobc/tree.c:4346 cobc/tree.c:4359 +#: cobc/tree.c:4412 cobc/tree.c:4425 #, c-format msgid "no DETAIL line defined in report %s" msgstr "" -#: cobc/tree.c:4361 +#: cobc/tree.c:4427 msgid "PAGE LIMIT FIRST DETAIL should be >= HEADING" msgstr "" -#: cobc/tree.c:4364 +#: cobc/tree.c:4430 msgid "PAGE LIMIT FOOTING should be >= HEADING" msgstr "" -#: cobc/tree.c:4366 +#: cobc/tree.c:4432 msgid "PAGE LIMIT LAST DETAIL should be >= FIRST DETAIL" msgstr "" -#: cobc/tree.c:4368 +#: cobc/tree.c:4434 msgid "PAGE LIMIT FOOTING should be >= LAST DETAIL" msgstr "" -#: cobc/tree.c:4370 +#: cobc/tree.c:4436 msgid "PAGE LIMIT LINES should be >= FOOTING" msgstr "" -#: cobc/tree.c:4563 libcob/fileio.c:8999 +#: cobc/tree.c:4631 libcob/fileio.c:9358 #, c-format msgid "maximum keys (%d/%d) exceeded for file '%s'" msgstr "" -#: cobc/tree.c:4627 cobc/tree.c:4650 +#: cobc/tree.c:4695 cobc/tree.c:4718 #, c-format msgid "invalid KEY item '%s', not in file '%s'" msgstr "ogiltigt KEY-objekt ”%s”, inte i fil ”%s”" -#: cobc/tree.c:4661 +#: cobc/tree.c:4729 #, c-format msgid "minimal record length %d can not hold the key item '%s'; needs to be at least %d" msgstr "minimal postlängd %d kan inte hålla nyckelobjekt ”%s”; behöver vara åtminstone %d" -#: cobc/tree.c:4696 +#: cobc/tree.c:4764 #, fuzzy, c-format #| msgid "missing definitions:" msgid "missing file description for %s" msgstr "saknar definitioner:" -#: cobc/tree.c:4745 +#: cobc/tree.c:4813 #, c-format msgid "size of record '%s' (%d) smaller than minimum of file '%s' (%d)" msgstr "storlek för post ”%s” (%d) mindre än det minsta för fil ”%s” (%d)" -#: cobc/tree.c:4748 cobc/tree.c:4765 +#: cobc/tree.c:4816 cobc/tree.c:4833 msgid "file size adjusted" msgstr "" -#: cobc/tree.c:4760 +#: cobc/tree.c:4828 #, c-format msgid "size of record '%s' (%d) larger than maximum of file '%s' (%d)" msgstr "storlek för post ”%s” (%d) större än det största för fil ”%s” (%d)" -#: cobc/tree.c:4793 +#: cobc/tree.c:4861 msgid "RECORD VARYING specified without limits, but implied limits are equal" msgstr "" -#: cobc/tree.c:4795 +#: cobc/tree.c:4863 #, fuzzy, c-format #| msgid "%s ignored" msgid "%s clause ignored" msgstr "%s överhoppades" -#: cobc/tree.c:4890 cobc/typeck.c:7695 cobc/typeck.c:14389 cobc/typeck.c:14441 -#: cobc/typeck.c:14477 libcob/fileio.c:4598 libcob/screenio.c:3720 -#: libcob/screenio.c:3750 +#: cobc/tree.c:4958 cobc/typeck.c:8128 cobc/typeck.c:15186 cobc/typeck.c:15238 +#: cobc/typeck.c:15275 libcob/fileio.c:4724 libcob/screenio.c:4613 +#: libcob/screenio.c:4639 #, fuzzy, c-format #| msgid "runtime library is not configured for this operation" msgid "runtime is not configured to support %s" msgstr "körtidsbibliotek är inte konfigurerat för denna åtgärd" -#: cobc/tree.c:5395 +#: cobc/tree.c:5474 #, fuzzy, c-format #| msgid "literal is longer than field" msgid "literal '%.38s' is longer than '%s'" msgstr "litteral är längre än fält" -#: cobc/tree.c:5399 +#: cobc/tree.c:5478 #, c-format msgid "literal '%.38s' is longer than reference-modification of '%s'" msgstr "" -#: cobc/tree.c:5424 +#: cobc/tree.c:5508 #, c-format msgid "literal '%s' is alphanumeric but '%s' is numeric" msgstr "" -#: cobc/tree.c:5466 +#: cobc/tree.c:5550 #, c-format msgid "literal '%s' has more decimals than '%s'" msgstr "" -#: cobc/tree.c:5508 +#: cobc/tree.c:5598 #, c-format msgid "literal '%s' has more digits than '%s'" msgstr "" -#: cobc/tree.c:5548 cobc/tree.c:5572 +#: cobc/tree.c:5646 cobc/tree.c:5676 #, fuzzy, c-format #| msgid "THRU item '%s' may not be subordinate to '%s'" msgid "unsigned '%s' may not be %s %s" msgstr "THRU-objekt ”%s” får inte vara underordnat ”%s”" -#: cobc/tree.c:5558 cobc/tree.c:5581 +#: cobc/tree.c:5658 cobc/tree.c:5689 #, c-format msgid "unsigned '%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5614 cobc/tree.c:5639 +#: cobc/tree.c:5726 cobc/tree.c:5756 #, fuzzy, c-format #| msgid "'%s' cannot be used here" msgid "'%s' may not be %s %s" msgstr "”%s” kan inte användas här" -#: cobc/tree.c:5625 cobc/tree.c:5650 +#: cobc/tree.c:5738 cobc/tree.c:5768 #, c-format msgid "'%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5795 +#: cobc/tree.c:5917 msgid "divide by constant ZERO" msgstr "division med konstant ZERO" -#: cobc/tree.c:5879 cobc/tree.c:5886 +#: cobc/tree.c:6001 cobc/tree.c:6008 #, c-format msgid "%s should be COMP-X/COMP-5 for logical operator" msgstr "" -#: cobc/tree.c:5927 cobc/tree.c:5932 cobc/tree.c:6151 cobc/typeck.c:5675 -#: cobc/typeck.c:5684 cobc/typeck.c:5691 cobc/typeck.c:6772 cobc/typeck.c:6913 -msgid "invalid expression" -msgstr "ogiltigt uttryck" - -#: cobc/tree.c:6148 +#: cobc/tree.c:6283 #, fuzzy, c-format #| msgid "invalid expression" msgid "invalid expression: %s %s %s" msgstr "ogiltigt uttryck" -#: cobc/tree.c:6195 +#: cobc/tree.c:6286 +msgid "invalid expression: boolean expected with logical operator" +msgstr "" + +#: cobc/tree.c:6330 #, c-format msgid "unexpected operator: %d" msgstr "oväntad operator: %d" -#: cobc/tree.c:6206 +#: cobc/tree.c:6341 #, c-format msgid "expression '%.38s' %s '%.38s' is always TRUE" msgstr "uttryck ”%.38s” %s ”%.38s” är alltid TRUE" -#: cobc/tree.c:6212 +#: cobc/tree.c:6347 msgid "expression is always TRUE" msgstr "uttryck är alltid TRUE" -#: cobc/tree.c:6225 +#: cobc/tree.c:6360 #, c-format msgid "expression '%.38s' %s '%.38s' is always FALSE" msgstr "uttryck ”%.38s” %s ”%.38s” är alltid FALSE" -#: cobc/tree.c:6231 +#: cobc/tree.c:6366 msgid "expression is always FALSE" msgstr "uttryck är alltid FALSE" -#: cobc/tree.c:6443 +#: cobc/tree.c:6588 msgid "invalid file name reference" msgstr "ogiltig filnamnsreferens" -#: cobc/tree.c:6451 +#: cobc/tree.c:6596 #, fuzzy, c-format #| msgid "BY CONTENT assumed for alphanumeric item" msgid "BY CONTENT assumed for alphanumeric item '%s'" msgstr "BY CONTENT antas för alfanumeriskt objekt" -#: cobc/tree.c:6456 +#: cobc/tree.c:6601 #, fuzzy, c-format #| msgid "BY CONTENT assumed for alphanumeric item" msgid "BY CONTENT assumed for national item '%s'" msgstr "BY CONTENT antas för alfanumeriskt objekt" -#: cobc/tree.c:6595 +#: cobc/tree.c:6740 msgid "PERFORM FOREVER since UNTIL is always FALSE" msgstr "PERFORM FOREVER då UNTIL är alltid FALSE" -#: cobc/tree.c:6599 +#: cobc/tree.c:6744 msgid "PERFORM ONCE since UNTIL is always TRUE" msgstr "PERFORM ONCE då UNTIL är alltid TRUE" -#: cobc/tree.c:6602 +#: cobc/tree.c:6747 msgid "PERFORM NEVER since UNTIL is always TRUE" msgstr "PERFORM NEVER då UNTIL alltid är TRUE" -#: cobc/tree.c:6726 +#: cobc/tree.c:6871 #, fuzzy, c-format #| msgid "no definition/prototype seen for program '%s'" msgid "no definition/prototype seen for FUNCTION '%s'" msgstr "ingen definition/prototyp hittad för program ”%s”" -#: cobc/tree.c:6728 +#: cobc/tree.c:6873 #, fuzzy, c-format #| msgid "no definition/prototype seen for program '%s'" msgid "no definition/prototype seen for PROGRAM '%s'" msgstr "ingen definition/prototyp hittad för program ”%s”" -#: cobc/tree.c:6737 +#: cobc/tree.c:6882 #, fuzzy, c-format #| msgid "no definition/prototype seen for program with external name '%s'" msgid "no definition/prototype seen for FUNCTION with external name '%s'" msgstr "ingen definition/prototyp hittad för program med externt namn ”%s”" -#: cobc/tree.c:6739 +#: cobc/tree.c:6884 #, fuzzy, c-format #| msgid "no definition/prototype seen for program with external name '%s'" msgid "no definition/prototype seen for PROGRAM with external name '%s'" msgstr "ingen definition/prototyp hittad för program med externt namn ”%s”" -#: cobc/tree.c:6831 +#: cobc/tree.c:6976 cobc/tree.c:7158 cobc/tree.c:7233 cobc/tree.c:7239 +#: cobc/tree.c:7247 cobc/tree.c:7255 cobc/tree.c:7277 cobc/tree.c:7287 +#: cobc/tree.c:7292 #, fuzzy, c-format #| msgid "FUNCTION '%s' has invalid parameter" -msgid "FUNCTION %s has invalid argument" +msgid "FUNCTION '%s' has invalid argument" msgstr "FUNCTION ”%s” har ogiltig parameter" -#: cobc/tree.c:6833 +#: cobc/tree.c:6978 #, c-format -msgid "either all arguments or none should be if type %s" +msgid "either all arguments or none should be of type %s" msgstr "" -#: cobc/tree.c:6863 cobc/tree.c:6869 cobc/tree.c:6911 cobc/tree.c:6916 +#: cobc/tree.c:7010 cobc/tree.c:7016 cobc/tree.c:7057 cobc/tree.c:7063 #, c-format msgid "FUNCTION '%s' has invalid reference modification" msgstr "FUNCTION ”%s” har ogiltig referensmodifiering" -#: cobc/tree.c:6880 cobc/tree.c:7194 +#: cobc/tree.c:7027 cobc/tree.c:7344 #, c-format msgid "FUNCTION '%s' unknown" msgstr "FUNCTION ”%s” okänd" -#: cobc/tree.c:6884 +#: cobc/tree.c:7031 #, c-format msgid "FUNCTION '%s' is not implemented" msgstr "FUNCTION ”%s” är inte implementerad" -#: cobc/tree.c:6891 cobc/tree.c:6898 cobc/tree.c:7179 +#: cobc/tree.c:7037 cobc/tree.c:7044 cobc/tree.c:7329 #, c-format msgid "FUNCTION '%s' has wrong number of arguments" msgstr "FUNCTION ”%s” har fel antal argument" -#: cobc/tree.c:6905 +#: cobc/tree.c:7051 #, c-format msgid "FUNCTION '%s' cannot have reference modification" msgstr "FUNCTION ”%s” får inte ha referensmodifiering" -#: cobc/tree.c:7008 cobc/tree.c:7083 cobc/tree.c:7089 cobc/tree.c:7097 -#: cobc/tree.c:7105 cobc/tree.c:7127 cobc/tree.c:7137 cobc/tree.c:7142 -#, fuzzy, c-format -#| msgid "FUNCTION '%s' has invalid parameter" -msgid "FUNCTION '%s' has invalid argument" -msgstr "FUNCTION ”%s” har ogiltig parameter" - -#: cobc/tree.c:7185 +#: cobc/tree.c:7335 #, fuzzy, c-format #| msgid "FUNCTION '%s' has invalid first parameter" msgid "FUNCTION '%s' has invalid first argument" msgstr "FUNCTION ”%s” har ogiltig inledande parameter" -#: cobc/typeck.c:584 +#: cobc/typeck.c:590 #, c-format msgid "%s should be COMP-5/COMP-X for logical operator" msgstr "" -#: cobc/typeck.c:850 +#: cobc/typeck.c:856 #, fuzzy, c-format #| msgid "%s not allowed here" msgid "%s item not allowed here: '%s'" msgstr "%s inte tillåtet här" -#: cobc/typeck.c:892 +#: cobc/typeck.c:898 #, c-format msgid "'%s' is not a group name" msgstr "”%s” är inte ett gruppnamn" -#: cobc/typeck.c:911 +#: cobc/typeck.c:921 #, c-format msgid "'%s' is not a numeric name" msgstr "”%s” är inte ett numeriskt namn" -#: cobc/typeck.c:934 +#: cobc/typeck.c:944 #, c-format msgid "'%s' is not a numeric or numeric-edited name" msgstr "”%s” är inte ett numeriskt eller redigerat numeriskt namn" -#: cobc/typeck.c:974 -#, fuzzy, c-format -#| msgid "'%s' is not a numeric value" -msgid "'%s' is Alpha, instead of a numeric value" -msgstr "”%s” är inte ett numeriskt värde" - -#: cobc/typeck.c:977 -#, fuzzy, c-format -#| msgid "'%s' is not a numeric value" -msgid "'%s' is Alpha Edited, instead of a numeric value" -msgstr "”%s” är inte ett numeriskt värde" - -#: cobc/typeck.c:990 +#: cobc/typeck.c:1043 #, c-format -msgid "'%s' is not a numeric value" -msgstr "”%s” är inte ett numeriskt värde" - -#: cobc/typeck.c:1040 -#, c-format -msgid "'%s' is not an integer value" -msgstr "”%s” är inte ett heltalsvärde" +msgid "'%s' is not an integer" +msgstr "”%s” är inte ett heltal" -#: cobc/typeck.c:1044 +#: cobc/typeck.c:1047 msgid "positive numeric integer is required here" msgstr "positivt numeriskt heltal krävs här" -#: cobc/typeck.c:1163 +#: cobc/typeck.c:1178 msgid "System routine" msgstr "Systemrutin" -#: cobc/typeck.c:2054 libcob/call.c:1180 +#: cobc/typeck.c:2037 libcob/call.c:1172 #, c-format msgid "'%s' literal includes leading spaces which are omitted" msgstr "litteral ”%s” inkluderar inledande blanksteg som utelämnas" -#: cobc/typeck.c:2058 +#: cobc/typeck.c:2041 #, c-format msgid "'%s' literal includes trailing spaces which are omitted" msgstr "litteral ”%s” inkluderar efterföljande blanksteg som utelämnas" -#: cobc/typeck.c:2125 +#: cobc/typeck.c:2108 msgid "ON/OFF usage requires a SWITCH name" msgstr "ON/OFF-användning kräver ett SWITCH-namn" -#: cobc/typeck.c:2143 +#: cobc/typeck.c:2126 #, c-format msgid "word length exceeds maximum of %d characters: '%s'" msgstr "ordlängd överstiger största antal tecken %d: ”%s”" -#: cobc/typeck.c:2146 +#: cobc/typeck.c:2129 #, c-format msgid "word length exceeds %d characters: '%s'" msgstr "ordlängd överstiger %d tecken: ”%s”" -#: cobc/typeck.c:2223 +#: cobc/typeck.c:2206 #, fuzzy, c-format #| msgid "ASSIGN interpreted as %s" msgid "ASSIGN %s interpreted as '%s'" msgstr "ASSIGN-tolkat som %s" -#: cobc/typeck.c:2315 cobc/typeck.c:2487 +#: cobc/typeck.c:2332 cobc/typeck.c:2631 #, c-format msgid "subscript missing for '%s' - defaulting to 1" msgstr "indexering saknas för ”%s” - antar standardvärdet 1" -#: cobc/typeck.c:2338 cobc/typeck.c:2403 cobc/typeck.c:2659 +#: cobc/typeck.c:2355 cobc/typeck.c:2546 cobc/typeck.c:2746 #, c-format msgid "'%s' cannot be subscripted" msgstr "”%s” kan inte indexeras" -#: cobc/typeck.c:2342 cobc/typeck.c:2663 +#: cobc/typeck.c:2359 cobc/typeck.c:2750 #, c-format msgid "'%s' requires one subscript" msgstr "”%s” kräver en indexering" -#: cobc/typeck.c:2345 cobc/typeck.c:2666 +#: cobc/typeck.c:2362 cobc/typeck.c:2753 #, c-format msgid "'%s' requires %d subscripts" msgstr "”%s” kräver %d indexeringar" -#: cobc/typeck.c:2363 +#: cobc/typeck.c:2380 #, c-format msgid "'%s' (accessed by '%s')" msgstr "”%s” (åtkomst via ”%s”)" -#: cobc/typeck.c:2471 -#, c-format -msgid "'%s' has no OCCURS clause" -msgstr "”%s” har ingen OCCURS-klausul" +#: cobc/typeck.c:2399 cobc/typeck.c:4987 +#, fuzzy, c-format +#| msgid "'%s' cannot be reference modified" +msgid "%s may not be reference modified" +msgstr "”%s” kan inte referensmodifieras" -#: cobc/typeck.c:2537 libcob/common.c:3941 libcob/common.c:3952 +#: cobc/typeck.c:2437 cobc/typeck.c:2442 cobc/typeck.c:2466 +#: libcob/common.c:4477 libcob/common.c:4521 #, c-format -msgid "subscript of '%s' out of bounds: %d" -msgstr "indexering ”%s” utanför intervall: %d" +msgid "length of '%s' out of bounds: %d" +msgstr "längd ”%s” utanför intervall: %d" -#: cobc/typeck.c:2587 cobc/typeck.c:2598 libcob/common.c:3976 -#: libcob/common.c:4027 +#: cobc/typeck.c:2453 cobc/typeck.c:2462 libcob/common.c:4462 +#: libcob/common.c:4513 #, c-format msgid "offset of '%s' out of bounds: %d" msgstr "position ”%s” utanför intervall: %d" -#: cobc/typeck.c:2592 cobc/typeck.c:2603 cobc/typeck.c:2612 -#: libcob/common.c:3991 libcob/common.c:4035 +#: cobc/typeck.c:2458 +msgid "suspicious reference-modification: always using max. position" +msgstr "" + +#: cobc/typeck.c:2475 +msgid "suspicious reference-modification: always using max. length" +msgstr "" + +#: cobc/typeck.c:2615 #, c-format -msgid "length of '%s' out of bounds: %d" -msgstr "längd ”%s” utanför intervall: %d" +msgid "'%s' has no OCCURS clause" +msgstr "”%s” har ingen OCCURS-klausul" + +#: cobc/typeck.c:2694 libcob/common.c:4427 libcob/common.c:4438 +#, c-format +msgid "subscript of '%s' out of bounds: %d" +msgstr "indexering ”%s” utanför intervall: %d" -#: cobc/typeck.c:2727 cobc/typeck.c:2806 +#: cobc/typeck.c:2812 cobc/typeck.c:2891 msgid "reference modification not allowed here" msgstr "referensmodifiering inte tillåten här" -#: cobc/typeck.c:2741 cobc/typeck.c:2832 +#: cobc/typeck.c:2826 cobc/typeck.c:2917 msgid "88 level item not allowed here" msgstr "nivå 88-objekt inte tillåtet här" -#: cobc/typeck.c:2745 cobc/typeck.c:2836 cobc/typeck.c:2844 cobc/typeck.c:2906 +#: cobc/typeck.c:2830 cobc/typeck.c:2921 cobc/typeck.c:2929 cobc/typeck.c:2991 msgid "variable length item not allowed here" msgstr "objekt med variabel längd inte tillåtet här" # sebras: argh, this makes it so difficult to translate. how about "defined by DEFINE"? -#: cobc/typeck.c:2774 +#: cobc/typeck.c:2859 #, c-format msgid "'%s' has not been DEFINEd" msgstr "”%s” har inte definierats med DEFINE" -#: cobc/typeck.c:2810 +#: cobc/typeck.c:2895 msgid "only field names allowed here" msgstr "endast fältnamn tillåtna här" -#: cobc/typeck.c:2821 +#: cobc/typeck.c:2906 #, c-format msgid "VALUE of '%s': %s target '%s' is invalid" msgstr "VALUE av ”%s”: %s mål ”%s” är ogiltigt" -#: cobc/typeck.c:2823 cobc/typeck.c:2889 +#: cobc/typeck.c:2908 cobc/typeck.c:2974 msgid "target must be in FILE SECTION or LINKAGE SECTION or have the EXTERNAL clause" msgstr "mål måste vara i FILE SECTION eller LINKAGE SECTION eller har en EXTERNAL-klausul" -#: cobc/typeck.c:2879 cobc/typeck.c:2888 +#: cobc/typeck.c:2964 cobc/typeck.c:2973 #, c-format msgid "VALUE of '%s': %s target is invalid" msgstr "VALUE av ”%s”: %s mål är ogiltigt" -#: cobc/typeck.c:2881 +#: cobc/typeck.c:2966 msgid "no previous data-item found" msgstr "inget tidigare dataobjekt hittat" -#: cobc/typeck.c:3040 cobc/typeck.c:4799 +#: cobc/typeck.c:3130 cobc/typeck.c:4963 #, c-format msgid "'%s' cannot be BASED/EXTERNAL" msgstr "”%s” kan inte vara BASED/EXTERNAL" -#: cobc/typeck.c:3045 +#: cobc/typeck.c:3135 #, c-format msgid "'%s' is not in WORKING-STORAGE SECTION" msgstr "”%s” är inte i WORKING-STORAGE SECTION" -#: cobc/typeck.c:3052 cobc/typeck.c:4796 +#: cobc/typeck.c:3142 cobc/typeck.c:4960 #, c-format msgid "'%s' not level 01 or 77" msgstr "”%s” är inte nivå 01 eller 77" -#: cobc/typeck.c:3055 cobc/typeck.c:3090 cobc/typeck.c:4802 +#: cobc/typeck.c:3145 cobc/typeck.c:3180 cobc/typeck.c:4966 #, c-format msgid "'%s' REDEFINES field not allowed here" msgstr "”%s”REDEFINES-fält inte tillåtet här" -#: cobc/typeck.c:3075 cobc/typeck.c:8423 +#: cobc/typeck.c:3165 cobc/typeck.c:8876 #, fuzzy, c-format #| msgid "duplicate DEFINE directive '%s'" msgid "duplicate USING BY REFERENCE item '%s'" msgstr "duplicerat DEFINE-direktiv ”%s”" -#: cobc/typeck.c:3103 +#: cobc/typeck.c:3193 #, c-format msgid "'%s' USING item duplicates RETURNING item" msgstr "”%s” USING-objekt duplicerar RETURNING-objekt" -#: cobc/typeck.c:3177 +#: cobc/typeck.c:3268 #, fuzzy, c-format #| msgid "redefinition of '%s'" msgid "prototype and definition of '%s' do not match" msgstr "omdefinition av ”%s”" -#: cobc/typeck.c:3256 +#: cobc/typeck.c:3389 cobc/typeck.c:3486 #, c-format msgid "parameters #%d ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3259 +#: cobc/typeck.c:3393 #, c-format msgid "returning items ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3295 +#: cobc/typeck.c:3429 #, fuzzy #| msgid "no definition/prototype seen for function '%s'" msgid "definition is a program but the prototype is a function" msgstr "ingen definition/prototyp hittad för funktion ”%s”" -#: cobc/typeck.c:3299 +#: cobc/typeck.c:3433 #, fuzzy #| msgid "no definition/prototype seen for program '%s'" msgid "definition is a function but the prototype is a program" msgstr "ingen definition/prototyp hittad för program ”%s”" -#: cobc/typeck.c:3306 -msgid "DECIMAL-POINT IS COMMA clauses differ" -msgstr "" - -#: cobc/typeck.c:3312 -msgid "CURRENCY clauses differ" -msgstr "" - -#: cobc/typeck.c:3348 +#: cobc/typeck.c:3496 #, fuzzy #| msgid "number of parameters exceeds maximum %d" msgid "number of parameters differ" msgstr "antal parametrar överstiger maximala %d" -#: cobc/typeck.c:3358 +#: cobc/typeck.c:3506 msgid "definition has a RETURNING item but prototype does not" msgstr "" -#: cobc/typeck.c:3362 +#: cobc/typeck.c:3510 msgid "definition does not have a RETURNING item but prototype does" msgstr "" -#: cobc/typeck.c:3411 +#: cobc/typeck.c:3560 #, c-format msgid "unexpected tree tag: %d" msgstr "okänd trädtagg: %d" -#: cobc/typeck.c:3433 +#: cobc/typeck.c:3584 #, fuzzy, c-format #| msgid "parameters passed BY VALUE" msgid "expected argument #%d, %s, to be passed BY VALUE" msgstr "parametrar skickade BY VALUE" -#: cobc/typeck.c:3437 +#: cobc/typeck.c:3589 #, c-format msgid "expected argument #%d, %s, to be passed BY REFERENCE/CONTENT" msgstr "" -#: cobc/typeck.c:3455 cobc/typeck.c:3580 cobc/typeck.c:3583 +#: cobc/typeck.c:3608 cobc/typeck.c:3733 cobc/typeck.c:3736 #, c-format msgid "argument #%d is not optional" msgstr "" -#: cobc/typeck.c:3468 +#: cobc/typeck.c:3622 #, c-format msgid "argument #%d must be at least %d bytes long" msgstr "" -#: cobc/typeck.c:3483 +#: cobc/typeck.c:3637 #, c-format msgid "argument #%d is a different type of pointer than the parameter" msgstr "" -#: cobc/typeck.c:3490 +#: cobc/typeck.c:3644 #, c-format msgid "argument #%d is ANY LENGTH, but expecting a fixed size item" msgstr "" -#: cobc/typeck.c:3518 +#: cobc/typeck.c:3672 #, c-format msgid "argument #%d, %s, does not conform to the parameter definition" msgstr "" -#: cobc/typeck.c:3566 +#: cobc/typeck.c:3719 #, c-format msgid "expecting up to %d arguments, but found %d" msgstr "" -#: cobc/typeck.c:3598 +#: cobc/typeck.c:3752 #, fuzzy #| msgid "function RETURNING item may not be ANY LENGTH" msgid "the RETURNING item is of a fixed size, not ANY LENGTH" msgstr "funktion RETURNING-objekt får inte vara ANY LENGTH" -#: cobc/typeck.c:3603 +#: cobc/typeck.c:3758 #, fuzzy, c-format #| msgid "RETURNING item must have level 01" msgid "RETURNING item %s is not a valid type" msgstr "RETURNING-objekt måste ha nivå 01" -#: cobc/typeck.c:3609 +#: cobc/typeck.c:3764 #, fuzzy #| msgid "unexpected CONSTANT item" msgid "unexpected RETURNING item" msgstr "okänt CONSTANT-objekt" -#: cobc/typeck.c:3612 +#: cobc/typeck.c:3767 msgid "expecting a RETURNING item, but none provided" msgstr "" -#: cobc/typeck.c:3663 -#, c-format -msgid "'%s' is not an alphabet name" -msgstr "”%s” är inte ett alfabetsnamn" - -#: cobc/typeck.c:3939 +#: cobc/typeck.c:4091 #, c-format msgid "duplicate character values in alphabet '%s': %s" msgstr "duplicerade teckenvärde i alfabet ”%s”: %s" -#: cobc/typeck.c:3944 +#: cobc/typeck.c:4096 #, c-format msgid "invalid character values in alphabet '%s', starting at position %d" msgstr "ogiltiga teckenvärden i alfabet ”%s”, börjar på position %d" -#: cobc/typeck.c:4045 +#: cobc/typeck.c:4198 #, fuzzy, c-format #| msgid "duplicate values in class '%s'" msgid "duplicate character values in class '%s'" msgstr "duplicerade värden i klass ”%s”" -#: cobc/typeck.c:4074 +#: cobc/typeck.c:4227 msgid "invalid ALPHABET name" msgstr "ogiltigt ALPHABET-namn" -#: cobc/typeck.c:4103 +#: cobc/typeck.c:4256 #, c-format msgid "'%s' is not a locale name" msgstr "”%s” är inte ett lokalnamn" -#: cobc/typeck.c:4257 +#: cobc/typeck.c:4410 msgid "invalid RECORD DEPENDING item" msgstr "ogiltigt RECORD DEPENDING-objekt" -#: cobc/typeck.c:4262 +#: cobc/typeck.c:4415 msgid "RECORD DEPENDING must reference a data-item" msgstr "RECORD DEPENDING måste referera till ett dataobjekt" -#: cobc/typeck.c:4285 +#: cobc/typeck.c:4438 #, c-format msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgstr "RECORD DEPENDING-objekt ”%s” borde definieras i WORKING-STORAGE, LOCAL-STORAGE eller LINKAGE SECTION" -#: cobc/typeck.c:4298 +#: cobc/typeck.c:4451 #, fuzzy, c-format #| msgid "value in AT clause is not numeric" msgid "file %s: RELATIVE KEY %s is not numeric" msgstr "värde i AT-klausul är inte numeriskt" -#: cobc/typeck.c:4307 +#: cobc/typeck.c:4460 #, c-format msgid "file %s: RELATIVE KEY %s must be integer" msgstr "" -#: cobc/typeck.c:4312 +#: cobc/typeck.c:4465 #, c-format msgid "file %s: RELATIVE KEY %s must be unsigned" msgstr "" -#: cobc/typeck.c:4319 +#: cobc/typeck.c:4472 #, c-format msgid "file %s: RELATIVE KEY %s cannot have OCCURS" msgstr "" -#: cobc/typeck.c:4325 +#: cobc/typeck.c:4478 #, c-format msgid "RELATIVE KEY %s cannot be in file record belonging to %s" msgstr "" -#: cobc/typeck.c:4334 +#: cobc/typeck.c:4487 #, c-format msgid "file %s: RELATIVE KEY %s declared outside WORKING-STORAGE" msgstr "" -#: cobc/typeck.c:4356 cobc/typeck.c:8396 +#: cobc/typeck.c:4509 cobc/typeck.c:8833 #, c-format msgid "'%s' is not a valid data name" msgstr "”%s” är inte ett giltigt datanamn" -#: cobc/typeck.c:4363 +#: cobc/typeck.c:4516 #, fuzzy, c-format #| msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgid "CRT STATUS item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "RECORD DEPENDING-objekt ”%s” borde definieras i WORKING-STORAGE, LOCAL-STORAGE eller LINKAGE SECTION" -#: cobc/typeck.c:4369 +#: cobc/typeck.c:4522 #, fuzzy, c-format #| msgid "'%s' CRT STATUS must be 4 characters long" msgid "'%s' numeric CRT STATUS must have at least 4 digits" msgstr "”%s” CRT STATUS måste vara 4 tecken långt" -#: cobc/typeck.c:4375 +#: cobc/typeck.c:4528 #, fuzzy, c-format #| msgid "'%s' CRT STATUS must be 4 characters long" msgid "'%s' CRT STATUS must be 3 or 4 characters long" msgstr "”%s” CRT STATUS måste vara 4 tecken långt" -#: cobc/typeck.c:4397 +#: cobc/typeck.c:4550 #, fuzzy, c-format #| msgid "'%s' is not a field" msgid "FILE STATUS '%s' is not a field" msgstr "”%s” är inte ett fält" -#: cobc/typeck.c:4409 +#: cobc/typeck.c:4562 #, c-format msgid "FILE STATUS '%s' may not be a decimal or have a PIC with a P" msgstr "" -#: cobc/typeck.c:4414 +#: cobc/typeck.c:4567 #, c-format msgid "FILE STATUS '%s' is a numeric field, but I-O status codes are not numeric in general" msgstr "" -#: cobc/typeck.c:4418 +#: cobc/typeck.c:4571 #, fuzzy, c-format #| msgid "'%s' is not a numeric or numeric-edited name" msgid "FILE STATUS '%s' must be an alphanumeric or numeric field" msgstr "”%s” är inte ett numeriskt eller redigerat numeriskt namn" -#: cobc/typeck.c:4425 +#: cobc/typeck.c:4578 #, fuzzy, c-format #| msgid "'%s' is not USAGE DISPLAY" msgid "FILE STATUS '%s' must be USAGE DISPLAY" msgstr "”%s” är inte USAGE DISPLAY" -#: cobc/typeck.c:4432 +#: cobc/typeck.c:4585 #, fuzzy, c-format #| msgid "'%s' CRT STATUS must be 4 characters long" msgid "FILE STATUS '%s' must be 2 characters long" msgstr "”%s” CRT STATUS måste vara 4 tecken långt" -#: cobc/typeck.c:4440 +#: cobc/typeck.c:4593 #, fuzzy, c-format #| msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgid "FILE STATUS '%s' must be in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE" msgstr "RECORD DEPENDING-objekt ”%s” borde definieras i WORKING-STORAGE, LOCAL-STORAGE eller LINKAGE SECTION" -#: cobc/typeck.c:4446 +#: cobc/typeck.c:4599 #, fuzzy, c-format #| msgid "RENAMES may not contain '%s' as it is an OCCURS DEPENDING table" msgid "FILE STATUS '%s' may not be located after an OCCURS DEPENDING field" msgstr "RENAMES får inte innehålla ”%s” då det är en OCCURS DEPENDING-tabell" -#: cobc/typeck.c:4460 +#: cobc/typeck.c:4613 #, fuzzy, c-format #| msgid "'%s' will be implicitly defined" msgid "variable '%s' will be implicitly defined" msgstr "”%s” kommer att definieras implicit" -#: cobc/typeck.c:4489 cobc/typeck.c:4550 +#: cobc/typeck.c:4703 msgid "ASSIGN variable" msgstr "" -#: cobc/typeck.c:4555 +#: cobc/typeck.c:4708 #, fuzzy, c-format #| msgid "ASSIGN data item '%s' invalid" msgid "ASSIGN data item '%s' is invalid" msgstr "ASSIGN-dataobjekt ”%s” ogiltigt" -#: cobc/typeck.c:4619 +#: cobc/typeck.c:4773 #, c-format msgid "'%s' CURSOR must be 4 or 6 characters long" msgstr "”%s” CURSOR måste vara 4 eller 6 tecken långt" -#: cobc/typeck.c:4680 +#: cobc/typeck.c:4844 #, fuzzy, c-format #| msgid "'%s' cannot have OCCURS DEPENDING" msgid "'%s' cannot have nested OCCURS DEPENDING" msgstr "”%s” får inte ha OCCURS DEPENDING" -#: cobc/typeck.c:4694 +#: cobc/typeck.c:4858 #, fuzzy, c-format #| msgid "'%s' ODO field item invalid here" msgid "'%s' OCCURS DEPENDING ON field item invalid here" msgstr "”%s” ODO-fältobjekt ogiltigt här" -#: cobc/typeck.c:4704 +#: cobc/typeck.c:4868 #, fuzzy, c-format #| msgid "'%s' cannot have OCCURS DEPENDING" msgid "'%s' cannot have OCCURS DEPENDING because of '%s'" msgstr "”%s” får inte ha OCCURS DEPENDING" -#: cobc/typeck.c:4716 +#: cobc/typeck.c:4880 #, fuzzy, c-format #| msgid "'%s' ODO item must have GLOBAL attribute" msgid "'%s' OCCURS DEPENDING ON item must have GLOBAL attribute" msgstr "”%s” ODO-objekt måste ha GLOBAL-attribut" -#: cobc/typeck.c:4730 +#: cobc/typeck.c:4894 #, c-format msgid "PASSWORD '%s' for EXTERNAL file '%s' must have EXTERNAL attribute" msgstr "" -#: cobc/typeck.c:4768 +#: cobc/typeck.c:4932 #, fuzzy, c-format #| msgid "duplicate REPOSITORY entry for '%s'" msgid "duplicate APPLY COMMIT target: '%s'" msgstr "duplicerad REPOSITORY-post för ”%s”" -#: cobc/typeck.c:4782 +#: cobc/typeck.c:4946 #, fuzzy #| msgid "USE statement invalid for SORT file" msgid "APPLY COMMIT statement invalid for SORT file" msgstr "USE-sats ogiltig i SORT-fil" -#: cobc/typeck.c:4785 +#: cobc/typeck.c:4949 #, fuzzy #| msgid "USE statement invalid for SORT file" msgid "APPLY COMMIT statement invalid for REPORT file" msgstr "USE-sats ogiltig i SORT-fil" -#: cobc/typeck.c:4792 +#: cobc/typeck.c:4956 #, fuzzy, c-format #| msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgid "APPLY COMMIT item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "RECORD DEPENDING-objekt ”%s” borde definieras i WORKING-STORAGE, LOCAL-STORAGE eller LINKAGE SECTION" -#: cobc/typeck.c:4806 +#: cobc/typeck.c:4970 #, fuzzy, c-format #| msgid "%s not allowed here" msgid "item not allowed here: '%s'" msgstr "%s inte tillåtet här" -#: cobc/typeck.c:4819 +#: cobc/typeck.c:4983 #, fuzzy, c-format #| msgid "'%s' cannot be subscripted" msgid "%s may not be subscripted" msgstr "”%s” kan inte indexeras" -#: cobc/typeck.c:4823 -#, fuzzy, c-format -#| msgid "'%s' cannot be reference modified" -msgid "%s may not be reference modified" -msgstr "”%s” kan inte referensmodifieras" - -#: cobc/typeck.c:4883 +#: cobc/typeck.c:5047 #, c-format msgid "DEBUGGING target invalid: '%s'" msgstr "DEBUGGING-mål ogiltigt: ”%s”" -#: cobc/typeck.c:4889 +#: cobc/typeck.c:5053 #, fuzzy, c-format #| msgid "DEBUGGING target invalid with ALL PROCEDURES: '%s'" msgid "DEBUGGING target already specified with ALL PROCEDURES: '%s'" msgstr "DEBUGGING-mål ogiltigt med ALL PROCEDURES: ”%s”" -#: cobc/typeck.c:4909 +#: cobc/typeck.c:5073 #, fuzzy #| msgid "DEBUGGING target invalid: '%s'" msgid "DEBUGGING target" msgstr "DEBUGGING-mål ogiltigt: ”%s”" -#: cobc/typeck.c:4916 +#: cobc/typeck.c:5080 #, c-format msgid "'%s' is not a valid DEBUGGING target" msgstr "”%s” är inte ett giltigt DEBUGGING-mål" -#: cobc/typeck.c:4962 cobc/typeck.c:4970 +#: cobc/typeck.c:5126 cobc/typeck.c:5134 #, c-format msgid "'%s' is not in DECLARATIVES" msgstr "”%s” är inte inuti DECLARATIVES" -#: cobc/typeck.c:4984 +#: cobc/typeck.c:5148 #, c-format msgid "invalid reference to '%s' (in DECLARATIVES)" msgstr "ogiltig referens till ”%s” (i DECLARATIVES)" -#: cobc/typeck.c:4996 +#: cobc/typeck.c:5162 #, c-format msgid "GO TO paragraph '%s' which is defined in another SECTION" msgstr "" -#: cobc/typeck.c:5006 +#: cobc/typeck.c:5172 #, c-format msgid "'%s' is not a procedure name" msgstr "”%s” är inte ett procedurnamn" -#: cobc/typeck.c:5041 +#: cobc/typeck.c:5207 #, fuzzy, c-format #| msgid "'%s' and '%s' must be in the same record" msgid "%s and %s are not in the same SECTION" msgstr "”%s” och ”%s” måste vara i samma post" -#: cobc/typeck.c:5046 +#: cobc/typeck.c:5212 #, fuzzy, c-format #| msgid "'%s' defined here" msgid "%s is defined before %s" msgstr "”%s” definierad här" -#: cobc/typeck.c:5088 +#: cobc/typeck.c:5254 #, fuzzy, c-format #| msgid "ANY LENGTH items may only be BY REFERENCE formal parameters" msgid "'%s' ANY LENGTH item must be a formal parameter" msgstr "ANY LENGTH-objekt får endast vara BY REFERENCE-formella parametrar" -#: cobc/typeck.c:5136 +#: cobc/typeck.c:5302 #, c-format msgid "LINKAGE item '%s' is not a PROCEDURE USING parameter" msgstr "LINKAGE-objekt ”%s” är inte en PROCEDURE USING-parameter" -#: cobc/typeck.c:5192 +#: cobc/typeck.c:5358 #, c-format msgid "'%s' is not an alterable paragraph" msgstr "”%s” är inte ett ändringsbart stycke" -#: cobc/typeck.c:5802 cobc/typeck.c:5806 +#: cobc/typeck.c:5852 +#, fuzzy +#| msgid "invalid operator '%s' in expression" +msgid "invalid expression: unfinished expression" +msgstr "ogiltig operator ”%s” i uttryck" + +#: cobc/typeck.c:5858 cobc/typeck.c:5865 +msgid "invalid expression" +msgstr "ogiltigt uttryck" + +#: cobc/typeck.c:5990 cobc/typeck.c:5994 #, c-format msgid "suggest parentheses around %s within %s" msgstr "föreslår parenteser runt %s inom %s" -#: cobc/typeck.c:5815 +#: cobc/typeck.c:6003 #, fuzzy #| msgid "invalid expression" msgid "invalid conditional expression" msgstr "ogiltigt uttryck" -#: cobc/typeck.c:5932 +#: cobc/typeck.c:6120 #, c-format msgid "internal decimal structure size exceeded: %d" msgstr "intern decimalstrukturstorlek överskriden: %d" -#: cobc/typeck.c:5935 +#: cobc/typeck.c:6123 msgid "Try to minimize the number of parentheses or split into multiple computations." msgstr "Försök att minimera antalet parenteser eller dela upp i flera beräkningar." -#: cobc/typeck.c:5959 +#: cobc/typeck.c:6147 #, fuzzy, c-format #| msgid "more than %d nested conditions" msgid "more than %d nested expressions" msgstr "fler än %d nästlade villkor" -#: cobc/typeck.c:6000 +#: cobc/typeck.c:6188 msgid "precision of result may change with arithmetic-osvs" msgstr "precision för resultatet kan förändras med osvs-aritmetik" -#: cobc/typeck.c:6080 +#: cobc/typeck.c:6268 #, c-format msgid "unexpected operation: %c (%d)" msgstr "oväntad åtgärd: %c (%d)" -#: cobc/typeck.c:6085 +#: cobc/typeck.c:6273 #, c-format msgid "%s operator may be misplaced" msgstr "%s-operatorn kan vara felplacerad" -#: cobc/typeck.c:6160 +#: cobc/typeck.c:6349 msgid "unexpected constant expansion" msgstr "oväntat konstantuttryck" -#: cobc/typeck.c:6882 cobc/typeck.c:11024 +#: cobc/typeck.c:7106 cobc/typeck.c:11656 cobc/typeck.c:11661 msgid "alphanumeric value is expected" msgstr "alfanumeriskt värde förväntades" -#: cobc/typeck.c:6884 cobc/typeck.c:11019 +#: cobc/typeck.c:7109 cobc/typeck.c:11651 msgid "numeric value is expected" msgstr "numeriskt värde förväntades" -#: cobc/typeck.c:6954 +#: cobc/typeck.c:7203 +#, fuzzy +#| msgid "invalid option detected" +msgid "invalid expression: condition expected" +msgstr "ogiltig flagga hittad" + +#: cobc/typeck.c:7271 +#, fuzzy +#| msgid "invalid expression" +msgid "incomplete expression" +msgstr "ogiltigt uttryck" + +#: cobc/typeck.c:7312 #, c-format msgid "more than %d nested conditions" msgstr "fler än %d nästlade villkor" -#: cobc/typeck.c:7290 cobc/typeck.c:7371 +#: cobc/typeck.c:7667 cobc/typeck.c:7748 msgid "no CORRESPONDING items found" msgstr "inget CORRESPONDING-objekt hittat" -#: cobc/typeck.c:7443 +#: cobc/typeck.c:7820 msgid "no items to ACCEPT found" msgstr "" -#: cobc/typeck.c:7493 +#: cobc/typeck.c:7870 #, fuzzy #| msgid "invalid type for DISPLAY operand" msgid "no items to DISPLAY found" msgstr "ogiltig typ för DISPLAY-operand" -#: cobc/typeck.c:7605 +#: cobc/typeck.c:7981 msgid "cannot specify figurative constant ZERO in AT clause" msgstr "kan inte ange bildlig konstant ZERO i AT-klausul" -#: cobc/typeck.c:7609 +#: cobc/typeck.c:7985 msgid "value in AT clause is not numeric" msgstr "värde i AT-klausul är inte numeriskt" -#: cobc/typeck.c:7615 +#: cobc/typeck.c:7991 msgid "value in AT clause must have 4 or 6 digits" msgstr "värde i AT-klausul måste ha 4 eller 6 siffror" -#: cobc/typeck.c:7737 +#: cobc/typeck.c:8168 msgid "invalid PROMPT literal" msgstr "ogiltig PROMPT-litteral" -#: cobc/typeck.c:7742 +#: cobc/typeck.c:8173 msgid "invalid PROMPT identifier" msgstr "ogiltig PROMPT-identifierare" -#: cobc/typeck.c:8032 +#: cobc/typeck.c:8465 #, c-format msgid "'%s' is not an input device" msgstr "”%s” är inte en inmatningsenhet" -#: cobc/typeck.c:8059 cobc/typeck.c:9242 +#: cobc/typeck.c:8492 cobc/typeck.c:9708 #, c-format msgid "'%s' is not defined in SPECIAL-NAMES" msgstr "”%s” är inte definierad i SPECIAL-NAMES" -#: cobc/typeck.c:8064 +#: cobc/typeck.c:8497 #, c-format msgid "invalid input device '%s'" msgstr "ogiltig inmatningsenhet ”%s”" -#: cobc/typeck.c:8069 cobc/typeck.c:9246 +#: cobc/typeck.c:8502 cobc/typeck.c:9712 #, c-format msgid "unknown device '%s'; it may exist in another dialect" msgstr "okänd enhet ”%s”; den kanske finns i en annan dialekt" -#: cobc/typeck.c:8072 cobc/typeck.c:9249 +#: cobc/typeck.c:8505 cobc/typeck.c:9715 #, c-format msgid "unknown device '%s'; not defined in SPECIAL-NAMES" msgstr "okänd enhet ”%s”; inte definierad i SPECIAL-NAMES" -#: cobc/typeck.c:8088 +#: cobc/typeck.c:8524 msgid "target of RETURNING is not a data pointer" msgstr "mål för RETURNING är inte en datapekare" -#: cobc/typeck.c:8115 cobc/typeck.c:12634 cobc/typeck.c:12700 -#: cobc/typeck.c:12768 +#: cobc/typeck.c:8551 cobc/typeck.c:13410 cobc/typeck.c:13479 +#: cobc/typeck.c:13547 #, fuzzy, c-format #| msgid "cannot change address of '%s', which is not BASED or a linkage item" msgid "cannot change address of '%s', which is not BASED or a LINKAGE item" msgstr "kan inte ändra adress för ”%s”, vilken inte är BASED eller ett länkningsobjekt" -#: cobc/typeck.c:8121 +#: cobc/typeck.c:8557 #, fuzzy #| msgid "target of ALLOCATE is not a BASED item" msgid "target of ALLOCATE must have BASED clause" msgstr "mål för ALLOCATE är inte ett BASED-objekt" -#: cobc/typeck.c:8155 cobc/typeck.c:8571 +#: cobc/typeck.c:8591 cobc/typeck.c:9023 msgid "amount must be specified as a numeric expression" msgstr "" -#: cobc/typeck.c:8161 +#: cobc/typeck.c:8597 msgid "INITIALIZED TO item is not alphanumeric" msgstr "INITIALIZED TO-objekt är inte alfanumeriskt" -#: cobc/typeck.c:8232 +#: cobc/typeck.c:8667 msgid "only alphanumeric FUNCTION types are allowed here" msgstr "endast alfanumeriska FUNCTION-typer tillåts här" -#: cobc/typeck.c:8240 +#: cobc/typeck.c:8675 msgid "invalid RETURNING field" msgstr "ogiltigt RETURNING-fält" -#: cobc/typeck.c:8259 +#: cobc/typeck.c:8694 msgid "STDCALL not available on this platform" msgstr "STDCALL inte tillgängligt på denna plattform" -#: cobc/typeck.c:8263 +#: cobc/typeck.c:8698 msgid "STDCALL used on 64-bit Windows platform" msgstr "STDCALL använt på 64-bitars Windows-plattform" -#: cobc/typeck.c:8268 +#: cobc/typeck.c:8703 msgid "STATIC CALL convention requires a literal program name" msgstr "STATIC CALL-konvention kräver ett litteralt programnamn" -#: cobc/typeck.c:8273 cobc/typeck.c:11975 cobc/typeck.c:12900 -#: cobc/typeck.c:13271 +#: cobc/typeck.c:8708 cobc/typeck.c:12746 cobc/typeck.c:13681 +#: cobc/typeck.c:14077 msgid "HANDLE must be either a generic or a THREAD HANDLE" msgstr "HANDLE måste vara antingen en generisk eller ett THREAD HANDLE" -#: cobc/typeck.c:8291 +#: cobc/typeck.c:8726 msgid "numeric literal is negative" msgstr "numerisk litteral är negativ" -#: cobc/typeck.c:8370 +#: cobc/typeck.c:8805 msgid "numeric literal exceeds size limits" msgstr "numerisk litteral överskriver storleksbegränsningar" -#: cobc/typeck.c:8385 +#: cobc/typeck.c:8820 #, fuzzy, c-format #| msgid "figurative constant invalid here" msgid "figurative constant %s invalid here" msgstr "bildlig konstant ogiltig här" -#: cobc/typeck.c:8403 +#: cobc/typeck.c:8840 #, c-format msgid "'%s' is not a 01 or 77 level item" msgstr "”%s” är inte ett nivå-01- eller -77-objekt" -#: cobc/typeck.c:8407 +#: cobc/typeck.c:8856 #, c-format msgid "'%s' ANY LENGTH item not passed BY REFERENCE" msgstr "”%s” ANY LENGTH-objekt förbigås inte av BY REFERENCE" -#: cobc/typeck.c:8457 cobc/typeck.c:8462 +#: cobc/typeck.c:8909 cobc/typeck.c:8914 #, c-format msgid "wrong number of CALL parameters for '%s', %d given, %d expected" msgstr "fel antal CALL-parametrar för ”%s”, %d angivna, %d förväntades" -#: cobc/typeck.c:8529 cobc/typeck.c:8603 cobc/typeck.c:8607 cobc/typeck.c:8637 -#: cobc/typeck.c:11932 cobc/typeck.c:12092 cobc/typeck.c:12281 -#: cobc/typeck.c:12285 cobc/typeck.c:13206 cobc/typeck.c:13539 -#: cobc/typeck.c:13542 +#: cobc/typeck.c:8981 cobc/typeck.c:9055 cobc/typeck.c:9059 cobc/typeck.c:9095 +#: cobc/typeck.c:12703 cobc/typeck.c:12863 cobc/typeck.c:13052 +#: cobc/typeck.c:13056 cobc/typeck.c:14012 cobc/typeck.c:14345 +#: cobc/typeck.c:14348 #, c-format msgid "%s not allowed on %s files" msgstr "%s inte tillåtet på %s-filer" -#: cobc/typeck.c:8704 +#: cobc/typeck.c:9172 msgid "positions cannot be specified for main windows" msgstr "positioner kan inte anges för huvudfönster" -#: cobc/typeck.c:8714 cobc/typeck.c:8718 cobc/typeck.c:8740 +#: cobc/typeck.c:9183 cobc/typeck.c:9187 cobc/typeck.c:9211 #, fuzzy #| msgid "HANDLE must be either a generic or a WINDOW HANDLE" msgid "HANDLE must be either a generic or a WINDOW HANDLE or X(10)" msgstr "HANDLE måste vara antingen en generisk eller ett WINDOW HANDLE" -#: cobc/typeck.c:8849 +#: cobc/typeck.c:9324 #, c-format msgid "'%s' is an invalid type for DISPLAY operand" msgstr "”%s” är en ogiltig typ för DISPLAY-operand" -#: cobc/typeck.c:8854 +#: cobc/typeck.c:9329 msgid "invalid type for DISPLAY operand" msgstr "ogiltig typ för DISPLAY-operand" -#: cobc/typeck.c:9202 cobc/typeck.c:9235 +#: cobc/typeck.c:9668 cobc/typeck.c:9701 #, c-format msgid "'%s' is not an output device" msgstr "”%s” är inte en utmatningsenhet" -#: cobc/typeck.c:9335 +#: cobc/typeck.c:9800 msgid "invalid use of 88 level in WHEN expression" msgstr "ogiltig användning av nivå-88 i WHEN-uttryck" -#: cobc/typeck.c:9396 +#: cobc/typeck.c:9861 msgid "wrong number of WHEN parameters" msgstr "fel antal WHEN-parametrar" -#: cobc/typeck.c:9518 cobc/typeck.c:9530 +#: cobc/typeck.c:9983 cobc/typeck.c:9995 #, c-format msgid "target %d of FREE is not a BASED data item" msgstr "mål %d för FREE är inte ett BASED-dataobjekt" -#: cobc/typeck.c:9536 +#: cobc/typeck.c:10001 #, c-format msgid "target %d of FREE must be a data pointer" msgstr "mål %d för FREE måste vara en datapekare" -#: cobc/typeck.c:9550 +#: cobc/typeck.c:10015 msgid "GO TO without procedure-name" msgstr "GO TO utan procedurnamn" -#: cobc/typeck.c:9560 +#: cobc/typeck.c:10023 msgid "GO TO with multiple procedure-names" msgstr "GO TO med flera procedurnamn" -#: cobc/typeck.c:9582 -#, fuzzy -#| msgid "GO TO with multiple procedure-names" -msgid "GO TO ENTRY with multiple entry-names" -msgstr "GO TO med flera procedurnamn" - -#: cobc/typeck.c:9646 +#: cobc/typeck.c:10088 msgid "invalid INITIALIZE statement" msgstr "ogiltig INITIALIZE-sats" -#: cobc/typeck.c:9752 cobc/typeck.c:9755 +#: cobc/typeck.c:10193 cobc/typeck.c:10196 #, c-format msgid "%s operands differ in size" msgstr "%s operander skiljer sig i storlek" -#: cobc/typeck.c:9785 +#: cobc/typeck.c:10226 #, c-format msgid "unexpected clause %d" msgstr "oväntad klausul %d" -#: cobc/typeck.c:9860 cobc/typeck.c:9871 cobc/typeck.c:9882 cobc/typeck.c:9893 +#: cobc/typeck.c:10301 cobc/typeck.c:10312 cobc/typeck.c:10323 +#: cobc/typeck.c:10334 #, c-format msgid "data name expected before %s" msgstr "datanamn förväntades före %s" -#: cobc/typeck.c:9903 +#: cobc/typeck.c:10344 #, c-format msgid "ALL, LEADING or TRAILING expected before '%s'" msgstr "ALL, LEADING eller TRAILING förväntades före ”%s”" -#: cobc/typeck.c:9913 +#: cobc/typeck.c:10354 msgid "operand has wrong size" msgstr "operand har fel storlek" -#: cobc/typeck.c:10007 +#: cobc/typeck.c:10448 #, c-format msgid "'%s' defined here as PIC %s" msgstr "”%s” definierat här som PIC %s" -#: cobc/typeck.c:10011 +#: cobc/typeck.c:10452 #, c-format msgid "'%s' defined here as a group of length %d" msgstr "”%s” definierat här som en grupp med längden %d" -#: cobc/typeck.c:10017 +#: cobc/typeck.c:10458 #, fuzzy, c-format #| msgid "internal register '%s' defined as BINARY-LONG" msgid "internal register '%s' defined as USAGE %s" msgstr "internt register ”%s” definierat som BINARY-LONG" -#: cobc/typeck.c:10020 +#: cobc/typeck.c:10461 #, c-format msgid "'%s' defined here as USAGE %s" msgstr "”%s” definierat här som USAGE %s" -#: cobc/typeck.c:10045 cobc/typeck.c:10063 +#: cobc/typeck.c:10486 cobc/typeck.c:10504 #, fuzzy, c-format #| msgid "value size exceeds data size" msgid "value size is %d" msgstr "storlek för värde överstiger datastorlek" -#: cobc/typeck.c:10059 +#: cobc/typeck.c:10500 #, c-format msgid "value is %s" msgstr "" -#: cobc/typeck.c:10338 -msgid "invalid destination for MOVE" -msgstr "ogiltig destination för MOVE" - -#: cobc/typeck.c:10380 +#: cobc/typeck.c:10824 #, fuzzy #| msgid "MOVE of figurative constant to numeric item" msgid "MOVE of figurative constant SPACE to numeric item" msgstr "MOVE av bildlig konstant till numeriskt objekt" -#: cobc/typeck.c:10395 +#: cobc/typeck.c:10839 msgid "MOVE of figurative constant QUOTE to numeric item" msgstr "MOVE av bildlig konstant QUOTE till numeriskt objekt" -#: cobc/typeck.c:10400 cobc/typeck.c:10411 +#: cobc/typeck.c:10844 cobc/typeck.c:10855 msgid "MOVE of figurative constant to numeric item" msgstr "MOVE av bildlig konstant till numeriskt objekt" -#: cobc/typeck.c:10469 +#: cobc/typeck.c:10936 msgid "numeric literal in VALUE clause of numeric-edited item" msgstr "numerisk litteral i VALUE-klausul av numeriskt redigerat objekt" -#: cobc/typeck.c:10494 +#: cobc/typeck.c:10966 msgid "numeric move to ALPHABETIC" msgstr "numerisk förflyttning till ALPHABETIC" -#: cobc/typeck.c:10506 +#: cobc/typeck.c:10978 msgid "data item not signed" msgstr "dataobjekt saknar tecken" -#: cobc/typeck.c:10509 +#: cobc/typeck.c:10981 msgid "ignoring sign" msgstr "hoppar över tecken" -#: cobc/typeck.c:10821 +#: cobc/typeck.c:11381 msgid "overlapping MOVE may occur and produce unpredictable results" msgstr "överlappande MOVE kan förekomma och ger oförutsägbara resultat" -#: cobc/typeck.c:10828 +#: cobc/typeck.c:11388 msgid "overlapping MOVE may produce unpredictable results" msgstr "överlappande MOVE kan ge oförutsägbara resultat" -#: cobc/typeck.c:10961 +#: cobc/typeck.c:11593 msgid "invalid source for MOVE" msgstr "ogiltig källa för MOVE" -#: cobc/typeck.c:10982 +#: cobc/typeck.c:11614 msgid "source is non-numeric - substituting zero" msgstr "" -#: cobc/typeck.c:10988 cobc/typeck.c:10999 +#: cobc/typeck.c:11620 cobc/typeck.c:11631 msgid "invalid VALUE clause" msgstr "ogiltig VALUE-klausul" -#: cobc/typeck.c:10991 cobc/typeck.c:12841 cobc/typeck.c:12846 -#: cobc/typeck.c:12873 cobc/typeck.c:12878 +#: cobc/typeck.c:11623 cobc/typeck.c:13622 cobc/typeck.c:13627 +#: cobc/typeck.c:13654 cobc/typeck.c:13659 msgid "invalid SET statement" msgstr "ogiltig SET-sats" -#: cobc/typeck.c:10993 +#: cobc/typeck.c:11625 msgid "invalid MOVE statement" msgstr "ogiltig MOVE-sats" -#: cobc/typeck.c:11000 +#: cobc/typeck.c:11632 msgid "literal exceeds data size" msgstr "litteral överskrider datastorlek" -#: cobc/typeck.c:11004 +#: cobc/typeck.c:11636 msgid "numeric literal exceeds data size" msgstr "numerisk litteral överskrider datastorlek" -#: cobc/typeck.c:11013 +#: cobc/typeck.c:11645 msgid "MOVE of non-integer to alphanumeric" msgstr "MOVE av icke-heltal till alfanumeriskt" -#: cobc/typeck.c:11029 +#: cobc/typeck.c:11666 cobc/typeck.c:11671 +#, fuzzy +#| msgid "numeric value is expected" +msgid "national value is expected" +msgstr "numeriskt värde förväntades" + +#: cobc/typeck.c:11676 msgid "value does not fit the picture string" msgstr "värde passar inte i bildsträngen" -#: cobc/typeck.c:11035 +#: cobc/typeck.c:11682 msgid "value size exceeds data size" msgstr "storlek för värde överstiger datastorlek" -#: cobc/typeck.c:11040 +#: cobc/typeck.c:11687 msgid "sending field larger than receiving field" msgstr "skickar fält större än mottagande fält" -#: cobc/typeck.c:11045 +#: cobc/typeck.c:11692 msgid "some digits may be truncated" msgstr "vissa siffror kan komma att trunkeras" -#: cobc/typeck.c:11798 cobc/typeck.c:11848 +#: cobc/typeck.c:12566 cobc/typeck.c:12619 #, c-format msgid "invalid MOVE target: %s" msgstr "ogiltigt MOVE-mål: %s" -#: cobc/typeck.c:12105 +#: cobc/typeck.c:12876 msgid "READ PREVIOUS not allowed for this file type" msgstr "READ PREVIOUS inte tillåtet för denna filtyp" -#: cobc/typeck.c:12113 +#: cobc/typeck.c:12884 msgid "KEY ignored with sequential READ" msgstr "KEY överhoppat med sekventiell READ" -#: cobc/typeck.c:12209 +#: cobc/typeck.c:12980 #, fuzzy #| msgid "figurative constant invalid here" msgid "figurative constants not allowed in FROM clause" msgstr "bildlig konstant ogiltig här" -#: cobc/typeck.c:12216 -msgid "literal in FROM clause must be alphanumeric, national or boolean" +#: cobc/typeck.c:12987 +msgid "literal in FROM clause must be alphanumeric, utf-8, national or boolean" msgstr "" -#: cobc/typeck.c:12239 cobc/typeck.c:13499 +#: cobc/typeck.c:13010 cobc/typeck.c:14305 #, c-format msgid "%s FILE requires a FROM clause" msgstr "%s FILE kräver en FROM-klausul" -#: cobc/typeck.c:12261 cobc/typeck.c:12345 cobc/typeck.c:13521 +#: cobc/typeck.c:13032 cobc/typeck.c:13116 cobc/typeck.c:14327 #, c-format msgid "%s subject does not refer to a record name" msgstr "%s-ämne refererar inte till ett postnamn" -#: cobc/typeck.c:12351 +#: cobc/typeck.c:13122 msgid "RELEASE not allowed on this record item" msgstr "RELEASE inte tillåtet för detta postobjekt" -#: cobc/typeck.c:12433 cobc/typeck.c:12454 cobc/typeck.c:12461 +#: cobc/typeck.c:13183 cobc/typeck.c:13209 cobc/typeck.c:13237 msgid "invalid SEARCH ALL condition" msgstr "ogiltigt SEARCH ALL-villkor" -#: cobc/typeck.c:12578 cobc/typeck.c:12585 +#: cobc/typeck.c:13231 +msgid "SEARCH ALL requires comparision of KEY field" +msgstr "" + +#: cobc/typeck.c:13354 cobc/typeck.c:13361 msgid "SET targets must be PROGRAM-POINTER" msgstr "SET-mål måste vara PROGRAM-POINTER" -#: cobc/typeck.c:12610 +#: cobc/typeck.c:13386 #, fuzzy, c-format #| msgid "SET target '%s' is not numeric, an index or a pointer" msgid "SET target '%s' is not numeric, an INDEX or a POINTER" msgstr "SET-mål ”%s” är inte numeriskt, ett index eller en pekare" -#: cobc/typeck.c:12627 cobc/typeck.c:12696 cobc/typeck.c:12764 +#: cobc/typeck.c:13403 cobc/typeck.c:13475 cobc/typeck.c:13543 #, c-format msgid "cannot change address of '%s', which is not level 1 or 77" msgstr "kan inte ändra adress för ”%s”, vilken inte är nivå 1 eller 77" -#: cobc/typeck.c:12721 +#: cobc/typeck.c:13500 #, fuzzy, c-format #| msgid "SET target '%s' is not numeric, an index or a pointer" msgid "SET target '%s' is not a POINTER for FCD" msgstr "SET-mål ”%s” är inte numeriskt, ett index eller en pekare" -#: cobc/typeck.c:12789 +#: cobc/typeck.c:13569 #, c-format msgid "SET target '%s' is not a POINTER for FCD-KEYDEF" msgstr "" -#: cobc/typeck.c:12882 +#: cobc/typeck.c:13663 msgid "field does not have a FALSE clause" msgstr "fält har inte en FALSE-klausul" -#: cobc/typeck.c:12913 +#: cobc/typeck.c:13694 msgid "THREAD-priority must be between 1 and 32767" msgstr "THREAD-prioritet måste vara mellan 1 och 32767" -#: cobc/typeck.c:12933 +#: cobc/typeck.c:13714 msgid "SET ATTRIBUTE requires a screen item as subject" msgstr "SET ATTRIBUTE kräver ett skärmobjekt som ämne" -#: cobc/typeck.c:12939 +#: cobc/typeck.c:13720 msgid "SET ATTRIBUTE subject does not refer to a screen item" msgstr "SET ATTRIBUTE-ämne refererar inte till ett skärmobjekt" -#: cobc/typeck.c:12990 -msgid "invalid SORT filename" -msgstr "ogiltigt SORT-filnamn" - -#: cobc/typeck.c:13051 -msgid "invalid SORT USING parameter" -msgstr "ogiltig SORT USING-parameter" - -#: cobc/typeck.c:13080 -msgid "invalid SORT GIVING parameter" -msgstr "ogiltig SORT GIVING-parameter" +#: cobc/typeck.c:13835 cobc/typeck.c:13875 +#, fuzzy, c-format +#| msgid "invalid parameter: %s" +msgid "invalid %s parameter" +msgstr "ogiltig parameter: %s" -#: cobc/typeck.c:13134 cobc/typeck.c:13161 cobc/typeck.c:13181 +#: cobc/typeck.c:13940 cobc/typeck.c:13967 cobc/typeck.c:13987 msgid "invalid key item" msgstr "ogiltigt nyckelobjekt" -#: cobc/typeck.c:13211 +#: cobc/typeck.c:14017 msgid "LENGTH/SIZE clause only allowed on INDEXED files" msgstr "LENGTH-/SIZE-klausul endast tillåten för INDEXED-filer" -#: cobc/typeck.c:13216 +#: cobc/typeck.c:14022 msgid "START not allowed with ACCESS MODE RANDOM" msgstr "START inte tillåtet med ACCESS MODE RANDOM" -#: cobc/typeck.c:13305 -#, fuzzy, c-format -#| msgid "SET target '%s' is not numeric, an index or a pointer" -msgid "%s item '%s' must be numeric and an integer" -msgstr "SET-mål ”%s” är inte numeriskt, ett index eller en pekare" - -#: cobc/typeck.c:13311 +#: cobc/typeck.c:14111 cobc/typeck.c:14117 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "%s item '%s' must be an integer" msgstr "”%s” är inte ett heltal" -#: cobc/typeck.c:13315 +#: cobc/typeck.c:14121 #, c-format msgid "%s item '%s' may not have PICTURE with P in it" msgstr "" -#: cobc/typeck.c:13331 +#: cobc/typeck.c:14137 #, fuzzy, c-format #| msgid "'%s' is not a statement" msgid "'%s' is not an elementary item" msgstr "”%s” är inte en sats" -#: cobc/typeck.c:13407 +#: cobc/typeck.c:14213 #, fuzzy #| msgid "RETURNING item must have level 01 or 77" msgid "STRING items must be all NATIONAL or none" msgstr "RETURNING-objekt måste ha nivå 01 eller 77" -#: cobc/typeck.c:13555 +#: cobc/typeck.c:14361 msgid "LOCK clause invalid here" msgstr "LOCK-klausul ogiltig här" -#: cobc/typeck.c:13800 +#: cobc/typeck.c:14606 msgid "data item is not part of a report" msgstr "" -#: cobc/typeck.c:13820 +#: cobc/typeck.c:14626 msgid "improper use of SUPPRESS PRINTING" msgstr "" -#: cobc/typeck.c:13835 +#: cobc/typeck.c:14642 #, fuzzy, c-format #| msgid "%s is not an alphanumeric literal" msgid "%s must be alphanumeric or national" msgstr "%s är inte en alfanumerisk litteral" -#: cobc/typeck.c:13846 +#: cobc/typeck.c:14652 #, c-format msgid "%s may not be a figurative constant" msgstr "" -#: cobc/typeck.c:13885 +#: cobc/typeck.c:14690 #, fuzzy, c-format #| msgid "'%s' and '%s' must be in the same record" msgid "%s must be a child of the input record" msgstr "”%s” och ”%s” måste vara i samma post" -#: cobc/typeck.c:13911 +#: cobc/typeck.c:14715 #, c-format msgid "%s may not be an ignored item in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:13922 +#: cobc/typeck.c:14725 #, fuzzy, c-format #| msgid "must be numeric" msgid "%s must be elementary" msgstr "måste vara numerisk" -#: cobc/typeck.c:13935 +#: cobc/typeck.c:14737 #, fuzzy, c-format #| msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgid "STRING item '%s' must be USAGE DISPLAY or NATIONAL" msgstr "elementära objekt med SIGN-klausul måste vara USAGE DISPLAY eller NATIONAL" -#: cobc/typeck.c:13947 +#: cobc/typeck.c:14749 #, fuzzy, c-format #| msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgid "%s must be USAGE DISPLAY or NATIONAL" msgstr "elementära objekt med SIGN-klausul måste vara USAGE DISPLAY eller NATIONAL" -#: cobc/typeck.c:13961 +#: cobc/typeck.c:14761 #, fuzzy, c-format #| msgid "'%s' is not an integer" msgid "%s must be an integer" msgstr "”%s” är inte ett heltal" -#: cobc/typeck.c:13977 cobc/typeck.c:13983 +#: cobc/typeck.c:14776 cobc/typeck.c:14782 msgid "JSON/XML GENERATE receiving item" msgstr "" -#: cobc/typeck.c:13980 +#: cobc/typeck.c:14779 msgid "JSON/XML GENERATE receiving item may not have JUSTIFIED clause" msgstr "" -#: cobc/typeck.c:14068 +#: cobc/typeck.c:14867 #, fuzzy #| msgid "'%s' cannot be reference modified" msgid "JSON/XML GENERATE input record may not be reference modified" msgstr "”%s” kan inte referensmodifieras" -#: cobc/typeck.c:14074 +#: cobc/typeck.c:14873 msgid "JSON/XML GENERATE input record may not have RENAMES clause" msgstr "" -#: cobc/typeck.c:14079 +#: cobc/typeck.c:14878 #, c-format msgid "all the children of '%s' are ignored in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14086 +#: cobc/typeck.c:14885 msgid "JSON/XML GENERATE input record has subrecords with non-unique names" msgstr "" -#: cobc/typeck.c:14091 +#: cobc/typeck.c:14890 msgid "floating-point items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14095 +#: cobc/typeck.c:14894 msgid "OCCURS items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14142 +#: cobc/typeck.c:14941 msgid "NAMESPACE must be a valid URI" msgstr "" -#: cobc/typeck.c:14186 +#: cobc/typeck.c:14985 msgid "NAMESPACE-PREFIX must be a valid XML name" msgstr "" -#: cobc/typeck.c:14215 cobc/typeck.c:14223 +#: cobc/typeck.c:15014 cobc/typeck.c:15022 msgid "NAME OF item" msgstr "" -#: cobc/typeck.c:14220 +#: cobc/typeck.c:15019 msgid "NAME OF item must be the input record or a child of it" msgstr "" -#: cobc/typeck.c:14230 +#: cobc/typeck.c:15029 msgid "NAME OF ... OMITTED only valid for source identifier" msgstr "" -#: cobc/typeck.c:14238 +#: cobc/typeck.c:15037 #, c-format msgid "NAME OF literal must be a valid %s identifier" msgstr "" -#: cobc/typeck.c:14265 cobc/typeck.c:14266 cobc/typeck.c:14269 -#: cobc/typeck.c:14273 +#: cobc/typeck.c:15062 cobc/typeck.c:15063 cobc/typeck.c:15066 +#: cobc/typeck.c:15070 msgid "TYPE OF item" msgstr "" -#: cobc/typeck.c:14291 +#: cobc/typeck.c:15088 msgid "SUPPRESS WHEN SPACE item" msgstr "" -#: cobc/typeck.c:14294 +#: cobc/typeck.c:15091 msgid "SUPPRESS WHEN LOW-VALUE item" msgstr "" -#: cobc/typeck.c:14296 +#: cobc/typeck.c:15093 msgid "SUPPRESS WHEN HIGH-VALUE item" msgstr "" -#: cobc/typeck.c:14325 cobc/typeck.c:14333 cobc/typeck.c:14337 +#: cobc/typeck.c:15122 cobc/typeck.c:15130 cobc/typeck.c:15134 msgid "SUPPRESS item" msgstr "" -#: cobc/typeck.c:14329 +#: cobc/typeck.c:15126 msgid "SUPPRESS item with WHEN clause" msgstr "" -#: cobc/typeck.c:14407 +#: cobc/typeck.c:15204 msgid "WITH ATTRIBUTES specified, but no attributes can be generated" msgstr "" @@ -6520,197 +6648,210 @@ msgid " -Wparentheses warn if parentheses are omitted around AND within msgstr "varna om parenteser saknas runt AND inom OR" #: cobc/warning.def:70 -msgid " -Wstrict-typing warn strictly about type mismatch" +msgid " -Wstrict-typing warn strictly about type mismatch, even when same size" msgstr "" #: cobc/warning.def:73 -msgid " -Wimplicit-define warn whenever data items are implicitly defined" +msgid " -Wtyping warn about type mismatch" msgstr "" #: cobc/warning.def:76 +msgid " -Wimplicit-define warn whenever data items are implicitly defined" +msgstr "" + +#: cobc/warning.def:79 #, fuzzy #| msgid "warn CORRESPONDING with no matching items" msgid " -Wno-corresponding do not warn about CORRESPONDING with no matching items" msgstr "varna då CORRESPONDING inte har några matchande objekt" # sebras: why the capitalized Initial? -#: cobc/warning.def:79 +#: cobc/warning.def:82 #, fuzzy #| msgid "warn Initial VALUE clause ignored" msgid " -Winitial-value warn if initial VALUE clause is ignored" msgstr "varna då inledande VALUE-klausul hoppas över" -#: cobc/warning.def:82 +#: cobc/warning.def:85 #, fuzzy #| msgid "warn missing FUNCTION prototypes/definitions" msgid " -Wprototypes warn about missing FUNCTION prototypes/definitions" msgstr "varna om FUNCTION prototyper/definitioner inte hittas" -#: cobc/warning.def:85 +#: cobc/warning.def:88 #, fuzzy #| msgid "warn if arithmetic expression precision has changed" msgid " -Warithmetic-osvs warn if arithmetic expression precision has changed" msgstr "varna om precisionen för aritmetiska uttryck har ändrats" -#: cobc/warning.def:88 +#: cobc/warning.def:91 #, fuzzy #| msgid "warn non 01/77 items for CALL params" msgid " -Wcall-params warn about non 01/77 items for CALL parameters" msgstr "varna för icke 01/77-objekt som CALL-parametrar" -#: cobc/warning.def:91 +#: cobc/warning.def:94 #, fuzzy #| msgid "warn expressions that always resolve to true/false" msgid " -Wconstant-expression warn about expressions that always resolve to true/false" msgstr "varna för uttryck som alltid beräknas till sant/falskt" -#: cobc/warning.def:94 +#: cobc/warning.def:97 #, fuzzy #| msgid "warn expressions that always resolve to true/false" msgid " -Wconstant-numlit-expression\twarn about numeric expressions that always resolve to true/false" msgstr "varna för uttryck som alltid beräknas till sant/falskt" -#: cobc/warning.def:97 +#: cobc/warning.def:100 msgid " -Wlarger-01-redefines warn about larger redefines allowed by COBOL standards" msgstr "" -#: cobc/warning.def:100 +#: cobc/warning.def:103 #, fuzzy #| msgid "warn text after program-text area, FIXED format" msgid " -Wcolumn-overflow warn about text after program-text area, FIXED format" msgstr "varna vid text efter programtextområde, FIXED-format" -#: cobc/warning.def:103 +#: cobc/warning.def:106 #, fuzzy #| msgid "warn lack of scope terminator END-XXX" msgid " -Wterminator warn about lack of scope terminator END-XXX" msgstr "varna för avsaknad av räckviddsavslutare END-XXX" -#: cobc/warning.def:106 +#: cobc/warning.def:109 #, fuzzy #| msgid "warn dangling LINKAGE items" msgid " -Wlinkage warn about dangling LINKAGE items" msgstr "varna vid hängande LINKAGE-objekt" -#: cobc/warning.def:109 +#: cobc/warning.def:112 msgid " -Wunreachable warn about likely unreachable statements" msgstr "" -#: cobc/warning.def:112 +#: cobc/warning.def:115 msgid " -Wno-dialect do not warn about dialect specific issues" msgstr "" -#: cobc/warning.def:115 +#: cobc/warning.def:118 msgid " -Wno-goto-section do not warn about GO TO section-name" msgstr "" -#: cobc/warning.def:118 +#: cobc/warning.def:121 msgid " -Wgoto-different-section\twarn about GO TO a praragraph defined in a different section" msgstr "" -#: cobc/warning.def:121 +#: cobc/warning.def:124 msgid " -Wsuspicious-perform-thru\twarn if PERFORM THRU references procedures not in ascending order or multiple sections" msgstr "" -#: cobc/warning.def:124 +#: cobc/warning.def:127 msgid " -Wdangling-text warn about source text after program-area" msgstr "" -#: cobc/warning.def:127 +#: cobc/warning.def:130 msgid " -Wno-missing-newline do not warn about missing newlines" msgstr "" -#: cobc/warning.def:130 +#: cobc/warning.def:133 msgid " -Wno-others do not warn about different issues" msgstr "" -#: cobc/warning.def:133 +#: cobc/warning.def:136 msgid " -Wno-unsupported do not warn if runtime does not support a feature used" msgstr "" -#: libcob/call.c:94 +#: libcob/call.c:98 #, c-format msgid "LoadLibrary/GetProcAddress error %d" msgstr "LoadLibrary/GetProcAddress-fel %d" -#: libcob/call.c:841 +#: libcob/call.c:626 +#, c-format +msgid "preloading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:817 #, fuzzy, c-format #| msgid "PROGRAM name exceeds 31 characters" msgid "%s: PROGRAM name exceeds %d characters" msgstr "PROGRAM-namn överstiger 31 tecken" -#: libcob/call.c:842 +#: libcob/call.c:818 #, fuzzy, c-format #| msgid "PROGRAM name exceeds 31 characters" msgid "%s: FUNCTION name exceeds %d characters" msgstr "PROGRAM-namn överstiger 31 tecken" -#: libcob/call.c:1067 +#: libcob/call.c:945 libcob/call.c:978 +#, c-format +msgid "loading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:1049 msgid "indeterminable error in resolve of COBOL CALL" msgstr "obestämbart fel i upplösning av COBOL CALL" -#: libcob/call.c:1149 +#: libcob/call.c:1145 #, c-format msgid "user-defined FUNCTION '%s' not found" msgstr "användardefinierad FUNCTION ”%s” hittades inte" -#: libcob/call.c:1239 libcob/call.c:1325 libcob/call.c:1445 libcob/call.c:1472 +#: libcob/call.c:1247 libcob/call.c:1328 libcob/call.c:1448 libcob/call.c:1475 #, c-format msgid "NULL parameter passed to '%s'" msgstr "NULL-parameter skickad till ”%s”" -#: libcob/call.c:1329 +#: libcob/call.c:1332 #, c-format msgid "invalid number of arguments passed to '%s'" msgstr "ogiltigt antal argument skickade till ”%s”" -#: libcob/call.c:1449 +#: libcob/call.c:1452 msgid "multiple call to 'cob_setjmp'" msgstr "flera anrop till ”cob_setjmp”" -#: libcob/call.c:1476 +#: libcob/call.c:1479 msgid "call to 'cob_longjmp' with no prior 'cob_setjmp'" msgstr "anrop till ”cob_longjmp” utan föregående ”cob_setjmp”" -#: libcob/call.c:1703 libcob/call.c:1730 libcob/common.c:8144 +#: libcob/call.c:1608 +#, c-format +msgid "preloading of '%s' failed" +msgstr "" + +#: libcob/call.c:1706 libcob/call.c:1733 libcob/common.c:8965 msgid "cob_init() has not been called" msgstr "cob_init() har inte anropats" -#: libcob/call.c:1709 +#: libcob/call.c:1712 #, fuzzy, c-format #| msgid "%s: param %d is not within range of %d" msgid "parameter %d is not within range of %d" msgstr "%s: parameter %d är inte inom intervall för %d" -#: libcob/call.c:1715 +#: libcob/call.c:1718 #, fuzzy, c-format #| msgid "%s: param %d is NULL" msgid "parameter %d is NULL" msgstr "%s: parameter %d är NULL" -#: libcob/call.c:2042 +#: libcob/call.c:2045 msgid "NULL field" msgstr "" -#: libcob/call.c:2050 +#: libcob/call.c:2053 #, fuzzy #| msgid "file not open" msgid "field not allocated" msgstr "fil inte öppen" -#: libcob/call.c:2116 +#: libcob/call.c:2119 #, fuzzy, c-format #| msgid "%s: attempt to over-write constant param %d with '%s'" msgid "attempt to over-write constant field with '%s'" msgstr "%s: försök att skriva över konstantparameter %d med ”%s”" -#: libcob/call.c:2156 libcob/call.c:2212 -#, fuzzy, c-format -#| msgid "%s: attempt to over-write constant param %d with " -msgid "attempt to over-write constant parameter %d with " -msgstr "%s: försök att skriva över konstantparameter %d med " - -#: libcob/call.c:2263 +#: libcob/call.c:2161 libcob/call.c:2219 libcob/call.c:2270 #, fuzzy, c-format #| msgid "%s: attempt to over-write constant param %d with '%s'" msgid "attempt to over-write constant parameter %d with '%s'" @@ -6758,711 +6899,738 @@ msgstr "%s: okänd flagga -- %c" msgid "%s: option requires an argument -- '%c'" msgstr "%s: flagga kräver ett argument -- %c" -#: libcob/common.c:1242 +#: libcob/common.c:1074 +#, c-format +msgid "requested coredump creation failed with status %d" +msgstr "" + +#: libcob/common.c:1303 msgid "fatal arithmetic error" msgstr "" -#: libcob/common.c:1245 +#: libcob/common.c:1306 msgid "interrupt from keyboard" msgstr "" -#: libcob/common.c:1249 +#: libcob/common.c:1310 msgid "hangup" msgstr "" -#: libcob/common.c:1253 +#: libcob/common.c:1314 msgid "quit" msgstr "" -#: libcob/common.c:1257 +#: libcob/common.c:1318 #, fuzzy #| msgid "Definition" msgid "termination" msgstr "Definition" -#: libcob/common.c:1261 +#: libcob/common.c:1322 msgid "emt termination" msgstr "" -#: libcob/common.c:1265 +#: libcob/common.c:1326 msgid "broken pipe" msgstr "" -#: libcob/common.c:1269 +#: libcob/common.c:1330 #, fuzzy #| msgid "signal %s" msgid "I/O signal" msgstr "signal %s" -#: libcob/common.c:1273 +#: libcob/common.c:1334 #, fuzzy #| msgid "attempt to reference unallocated memory" msgid "attempt to reference invalid memory address" msgstr "försök att referera till oallokerat minne" -#: libcob/common.c:1277 +#: libcob/common.c:1338 msgid "bus error" msgstr "bussfel" -#: libcob/common.c:1281 +#: libcob/common.c:1342 msgid "illegal instruction" msgstr "" -#: libcob/common.c:1285 +#: libcob/common.c:1346 #, fuzzy #| msgid "aborting" msgid "abort" msgstr "avbryter" -#: libcob/common.c:1289 +#: libcob/common.c:1350 msgid "process killed" msgstr "" -#: libcob/common.c:1293 +#: libcob/common.c:1354 #, fuzzy #| msgid "caught signal" msgid "alarm signal" msgstr "fångad signal" -#: libcob/common.c:1297 +#: libcob/common.c:1358 #, fuzzy #| msgid "preprocessing:" msgid "stop process" msgstr "preprocessar:" -#: libcob/common.c:1301 libcob/common.c:1305 +#: libcob/common.c:1362 libcob/common.c:1366 msgid "child process stopped" msgstr "" #. TRANSLATORS: This msgid is used for an OS signal like SIGABRT. -#: libcob/common.c:1312 +#: libcob/common.c:1373 #, fuzzy #| msgid "signal %s" msgid "signal" msgstr "signal %s" #. TRANSLATORS: This msgid is shown for a requested but not complete stack trace. -#: libcob/common.c:1314 +#: libcob/common.c:1375 msgid "(more COBOL runtime elements follow...)" msgstr "" -#: libcob/common.c:1316 libcob/common.c:8101 +#: libcob/common.c:1377 libcob/common.c:8922 #, c-format msgid "abnormal termination - file contents may be incorrect" msgstr "onormal avslutning - filinnehåll kan vara felaktigt" -#: libcob/common.c:3145 libcob/common.c:8581 libcob/common.c:8595 +#: libcob/common.c:3441 libcob/common.c:9398 libcob/common.c:9412 #, fuzzy #| msgid "error: version mismatch" msgid "version mismatch" msgstr "fel: version stämmer inte" -#: libcob/common.c:3146 libcob/common.c:3148 libcob/common.c:8582 -#: libcob/common.c:8584 +#: libcob/common.c:3442 libcob/common.c:3444 libcob/common.c:9399 +#: libcob/common.c:9401 #, fuzzy, c-format #| msgid "%s has version/patch level %s/%d" msgid "%s has version %s.%d" msgstr "%s har version/programfixnivå %s/%d" -#: libcob/common.c:3158 +#: libcob/common.c:3454 #, fuzzy, c-format #| msgid "CALL to %s requires %d parameters" msgid "CALL to %s requires %d arguments" msgstr "CALL till %s kräver %d parametrar" -#: libcob/common.c:3779 +#: libcob/common.c:4141 #, c-format msgid "code execution leaving %s" msgstr "" -#: libcob/common.c:3789 +#: libcob/common.c:4151 #, c-format msgid "BASED/LINKAGE item %s has NULL address" msgstr "BASED/LINKAGE-objekt %s har NULL-adress" -#: libcob/common.c:3802 libcob/common.c:3806 +#: libcob/common.c:4168 +#, c-format +msgid "memory violation detected for '%s' after %s" +msgstr "" + +#: libcob/common.c:4171 +#, c-format +msgid "memory violation detected after %s" +msgstr "" + +#: libcob/common.c:4229 libcob/common.c:4244 libcob/common.c:4283 +#: libcob/common.c:4287 #, c-format msgid "LINKAGE item %s not passed by caller" msgstr "LINKAGE-objekt %s inte skickat av anroparen" -#: libcob/common.c:3892 +#: libcob/common.c:4253 +#, c-format +msgid "LINKAGE item %s (size %lu) too small in the caller (size %lu)" +msgstr "" + +#: libcob/common.c:4378 #, fuzzy, c-format #| msgid "'%s' not numeric: '%s'" msgid "'%s' (Type: %s) not numeric: '%s'" msgstr "”%s” inte numeriskt: ”%s”" -#: libcob/common.c:3917 +#: libcob/common.c:4403 #, c-format msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgstr "OCCURS DEPENDING ON ”%s” utanför intervall: %d" -#: libcob/common.c:3920 libcob/common.c:3958 +#: libcob/common.c:4406 libcob/common.c:4444 #, c-format msgid "maximum subscript for '%s': %d" msgstr "högsta index för ”%s”: %d" -#: libcob/common.c:3922 +#: libcob/common.c:4408 #, c-format msgid "minimum subscript for '%s': %d" msgstr "minsta index för ”%s”: %d" -#: libcob/common.c:3955 +#: libcob/common.c:4441 #, c-format msgid "current maximum subscript for '%s': %d" msgstr "för närvarande största index för ”%s”: %d" -#: libcob/common.c:3979 +#: libcob/common.c:4465 #, fuzzy, c-format #| msgid "offset of '%s' out of bounds: %d" msgid "offset of '%s' out of bounds: %d, maximum: %d" msgstr "position ”%s” utanför intervall: %d" -#: libcob/common.c:3994 +#: libcob/common.c:4480 #, fuzzy, c-format #| msgid "length of '%s' out of bounds: %d" msgid "length of '%s' out of bounds: %d, maximum: %d" msgstr "längd ”%s” utanför intervall: %d" -#: libcob/common.c:4005 +#: libcob/common.c:4491 #, fuzzy, c-format #| msgid "length of '%s' out of bounds: %d" msgid "length of '%s' out of bounds: %d, starting at: %d, maximum: %d" msgstr "längd ”%s” utanför intervall: %d" -#: libcob/common.c:4093 libcob/common.c:4098 +#: libcob/common.c:4579 libcob/common.c:4584 #, c-format msgid "EXTERNAL item '%s' previously allocated with size %d, requested size is %d" msgstr "EXTERNAL-objekt ”%s” tidigare allokerat med storlek %d, begärd storlek är %d" -#: libcob/common.c:4593 +#: libcob/common.c:4961 libcob/common.c:5201 #, c-format msgid "COB_CURRENT_DATE '%s' is invalid" msgstr "COB_CURRENT_DATE ”%s” är ogiltigt" -#: libcob/common.c:5641 libcob/common.c:5644 +#: libcob/common.c:6321 libcob/common.c:6324 msgid "Program abandoned at user request" msgstr "" -#: libcob/common.c:5668 +#: libcob/common.c:6348 #, c-format msgid "parameter to SYSTEM call is larger than %d characters" msgstr "parameter till SYSTEM-anrop är större än %d tecken" -#: libcob/common.c:6202 +#: libcob/common.c:6998 #, fuzzy, c-format #| msgid "Error '%s' during CBL_GC_FORK" msgid "error '%s' during CBL_GC_FORK" msgstr "Fel ”%s” under CBL_GC_FORK" -#: libcob/common.c:6207 libcob/common.c:6304 +#: libcob/common.c:7003 libcob/common.c:7100 #, c-format msgid "'%s' is not supported on this platform" msgstr "”%s” stöds inte på denna plattform" -#: libcob/common.c:6233 +#: libcob/common.c:7029 #, c-format msgid "error '%s' for P%d during CBL_GC_WAITPID" msgstr "fel ”%s” för P%d under CBL_GC_WAITPID" -#: libcob/common.c:6424 -msgid "Call to CBL_GC_GETOPT with wrong longoption size." +#: libcob/common.c:7220 +#, fuzzy +#| msgid "Call to CBL_GC_GETOPT with wrong longoption size." +msgid "call to CBL_GC_GETOPT with wrong longoption size" msgstr "Anrop till CBL_GC_GETOPT med fel storlek på långflagga." -#: libcob/common.c:6429 -msgid "Call to CBL_GC_GETOPT with missing longind." +#: libcob/common.c:7225 +#, fuzzy +#| msgid "Call to CBL_GC_GETOPT with missing longind." +msgid "call to CBL_GC_GETOPT with missing longind" msgstr "Anrop till CBL_GC_GETOPT där långindex saknas." -#: libcob/common.c:6856 libcob/common.c:6877 libcob/common.c:6890 -#: libcob/common.c:9107 libcob/common.c:9111 +#: libcob/common.c:7654 libcob/common.c:7675 libcob/common.c:7688 +#: libcob/common.c:9924 libcob/common.c:9928 #, fuzzy, c-format #| msgid " (default)" msgid "(default)" msgstr " (standard)" -#: libcob/common.c:7143 libcob/common.c:7162 +#: libcob/common.c:7973 libcob/common.c:7992 msgid "should be unsigned" msgstr "" -#: libcob/common.c:7151 libcob/common.c:7200 +#: libcob/common.c:7981 libcob/common.c:8030 #, fuzzy #| msgid "must be numeric" msgid "should be numeric" msgstr "måste vara numerisk" -#: libcob/common.c:7209 +#: libcob/common.c:8039 #, c-format msgid "minimum value: %lu" msgstr "minsta värde: %lu" -#: libcob/common.c:7261 libcob/common.c:7825 libcob/common.c:7839 +#: libcob/common.c:8069 libcob/common.c:8640 libcob/common.c:8654 +#: bin/cobcrun.c:206 #, c-format msgid "should not contain '%c'" msgstr "borde inte innehålla ”%c”" -#: libcob/common.c:7342 libcob/common.c:7390 libcob/common.c:7418 -#: libcob/common.c:7427 libcob/common.c:7435 libcob/common.c:7460 +#: libcob/common.c:8150 libcob/common.c:8169 libcob/common.c:8231 +#: libcob/common.c:8240 libcob/common.c:8248 libcob/common.c:8273 #, c-format msgid "not set" msgstr "" -#: libcob/common.c:7410 libcob/common.c:7413 libcob/common.c:7416 +#: libcob/common.c:8223 libcob/common.c:8226 libcob/common.c:8229 #, fuzzy, c-format #| msgid " (set by %s)" msgid "set by %s" msgstr " (satt av %s)" -#: libcob/common.c:7552 +#: libcob/common.c:8367 #, c-format msgid "WARNING - '%s' without a value - ignored!" msgstr "VARNING - ”%s” utan ett värde - överhoppat!" -#: libcob/common.c:7555 +#: libcob/common.c:8370 #, c-format msgid "'%s' without a value!" msgstr "”%s” utan ett värde!" -#: libcob/common.c:7582 +#: libcob/common.c:8397 #, c-format msgid "WARNING - '%s %s' without a value - ignored!" msgstr "VARNING - ”%s %s” utan ett värde - överhoppat!" -#: libcob/common.c:8085 +#: libcob/common.c:8906 #, fuzzy #| msgid "error: " msgid "error" msgstr "fel: " -#: libcob/common.c:8127 +#: libcob/common.c:8948 msgid "attempt to CANCEL active program" msgstr "försök att köra CANCEL på aktivt program" -#: libcob/common.c:8154 +#: libcob/common.c:8975 msgid "CALL of program with CHAINING clause" msgstr "CALL till program med CHAINING-klausul" -#: libcob/common.c:8158 +#: libcob/common.c:8979 msgid "stack overflow, possible PERFORM depth exceeded" msgstr "stacköverspill, möjligt PERFORM-djup överskridit" -#: libcob/common.c:8163 +#: libcob/common.c:8984 msgid "invalid entry/exit in GLOBAL USE procedure" msgstr "ogiltig ingång/avslut i GLOBAL USE-procedur" -#: libcob/common.c:8167 +#: libcob/common.c:8988 msgid "unable to allocate memory" msgstr "kan inte allokera minne" -#: libcob/common.c:8172 +#: libcob/common.c:8993 msgid "invalid entry into module" msgstr "ogiltig ingång in i modul" -#: libcob/common.c:8179 +#: libcob/common.c:9000 #, c-format msgid "recursive CALL from '%s' to '%s' which is NOT RECURSIVE" msgstr "" -#: libcob/common.c:8184 +#: libcob/common.c:9005 #, c-format msgid "invalid recursive COBOL CALL to '%s'" msgstr "ogiltigt rekursivt COBOL CALL till ”%s”" -#: libcob/common.c:8199 +#: libcob/common.c:9020 msgid "end of file" msgstr "slut på fil" -#: libcob/common.c:8202 +#: libcob/common.c:9023 msgid "key out of range" msgstr "nyckel utanför intervall" -#: libcob/common.c:8205 +#: libcob/common.c:9026 msgid "key order not ascending" msgstr "nyckelsortering inte stigande" -#: libcob/common.c:8208 +#: libcob/common.c:9029 msgid "record key already exists" msgstr "postnyckel existerar redan" -#: libcob/common.c:8211 +#: libcob/common.c:9032 msgid "record key does not exist" msgstr "postnyckel existerar inte" -#: libcob/common.c:8214 +#: libcob/common.c:9035 msgid "permanent file error" msgstr "permanent filfel" -#: libcob/common.c:8217 +#: libcob/common.c:9038 #, fuzzy #| msgid "invalid configuration file name" msgid "inconsistent file name" msgstr "ogiltigt namn på konfigurationsfil" -#: libcob/common.c:8220 +#: libcob/common.c:9041 msgid "file does not exist" msgstr "filen existerar inte" -#: libcob/common.c:8223 +#: libcob/common.c:9044 msgid "permission denied" msgstr "åtkomst nekad" -#: libcob/common.c:8226 +#: libcob/common.c:9047 msgid "mismatch of fixed file attributes" msgstr "" -#: libcob/common.c:8229 +#: libcob/common.c:9050 msgid "file already open" msgstr "fil redan öppen" -#: libcob/common.c:8232 +#: libcob/common.c:9053 msgid "file not open" msgstr "fil inte öppen" -#: libcob/common.c:8235 +#: libcob/common.c:9056 msgid "READ must be executed first" msgstr "READ måste köras först" -#: libcob/common.c:8238 +#: libcob/common.c:9059 msgid "record overflow" msgstr "postöverspill" # sebras: unsuccessful -#: libcob/common.c:8241 +#: libcob/common.c:9062 #, fuzzy #| msgid "READ after uncessful READ/START" msgid "READ after unsuccessful READ/START" msgstr "READ efter misslyckad READ/START" -#: libcob/common.c:8244 +#: libcob/common.c:9065 msgid "READ/START not allowed, file not open for input" msgstr "READ/START inte tillåtet, fil inte öppen för inmatning" -#: libcob/common.c:8247 +#: libcob/common.c:9068 msgid "WRITE not allowed, file not open for output" msgstr "WRITE inte tillåtet, fil inte öppen för utmatning" -#: libcob/common.c:8250 +#: libcob/common.c:9071 msgid "DELETE/REWRITE not allowed, file not open for I-O" msgstr "DELETE/REWRITE inte tillåtet, fil inte öppen för in-/utmatning" -#: libcob/common.c:8253 +#: libcob/common.c:9074 msgid "record locked by another file connector" msgstr "post låst av en annan filkontakt" -#: libcob/common.c:8256 +#: libcob/common.c:9077 msgid "LINAGE values invalid" msgstr "LINAGE-värden ogiltiga" -#: libcob/common.c:8259 +#: libcob/common.c:9080 msgid "file sharing conflict" msgstr "fildelningskonflikt" -#: libcob/common.c:8262 +#: libcob/common.c:9083 msgid "invalid data in LINE SEQUENTIAL file" msgstr "" -#: libcob/common.c:8266 +#: libcob/common.c:9087 msgid "runtime library is not configured for this operation" msgstr "körtidsbibliotek är inte konfigurerat för denna åtgärd" -#: libcob/common.c:8271 +#: libcob/common.c:9092 msgid "unknown file error" msgstr "okänt filfel" -#: libcob/common.c:8278 +#: libcob/common.c:9099 #, fuzzy, c-format #| msgid "%s (status = %02d) file: '%s'" msgid "%s (status = %02d) for file %s" msgstr "%s (status = %02d) fil: ”%s”" -#: libcob/common.c:8281 +#: libcob/common.c:9102 #, fuzzy, c-format #| msgid "%s (status = %02d) file: '%s'" msgid "%s (status = %02d) for file %s on %s" msgstr "%s (status = %02d) fil: ”%s”" -#: libcob/common.c:8288 +#: libcob/common.c:9109 msgid "attempt to use non-implemented function" msgstr "försök att använda icke-implementerad funktion" -#: libcob/common.c:8291 +#: libcob/common.c:9112 #, fuzzy #| msgid "attempt to use non-implemented function" msgid "attempt to use non-implemented XML I/O" msgstr "försök att använda icke-implementerad funktion" -#: libcob/common.c:8294 +#: libcob/common.c:9115 #, fuzzy #| msgid "attempt to use non-implemented function" msgid "attempt to use non-implemented JSON I/O" msgstr "försök att använda icke-implementerad funktion" -#: libcob/common.c:8341 +#: libcob/common.c:9162 msgid "environment variables" msgstr "miljövariabler" -#: libcob/common.c:8466 libcob/common.c:8539 libcob/common.c:8554 -#: libcob/common.c:8859 libcob/common.c:8893 libcob/common.c:8910 -#: libcob/common.c:8925 +#: libcob/common.c:9283 libcob/common.c:9356 libcob/common.c:9371 +#: libcob/common.c:9676 libcob/common.c:9710 libcob/common.c:9727 +#: libcob/common.c:9742 #, fuzzy, c-format #| msgid "C version %s%s" msgid "%s, version %d.%d.%d" msgstr "C-version %s%s" -#: libcob/common.c:8468 libcob/common.c:8541 libcob/common.c:8558 -#: libcob/common.c:8862 libcob/common.c:8913 libcob/common.c:8928 +#: libcob/common.c:9285 libcob/common.c:9358 libcob/common.c:9375 +#: libcob/common.c:9679 libcob/common.c:9730 libcob/common.c:9745 #, c-format msgid "%s, version %d.%d.%d (compiled with %d.%d)" msgstr "" -#: libcob/common.c:8471 +#: libcob/common.c:9288 #, fuzzy, c-format #| msgid "C version %s%s" msgid "%s, version %s" msgstr "C-version %s%s" -#: libcob/common.c:8739 +#: libcob/common.c:9556 #, fuzzy, c-format #| msgid "License LGPLv3+: GNU LGPL version 3 or later <http://gnu.org/licenses/lgpl.html>" msgid "License LGPLv3+: GNU LGPL version 3 or later <%s>" msgstr "Licens LGPLv3+: GNU LGPL version 3 eller senare <http://gnu.org/licenses/lgpl.html>" -#: libcob/common.c:8803 libcob/common.c:8805 +#: libcob/common.c:9620 libcob/common.c:9622 msgid "dynamic loading" msgstr "dynamisk inläsning" -#: libcob/common.c:8938 +#: libcob/common.c:9755 #, fuzzy #| msgid "<support>" msgid "mouse support" msgstr "<stöd>" -#: libcob/common.c:8955 +#: libcob/common.c:9772 msgid "CALL configuration" msgstr "CALL-konfiguration" -#: libcob/common.c:8956 +#: libcob/common.c:9773 msgid "File I/O configuration" msgstr "Fil in/ut-konfiguration" -#: libcob/common.c:8957 +#: libcob/common.c:9774 msgid "Screen I/O configuration" msgstr "Skärm in/ut-konfiguration" -#: libcob/common.c:8958 +#: libcob/common.c:9775 msgid "Miscellaneous" msgstr "Diverse" -#: libcob/common.c:8959 +#: libcob/common.c:9776 msgid "System configuration" msgstr "Systemkonfiguration" -#: libcob/common.c:8963 +#: libcob/common.c:9780 msgid "runtime configuration" msgstr "körtidskonfiguration" -#: libcob/common.c:8965 +#: libcob/common.c:9782 msgid "via" msgstr "via" -#: libcob/common.c:9040 libcob/common.c:9068 +#: libcob/common.c:9857 libcob/common.c:9885 msgid "... removed from environment" msgstr "… borttagen från miljö" -#: libcob/common.c:9094 libcob/common.c:9096 +#: libcob/common.c:9911 libcob/common.c:9913 #, fuzzy, c-format #| msgid " (set by %s)" msgid "(set by %s)" msgstr " (satt av %s)" -#: libcob/common.c:9104 +#: libcob/common.c:9921 #, fuzzy, c-format #| msgid " (reset)" msgid "(reset)" msgstr " (återställd)" -#: libcob/common.c:9334 +#: libcob/common.c:10151 msgid "compiler was not built with --enable-debug-log; COB_DEBUG_LOG ignored" msgstr "" -#: libcob/common.c:9524 libcob/common.c:9550 +#: libcob/common.c:10338 libcob/common.c:10364 #, c-format msgid "%s called with unknown option: %d" msgstr "" #. TRANSLATORS: This msgid is shown for a requested but empty stack trace. -#: libcob/common.c:9597 +#: libcob/common.c:10411 #, fuzzy #| msgid "%s COBOL runtime is not initialized" msgid "No COBOL runtime elements on stack." msgstr "%s COBOL-körtid är inte initierad" -#: libcob/common.c:9915 +#: libcob/common.c:10734 #, c-format msgid "Module dump due to %s" msgstr "" -#: libcob/common.c:9943 +#: libcob/common.c:10762 #, c-format msgid "Dump Program-Id %s from %s compiled %s" msgstr "" -#: libcob/common.c:9969 +#: libcob/common.c:10788 #, fuzzy, c-format #| msgid "Written by %s\n" msgid "dump written to %s" msgstr "Skrivet av %s\n" -#: libcob/fileio.c:816 libcob/fileio.c:1628 libcob/fileio.c:1882 -#: libcob/fileio.c:3812 libcob/fileio.c:4396 libcob/fileio.c:9658 -#: libcob/fileio.c:9686 libcob/numeric.c:1583 +#: libcob/fileio.c:784 libcob/fileio.c:1664 libcob/fileio.c:1926 +#: libcob/fileio.c:3938 libcob/fileio.c:4522 libcob/fileio.c:10049 +#: libcob/fileio.c:10077 libcob/numeric.c:1915 #, fuzzy, c-format #| msgid "invalid internal case: %u" msgid "invalid internal call of %s" msgstr "ogiltigt internt fall: %u" -#: libcob/fileio.c:3359 +#: libcob/fileio.c:3486 #, c-format msgid "BDB error: %s" msgstr "BDB-fel: %s" -#: libcob/fileio.c:3369 +#: libcob/fileio.c:3496 #, c-format msgid "BDB error: %s %s" msgstr "BDB-fel: %s %s" -#: libcob/fileio.c:3383 libcob/fileio.c:3403 +#: libcob/fileio.c:3510 libcob/fileio.c:3530 #, c-format msgid "cannot join BDB environment (%s), error: %d %s" msgstr "kan inte sammanfoga BDB-miljö (%s): fel: %d %s" -#: libcob/fileio.c:3458 libcob/fileio.c:3483 libcob/fileio.c:3509 -#: libcob/fileio.c:3528 +#: libcob/fileio.c:3585 libcob/fileio.c:3610 libcob/fileio.c:3636 +#: libcob/fileio.c:3655 #, fuzzy, c-format #| msgid "BDB error: %s %s" msgid "BDB (%s), error: %d %s" msgstr "BDB-fel: %s %s" -#: libcob/fileio.c:6071 +#: libcob/fileio.c:6199 #, c-format msgid "ERROR FILE %s has ASSIGN field is NULL" msgstr "" -#: libcob/fileio.c:6862 +#: libcob/fileio.c:7050 #, c-format msgid "call to CBL_OPEN_FILE with wrong access mode: %d" msgstr "anrop till CBL_OPEN_FILE med fel åtkomstläge: %d" -#: libcob/fileio.c:6946 +#: libcob/fileio.c:7135 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_lock: %d" msgstr "anrop till CBL_CREATE_FILE med fel file_lock: %d" -#: libcob/fileio.c:6949 +#: libcob/fileio.c:7138 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_dev: %d" msgstr "anrop till CBL_CREATE_FILE med fel file_dev: %d" -#: libcob/fileio.c:7174 libcob/fileio.c:7457 +#: libcob/fileio.c:7362 libcob/fileio.c:7645 #, c-format msgid "'%s' - File detail area is too short" msgstr "”%s” - Område för fildetaljer är för kort" -#: libcob/fileio.c:7686 +#: libcob/fileio.c:7871 msgid "SORT is unable to acquire temporary file" msgstr "SORT kan inte få tag i temporärfil" #. TRANSLATORS: This msgid is concatenated with a filename; -#. setup translation to allow this to be followed on the right side. -#: libcob/fileio.c:8432 +#. setup translation to allow this to be followed on the right side, +#. if necessary use a colon or hyphen +#: libcob/fileio.c:8777 #, fuzzy #| msgid "implicit CLOSE of %s ('%s')" msgid "implicit CLOSE of " msgstr "implicit CLOSE av %s (”%s”)" -#: libcob/fileio.c:9617 libcob/fileio.c:9752 +#: libcob/fileio.c:10008 libcob/fileio.c:10193 #, c-format msgid "ERROR: EXTFH called with FCD version %d" msgstr "" -#: libcob/fileio.c:9886 +#: libcob/fileio.c:10310 #, fuzzy, c-format #| msgid "REPORT clause with wrong file type" msgid "ERROR: EXTFH called with wrong file organization %d" msgstr "REPORT-klausul med fel filtyp" -#: libcob/fileio.c:9893 +#: libcob/fileio.c:10317 #, c-format msgid "ERROR: EXTFH called with no %s pointer" msgstr "" -#: libcob/fileio.c:10029 +#: libcob/fileio.c:10461 #, c-format msgid "ERROR: EXTFH called with no %s pointer; Function %d" msgstr "" -#: libcob/fileio.c:10208 +#: libcob/fileio.c:10683 #, c-format msgid "ERROR: EXTFH called with unknown Function %d" msgstr "" -#: libcob/reportio.c:630 +#: libcob/reportio.c:629 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT %d" msgstr "" -#: libcob/reportio.c:637 libcob/reportio.c:652 +#: libcob/reportio.c:636 libcob/reportio.c:651 #, c-format msgid "INITIATE %s NEXT GROUP %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:645 +#: libcob/reportio.c:644 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT" msgstr "" -#: libcob/reportio.c:1327 +#: libcob/reportio.c:1336 #, c-format msgid "INITIATE %s was already done" msgstr "" -#: libcob/reportio.c:1343 +#: libcob/reportio.c:1352 #, c-format msgid "INITIATE %s PAGE LIMIT problem" msgstr "" -#: libcob/reportio.c:1420 +#: libcob/reportio.c:1429 #, c-format msgid "TERMINATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1565 +#: libcob/reportio.c:1574 #, c-format msgid "GENERATE %s but no INITIATE was done" msgstr "" -#: libcob/reportio.c:1917 +#: libcob/reportio.c:1926 #, c-format msgid "could not find line to SUPPRESS in report %s" msgstr "" -#: libcob/screenio.c:568 +#: libcob/screenio.c:1055 msgid "failed to initialize curses" msgstr "misslyckades att initiera curses" -#: libcob/screenio.c:4081 +#: libcob/screenio.c:5034 msgid "end of program, please press a key to exit" msgstr "slut på program, tryck på en tangent för att avsluta" -#: libcob/termio.c:78 libcob/termio.c:117 +#: libcob/termio.c:76 libcob/termio.c:136 msgid "(Not representable)" msgstr "(Inte representerbar)" -#: libcob/termio.c:354 +#: libcob/termio.c:406 #, fuzzy, c-format #| msgid "cannot specify both %s and %s" msgid "cannot open %s (=%s)" msgstr "kan inte ange både %s och %s" -#: libcob/termio.c:369 +#: libcob/termio.c:421 msgid "COB_DISPLAY_PUNCH_FILE is invalid, output to SYSPUNCH skipped" msgstr "" @@ -7555,33 +7723,22 @@ msgstr "" " och basnamn till modulförinläsningslistan\n" " (COB_LIBRARY_PATH och/eller COB_PRELOAD)" -#: bin/cobcrun.c:146 -#, c-format -msgid "GnuCOBOL home page: <%s>" -msgstr "" - -#: bin/cobcrun.c:148 -#, fuzzy, c-format -#| msgid "General help using GNU software: <http://www.gnu.org/gethelp/>" -msgid "General help using GNU software: <%s>" -msgstr "Allmän hjälp med att använda GNU-programvara: <http://www.gnu.org/gethelp/>" - -#: bin/cobcrun.c:288 +#: bin/cobcrun.c:286 msgid "invalid configuration file name" msgstr "ogiltigt namn på konfigurationsfil" -#: bin/cobcrun.c:355 +#: bin/cobcrun.c:353 #, fuzzy, c-format #| msgid "invalid module argument" msgid "invalid module argument '%s'" msgstr "ogiltigt modulargument" -#: bin/cobcrun.c:410 +#: bin/cobcrun.c:408 #, c-format msgid "%s: missing PROGRAM name" msgstr "" -#: bin/cobcrun.c:412 +#: bin/cobcrun.c:410 #, c-format msgid "Try '%s --help' for more information." msgstr "" @@ -7630,17 +7787,20 @@ msgstr "" #~ " -vvv, -verbose=3 som -vv men skickar vidare utförlighetsflaggan\n" #~ " till länkare" +#~ msgid "GnuCOBOL home page: <http://www.gnu.org/software/gnucobol/>" +#~ msgstr "GnuCOBOL webbplats: <http://www.gnu.org/software/gnucobol/>" + #, c-format #~ msgid "invalid parameter -std=%s" #~ msgstr "ogiltig parameter -std=%s" -#~ msgid "invalid option detected" -#~ msgstr "ogiltig flagga hittad" - #, c-format #~ msgid "unknown option ignored:\t%s" #~ msgstr "okänd flagga överhoppad:\t%s" +#~ msgid "unexpected error_node parameter" +#~ msgstr "oväntad error_node-parameter" + #, c-format #~ msgid "Invalid type for '%s'" #~ msgstr "Ogiltig typ för ”%s”" @@ -7666,6 +7826,10 @@ msgstr "" #~ msgid "only level 88 items may have multiple values" #~ msgstr "endast nivå-88-objekt får ha multipla värden" +#, c-format +#~ msgid "unexpected USAGE: %d" +#~ msgstr "oväntad USAGE: %d" + #~ msgid "define PERFORM stack size" #~ msgstr "definiera PERFORM-stackstorlek" @@ -7727,6 +7891,13 @@ msgstr "" #~ "\t\t\t- körd SECTION/PARAGRAPH/STATEMENTS\n" #~ "\t\t\t- slås på via -debug" +#~ msgid "" +#~ "'*' or '/' in column 1 treated as comment\n" +#~ "\t\t\t- FIXED format only" +#~ msgstr "" +#~ "”*” eller ”/” i kolumn 1 behandlas som kommentarer\n" +#~ "\t\t\t- endast FIXED-format" + #~ msgid "check recursive program call" #~ msgstr "kontrollera rekursivt programanrop" @@ -7784,6 +7955,9 @@ msgstr "" #~ msgid "non-negative integer value expected" #~ msgstr "icke-negativt heltalsvärde förväntades" +#~ msgid "invalid CLASS value" +#~ msgstr "ogiltigt CLASS-värde" + #~ msgid "spurious '$' detected - ignored" #~ msgstr "vilsekommet ”$” hittat - hoppas över" @@ -7803,12 +7977,24 @@ msgstr "" #~ msgid "Extra (obsolete) context sensitive words" #~ msgstr "Extra (föråldrade) sammanhangskänsliga ord" +#, c-format +#~ msgid "FUNCTION %s has invalid/not supported arguments - Tag %d" +#~ msgstr "FUNCTION %s har ogiltiga argument, eller argument som inte stöds - Tagg %d" + #~ msgid "cannot find the UTC offset on this system" #~ msgstr "kan inte hitta UTC-differens på detta system" #~ msgid "invalid literal cast" #~ msgstr "ogiltig typkonvertering av litteral" +#, c-format +#~ msgid "'%s' is not a numeric literal" +#~ msgstr "”%s” är inte en numerisk litteral" + +#, c-format +#~ msgid "'%s' is not unsigned" +#~ msgstr "”%s” är inte teckenlöst" + #~ msgid "only one set of parentheses is permitted" #~ msgstr "endast en uppsättning parenteser tillåts" @@ -7833,15 +8019,39 @@ msgstr "" #~ msgid "invalid use of HANDLE item" #~ msgstr "ogiltig användning av HANDLE-objekt" +#, c-format +#~ msgid "'%s' is not a numeric value" +#~ msgstr "”%s” är inte ett numeriskt värde" + +#, c-format +#~ msgid "'%s' is not an integer value" +#~ msgstr "”%s” är inte ett heltalsvärde" + #~ msgid "Variable length item not allowed here" #~ msgstr "Objekt med variabel längd inte tillåtet här" +#, c-format +#~ msgid "'%s' is not an alphabet name" +#~ msgstr "”%s” är inte ett alfabetsnamn" + #~ msgid "the CHARACTERS field of ALLOCATE must be numeric" #~ msgstr "fältet CHARACTERS för ALLOCATE måste vara numeriskt" #~ msgid "HANDLE must be either a generic or a WINDOW handle" #~ msgstr "HANDLE måste vara antingen en generisk eller ett WINDOW-handtag" +#~ msgid "invalid destination for MOVE" +#~ msgstr "ogiltig destination för MOVE" + +#~ msgid "invalid SORT filename" +#~ msgstr "ogiltigt SORT-filnamn" + +#~ msgid "invalid SORT USING parameter" +#~ msgstr "ogiltig SORT USING-parameter" + +#~ msgid "invalid SORT GIVING parameter" +#~ msgstr "ogiltig SORT GIVING-parameter" + # sebras: warn on? #~ msgid "warn incompatible redefinition of data items" #~ msgstr "varna vid inkompatibla omdefinitioner för data objekt" @@ -7865,6 +8075,10 @@ msgstr "" #~ msgid "%s: COBOL runtime is not initialized" #~ msgstr "%s: COBOL-körtid är inte initierad" +#, c-format +#~ msgid "%s: attempt to over-write constant param %d with " +#~ msgstr "%s: försök att skriva över konstantparameter %d med " + #, c-format #~ msgid "%s: attempt to over-write constant param %d" #~ msgstr "%s: försök att skriva över konstantparameter %d" diff --git a/po/tr.po b/po/tr.po index 7ef51ebb5..79b91f5cc 100644 --- a/po/tr.po +++ b/po/tr.po @@ -8,180 +8,185 @@ msgid "" msgstr "" "Project-Id-Version: gnucobol 3.2-rc1\n" "Report-Msgid-Bugs-To: gnucobol-messages@gnu.org\n" -"POT-Creation-Date: 2022-10-23 03:06+0200\n" +"POT-Creation-Date: 2023-07-28 19:20+0200\n" "PO-Revision-Date: 2023-01-26 12:00+0300\n" "Last-Translator: Emir SARI <emir_sari@icloud.com>\n" "Language-Team: Turkish <gnome-turk@gnome.org>\n" -"Language: Turkish\n" +"Language: tr\n" "MIME-Version: 1.0\n" "Content-Type: text/plain; charset=UTF-8\n" "Content-Transfer-Encoding: 8bit\n" "X-Bugs: Report translation errors to the Language-Team address.\n" -#: cobc/cobc.c:98 +#: cobc/cobc.c:116 cobc/codegen.c:2655 cobc/scanner.l:1375 #, c-format msgid "invalid parameter: %s" msgstr "geçersiz parametre: %s" -#: cobc/cobc.c:153 cobc/cobc.c:2233 cobc/cobc.c:2236 cobc/parser.y:802 -#: cobc/reserved.c:4022 libcob/common.c:226 libcob/common.c:1308 -#: libcob/common.c:2384 libcob/common.c:2388 libcob/common.c:2426 -#: libcob/common.c:2464 libcob/common.c:2654 libcob/common.c:7351 -#: libcob/common.c:8370 libcob/common.c:9391 libcob/common.c:9470 -#: libcob/common.c:9912 +#: cobc/cobc.c:171 cobc/cobc.c:2392 cobc/cobc.c:2395 cobc/parser.y:895 +#: cobc/reserved.c:4039 libcob/common.c:235 libcob/common.c:1369 +#: libcob/common.c:2698 libcob/common.c:2702 libcob/common.c:2740 +#: libcob/common.c:2778 libcob/common.c:2939 libcob/common.c:8159 +#: libcob/common.c:9191 libcob/common.c:10209 libcob/common.c:10284 +#: libcob/common.c:10731 msgid "unknown" msgstr "bilinmiyor" -#: cobc/cobc.c:855 +#: cobc/cobc.c:905 msgid "internal compiler error" msgstr "iç derleyici hatası" -#: cobc/cobc.c:921 cobc/cobc.c:1008 cobc/cobc.c:1070 cobc/cobc.c:1146 -#: cobc/cobc.c:1186 cobc/cobc.c:1262 +#: cobc/cobc.c:971 cobc/cobc.c:1058 cobc/cobc.c:1120 cobc/cobc.c:1196 +#: cobc/cobc.c:1236 cobc/cobc.c:1312 #, c-format msgid "cannot allocate %d bytes of memory" msgstr "%d bayt bellek ayrılamıyor" -#: cobc/cobc.c:934 cobc/cobc.c:950 cobc/cobc.c:970 cobc/cobc.c:1029 -#: cobc/cobc.c:1048 cobc/cobc.c:1166 cobc/cobc.c:1281 cobc/cobc.c:1323 -#: cobc/field.c:2216 libcob/common.c:8191 +#: cobc/cobc.c:984 cobc/cobc.c:1000 cobc/cobc.c:1020 cobc/cobc.c:1079 +#: cobc/cobc.c:1098 cobc/cobc.c:1216 cobc/cobc.c:1331 cobc/cobc.c:1415 +#: cobc/field.c:2346 libcob/common.c:9012 #, c-format msgid "call to %s with NULL pointer" msgstr "%s konumuna NULL işaretçisi ile çağrı" -#: cobc/cobc.c:991 +#: cobc/cobc.c:1041 #, c-format msgid "cannot reallocate %d bytes of memory" msgstr "%d bayt bellek yeniden ayrılamıyor" -#: cobc/cobc.c:1087 cobc/cobc.c:1203 +#: cobc/cobc.c:1137 cobc/cobc.c:1253 msgid "attempt to reallocate non-allocated memory" msgstr "ayrılmamış belleği ayırma denemesi" -#: cobc/cobc.c:1120 cobc/cobc.c:1236 +#: cobc/cobc.c:1170 cobc/cobc.c:1286 #, c-format msgid "call to %s with invalid pointer, as it is missing in list" msgstr "%s konumuna geçersiz işaretçili çağrı; çünkü listede yok" -#: cobc/cobc.c:1448 +#: cobc/cobc.c:1540 #, c-format msgid "assuming literal for unquoted '%s'" msgstr "tırnak içine alınmamış '%s' harfi harfine varsayılıyor" -#: cobc/cobc.c:1495 +#: cobc/cobc.c:1587 msgid " - length exceeds maximum" msgstr " - uzunluk izin verilen en fazlayı aşıyor" -#: cobc/cobc.c:1499 +#: cobc/cobc.c:1591 msgid " - name cannot be empty" msgstr " - ad, boş olamaz" -#: cobc/cobc.c:1502 -msgid " - name cannot begin with space or underscore" +#: cobc/cobc.c:1594 +#, fuzzy +#| msgid " - name cannot begin with space or underscore" +msgid " - name cannot begin with space or hyphen" msgstr " - ad, boşluk veya alt çizgi ile başlayamaz" -#: cobc/cobc.c:1505 +#: cobc/cobc.c:1597 msgid " - name cannot begin with 'cob_' or 'COB_'" msgstr " - ad, 'cob_' veya 'COB_' ile başlayamaz" -#: cobc/cobc.c:1508 +#: cobc/cobc.c:1600 msgid " - name duplicates a 'C' keyword" msgstr " - ad, bir 'C' anahtar sözcüğüne çoğaltılıyor" -#: cobc/cobc.c:1511 +#: cobc/cobc.c:1603 msgid " - name cannot contain a directory separator" msgstr " - ad, bir dizin ayırıcısı içeremez" -#: cobc/cobc.c:1520 +#: cobc/cobc.c:1612 #, c-format msgid "invalid file base name '%s'%s" msgstr "geçersiz dosya taban adı '%s'%s" -#: cobc/cobc.c:1524 +#: cobc/cobc.c:1616 #, c-format msgid "invalid ENTRY '%s'%s" msgstr "geçersiz ENTRY '%s'%s" -#: cobc/cobc.c:1527 +#: cobc/cobc.c:1619 #, c-format msgid "invalid PROGRAM-ID '%s'%s" msgstr "geçersiz PROGRAM-ID '%s'%s" -#: cobc/cobc.c:1659 +#: cobc/cobc.c:1751 #, c-format msgid "file '%s' does not exist" msgstr "'%s' dosyası yok" -#: cobc/cobc.c:1685 +#: cobc/cobc.c:1777 #, c-format msgid "duplicate exception '%s'" msgstr "yinelenmiş istisna '%s'" -#: cobc/cobc.c:1733 +#: cobc/cobc.c:1825 #, c-format msgid "invalid exception-name: %s" msgstr "geçersiz istisna adı: %s" -#: cobc/cobc.c:1870 cobc/cobc.c:8780 +#: cobc/cobc.c:1998 cobc/cobc.c:9211 msgid "please check environment variables as noted above" msgstr "yukarıda belirtildiği üzere çevre değişkenlerini denetleyin" -#: cobc/cobc.c:1882 cobc/error.c:348 cobc/error.c:382 cobc/error.c:408 -#: cobc/error.c:411 cobc/error.c:477 cobc/error.c:631 cobc/error.c:675 -#: cobc/error.c:779 cobc/error.c:782 +#: cobc/cobc.c:2010 cobc/error.c:140 msgid "error: " msgstr "hata: " -#: cobc/cobc.c:1905 +#: cobc/cobc.c:2033 #, c-format msgid "duplicate DEFINE '%s' - ignored" msgstr "yinelenmiş DEFINE '%s' - yok sayıldı" -#: cobc/cobc.c:1958 +#: cobc/cobc.c:2086 #, c-format msgid "environment variable '%s' is '%s'; should not contain '%c'" msgstr "çevre değişkeni '%s', %s; '%c' içermemeli" -#: cobc/cobc.c:1988 +#: cobc/cobc.c:2116 msgid "parameter buffer size exceeded" msgstr "parametre arabellek boyutu aşıldı" -#: cobc/cobc.c:2028 +#: cobc/cobc.c:2156 #, c-format msgid "warning: could not move temporary file to %s" msgstr "uyarı: geçici dosya %s konumuna taşınamadı" -#: cobc/cobc.c:2239 +#: cobc/cobc.c:2329 +#, fuzzy, c-format +#| msgid "environment variable '%s' is '%s'; should not contain '%c'" +msgid "environment variable '%s' has invalid content" +msgstr "çevre değişkeni '%s', %s; '%c' içermemeli" + +#: cobc/cobc.c:2398 #, c-format msgid "aborting compile of %s at line %d (%s: %s)" msgstr "%s derlenmesi %d satırında iptal ediliyor (%s: %s)" -#: cobc/cobc.c:2243 +#: cobc/cobc.c:2402 #, c-format msgid "aborting codegen for %s, last statement at line %d (%s: %s)" msgstr "%s için kod oluşturması iptal ediliyor, son ifade %d. satırda (%s: %s)" -#: cobc/cobc.c:2246 +#: cobc/cobc.c:2405 #, c-format msgid "aborting codegen for %s (%s: %s)" msgstr "%s için kod oluşturması iptal ediliyor (%s: %s)" -#: cobc/cobc.c:2251 +#: cobc/cobc.c:2410 msgid "aborting" msgstr "iptal ediliyor" -#: cobc/cobc.c:2329 libcob/common.c:2823 libcob/common.c:8149 -#: bin/cobcrun.c:375 +#: cobc/cobc.c:2488 libcob/common.c:3107 libcob/common.c:8970 bin/cobcrun.c:373 #, c-format msgid "Please report this!" msgstr "Lütfen bunu bildirin!" -#: cobc/cobc.c:2346 bin/cobcrun.c:100 +#: cobc/cobc.c:2505 bin/cobcrun.c:100 #, c-format msgid "License GPLv3+: GNU GPL version 3 or later <%s>" msgstr "GPLv3+ lisansı: GNU GPL sürüm 3 veya sonrası <%s>" -#: cobc/cobc.c:2348 libcob/common.c:8741 bin/cobcrun.c:102 +#: cobc/cobc.c:2507 libcob/common.c:9558 bin/cobcrun.c:102 msgid "" "This is free software; see the source for copying conditions. There is NO\n" "warranty; not even for MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE." @@ -190,390 +195,394 @@ msgstr "" "PAZARLANABİLİRLİK veya BELİRLİ BİR AMAÇ İÇİN UYGUNLUK da dahil\n" "olmak üzere herhangi bir garantisi YOKTUR." -#: cobc/cobc.c:2350 libcob/common.c:8743 bin/cobcrun.c:104 +#: cobc/cobc.c:2509 libcob/common.c:9560 bin/cobcrun.c:104 #, c-format msgid "Written by %s" msgstr "%s tarafından yazıldı" #. TRANSLATORS: This msgid is intended as the "Packaged" msgid, %s expands to date and time -#: cobc/cobc.c:2352 cobc/cobc.c:2365 libcob/common.c:8747 bin/cobcrun.c:106 +#: cobc/cobc.c:2511 cobc/cobc.c:2524 libcob/common.c:9564 bin/cobcrun.c:106 #, c-format msgid "Built %s" msgstr "Yapım %s" #. TRANSLATORS: This msgid is intended as the "Built" msgid, %s expands to date and time -#: cobc/cobc.c:2354 cobc/cobc.c:2367 libcob/common.c:8750 bin/cobcrun.c:108 +#: cobc/cobc.c:2513 cobc/cobc.c:2526 libcob/common.c:9567 bin/cobcrun.c:108 #, c-format msgid "Packaged %s" msgstr "Paketleme %s" -#: cobc/cobc.c:2356 cobc/cobc.c:2369 cobc/cobc.c:2478 libcob/common.c:8787 +#: cobc/cobc.c:2515 cobc/cobc.c:2528 cobc/cobc.c:2637 libcob/common.c:9604 msgid "C version" msgstr "C sürümü" -#: cobc/cobc.c:2382 +#: cobc/cobc.c:2541 libcob/common.c:1075 msgid "executing:" msgstr "yürütülüyor:" -#: cobc/cobc.c:2384 +#: cobc/cobc.c:2543 msgid "to be executed:" msgstr "yürütülecek:" -#: cobc/cobc.c:2422 cobc/cobc.c:2423 libcob/common.c:6834 libcob/common.c:6835 -#: libcob/common.c:6866 libcob/common.c:6867 +#: cobc/cobc.c:2581 cobc/cobc.c:2582 libcob/common.c:7632 libcob/common.c:7633 +#: libcob/common.c:7664 libcob/common.c:7665 msgid "env" msgstr "çevre" -#: cobc/cobc.c:2474 libcob/common.c:8783 +#: cobc/cobc.c:2633 libcob/common.c:9600 msgid "build information" msgstr "yapı bilgisi" -#: cobc/cobc.c:2475 libcob/common.c:8784 +#: cobc/cobc.c:2634 libcob/common.c:9601 msgid "build environment" msgstr "yapı ortamı" -#: cobc/cobc.c:2484 libcob/common.c:8794 +#: cobc/cobc.c:2643 libcob/common.c:9611 msgid "GnuCOBOL information" msgstr "GnuCOBOL bilgisi" -#: cobc/cobc.c:2492 cobc/cobc.c:2575 cobc/cobc.c:2591 libcob/common.c:8410 -#: libcob/common.c:8777 libcob/common.c:8778 libcob/common.c:8812 -#: libcob/common.c:8878 libcob/common.c:8900 libcob/common.c:8934 +#: cobc/cobc.c:2651 cobc/cobc.c:2739 cobc/cobc.c:2755 libcob/common.c:9233 +#: libcob/common.c:9594 libcob/common.c:9595 libcob/common.c:9629 +#: libcob/common.c:9695 libcob/common.c:9717 libcob/common.c:9751 msgid "disabled" msgstr "devre dışı" -#: cobc/cobc.c:2523 cobc/cobc.c:2541 libcob/common.c:7397 libcob/common.c:8400 -#: libcob/common.c:8407 libcob/common.c:8816 libcob/common.c:8834 +#: cobc/cobc.c:2687 cobc/cobc.c:2705 libcob/common.c:8179 libcob/common.c:9221 +#: libcob/common.c:9230 libcob/common.c:9633 libcob/common.c:9651 msgid "yes" msgstr "evet" -#: cobc/cobc.c:2525 cobc/cobc.c:2543 libcob/common.c:7399 libcob/common.c:8402 -#: libcob/common.c:8818 libcob/common.c:8836 +#: cobc/cobc.c:2689 cobc/cobc.c:2707 libcob/common.c:8181 libcob/common.c:9223 +#: libcob/common.c:9635 libcob/common.c:9653 msgid "no" msgstr "hayır" -#: cobc/cobc.c:2529 libcob/common.c:8822 +#: cobc/cobc.c:2693 libcob/common.c:9639 msgid "8 bytes" msgstr "8 bayt" -#: cobc/cobc.c:2531 libcob/common.c:8824 +#: cobc/cobc.c:2695 libcob/common.c:9641 msgid "4 bytes" msgstr "4 bayt" -#: cobc/cobc.c:2535 cobc/cobc.c:2537 libcob/common.c:8828 libcob/common.c:8830 +#: cobc/cobc.c:2699 cobc/cobc.c:2701 libcob/common.c:9645 libcob/common.c:9647 msgid "endianness" msgstr "hanelik" -#: cobc/cobc.c:2535 libcob/common.c:8828 +#: cobc/cobc.c:2699 libcob/common.c:9645 msgid "big-endian" msgstr "yüksek son haneli" -#: cobc/cobc.c:2537 libcob/common.c:8830 +#: cobc/cobc.c:2701 libcob/common.c:9647 msgid "little-endian" msgstr "düşük son haneli" -#: cobc/cobc.c:2541 cobc/cobc.c:2543 libcob/common.c:8834 libcob/common.c:8836 +#: cobc/cobc.c:2705 cobc/cobc.c:2707 libcob/common.c:9651 libcob/common.c:9653 msgid "native EBCDIC" msgstr "yerel EBCDIC" -#: cobc/cobc.c:2546 libcob/common.c:8937 +#: cobc/cobc.c:2710 libcob/common.c:9754 msgid "extended screen I/O" msgstr "genişletilmiş ekran girdisi-çıktısı" -#: cobc/cobc.c:2549 libcob/common.c:8840 +#: cobc/cobc.c:2713 libcob/common.c:9657 msgid "variable file format" msgstr "değişken dosya biçimi" -#: cobc/cobc.c:2555 cobc/cobc.c:2557 libcob/common.c:8846 libcob/common.c:8848 +#: cobc/cobc.c:2719 cobc/cobc.c:2721 libcob/common.c:9663 libcob/common.c:9665 msgid "sequential file handler" msgstr "ardışık dosya işleyicisi" -#: cobc/cobc.c:2557 libcob/common.c:8848 +#: cobc/cobc.c:2721 libcob/common.c:9665 msgid "built-in" msgstr "yapılı" -#: cobc/cobc.c:2561 cobc/cobc.c:2563 cobc/cobc.c:2565 cobc/cobc.c:2567 -#: cobc/cobc.c:2570 cobc/cobc.c:2572 cobc/cobc.c:2575 libcob/common.c:8852 -#: libcob/common.c:8866 libcob/common.c:8868 libcob/common.c:8870 -#: libcob/common.c:8873 libcob/common.c:8875 libcob/common.c:8878 +#: cobc/cobc.c:2725 cobc/cobc.c:2727 cobc/cobc.c:2729 cobc/cobc.c:2731 +#: cobc/cobc.c:2734 cobc/cobc.c:2736 cobc/cobc.c:2739 libcob/common.c:9669 +#: libcob/common.c:9683 libcob/common.c:9685 libcob/common.c:9687 +#: libcob/common.c:9690 libcob/common.c:9692 libcob/common.c:9695 msgid "indexed file handler" msgstr "indekslenmiş dosya işleyicisi" -#: cobc/cobc.c:2580 cobc/cobc.c:2582 cobc/cobc.c:2585 libcob/common.c:8884 +#: cobc/cobc.c:2744 cobc/cobc.c:2746 cobc/cobc.c:2749 libcob/common.c:9701 msgid "mathematical library" msgstr "matematik kitaplığı" -#: cobc/cobc.c:2589 cobc/cobc.c:2591 libcob/common.c:8895 libcob/common.c:8900 +#: cobc/cobc.c:2753 cobc/cobc.c:2755 libcob/common.c:9712 libcob/common.c:9717 msgid "XML library" msgstr "XML kitaplığı" -#: cobc/cobc.c:2594 libcob/common.c:8917 libcob/common.c:8932 -#: libcob/common.c:8934 +#: cobc/cobc.c:2758 libcob/common.c:9734 libcob/common.c:9749 +#: libcob/common.c:9751 msgid "JSON library" msgstr "JSON kitaplığı" -#: cobc/cobc.c:2597 libcob/common.c:8810 libcob/common.c:8941 +#: cobc/cobc.c:2761 libcob/common.c:9627 libcob/common.c:9758 msgid "enabled" msgstr "etkin" -#: cobc/cobc.c:2604 +#: cobc/cobc.c:2768 msgid "only one of options 'E', 'S', 'C', 'c' may be specified" msgstr "yalnızca 'E', 'S', 'C', 'c' seçeneklerinden biri belirtilebilir" -#: cobc/cobc.c:2610 +#: cobc/cobc.c:2774 msgid "only one of options 'm', 'x', 'b' may be specified" msgstr "yalnızca 'm', 'x', 'b' seçeneklerinden biri belirtilebilir" -#: cobc/cobc.c:2652 +#: cobc/cobc.c:2816 #, c-format msgid "option requires one of 'ALL', 'FD', 'WS', 'LS', 'RD', 'FD', 'SC', 'LO' - not '%s'" msgstr "seçenek, 'ALL', 'FD', 'WS', 'LS', 'RD', 'FD', 'SC', 'LO' arasından birini gerektiriyor; %s değil" -#: cobc/cobc.c:2682 +#: cobc/cobc.c:2846 #, c-format msgid "'%s' is not an intrinsic function" msgstr "'%s', yerleşik bir işlev değil" -#: cobc/cobc.c:2726 cobc/cobc.c:8094 cobc/cobc.c:8213 cobc/codegen.c:3783 -#: cobc/codegen.c:3884 cobc/codegen.c:5571 cobc/codegen.c:5700 -#: cobc/codegen.c:13034 cobc/tree.c:1391 cobc/tree.c:4497 cobc/tree.c:5067 -#: cobc/tree.c:5316 cobc/typeck.c:4344 cobc/typeck.c:9044 cobc/typeck.c:9079 -#: cobc/typeck.c:9977 cobc/typeck.c:12619 cobc/typeck.c:12690 -#: cobc/typeck.c:12758 cobc/typeck.c:13043 cobc/typeck.c:13086 -#: libcob/fileio.c:9703 libcob/fileio.c:9714 +#: cobc/cobc.c:2889 cobc/cobc.c:8507 cobc/cobc.c:8626 cobc/codegen.c:3761 +#: cobc/codegen.c:3864 cobc/codegen.c:5671 cobc/codegen.c:5816 +#: cobc/codegen.c:13429 cobc/parser.y:391 cobc/tree.c:1397 cobc/tree.c:4565 +#: cobc/tree.c:5135 cobc/tree.c:5392 cobc/typeck.c:4497 cobc/typeck.c:9504 +#: cobc/typeck.c:9541 cobc/typeck.c:10418 cobc/typeck.c:13395 +#: cobc/typeck.c:13469 cobc/typeck.c:13537 cobc/typeck.c:13825 +#: cobc/typeck.c:13887 libcob/fileio.c:10094 libcob/fileio.c:10105 #, c-format msgid "call to '%s' with invalid parameter '%s'" msgstr "geçersiz '%2$s' parametreli '%1$s' çağrısı" -#: cobc/cobc.c:3136 +#: cobc/cobc.c:3300 msgid "loading standard configuration file 'default.conf'" msgstr "standart yapılandırma dosyası 'default.conf' yükleniyor" -#: cobc/cobc.c:3217 +#: cobc/cobc.c:3387 msgid "the used C compiler is known to not be able to generate assembler code" msgstr "kullanılan C derleyicisinin Assembler kodu üretemediği biliniyor" -#: cobc/cobc.c:3299 +#: cobc/cobc.c:3469 msgid "invalid output file name" msgstr "geçersiz çıktı dosya adı" -#: cobc/cobc.c:3361 +#: cobc/cobc.c:3531 #, c-format msgid "warning: '%s' is not a directory, defaulting to current directory" msgstr "uyarı: '%s' bir dizin değil, geçerli dizin öntanımlı kullanılıyor" -#: cobc/cobc.c:3388 +#: cobc/cobc.c:3558 #, c-format msgid "warning: %d lines per listing page specified, using %d" msgstr "uyarı: Sayfa listeleme başına %d satır belirtildi, %d kullanılıyor" -#: cobc/cobc.c:3438 +#: cobc/cobc.c:3615 #, c-format msgid "warning: assuming '%s' is a DEFINE - did you intend to use -debug?" msgstr "uyarı: '%s' ögesinin bir DEFINE olduğu varsayılıyor - -debug kullanmak mı istediniz?" -#: cobc/cobc.c:3699 cobc/cobc.c:3724 cobc/cobc.c:3752 +#: cobc/cobc.c:3661 cobc/cobc.c:3702 cobc/cobc.c:4281 +#, c-format +msgid "ignoring nonexistent directory \"%s\"" +msgstr "" + +#: cobc/cobc.c:3943 cobc/cobc.c:3968 cobc/cobc.c:3996 #, c-format msgid "unknown warning option '%s'" msgstr "bilinmeyen uyarı seçeneği '%s'" -#: cobc/cobc.c:3813 +#: cobc/cobc.c:4063 #, c-format msgid "%s option requires a listing file" msgstr "%s seçeneği bir listeleme dosyası gerektiriyor" -#: cobc/cobc.c:3820 +#: cobc/cobc.c:4070 msgid "output to stdout only valid for preprocess" msgstr "stdout'a çıktı yalnızca ön işleme için geçerli" -#: cobc/cobc.c:3829 +#: cobc/cobc.c:4085 +msgid "-MT must be given to specify target file" +msgstr "" + +#: cobc/cobc.c:4091 msgid "all runtime checks are enabled" msgstr "tüm çalışma zamanı denetimleri etkin" -#: cobc/cobc.c:4030 +#: cobc/cobc.c:4316 msgid "only one stdin input allowed" msgstr "yalnızca bir stdin girdisine izin veriliyor" -#: cobc/cobc.c:4040 +#: cobc/cobc.c:4326 #, c-format msgid "invalid file name parameter (length > %d)" msgstr "geçersiz dosya adı parametresi (uzunluk > %d)" -#: cobc/cobc.c:4270 +#: cobc/cobc.c:4559 msgid "return status:" msgstr "dönüş durumu:" -#: cobc/cobc.c:4306 libcob/common.c:5711 +#: cobc/cobc.c:4595 libcob/common.c:6391 #, c-format msgid "external process \"%s\" ended with signal %s (%d)" msgstr "\"%s\" dış süreci, %s sinyali ile sonlandı (%d)" -#: cobc/cobc.c:4364 +#: cobc/cobc.c:4654 msgid "nothing for -j to run" msgstr "-j'nin çalıştırması için bir şey yok" -#: cobc/cobc.c:4406 cobc/cobc.c:4420 +#: cobc/cobc.c:4697 cobc/cobc.c:4711 #, c-format msgid "%s is resolved by environment as: %s" msgstr "%s, ortam tarafından şu biçimde çözüldü: %s" -#: cobc/cobc.c:4882 +#: cobc/cobc.c:5175 msgid "preprocessing:" msgstr "ön işleme yapılıyor:" -#: cobc/cobc.c:4952 +#: cobc/cobc.c:5244 msgid "'cobxref' execution unsuccessful" msgstr "'cobxref' yürütmesi başarısız" -#: cobc/cobc.c:4955 +#: cobc/cobc.c:5247 #, c-format msgid "check that 'cobxref' is in %s" msgstr "'cobxref'in %s içinde olduğundan emin olun" -#: cobc/cobc.c:4957 +#: cobc/cobc.c:5249 msgid "no listing produced" msgstr "bir listeleme üretilmedi" -#: cobc/cobc.c:5882 cobc/cobc.c:5921 +#: cobc/cobc.c:6234 cobc/cobc.c:6273 msgid "No fields defined." msgstr "Alan tanımlanmamış." -#: cobc/cobc.c:5941 +#: cobc/cobc.c:6293 msgid "No labels defined." msgstr "Etiket tanımlanmamış." -#: cobc/cobc.c:5963 +#: cobc/cobc.c:6324 cobc/cobc.c:9292 +msgid "command line:" +msgstr "komut satırı:" + +#: cobc/cobc.c:6342 msgid "Error/Warning summary:" msgstr "Hata/Uyarı özeti:" -#: cobc/cobc.c:6006 +#: cobc/cobc.c:6385 msgid "0 warnings in compilation group" msgstr "derleme grubunda 0 uyarı" -#: cobc/cobc.c:6010 +#: cobc/cobc.c:6389 msgid "1 warning in compilation group" msgstr "derleme grubunda 1 uyarı" -#: cobc/cobc.c:6014 +#: cobc/cobc.c:6393 #, c-format msgid "%d warnings in compilation group" msgstr "derleme grubunda %d uyarı" -#: cobc/cobc.c:6020 +#: cobc/cobc.c:6399 msgid "0 errors in compilation group" msgstr "derleme grubunda 0 uyarı" -#: cobc/cobc.c:6024 +#: cobc/cobc.c:6403 msgid "1 error in compilation group" msgstr "derleme grubunda 1 uyarı" -#: cobc/cobc.c:6028 +#: cobc/cobc.c:6407 #, c-format msgid "%d errors in compilation group" msgstr "derleme grubunda %d uyarı" -#: cobc/cobc.c:6034 +#: cobc/cobc.c:6413 #, c-format msgid "Too many errors in compilation group: %d maximum errors" msgstr "Derleme grubunda pek fazla hata: %d en çok hata" -#: cobc/cobc.c:6632 +#: cobc/cobc.c:7028 #, c-format msgid "%s:%d: too many continuation lines" msgstr "%s:%d: Pek çok sürdürüm satırı" -#: cobc/cobc.c:7552 +#: cobc/cobc.c:7956 msgid "parsing:" msgstr "ayrıştırılıyor:" -#: cobc/cobc.c:7612 +#: cobc/cobc.c:8017 msgid "translating:" msgstr "çevriliyor:" -#: cobc/cobc.c:8786 +#: cobc/cobc.c:9217 msgid "no input files" msgstr "girdi dosyası yok" -#: cobc/cobc.c:8816 +#: cobc/cobc.c:9248 #, c-format msgid "%s option invalid in this combination" msgstr "%s seçeneği, bu kombinasyonda geçersiz" -#: cobc/cobc.c:8857 -msgid "command line:" -msgstr "komut satırı:" - -#: cobc/codegen.c:1041 cobc/codegen.c:4463 cobc/codegen.c:11648 -#: cobc/codegen.c:12186 +#: cobc/codegen.c:1040 cobc/codegen.c:4506 cobc/codegen.c:11910 +#: cobc/codegen.c:12467 msgid "unexpected CONSTANT item" msgstr "beklenmedik CONSTANT ögesi" -#: cobc/codegen.c:2981 cobc/codegen.c:3261 cobc/codegen.c:8523 -#: cobc/tree.c:1413 +#: cobc/codegen.c:2921 cobc/codegen.c:3207 cobc/codegen.c:8866 cobc/tree.c:1419 #, c-format msgid "unexpected cast type: %d" msgstr "beklenmedik rol verme türü: %d" -#: cobc/codegen.c:3713 cobc/codegen.c:4413 +#: cobc/codegen.c:3690 cobc/codegen.c:4455 #, c-format msgid "internal statement stack depth exceeded: %d" msgstr "iç ifade yığın derinliği aşıldı: %d" -#: cobc/codegen.c:3785 +#: cobc/codegen.c:3763 #, c-format msgid "%s is not a field" msgstr "%s, bir alan değil" -#: cobc/codegen.c:4186 cobc/codegen.c:4257 +#: cobc/codegen.c:4177 cobc/codegen.c:4279 #, c-format msgid "unexpected function: %s" msgstr "beklenmedik işlev: %s" -#: cobc/codegen.c:5204 +#: cobc/codegen.c:5256 #, c-format msgid "unexpected tree category: %d" msgstr "beklenmedik ağaç kategorisi: %d" -#: cobc/codegen.c:5971 +#: cobc/codegen.c:6108 #, c-format msgid "unexpected size: %d" msgstr "beklenmedik boyut: %d" -#: cobc/codegen.c:7595 +#: cobc/codegen.c:7894 #, c-format msgid "No ENTRY FOR GO TO '%s'" msgstr "ENTRY FOR GO TO '%s' yok" -#: cobc/codegen.c:7816 cobc/codegen.c:8163 +#: cobc/codegen.c:8283 cobc/codegen.c:8609 #, c-format msgid "unexpected handler type: %d" msgstr "beklenmedik işleyici türü: %d" -#: cobc/codegen.c:8254 -msgid "unexpected error_node parameter" -msgstr "beklenmedik error_node parametresi" - -#: cobc/codegen.c:8544 +#: cobc/codegen.c:8887 #, c-format msgid "unexpected tree type: %d" msgstr "beklenmedik ağaç türü: %d" -#: cobc/codegen.c:9520 +#: cobc/codegen.c:9776 msgid "Nested OCCURS in report" msgstr "Rapor içinde iç içe geçmiş OCCURS" -#: cobc/codeoptim.c:2777 +#: cobc/codeoptim.c:2856 #, c-format msgid "unexpected optimization value: %d" msgstr "beklenmedik eniyileme değeri: %d" -#: cobc/config.c:164 libcob/common.c:7824 libcob/common.c:7838 -#: libcob/common.c:8315 +#: cobc/config.c:164 libcob/common.c:8639 libcob/common.c:8653 +#: libcob/common.c:9136 #, c-format msgid "invalid value '%s' for configuration tag '%s'" msgstr "yapılandırma etiketi '%2$s' için geçersiz değer '%1$s'" -#: cobc/config.c:167 libcob/common.c:7117 libcob/common.c:7234 +#: cobc/config.c:167 libcob/common.c:7915 libcob/common.c:7939 #, c-format msgid "should be one of the following values: %s" msgstr "aşağıdaki değerlerden biri olmalıydı: %s" @@ -582,7 +591,7 @@ msgstr "aşağıdaki değerlerden biri olmalıydı: %s" msgid "must be numeric" msgstr "sayı olmalı" -#: cobc/config.c:171 libcob/common.c:7215 +#: cobc/config.c:171 libcob/common.c:8045 #, c-format msgid "maximum value: %lu" msgstr "en büyük değer: %lu" @@ -597,45 +606,45 @@ msgstr "en küçük değer: %d" msgid "unsupported value '%s' for configuration tag '%s'" msgstr "yapılandırma etiketi '%2$s' için desteklenmeyen değer '%1$s'" -#: cobc/config.c:318 cobc/pplex.l:1185 libcob/common.c:7739 +#: cobc/config.c:319 cobc/pplex.l:1264 libcob/common.c:8554 msgid "recursive inclusion" msgstr "özyineli içerme" -#: cobc/config.c:393 libcob/common.c:7791 +#: cobc/config.c:394 libcob/common.c:8606 msgid "configuration file was included here" msgstr "yapılandırma dosyası burada içerilmişti" -#: cobc/config.c:422 +#: cobc/config.c:423 #, c-format msgid "The previous loaded configuration '%s' will be discarded." msgstr "Önceden yüklenen '%s' yapılandırması atılacak." -#: cobc/config.c:458 +#: cobc/config.c:459 msgid "missing definitions:" msgstr "eksik tanımlar:" -#: cobc/config.c:460 +#: cobc/config.c:461 #, c-format msgid "\tno definition of '%s'" msgstr "\t'%s' ögesinin tanımı yok" -#: cobc/config.c:523 +#: cobc/config.c:524 #, c-format msgid "invalid configuration tag '%s'" msgstr "geçersiz yapılandırma etiketi '%s'" -#: cobc/config.c:536 libcob/common.c:7545 libcob/common.c:7629 -#: libcob/common.c:7657 +#: cobc/config.c:537 libcob/common.c:8360 libcob/common.c:8444 +#: libcob/common.c:8472 #, c-format msgid "unknown configuration tag '%s'" msgstr "bilinmeyen yapılandırma etiketi '%s'" -#: cobc/config.c:560 +#: cobc/config.c:561 #, c-format msgid "invalid configuration tag '%s' in word-list" msgstr "sözcük listesinde geçersiz yapılandırma etiketi '%s'" -#: cobc/config.c:622 +#: cobc/config.c:623 #, c-format msgid "Could not access word list for '%s'" msgstr "'%s' için sözcük listesine erişilemedi" @@ -673,13 +682,21 @@ msgid "maximum numeric literal size" msgstr "en büyük sayısal düz veri boyutu" #: cobc/config.def:73 +#, fuzzy +#| msgid "" +#| "default initialization for fields without VALUE, may be one of\n" +#| " * character in quotes\n" +#| " * decimal 0..255 representing a character\n" +#| " * \"init\" to initialize to PICTURE/USAGE\n" +#| " * \"none\" to do no explicit initialization\n" +#| " * default: \"init\"" msgid "" "default initialization for fields without VALUE, may be one of\n" -" * character in quotes\n" -" * decimal 0..255 representing a character\n" -" * \"init\" to initialize to PICTURE/USAGE\n" -" * \"none\" to do no explicit initialization\n" -" * default: \"init\"" +" * character in quotes\n" +" * decimal 0..255 representing a character\n" +" * \"init\" to initialize to PICTURE/USAGE\n" +" * \"none\" to do no explicit initialization\n" +" * default: \"init\"" msgstr "" "VALUE içermeyen alanlar için öntanımlı ilklendirme, şunlardan biri olabilir\n" " * tırnak içinde karakter\n" @@ -712,1060 +729,1077 @@ msgstr "SCREEN SECTION öge yantümcelerine hangi derleyicinin kurallarının uy msgid "whether DECIMAL-POINT IS COMMA has effect in XML/JSON GENERATE, may be one of: none, xml, json, all" msgstr "XML/JSON GENERATE içinde DECIMAL-POINT IS COMMA'nın bir etkisinin olup olmayacağı, şunlardan biri olabilir: none, xml, json, all" -#: cobc/config.def:103 +#: cobc/config.def:101 +msgid "checking for subscript (only done with EC-BOUND-SUBSCRIPT active), may be one of: full, max, record" +msgstr "" + +#: cobc/config.def:106 msgid "resolve file names at run time using environment variables" msgstr "dosya adlarını çalışma zamanında çevre değişkenlerini kullanarak çöz" -#: cobc/config.def:106 +#: cobc/config.def:109 msgid "alternate formatting of numeric fields" msgstr "sayısal alanların biçimlendirmesini arada değiştir" -#: cobc/config.def:109 +#: cobc/config.def:112 msgid "numeric truncation according to ANSI" msgstr "ANSI'ye göre sayısal kısaltma" -#: cobc/config.def:112 -msgid "allow complex OCCURS DEPENDING ON" +#: cobc/config.def:115 +#, fuzzy +#| msgid "allow complex OCCURS DEPENDING ON" +msgid "allow non-standard OCCURS DEPENDING ON syntax" msgstr "karmaşık OCCURS DEPENDING ON'a izin ver" -#: cobc/config.def:115 +#: cobc/config.def:118 msgid "adjust items following OCCURS DEPENDING (implies complex-odo)" msgstr "OCCURS DEPENDING sonrası ögeleri düzenle (complex-odo ima eder)" -#: cobc/config.def:118 +#: cobc/config.def:121 +msgid "applies JUSTIFY with VALUE clause" +msgstr "" + +#: cobc/config.def:124 msgid "allow REDEFINES to other than last equal level number" msgstr "son eşit düzey numarasından başka REDEFINES'a izin ver" -#: cobc/config.def:121 +#: cobc/config.def:127 msgid "allow certain syntax variations (e.g. REDEFINES position)" msgstr "belirli sözdizim varyasyonlarına izin ver (örn. REDEFINES konumu)" -#: cobc/config.def:124 +#: cobc/config.def:130 msgid "allow zero length reference-modification (only changed with EC-BOUND-REF-MOD active)" msgstr "sıfır uzunluklu başvuru değişime izin ver (yalnızca EC-BOUND-REF-MOD etkinken değiştirilir)" -#: cobc/config.def:127 +#: cobc/config.def:133 msgid "allow non-matching level numbers" msgstr "eşleşmeyen düzey numaralarına izin ver" -#: cobc/config.def:130 +#: cobc/config.def:136 msgid "require ASSIGN USING items to be in WORKING-STORAGE" msgstr "ASSIGN USING ögelerinin WORKING-STORAGE içinde olmasını gerektir" -#: cobc/config.def:133 +#: cobc/config.def:139 msgid "LOCAL-STORAGE SECTION implies RECURSIVE attribute" msgstr "LOCAL-STORAGE SECTION, RECURSIVE özniteliğini ima eder" -#: cobc/config.def:136 +#: cobc/config.def:142 msgid "LINKAGE SECTION items remain allocated between invocations" msgstr "LINKAGE SECTION ögeleri çağırmalar arasında yer ayrılmış olarak kalır" -#: cobc/config.def:139 +#: cobc/config.def:145 msgid "MOVE operates as on IBM (left to right, byte by byte)" msgstr "MOVE, IBM'deki gibi çalışır (soldan sağa, bayt bayt)" -#: cobc/config.def:142 +#: cobc/config.def:148 msgid "exit point of any currently executing perform is recognized if reached" msgstr "şu anda yürütülen her programın çıkış noktası ulaşılırsa tanınır" -#: cobc/config.def:145 +#: cobc/config.def:151 msgid "limit precision in intermediate results to precision of final result (less accurate)" msgstr "limit keskinliği, son değerin keskinliğine göre ortadır (daha az kesin)" -#: cobc/config.def:148 +#: cobc/config.def:154 msgid "evaluate constant expressions at compile time" msgstr "sabit ifadeleri derleme sırasında değerlendir" -#: cobc/config.def:151 +#: cobc/config.def:157 msgid "allow hexadecimal value 'F' for NUMERIC test of signed PACKED DECIMAL field" msgstr "PACKED DECIMAL alanının NUMERIC sınaması için onaltılık 'F' değerine izin ver" -#: cobc/config.def:154 +#: cobc/config.def:160 msgid "program names don't lead to a reserved identifier" msgstr "program adları ayrılmış bir tanımlayıcıya sürüklemiyor" -#: cobc/config.def:157 +#: cobc/config.def:163 msgid "set WITH UPDATE clause as default for ACCEPT dest-item, instead of WITH NO UPDATE" msgstr "ACCEPT hedef-ögesi için WITH NO UPDATE yerine WITH UPDATE yantümcesiyle öntanımlı ayarla" -#: cobc/config.def:160 +#: cobc/config.def:166 msgid "set WITH AUTO clause as default for ACCEPT dest-item, instead of WITH TAB" msgstr "ACCEPT hedef-ögesi için WITH TAB yerine WITH AUTO yantümcesi ile öntanımlı ayarla" -#: cobc/config.def:163 +#: cobc/config.def:169 msgid "assume CONSOLE IS CRT if not set otherwise" msgstr "başka türlü ayarlanmadıysa CONSOLE IS CRT varsay" -#: cobc/config.def:166 +#: cobc/config.def:172 msgid "NO-ECHO hides input with asterisks like SECURE" msgstr "NO-ECHO, girdiyi yıldızlarla gizler, SECURE gibi" -#: cobc/config.def:169 +#: cobc/config.def:175 msgid "assume a field DISPLAY starts at LINE 0 COL 0 (i.e. at the cursor), not LINE 1 COL 1" msgstr "bir alan DISPLAY'inin LINE 0 COL 0'da başladığını varsay (örn. imleçte), LINE 1 COL 1 değil" -#: cobc/config.def:172 +#: cobc/config.def:178 msgid "special behaviour of DISPLAY SPACE/ALL X'01'/ALL X'02'/ALL X'07'" msgstr "DISPLAY SPACE/ALL X'01'/ALL X'02'/ALL X'07'ın özel davranışı" -#: cobc/config.def:175 +#: cobc/config.def:181 msgid "COMP-1 is a 16-bit signed integer" msgstr "COMP-1, bir 16 bitlik imzalı tamsayı" -#: cobc/config.def:178 +#: cobc/config.def:184 msgid "POINTER is a 64-bit unsigned integer" msgstr "POINTER, bir 64 bit imzalanmamış tamsayı" -#: cobc/config.def:181 +#: cobc/config.def:187 msgid "imply zero in move of non-numeric literal to numeric items" msgstr "sayı olmayan düz verinin sayı ögesine taşınmasında sıfır ima et" -#: cobc/config.def:184 +#: cobc/config.def:190 msgid "implicitly define a variable if an ASSIGN DYNAMIC does not match any data item" msgstr "eğer bir ASSIGN DYNAMIC herhangi bir veri ögesiyle eşleşmiyorsa dolaylı olarak bir değişken tanımla" -#: cobc/config.def:187 +#: cobc/config.def:193 msgid "specifying device by mnemonic" msgstr "aygıt belletenle belirtiliyor" -#: cobc/config.def:193 +#: cobc/config.def:199 msgid "" "check contents of Area A (when reference format supports Area A enforcement),\n" -" enabled checks include:\n" -" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" -" and toplevel numbers (01 and 77) must start in Area A;\n" -" * statements must not start in Area A; and\n" -" * separator periods must not be within Area A." +" enabled checks include:\n" +" * division, section, paragraph names, level indicators (FD, SD, RD, and CD),\n" +" and toplevel numbers (01 and 77) must start in Area A;\n" +" * statements must not start in Area A; and\n" +" * separator periods must not be within Area A" msgstr "" -#: cobc/config.def:203 +#: cobc/config.def:209 msgid "comment paragraphs in IDENTIFICATION DIVISION (AUTHOR, DATE-WRITTEN, ...)" msgstr "IDENTIFICATION DIVISION (AUTHOR, DATE-WRITTEN, ...) içinde yorum paragrafları" -#: cobc/config.def:207 -msgid "CONTROL DIVISION" -msgstr "CONTROL DIVISION" - -#: cobc/config.def:211 cobc/ppparse.y:101 cobc/ppparse.y:104 -msgid "partial replacing with literal" -msgstr "düz veri ile değiştirilen kısımsal" +#: cobc/config.def:217 +msgid "" +"apply partial replacing with literal source operand even when it replaces with spaces only;\n" +" * \"skip\" prevents such replacements" +msgstr "" -#: cobc/config.def:214 +#: cobc/config.def:221 msgid "MEMORY-SIZE clause" msgstr "MEMORY-SIZE yantümcesi" -#: cobc/config.def:217 +#: cobc/config.def:224 msgid "MULTIPLE-FILE-TAPE clause" msgstr "MULTIPLE-FILE-TAPE yantümcesi" -#: cobc/config.def:220 +#: cobc/config.def:227 msgid "LABEL-RECORDS clause" msgstr "LABEL-RECORDS yantümcesi" -#: cobc/config.def:223 +#: cobc/config.def:230 msgid "VALUE-OF clause" msgstr "VALUE-OF yantümcesi" -#: cobc/config.def:226 +#: cobc/config.def:233 msgid "DATA-RECORDS clause" msgstr "DATA-RECORDS yantümcesi" -#: cobc/config.def:229 +#: cobc/config.def:236 msgid "OCCURS clause on top-level" msgstr "en üst düzeyde OCCURS yantümcesi" -#: cobc/config.def:232 cobc/parser.y:7285 +#: cobc/config.def:239 cobc/parser.y:7566 msgid "SAME AS clause" msgstr "SAME AS yantümcesi" -#: cobc/config.def:235 cobc/parser.y:7621 +#: cobc/config.def:242 cobc/parser.y:7904 msgid "TYPE TO clause" msgstr "TYPE TO yantümcesi" -#: cobc/config.def:238 cobc/parser.y:7644 +#: cobc/config.def:245 cobc/parser.y:7927 msgid "USAGE type-name" msgstr "USAGE tür adı" -#: cobc/config.def:241 cobc/parser.y:8190 +#: cobc/config.def:248 cobc/parser.y:8563 msgid "SYNCHRONIZED clause" msgstr "SYNCHRONIZED yantümcesi" -#: cobc/config.def:244 cobc/parser.y:8193 +#: cobc/config.def:251 cobc/parser.y:8566 msgid "LEFT/RIGHT phrases in SYNCHRONIZED clause" msgstr "SYNCHRONIZED yantümcesinde LEFT/RIGHT deyişleri" -#: cobc/config.def:247 +#: cobc/config.def:254 msgid "SPECIAL-NAMES clause" msgstr "SPECIAL-NAMES yantümcesi" -#: cobc/config.def:250 -msgid "GOTO statement without name" +#: cobc/config.def:257 +#, fuzzy +#| msgid "GOTO statement without name" +msgid "GO TO statement without name" msgstr "ad olmadan GOTO ifadesi" -#: cobc/config.def:253 +#: cobc/config.def:260 msgid "STOP-literal statement" msgstr "STOP düz veri ifadesi" -#: cobc/config.def:256 +#: cobc/config.def:263 msgid "STOP-identifier statement" msgstr "STOP tanımlayıcı ifadesi" -#: cobc/config.def:259 +#: cobc/config.def:266 msgid "STOP ERROR statement" msgstr "STOP ERROR ifadesi" -#: cobc/config.def:262 +#: cobc/config.def:269 msgid "DEBUGGING MODE and debugging indicator" msgstr "DEBUGGING MODE ve hata ayıklama belirteci" -#: cobc/config.def:268 +#: cobc/config.def:275 msgid "PADDING CHARACTER clause" msgstr "PADDING CHARACTER yantümcesi" -#: cobc/config.def:271 +#: cobc/config.def:278 msgid "NEXT SENTENCE phrase" msgstr "NEXT SENTENCE deyişi" -#: cobc/config.def:274 +#: cobc/config.def:281 msgid "listing-directive statements EJECT, SKIP1, SKIP2, SKIP3" msgstr "EJECT, SKIP1, SKIP2, SKIP3 listeleme yönerge ifadeleri" -#: cobc/config.def:277 +#: cobc/config.def:284 msgid "listing-directive statement TITLE" msgstr "TITLE listeleme yönerge ifadesi" -#: cobc/config.def:280 +#: cobc/config.def:287 msgid "ENTRY statement" msgstr "ENTRY ifadesi" -#: cobc/config.def:283 +#: cobc/config.def:290 msgid "move noninteger to alphanumeric" msgstr "tamsayı olmayan ögeyi abecesele taşı" -#: cobc/config.def:286 +#: cobc/config.def:293 msgid "move figurative constants to numeric" msgstr "simgesel sabitleri sayısala taşı" -#: cobc/config.def:289 +#: cobc/config.def:296 msgid "move figurative constant SPACE to numeric" msgstr "simgesel sabit SPACE'i sayısala taşı" -#: cobc/config.def:292 +#: cobc/config.def:299 msgid "move figurative constant QUOTE to numeric" msgstr "simgesel sabit QUOTE'u sayısala taşı" -#: cobc/config.def:295 +#: cobc/config.def:302 msgid "OCCURS DEPENDING ON without to" msgstr "nereye olduğu belli olmayan OCCURS DEPENDING" -#: cobc/config.def:298 cobc/parser.y:11102 +#: cobc/config.def:305 cobc/parser.y:11443 msgid "section segments" msgstr "bölüm segmentleri" -#: cobc/config.def:301 +#: cobc/config.def:308 msgid "ALTER statement" msgstr "ALTER ifadesi" -#: cobc/config.def:304 +#: cobc/config.def:311 msgid "OVERFLOW clause for CALL" msgstr "CALL için OVERFLOW yantümcesi" -#: cobc/config.def:307 +#: cobc/config.def:314 msgid "boolean literals (B'1010')" msgstr "Boole düz verisi (B'1010')" -#: cobc/config.def:310 +#: cobc/config.def:317 msgid "hexadecimal-boolean literals (BX'A')" msgstr "onaltılık Boole düz verisi (BX'A')" -#: cobc/config.def:313 +#: cobc/config.def:320 msgid "national literals (N'UTF-16 string')" msgstr "yerel düz veri (N'UTF-16 dizi')" -#: cobc/config.def:316 +#: cobc/config.def:323 msgid "hexadecimal-national literals (NX'265E')" msgstr "onaltılık yerel düz veri (NX'265E')" -#: cobc/config.def:319 +#: cobc/config.def:326 msgid "non-standard national literals (NC'UTF-16 string')" msgstr "ölçünlü olmayan yerel düz veri (NC'UTF-16 dizi')" -#: cobc/config.def:322 +#: cobc/config.def:329 msgid "HP COBOL octal literals (%377)" msgstr "HP COBOL sekizlik düz veri (%377)" -#: cobc/config.def:325 +#: cobc/config.def:332 msgid "ACUCOBOL-GT literals (#B #O #H #X)" msgstr "ACUCOBOL-GT düz verisi (#B #0 #H #X)" -#: cobc/config.def:328 cobc/pplex.l:2199 +#: cobc/config.def:335 +msgid "EBCDIC symbolic characters in literals (\" \"135,151,151\"bar\"195, 194\"Z\" for \" foobarBAZ\")" +msgstr "" + +#: cobc/config.def:338 cobc/pplex.l:2428 msgid "continuation of COBOL words" msgstr "COBOL sözcüklerinin süreği" -#: cobc/config.def:331 +#: cobc/config.def:341 msgid "NOT ON EXCEPTION before ON EXCEPTION" msgstr "ON EXCEPTİON öncesi NOT ON EXCEPTİON" -#: cobc/config.def:334 +#: cobc/config.def:344 msgid "extensions to ACCEPT and DISPLAY" msgstr "ACCEPT'e ve DISPLAY'e uzantılar" -#: cobc/config.def:337 cobc/field.c:3357 +#: cobc/config.def:347 cobc/field.c:3645 msgid "RENAMES of 01-, 66- and 77-level items" msgstr "01-, 66- ve 77-düzey ögelerin RENAMES'i" -#: cobc/config.def:341 +#: cobc/config.def:351 msgid "allow larger REDEFINES items" msgstr "daha büyük REDEFINES ögelerine izin ver" -#: cobc/config.def:344 +#: cobc/config.def:354 msgid "constants defined in SPECIAL-NAMES" msgstr "SPECIAL-NAMES içinde tanımlanan sabitler" -#: cobc/config.def:347 +#: cobc/config.def:357 msgid "constant with level 78 item (note: has left to right precedence in expressions)" msgstr "düzey 78 sabit (not: ifadelerde soldan sağa önceliği var)" -#: cobc/config.def:350 +#: cobc/config.def:360 msgid "constant with level 01 CONSTANT AS/FROM item" msgstr "düzey 01 CONSTANT/AS FROM ögeli sabit" -#: cobc/config.def:353 +#: cobc/config.def:363 msgid "PERFORM VARYING without BY phrase (implies BY 1)" msgstr "BY deyişsiz PERFORM VARYING (BY 1 ima eder)" -#: cobc/config.def:356 +#: cobc/config.def:366 msgid "references to sections not in DECLARATIVES from within DECLARATIVES" msgstr "DECLARATIVES içinden DECLARATIVES'de olmayan bölümlere başvurular" -#: cobc/config.def:359 cobc/parser.y:12225 cobc/parser.y:12521 +#: cobc/config.def:369 cobc/parser.y:12614 cobc/parser.y:12913 msgid "CALL/CANCEL with program-prototype-name" msgstr "program prototip adıyla CALL/CANCEL" -#: cobc/config.def:362 +#: cobc/config.def:372 msgid "specifying call-convention by mnemonic" msgstr "çağrı kuralı belletenle belirleniyor" -#: cobc/config.def:365 +#: cobc/config.def:375 msgid "specifying call-convention by WITH ... LINKAGE" msgstr "çağrı kuralı WITH ... LINKAGE ile belirleniyor" -#: cobc/config.def:368 +#: cobc/config.def:378 +msgid "support for PROCEDURE DIVISION USING OPTIONAL" +msgstr "" + +#: cobc/config.def:381 msgid "numeric literals in VALUE clause of numeric-edited items" msgstr "sayısal ve düzenlenen ögelerin VALUE yantümcesinde sayısal düz veri" -#: cobc/config.def:371 +#: cobc/config.def:384 msgid "incorrect order of CONFIGURATION SECTION paragraphs" msgstr "CONFIGURATION SECTION paragraflarının doğru olmayan sırası" -#: cobc/config.def:374 +#: cobc/config.def:387 msgid "allow >> DEFINE CONSTANT var AS literal" msgstr "'>> DEFINE CONSTANT var AS düz veri'ye izin ver" -#: cobc/config.def:377 +#: cobc/config.def:390 msgid "REDEFINES clause not following entry-name in definition" msgstr "REDEFINES yantümcesi, tanımda girdi adını izlemiyor" -#: cobc/config.def:380 +#: cobc/config.def:393 msgid "record sizes does not match RECORD clause" msgstr "kayıt boyutları, RECORD yantümcesi ile eşleşmiyor" -#: cobc/config.def:383 cobc/parser.y:5736 cobc/parser.y:5750 -#: cobc/parser.y:5763 cobc/parser.y:5774 +#: cobc/config.def:396 cobc/parser.y:5991 cobc/parser.y:6005 cobc/parser.y:6018 +#: cobc/parser.y:6029 msgid "RECORD DELIMITER clause" msgstr "RECORD DELIMITER yantümcesi" -#: cobc/config.def:386 +#: cobc/config.def:399 msgid "BINARY-SEQUENTIAL and LINE-SEQUENTIAL phrases in RECORD DELIMITER" msgstr "RECORD DELIMITER içinde BINARY-SEQUENTİAL ve LINE-SEQUENTIAL deyişleri" -#: cobc/config.def:389 cobc/tree.c:4805 +#: cobc/config.def:402 cobc/tree.c:4873 msgid "RECORD DELIMITER clause on file with fixed-length records" msgstr "sabit uzunluklu kayıtları olan dosyada RECORD DELIMITER yantümcesi" -#: cobc/config.def:392 +#: cobc/config.def:405 msgid "missing statement (e.g. empty IF / PERFORM)" msgstr "eksik ifade (örn. boş IF/PERFORM)" -#: cobc/config.def:395 +#: cobc/config.def:408 msgid "missing period in PROCEDURE DIVISION (when reference format supports Area A enforcement)" msgstr "PROCEDURE DIVISION içinde eksik nokta (başvuru biçimi Area A zorunluluğunu desteklediğinde)" -#: cobc/config.def:398 +#: cobc/config.def:411 msgid "zero-length literals, e.g. '' and \"\"" msgstr "sıfır uzunluklu düz veri; örn. '' ve \"\"" -#: cobc/config.def:401 +#: cobc/config.def:414 msgid "XML GENERATE's phrases other than COUNT IN" msgstr "COUNT IN'den ayrımlı XML GENERATE deyişleri" -#: cobc/config.def:404 cobc/typeck.c:8565 +#: cobc/config.def:417 cobc/typeck.c:9017 msgid "AFTER phrase in CONTINUE statement" msgstr "CONTINUE ifadesinde AFTER deyişi" -#: cobc/config.def:407 -msgid "ENTRY FOR GOTO and GOTO ENTRY statements" +#: cobc/config.def:420 +#, fuzzy +#| msgid "ENTRY FOR GOTO and GOTO ENTRY statements" +msgid "ENTRY FOR GO TO and GO TO ENTRY statements" msgstr "ENTRY FOR GOTO ve GOTO ENTRY ifadeleri" -#: cobc/config.def:410 +#: cobc/config.def:423 cobc/typeck.c:4642 msgid "ASSIGN [TO] variable in SELECT" msgstr "SELECT içinde ASSIGN [TO] değişkeni" -#: cobc/config.def:413 +#: cobc/config.def:426 msgid "ASSIGN USING/VARYING variable in SELECT" msgstr "SELECT içinde ASSIGN USING/VARYING değişkeni" -#: cobc/config.def:416 +#: cobc/config.def:429 msgid "ASSIGN EXTERNAL/DYNAMIC in SELECT" msgstr "SELECT içinde ASSIGN EXTERNAL/DYNAMIC değişkeni" -#: cobc/config.def:419 +#: cobc/config.def:432 msgid "ASSIGN DISK FROM variable in SELECT" msgstr "SELECT içinde ASSIGN DISK FROM değişkeni" -#: cobc/config.def:422 +#: cobc/config.def:435 msgid "VSAM status in FILE STATUS" msgstr "FILE STATUS içinde VSAM durumu" -#: cobc/config.def:425 +#: cobc/config.def:438 msgid "CALL to own PROGRAM-ID implies RECURSIVE attribute" msgstr "öz PROGRAM-ID'sine olan CALL, RECURSIVE özniteliğini ima eder" -#: cobc/config.def:428 +#: cobc/config.def:441 msgid "DEPENDING clause in RECORD CONTAINS" msgstr "RECORD CONTAINS içinde DEPENDING yantümcesi" -#: cobc/config.def:431 cobc/tree.c:3584 +#: cobc/config.def:444 cobc/tree.c:3623 msgid "PICTURE string with 'L' character" msgstr "'L' karakteriyle PICTURE dizisi" -#: cobc/error.c:83 +#: cobc/error.c:141 libcob/common.c:1379 libcob/common.c:8715 +#: libcob/common.c:8766 +#, c-format +msgid "warning: " +msgstr "uyarı: " + +#: cobc/error.c:142 libcob/common.c:8784 +msgid "note: " +msgstr "not: " + +#: cobc/error.c:162 #, c-format msgid "in section '%s':" msgstr "'%s' bölümünde:" -#: cobc/error.c:94 +#: cobc/error.c:173 #, c-format msgid "in paragraph '%s':" msgstr "'%s' paragrafında:" -#: cobc/error.c:129 cobc/error.c:133 cobc/error.c:136 +#: cobc/error.c:227 cobc/error.c:231 cobc/error.c:234 msgid "too many errors" msgstr "pek çok hata" -#: cobc/error.c:145 +#: cobc/error.c:243 #, c-format msgid "in file included from " msgstr "şuradan içerilen dosyada: " -#: cobc/error.c:163 libcob/common.c:8325 +#: cobc/error.c:261 libcob/common.c:9146 msgid "configuration error:" msgstr "yapılandırma hatası:" -#: cobc/error.c:176 libcob/common.c:861 +#: cobc/error.c:274 libcob/common.c:920 #, c-format msgid "system error %d" msgstr "sistem hatası %d" -#: cobc/error.c:346 cobc/error.c:413 cobc/error.c:475 cobc/error.c:631 -#: cobc/error.c:675 cobc/error.c:785 libcob/common.c:1318 libcob/common.c:7900 -#: libcob/common.c:7951 -#, c-format -msgid "warning: " -msgstr "uyarı: " - -#: cobc/error.c:518 cobc/error.c:534 cobc/error.c:868 cobc/error.c:889 +#: cobc/error.c:616 cobc/error.c:632 cobc/error.c:971 cobc/error.c:992 #, c-format msgid "%s used" msgstr "%s kullanıldı" -#: cobc/error.c:521 cobc/error.c:871 +#: cobc/error.c:619 cobc/error.c:974 #, c-format msgid "%s is archaic in %s" msgstr "%s, %s içinde arkaik" -#: cobc/error.c:525 cobc/error.c:875 +#: cobc/error.c:623 cobc/error.c:978 #, c-format msgid "%s is obsolete in %s" msgstr "%s, %s içinde eskimiş" -#: cobc/error.c:531 cobc/error.c:881 cobc/parser.y:5738 +#: cobc/error.c:629 cobc/error.c:984 cobc/parser.y:5993 #, c-format msgid "%s ignored" msgstr "%s yok sayıldı" -#: cobc/error.c:537 cobc/error.c:891 +#: cobc/error.c:635 cobc/error.c:994 #, c-format msgid "%s does not conform to %s" msgstr "%s, %s ögesine uymuyor" -#: cobc/error.c:553 +#: cobc/error.c:651 msgid "configuration warning:" msgstr "yapılandırma uyarısı:" -#: cobc/error.c:728 cobc/error.c:731 cobc/error.c:755 cobc/error.c:758 -#: libcob/common.c:7969 -msgid "note: " -msgstr "not: " - -#: cobc/error.c:933 cobc/error.c:962 +#: cobc/error.c:1040 cobc/error.c:1069 #, c-format msgid "redefinition of '%s'" msgstr "'%s' yeniden tanımı" -#: cobc/error.c:939 cobc/error.c:973 +#: cobc/error.c:1046 cobc/error.c:1080 #, c-format msgid "'%s' previously defined here" msgstr "'%s', daha önceden burada tanımlanmış" -#: cobc/error.c:1017 cobc/error.c:1023 +#: cobc/error.c:1124 cobc/error.c:1130 #, c-format msgid "'%s' is not defined" msgstr "'%s' tanımlanmamış" -#: cobc/error.c:1019 +#: cobc/error.c:1126 #, c-format msgid "'%s' cannot be used here" msgstr "'%s', burada kullanılamaz" -#: cobc/error.c:1021 cobc/parser.y:7658 +#: cobc/error.c:1128 cobc/parser.y:7941 #, c-format msgid "'%s' is not defined, but is a reserved word in another dialect" msgstr "'%s' tanımlanmamış; ancak başka bir lehçede rezerve bir sözcük" -#: cobc/error.c:1060 +#: cobc/error.c:1167 #, c-format msgid "'%s' is ambiguous; needs qualification" msgstr "'%s' belirsiz; nitelik gerek" -#: cobc/error.c:1090 +#: cobc/error.c:1197 #, c-format msgid "'%s' is a special register" msgstr "'%s', özel bir yazmaç değil" -#: cobc/error.c:1093 +#: cobc/error.c:1200 #, c-format msgid "'%s' internally defined" msgstr "'%s', içsel olarak tanımlanmış" -#: cobc/error.c:1097 cobc/parser.y:18176 cobc/parser.y:18181 -#: cobc/typeck.c:5000 cobc/typeck.c:5047 cobc/typeck.c:5048 +#: cobc/error.c:1204 cobc/parser.y:18772 cobc/parser.y:18777 cobc/typeck.c:5166 +#: cobc/typeck.c:5213 cobc/typeck.c:5214 #, c-format msgid "'%s' defined here" msgstr "'%s', burada tanımlanmış" -#: cobc/error.c:1108 +#: cobc/error.c:1215 #, c-format msgid "fatal error: %s" msgstr "onulmaz hata: %s" -#: cobc/error.c:1117 +#: cobc/error.c:1224 #, c-format msgid "group item '%s' cannot have %s clause" msgstr "'%s' grup ögesinin %s yantümcesi olamaz" -#: cobc/error.c:1132 +#: cobc/error.c:1239 #, c-format msgid "constant item '%s' requires a %s clause" msgstr "'%s' sabit ögesi, bir %s yantümcesi gerektiriyor" -#: cobc/error.c:1136 +#: cobc/error.c:1243 #, c-format msgid "level %02d item '%s' requires a %s clause" msgstr "%02d ögesi '%s', bir %s yantümcesi gerektiriyor" -#: cobc/error.c:1151 +#: cobc/error.c:1258 #, c-format msgid "constant item '%s' can only have a %s clause" msgstr "'%s' sabit ögesinin yalnızca bir %s yantümcesi olabilir" -#: cobc/error.c:1155 +#: cobc/error.c:1262 #, c-format msgid "level %02d item '%s' can only have a %s clause" msgstr "%02d düzeyi '%s' ögesinin yalnızca bir %s yantümcesi olabilir" -#: cobc/field.c:136 +#: cobc/field.c:139 msgid "constant expression has Divide by ZERO" msgstr "sabit ifadede Divide by ZERO var" -#: cobc/field.c:192 cobc/field.c:329 cobc/field.c:337 +#: cobc/field.c:195 cobc/field.c:332 cobc/field.c:340 msgid "missing right parenthesis" msgstr "sağ ayraç eksik" -#: cobc/field.c:221 +#: cobc/field.c:224 #, c-format msgid "expression stack overflow at %d entries for operation '%c'" msgstr "'%2$c' operasyonu için %1$d girdide ifade yığın taşması" -#: cobc/field.c:262 +#: cobc/field.c:265 #, c-format msgid "expression stack overflow at %d entries" msgstr "%d girdide ifade yığın taşması" -#: cobc/field.c:279 +#: cobc/field.c:282 msgid "missing left parenthesis" msgstr "sol ayraç eksik" -#: cobc/field.c:320 +#: cobc/field.c:323 #, c-format msgid "invalid operator '%s' in expression" msgstr "ifadede geçersiz işleç '%s'" -#: cobc/field.c:339 +#: cobc/field.c:342 #, c-format msgid "'%c' operator misplaced" msgstr "'%c' işleci yanlış yere konulmuş" -#: cobc/field.c:400 +#: cobc/field.c:403 #, c-format msgid "invalid level number '%s'" msgstr "geçersiz düzey numarası '%s'" -#: cobc/field.c:460 cobc/field.c:498 +#: cobc/field.c:463 cobc/field.c:502 msgid "level number must begin with 01 or 77" msgstr "düzey numarası, 01 veya 77 ile başlamalı" -#: cobc/field.c:558 cobc/field.c:562 +#: cobc/field.c:562 cobc/field.c:566 #, c-format msgid "no previous data item of level %02d" msgstr "%02d düzeyinin önceki veri ögesi yok" -#: cobc/field.c:620 +#: cobc/field.c:631 #, c-format msgid "'%s' cannot be qualified here" msgstr "'%s', buraya gelemez" -#: cobc/field.c:626 +#: cobc/field.c:637 #, c-format msgid "'%s' cannot be subscripted here" msgstr "'%s', buraya altsimgelenemez" -#: cobc/field.c:642 cobc/field.c:653 +#: cobc/field.c:653 cobc/field.c:664 #, c-format msgid "'%s' is not defined in '%s'" msgstr "'%s', '%s' içinde tanımlı değil" -#: cobc/field.c:660 +#: cobc/field.c:671 msgid "level number of REDEFINES entries must be identical" msgstr "REDEFINES girdilerinin düzey numarası eşdeğer olmalı" -#: cobc/field.c:665 +#: cobc/field.c:676 #, c-format msgid "'%s' is not the original definition" msgstr "'%s', özgün tanım değil" -#: cobc/field.c:826 cobc/parser.y:659 +#: cobc/field.c:720 cobc/parser.y:1051 +#, c-format +msgid "duplicate %s" +msgstr "" + +#: cobc/field.c:878 cobc/parser.y:733 #, c-format msgid "duplicate %s clause" msgstr "yinelenmiş %s yantümcesi" -#: cobc/field.c:906 +#: cobc/field.c:988 #, c-format msgid "%s clause not compatible with PIC %s" msgstr "%s yantümcesi, PIC %s ile uyumlu değil" -#: cobc/field.c:917 cobc/field.c:953 +#: cobc/field.c:999 cobc/field.c:1036 #, c-format msgid "%s clause not compatible with USAGE %s" msgstr "%s yantümcesi, USAGE %s ile uyumlu değil" -#: cobc/field.c:1053 cobc/field.c:1069 cobc/field.c:1131 cobc/field.c:1142 +#: cobc/field.c:1140 cobc/field.c:1159 cobc/field.c:1227 cobc/field.c:1238 #, c-format msgid "PICTURE clause required for '%s'" msgstr "'%s' için PICTURE yantümcesi gerekiyor" -#: cobc/field.c:1138 +#: cobc/field.c:1234 #, c-format msgid "a non-numeric literal is expected for '%s'" msgstr "'%s' için bir sayı olmayan düz veri bekleniyor" -#: cobc/field.c:1150 +#: cobc/field.c:1247 #, c-format msgid "defining implicit picture size %d for '%s'" msgstr "şunun için dolaylı resim boyutu %d tanımlanıyor: '%s'" -#: cobc/field.c:1171 +#: cobc/field.c:1271 #, c-format msgid "'%s' ANY LENGTH only allowed in LINKAGE" msgstr "'%s' ANY LENGTH'e yalnızca LINKAGE içinde izin veriliyor" -#: cobc/field.c:1175 +#: cobc/field.c:1275 #, c-format msgid "'%s' ANY LENGTH must be 01 level" msgstr "'%s' ANY LENGTH, 01 düzeyi olmalı" -#: cobc/field.c:1179 +#: cobc/field.c:1279 #, c-format msgid "'%s' ANY LENGTH cannot be BASED/EXTERNAL" msgstr "'%s' ANY LENGTH, BASED/EXTERNAL olamaz" -#: cobc/field.c:1184 cobc/field.c:1210 +#: cobc/field.c:1283 cobc/field.c:1313 #, c-format msgid "'%s' ANY LENGTH has invalid definition" msgstr "'%s' ANY LENGTH'te geçersiz tanım var" -#: cobc/field.c:1192 +#: cobc/field.c:1295 #, c-format msgid "'%s' ANY NUMERIC must be PIC 9" msgstr "'%s' ANY NUMERIC, PIC 9 olmalı" -#: cobc/field.c:1198 -#, c-format -msgid "'%s' ANY LENGTH must be PIC X, PIC N or PIC 1" +#: cobc/field.c:1301 +#, fuzzy, c-format +#| msgid "'%s' ANY LENGTH must be PIC X, PIC N or PIC 1" +msgid "'%s' ANY LENGTH must be PIC X, PIC U, PIC N or PIC 1" msgstr "'%s' ANY LENGTH; PIC X, PIC N veya PIC 1 olmalı" -#: cobc/field.c:1208 +#: cobc/field.c:1311 #, c-format msgid "'%s' ANY NUMERIC has invalid definition" msgstr "'%s' ANY NUMERIC'te geçersiz tanım var" -#: cobc/field.c:1224 +#: cobc/field.c:1327 #, c-format msgid "'%s' EXTERNAL must be specified at 01/77 level" msgstr "'%s' EXTERNAL, 01/77 düzeyinde belirtilmeli" -#: cobc/field.c:1228 +#: cobc/field.c:1331 #, c-format msgid "'%s' EXTERNAL can only be specified in WORKING-STORAGE section" msgstr "'%s' EXTERNAL, yalnızca WORKİNG-STORAGE bölümünde belirtilebilir" -#: cobc/field.c:1232 +#: cobc/field.c:1335 #, c-format msgid "'%s' EXTERNAL and BASED are mutually exclusive" msgstr "'%s' EXTERNAL ve BASED birlikte kullanılamaz" -#: cobc/field.c:1235 +#: cobc/field.c:1338 #, c-format msgid "'%s' EXTERNAL not allowed with REDEFINES" msgstr "'%s' EXTERNAL'a REDEFINES ile birlikte izin verilmiyor" -#: cobc/field.c:1247 +#: cobc/field.c:1350 #, c-format msgid "'%s' BASED not allowed here" msgstr "'%s' BASED'e burada izin verilmiyor" -#: cobc/field.c:1250 +#: cobc/field.c:1353 #, c-format msgid "'%s' BASED not allowed with REDEFINES" msgstr "'%s' BASED'e REDEFINES ile birlikte izin verilmiyor" -#: cobc/field.c:1253 +#: cobc/field.c:1356 #, c-format msgid "'%s' BASED only allowed at the 01 and 77 levels" msgstr "'%s' BASED'e yalnızca 01 ve 77 düzeylerinde izin veriliyor" -#: cobc/field.c:1279 +#: cobc/field.c:1383 #, c-format msgid "'%s' cannot have an OCCURS clause due to '%s'" msgstr "'%s', '%s' dolayısıyla bir OCCURS yantümcesi alamaz" -#: cobc/field.c:1298 +#: cobc/field.c:1402 #, fuzzy, c-format #| msgid "the original definition '%s' should not have OCCURS clause" msgid "the original definition '%s' should not have an OCCURS clause" msgstr "özgün '%s' tanımında OCCURS yantümcesi olmamalı" -#: cobc/field.c:1305 +#: cobc/field.c:1408 +#, fuzzy, c-format +#| msgid "the original definition '%s' should not have OCCURS clause" +msgid "the original definition '%s' should not have an ANY LENGTH clause" +msgstr "özgün '%s' tanımında OCCURS yantümcesi olmamalı" + +#: cobc/field.c:1415 msgid "REDEFINES must follow the original definition" msgstr "REDEFINES, özgün tanımı izlemeli" -#: cobc/field.c:1313 +#: cobc/field.c:1423 #, c-format msgid "'%s' cannot be variable length" msgstr "'%s', değişkin uzunluğu olamaz" -#: cobc/field.c:1316 +#: cobc/field.c:1426 #, c-format msgid "the original definition '%s' cannot be variable length" msgstr "özgün '%s' tanımı, değişken uzunluğu olamaz" -#: cobc/field.c:1335 +#: cobc/field.c:1445 cobc/field.c:1708 #, c-format msgid "'%s' cannot have JUSTIFIED RIGHT clause" msgstr "'%s', JUSTIFIED RIGHT yantümcesi alamaz" -#: cobc/field.c:1342 +#: cobc/field.c:1453 #, fuzzy, c-format #| msgid "cannot have BLANK WHEN ZERO without PIC" msgid "'%s' cannot have BLANK WHEN ZERO clause" msgstr "PIC olmadan BLANK WHEN ZERO olamaz" -#: cobc/field.c:1348 +#: cobc/field.c:1460 #, c-format msgid "SCREEN group item '%s' has invalid clause" msgstr "SCREEN grup ögesi '%s' içinde geçersiz yantümce var" -#: cobc/field.c:1436 +#: cobc/field.c:1548 #, c-format msgid "%s USAGE %s incompatible with %s USAGE %s" msgstr "%s USAGE %s, %s USAGE %s ile uyumsuz" -#: cobc/field.c:1516 +#: cobc/field.c:1629 #, c-format msgid "'%s' cannot have PICTURE clause" msgstr "'%s', PICTURE yantümcesi alamaz" -#: cobc/field.c:1533 -#, c-format -msgid "%s item '%s' should be USAGE DISPLAY" -msgstr "%s ögesi '%s', USAGE DISPLAY olmalı" - -#: cobc/field.c:1556 +#: cobc/field.c:1662 #, c-format msgid "'%s' COMP-6 with sign - changing to COMP-3" msgstr "'%s', işaretli COMP-6 - COMP-3 olarak değiştiriliyor" -#: cobc/field.c:1582 +#: cobc/field.c:1688 msgid "elementary items with SIGN clause must have S in PICTURE" msgstr "SIGN yantümceli temel ögelerde PICTURE içinde S olmalı" -#: cobc/field.c:1585 +#: cobc/field.c:1691 msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgstr "SIGN yantümceli temel ögeler USAGE DISPLAY veya NATIONAL olmalı" -#: cobc/field.c:1602 -#, c-format -msgid "'%s' cannot have JUSTIFIED RIGHT" -msgstr "'%s', JUSTIFIED RIGHT alamaz" - -#: cobc/field.c:1614 +#: cobc/field.c:1720 #, c-format msgid "'%s' cannot have S in PICTURE string and BLANK WHEN ZERO" msgstr "'%s', PICTURE dizisinde S ve BLANK WHEN ZERO alamaz" -#: cobc/field.c:1619 +#: cobc/field.c:1725 #, c-format msgid "'%s' cannot have BLANK WHEN ZERO without being USAGE DISPLAY or NATIONAL" msgstr "'%s', USAGE DISPLAY veya NATIONAL olmadan BLANK WHEN ZERO alamaz" -#: cobc/field.c:1631 +#: cobc/field.c:1737 #, c-format msgid "'%s' cannot have * in PICTURE string and BLANK WHEN ZERO" msgstr "'%s', PICTURE dizisinde * ve BLANK WHEN ZERO alamaz" -#: cobc/field.c:1638 +#: cobc/field.c:1744 #, c-format msgid "'%s' is not numeric, so cannot have BLANK WHEN ZERO" msgstr "'%s' sayısal değil, dolayısıyla BLANK WHEN ZERO alamaz" -#: cobc/field.c:1691 +#: cobc/field.c:1798 #, c-format msgid "elements in VALUE clause for '%s' (%d) exceed max amount (%d)" msgstr "'%s' için VALUE yantümcesindeki ögeler (%d) en büyük tutarı aşıyor (%d)" -#: cobc/field.c:1708 cobc/field.c:1712 +#: cobc/field.c:1822 +msgid "unexpected VALUES ARE for elementary item" +msgstr "" + +#: cobc/field.c:1836 cobc/field.c:1840 #, c-format msgid "initial VALUE clause ignored for %s item '%s'" msgstr "%s ögesi '%s' için başlangıç VALUE yantümcesi yok sayıldı" -#: cobc/field.c:1725 +#: cobc/field.c:1853 msgid "FULL has no effect on numeric items; you may want REQUIRED or PIC Z" msgstr "sayısal ögelerde FULL'un bir etkisi yoktur; REQUIRED veya PIC 2 gerek" -#: cobc/field.c:1755 +#: cobc/field.c:1884 msgid "VALUE may not contain a figurative constant" msgstr "VALUE, temsili bir sabit içeremez" -#: cobc/field.c:1763 -msgid "cannot specify both FULL and JUSTIFIED" -msgstr "hem FULL hem JUSTIFIED belirtilemez" +#: cobc/field.c:1893 cobc/field.c:1935 cobc/parser.y:750 cobc/parser.y:1823 +#: cobc/parser.y:1826 +#, c-format +msgid "cannot specify both %s and %s" +msgstr "" -#: cobc/field.c:1775 +#: cobc/field.c:1905 #, c-format msgid "'%s' has FROM, TO or USING without PIC; PIC will be implied" msgstr "'%s'; PIC olmadan FROM, TO VEYA USING almış; PIC ima edilecek" -#: cobc/field.c:1792 +#: cobc/field.c:1922 #, c-format msgid "'%s' has numeric VALUE without PIC; PIC will be implied" msgstr "'%s', PIC olmadan sayısal VALUE almış; PIC ima edilecek" -#: cobc/field.c:1805 -msgid "cannot specify both PIC and VALUE" -msgstr "hem PIC hem VALUE belirtilemez" - -#: cobc/field.c:1813 +#: cobc/field.c:1943 msgid "cannot have PIC without FROM, TO or USING" msgstr "FROM, TO veya USING olmadan PIC alınamaz" -#: cobc/field.c:1822 +#: cobc/field.c:1952 msgid "cannot have numeric VALUE without PIC" msgstr "PIC olmadan sayısal VALUE alınamaz" -#: cobc/field.c:1831 +#: cobc/field.c:1961 msgid "cannot have FROM, TO or USING without PIC" msgstr "PIC olmadan FROM, TO veya USING alınamaz" -#: cobc/field.c:1841 +#: cobc/field.c:1971 msgid "VALUE item may not be numeric" msgstr "VALUE ögesi sayısal olmayabilir" -#: cobc/field.c:1856 +#: cobc/field.c:1986 #, c-format msgid "'%s' needs a PIC, COL, LINE, VALUE, BELL or BLANK clause" msgstr "'%s' için bir PIC, COL, LINE, VALUE, BELL veya BLANK yantümcesi gerek" -#: cobc/field.c:1868 +#: cobc/field.c:1998 #, c-format msgid "'%s' cannot have PIC without FROM, TO, USING or numeric VALUE" msgstr "'%s'; FROM, TO, USING veya sayısal VALUE olmadan PIC alamaz" -#: cobc/field.c:1876 +#: cobc/field.c:2006 #, c-format msgid "'%s' needs a PIC, FROM, TO, USING, VALUE, BELL, BLANK or ERASE clause" msgstr "'%s' için bir PIC, FROM, TO, USING, VALUE, BELL, BLANK veya ERASE yantümcesi gerek" -#: cobc/field.c:1912 +#: cobc/field.c:2042 msgid "cannot use AUTO, FULL, PROMPT, REQUIRED or SECURE on elementary item without TO or USING" msgstr "TO veya USING olmadan temel öge üzerinde AUTO, FULL, PROMPT, REQUIRED veya SECURE kullanılamaz" -#: cobc/field.c:1919 +#: cobc/field.c:2049 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED, OCCURS or SIGN on item without FROM, TO or USING" msgstr "FROM, TO veya USING olmadan öge üzerinde BLANK WHEN ZERO, JUSTIFIED, OCCURS veya SIGN kullanılamaz" -#: cobc/field.c:1938 +#: cobc/field.c:2068 msgid "cannot use AUTO, FULL, REQUIRED or SECURE on elementary item without FROM, TO or USING" msgstr "FROM, TO veya USING olmadan temel öge üzerinde AUTO, FULL, REQUIRED veya SECURE kullanılamaz" -#: cobc/field.c:1943 +#: cobc/field.c:2073 msgid "cannot use BLANK WHEN ZERO, JUSTIFIED or SIGN without FROM, TO or USING" msgstr "FROM, TO veya USING olmadan BLANK WHEN ZERO, JUSTIFIED veya SIGN kullanılamaz" -#: cobc/field.c:1960 +#: cobc/field.c:2090 msgid "cannot have BLANK WHEN ZERO without PIC" msgstr "PIC olmadan BLANK WHEN ZERO olamaz" -#: cobc/field.c:1963 +#: cobc/field.c:2093 msgid "cannot have JUSTIFIED without PIC" msgstr "PIC olmadan JUSTIFIED olamaz" -#: cobc/field.c:1983 +#: cobc/field.c:2113 msgid "cannot have AUTO without FROM, TO or USING" msgstr "FROM, TO veya USING olmadan AUTO olamaz" -#: cobc/field.c:1988 +#: cobc/field.c:2118 msgid "cannot use FULL or REQUIRED on item without TO or USING" msgstr "TO veya USING olmadan öge üzerinde FULL veya REQUIRED kullanılamaz" -#: cobc/field.c:1995 +#: cobc/field.c:2125 msgid "SECURE can be used with TO only" msgstr "SECURE, yalnızca TO ile kullanılabilir" -#: cobc/field.c:1997 +#: cobc/field.c:2127 msgid "SECURE must be used with TO" msgstr "SECURE, TO ile kullanılmalıdır" -#: cobc/field.c:2016 +#: cobc/field.c:2146 #, c-format msgid "'%s' does nothing" msgstr "'%s', bir şey yapmaz" -#: cobc/field.c:2235 +#: cobc/field.c:2361 #, c-format msgid "'%s' 77 level is not allowed here" msgstr "'%s' düzey 77'ye burada izin verilmiyor" -#: cobc/field.c:2627 +#: cobc/field.c:2399 msgid "OCCURS and multi COLUMNs is not allowed" msgstr "OCCURS veya birden çok COLUMN'lara izin verilmiyor" -#: cobc/field.c:2655 +#: cobc/field.c:2419 #, c-format msgid "duplicate LINE %d ignored" msgstr "yinelenmiş LINE %d yok sayıldı" -#: cobc/field.c:2672 +#: cobc/field.c:2870 #, c-format msgid "ignoring SYNCHRONIZED for group item '%s'" msgstr "'%s' grup ögesi için SYNCHRONIZED yok sayılıyor" -#: cobc/field.c:2686 cobc/field.c:2954 +#: cobc/field.c:2884 cobc/field.c:3219 msgid "larger REDEFINES" msgstr "daha büyük REDEFINES" -#: cobc/field.c:2699 cobc/field.c:2957 cobc/field.c:2962 +#: cobc/field.c:2898 cobc/field.c:3222 cobc/field.c:3227 #, c-format msgid "size of '%s' larger than size of '%s'" msgstr "'%s' boyutu, '%s' boyutundan daha büyük" -#: cobc/field.c:2812 cobc/field.c:2879 +#: cobc/field.c:3045 cobc/field.c:3129 cobc/parser.y:832 #, c-format msgid "'%s' cannot be larger than %d bytes" msgstr "'%s', %d bayttan daha büyük olamaz" -#: cobc/field.c:2850 cobc/field.c:2858 +#: cobc/field.c:3086 cobc/field.c:3094 #, c-format msgid "'%s' binary field cannot be larger than %d digits" msgstr "'%s' ikili alanı, %d basamaktan daha büyük olamaz" -#: cobc/field.c:2940 cobc/field.c:3522 -#, c-format -msgid "unexpected USAGE: %d" -msgstr "beklenmedik USAGE: %d" - -#: cobc/field.c:3067 cobc/parser.y:710 cobc/parser.y:712 cobc/parser.y:6274 -#: cobc/parser.y:6284 cobc/parser.y:7344 cobc/parser.y:7347 cobc/parser.y:7349 -#: cobc/parser.y:7351 cobc/parser.y:7386 cobc/parser.y:8237 cobc/parser.y:8239 -#: cobc/parser.y:8241 cobc/parser.y:8243 cobc/parser.y:8558 cobc/parser.y:8567 -#: cobc/parser.y:10564 cobc/parser.y:12075 cobc/parser.y:13492 -#: cobc/parser.y:14902 cobc/typeck.c:5034 +#: cobc/field.c:3353 cobc/parser.y:791 cobc/parser.y:793 cobc/parser.y:6529 +#: cobc/parser.y:6539 cobc/parser.y:7625 cobc/parser.y:7628 cobc/parser.y:7630 +#: cobc/parser.y:7632 cobc/parser.y:7667 cobc/parser.y:8610 cobc/parser.y:8612 +#: cobc/parser.y:8614 cobc/parser.y:8616 cobc/parser.y:8958 cobc/parser.y:8967 +#: cobc/parser.y:10897 cobc/parser.y:12460 cobc/parser.y:13920 +#: cobc/parser.y:15390 cobc/typeck.c:5200 #, c-format msgid "%s and %s are mutually exclusive" msgstr "%s ve %s birlikte kullanılamaz" -#: cobc/field.c:3068 cobc/parser.y:7529 cobc/parser.y:7566 +#: cobc/field.c:3354 cobc/parser.y:7810 cobc/parser.y:7847 msgid "variable-length PICTURE" msgstr "değişken uzunluklu PICTURE" -#: cobc/field.c:3187 +#: cobc/field.c:3475 msgid "literal type does not match numeric data type" msgstr "düz veri türü, nümerik veri türüyle eşleşmiyor" -#: cobc/field.c:3261 +#: cobc/field.c:3549 #, c-format msgid "THRU item '%s' may not come before '%s'" msgstr "THRU ögesi '%s', '%s' öncesinde gelemez" -#: cobc/field.c:3284 +#: cobc/field.c:3572 #, c-format msgid "RENAMES cannot start/end at the OCCURS item '%s'" msgstr "RENAMES, OCCURS ögesi '%s' konumunda başlayamaz/bitemez" -#: cobc/field.c:3292 +#: cobc/field.c:3580 #, c-format msgid "cannot use RENAMES on part of the table '%s'" msgstr "'%s' tablosunun bir kısmında RENAMES kullanılamaz" -#: cobc/field.c:3330 +#: cobc/field.c:3618 #, c-format msgid "RENAMES may not contain '%s' as it is a pointer or object reference" msgstr "RENAMES, bir işaretçi veya nesne başvurusu olmadığından '%s' içeremez" -#: cobc/field.c:3335 +#: cobc/field.c:3623 #, c-format msgid "RENAMES may not contain '%s' as it is an OCCURS DEPENDING table" msgstr "RENAMES, bir OCCURS DEPENDING tablosu olduğundan '%s' içeremez" -#: cobc/field.c:3359 +#: cobc/field.c:3647 msgid "RENAMES may not reference a level 88" msgstr "RENAMES, bir düzey 88'e başvuramaz" -#: cobc/field.c:3383 +#: cobc/field.c:3671 #, c-format msgid "'%s' must immediately follow the record '%s'" msgstr "'%s', derhal '%s' kaydını izlemeli" -#: cobc/field.c:3391 +#: cobc/field.c:3679 #, c-format msgid "THRU item must be different to '%s'" msgstr "THRU ögesi, '%s' ögesinden farklı olmalı" -#: cobc/field.c:3397 +#: cobc/field.c:3685 #, c-format msgid "'%s' and '%s' must be in the same record" msgstr "'%s' ve '%s' aynı kayıtta olmalı" -#: cobc/field.c:3408 +#: cobc/field.c:3696 #, c-format msgid "THRU item '%s' may not be subordinate to '%s'" msgstr "THRU ögesi '%s', '%s' astı olamaz" @@ -1828,19 +1862,7 @@ msgstr "" " FUNCTION anahtar sözcüğü olmadan kullanılacak\n" " yapıiçiler" -#: cobc/flag.def:78 -msgid "" -" -fec=<exception-name>\tenable code generation for <exception-name>,\n" -" sets -fsource-location" -msgstr "" -" -fec=<istisna-adı> <istisna-adı> için kod üretimini etkinleştir,\n" -" -fsource-location ayarlar" - -#: cobc/flag.def:81 cobc/help.c:96 -msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" -msgstr " -fno-ec=<istisna-adı>\t<istisna-adı> için kod üretimini kapat" - -#: cobc/flag.def:84 +#: cobc/flag.def:85 msgid "" " -fdump=<scope> dump data fields on abort, <scope> may be\n" " a combination of: ALL, WS, LS, RD, FD, SC, LO" @@ -1849,16 +1871,21 @@ msgstr "" " bir kombinasyonu olabilir: ALL, WS, LS, RD, FD,\n" " SC, LO" -#: cobc/flag.def:87 +#: cobc/flag.def:88 +#, fuzzy +#| msgid "" +#| " -fno-dump=<scope> exclude data fields from dumping on abort, <scope> may\n" +#| " be a combination of: ALL, WS, LS, RD, FD, SC, LO" msgid "" " -fno-dump=<scope> exclude data fields from dumping on abort, <scope> may\n" -" be a combination of: ALL, WS, LS, RD, FD, SC, LO" +" be a combination of: ALL, WS, LS, RD, FD, SC, LO\n" +" default if no scope specified: ALL" msgstr "" " -fno-dump=<kapsam> iptalde veri alanlarını dökmeyi dışarıda tut;\n" " <kapsam>, şunların bir kombinasyonu olabilir:\n" " ALL, WS, LS, RD, FD, SC, LO" -#: cobc/flag.def:92 +#: cobc/flag.def:94 msgid "" " -fcallfh=<name> specifies <name> to be used for I/O\n" " as external provided EXTFH interface module" @@ -1866,16 +1893,25 @@ msgstr "" " -fcallfh=<ad> <ad>'ın, G-Ç için bir dışarıdan sağlanmış EXTFH\n" " arayüz modülü olarak kullanılacağını belirtir" -#: cobc/flag.def:96 +#: cobc/flag.def:98 msgid "" -" -febcdic-table=[DEFAULT|RESTRICTED-GC|IBM|GCOS]\tdefine EBCDIC translation table:\n" -" * default: translation to extended ASCII as per MF\n" -" * restricted-gc: translation from restricted ASCII only\n" -" * ibm: translation to restricted ASCII as per IBM\n" -" * gcos: translation to extended ASCII as per GCOS7" +" -febcdic-table=<cconv-table>/<file>\tEBCDIC/ASCII translation table\n" +" * e.g. default, ebcdic500_latin1..." msgstr "" -#: cobc/flag.def:107 +#: cobc/flag.def:102 +#, fuzzy +#| msgid "" +#| " -fsign=[ASCII|EBCDIC]\tdefine display sign representation\n" +#| " * default: machine native" +msgid "" +" -fdefault-colseq=[ASCII|EBCDIC|NATIVE]\tdefine default collating sequence\n" +" * default: NATIVE" +msgstr "" +" -fsign=[ASCII|EBCDIC] ekran imza temsilini tanımla\n" +" * öntanımlı: makine ayarı" + +#: cobc/flag.def:110 msgid "" " -fwinmain generate WinMain instead of main when compiling\n" " as executable" @@ -1883,43 +1919,47 @@ msgstr "" " -fwinmain yürütülebilir olarak derlerken, main yerine\n" " WinMain üret" -#: cobc/flag.def:111 +#: cobc/flag.def:114 #, fuzzy #| msgid "-fcomputed-goto generate computed goto C statements" msgid " -fcomputed-goto generate computed goto C statements" msgstr "-fcomputed-goto hesaplanmış C goto ifadeleri üret" -#: cobc/flag.def:114 +#: cobc/flag.def:117 #, fuzzy #| msgid "-fextra-brace generate extra braces in C source" msgid " -fextra-brace generate extra braces in C source" msgstr "-fextra-brace C kaynağında ek ayraçlar üret" -#: cobc/flag.def:117 +#: cobc/flag.def:120 #, fuzzy #| msgid "-fcorrect-numeric attempt correction of invalid numeric display items" msgid " -fcorrect-numeric attempt correction of invalid numeric display items" msgstr "-fcorrect-numeric geçersiz nümerik ekran ögelerini düzeltmeye çalış" -#: cobc/flag.def:120 +#: cobc/flag.def:123 #, fuzzy #| msgid "-fstack-on-heap PERFORM stack allocated on heap" msgid " -fstack-on-heap PERFORM stack allocated on heap" msgstr "-fstack-on-heap alt yığın üzerinde ayrılmış yığın PERFORM yap" -#: cobc/flag.def:123 +#: cobc/flag.def:126 #, fuzzy #| msgid "" #| " -fstack-check PERFORM stack checking\n" #| " * turned on by -debug or -g" msgid "" " -fstack-extended store origin of entrypoints and PERFORM\n" -" * turned on by -debug/-dump" +" * turned on by --debug/-fdump" msgstr "" " -fstack-check yığın denetimini PERFORM yap\n" " * -debug veya -g ile açılır" -#: cobc/flag.def:128 +#: cobc/flag.def:130 +msgid " -fno-fast-compare disables inline comparisions" +msgstr "" + +#: cobc/flag.def:135 msgid "" " -fno-remove-unreachable\tdisable remove of unreachable code\n" " * turned off by -g" @@ -1927,7 +1967,7 @@ msgstr "" " -fno-remove-unreachable erişilemeyen kodun kaldırılmasını devre dışı bırak\n" " * -g ile kapatılır" -#: cobc/flag.def:132 +#: cobc/flag.def:139 msgid "" " -ftrace generate trace code\n" " * scope: executed SECTION/PARAGRAPH" @@ -1935,7 +1975,7 @@ msgstr "" " -ftrace iz kodu üret\n" " * kapsam: yürütülmüş SECTION/PARAGRAPH" -#: cobc/flag.def:136 +#: cobc/flag.def:143 msgid "" " -ftraceall generate trace code\n" " * scope: executed SECTION/PARAGRAPH/STATEMENTS" @@ -1943,13 +1983,13 @@ msgstr "" " -ftraceall iz kodu üret\n" " * kapsam: yürütülmüş SECTION/PARAGRAPH/STATEMENTS" -#: cobc/flag.def:140 +#: cobc/flag.def:147 #, fuzzy #| msgid "-fsyntax-only syntax error checking only; don't emit any output" msgid " -fsyntax-only syntax error checking only; don't emit any output" msgstr "-fsyntax-only yalnızca sözdizim hata denetimi; çıktı yayma" -#: cobc/flag.def:143 +#: cobc/flag.def:150 msgid "" " -fdebugging-line enable debugging lines\n" " * 'D' in indicator column or floating >>D" @@ -1957,25 +1997,25 @@ msgstr "" " -fdebugging-line hata ayıklama satırlarını etkinleştir\n" " * gösterge sütununda 'D' veya yüzen >>D" -#: cobc/flag.def:147 +#: cobc/flag.def:154 #, fuzzy #| msgid "" #| " -fsource-location generate source location code\n" #| " * turned on by -debug/-g/-ftraceall/-fec" msgid "" " -fsource-location generate source location code\n" -" * turned on by -debug/-ftraceall/-fec/-dump" +" * turned on by --debug/-ftraceall/-fec/-fdump" msgstr "" " -fsource-location kaynak konumlama kodu üret\n" " * -debug/-g/-ftraceall/-fec ile açılır" -#: cobc/flag.def:151 +#: cobc/flag.def:158 #, fuzzy #| msgid "-fimplicit-init automatic initialization of the COBOL runtime system" msgid " -fimplicit-init automatic initialization of the COBOL runtime system" msgstr "-fimplicit-init COBOL çalışma zamanının otomatik ilklendirmesi" -#: cobc/flag.def:154 +#: cobc/flag.def:161 msgid "" " -fno-recursive-check disable check of recursive program call;\n" " effectively compiling as RECURSIVE program" @@ -1983,27 +2023,34 @@ msgstr "" " -fno-recursive-check özyineli program çağrısı denetimini devre dışı\n" " bırak, RECURSIVE program olarak derler" -#: cobc/flag.def:158 +#: cobc/flag.def:165 #, fuzzy #| msgid "" #| " -fstack-check PERFORM stack checking\n" #| " * turned on by -debug or -g" msgid "" " -fstack-check PERFORM stack checking\n" -" * turned on by -debug/-g" +" * turned on by --debug/-g" msgstr "" " -fstack-check yığın denetimini PERFORM yap\n" " * -debug veya -g ile açılır" -#: cobc/flag.def:162 +#: cobc/flag.def:169 +msgid "" +" -fmemory-check=<scope> checks for invalid writes to internal storage,\n" +" <scope> may be one of: all, pointer, using, none\n" +" * default: none, set to all by --debug" +msgstr "" + +#: cobc/flag.def:174 msgid " -fsection-exit-check check that code execution does not leave the scope of SECTIONs" msgstr "" -#: cobc/flag.def:165 +#: cobc/flag.def:177 msgid " -fimplicit-goback-check\tcheck that code execution does not end implicit at end of PROCEDURE DIVISION" msgstr "" -#: cobc/flag.def:168 +#: cobc/flag.def:180 msgid "" " -fwrite-after use AFTER 1 for WRITE of LINE SEQUENTIAL\n" " * default: BEFORE 1" @@ -2011,15 +2058,19 @@ msgstr "" " -fwrite-after LINE SEQUENTIAL'ın WRITE'ı için AFTER 1 kullan\n" " * öntanımlı: BEFORE 1" -#: cobc/flag.def:172 +#: cobc/flag.def:184 +#, fuzzy +#| msgid "" +#| " -fmfcomment '*' or '/' in column 1 treated as comment\n" +#| " * FIXED format only" msgid "" -" -fmfcomment '*' or '/' in column 1 treated as comment\n" -" * FIXED format only" +" -fmfcomment '*' in column 1 treated as comment with listing suppression\n" +" * FIXED/COBOL85/VARIABLE format only" msgstr "" " -fmfcomment 1. sütundaki '*' veya '/', yorum olarak derlenir\n" " * yalnızca FIXED biçim" -#: cobc/flag.def:176 +#: cobc/flag.def:188 msgid "" " -facucomment '$' in indicator area treated as '*',\n" " '|' treated as floating comment" @@ -2027,7 +2078,7 @@ msgstr "" " -facucomment gösterge alanındaki '$', '*' olarak,\n" " '|' ise yüzen yorum olarak derlenir" -#: cobc/flag.def:181 +#: cobc/flag.def:193 #, fuzzy #| msgid "" #| " -fnotrunc allow numeric field overflow\n" @@ -2039,7 +2090,7 @@ msgstr "" " -fnotrunc nümerik alan taşmasına izin ver\n" " * ANSI dışı davranış" -#: cobc/flag.def:185 +#: cobc/flag.def:197 msgid "" " -fsingle-quote use a single quote (apostrophe) for QUOTE\n" " * default: double quote" @@ -2047,7 +2098,7 @@ msgstr "" " -fsingle-quote QUOTE için bir tek tırnak (kesme imi) kullan\n" " * öntanımlı: çift tırnak" -#: cobc/flag.def:195 +#: cobc/flag.def:207 msgid "" " -foptional-file treat all files as OPTIONAL\n" " * unless NOT OPTIONAL specified" @@ -2055,13 +2106,13 @@ msgstr "" " -foptional-file tüm dosyalara OPTIONAL olarak davran\n" " * NOT OPTIONAL belirtilmemişse" -#: cobc/flag.def:199 +#: cobc/flag.def:211 #, fuzzy #| msgid "-fstatic-call output static function calls for the CALL statement" msgid " -fstatic-call output static function calls for the CALL statement" msgstr "-fstatic-call CALL ifadesi için durgun işlev çağrıları çıktıla" -#: cobc/flag.def:202 +#: cobc/flag.def:214 #, fuzzy #| msgid "" #| " -fno-gen-c-decl-static-call\tdisable generation of C function declations\n" @@ -2074,15 +2125,19 @@ msgstr "" " durgun CALL içeren alt yordamlar için C işlev\n" " beyanları üretmeyi devre dışı bırak" -#: cobc/flag.def:206 +#: cobc/flag.def:218 +#, fuzzy +#| msgid "" +#| " -fgen-c-line-directives\tgenerate source location directives in C code;\n" +#| " * turned on by -g" msgid "" " -fgen-c-line-directives\tgenerate source location directives in C code;\n" -" * turned on by -g" +" * turned on by -g/--coverage" msgstr "" " -fgen-c-line-directives C kodunda kaynak konumu yönergeleri üret\n" " * -g ile açılır" -#: cobc/flag.def:210 +#: cobc/flag.def:222 msgid "" " -fgen-c-labels generate extra labels in C sources;\n" " * turned on by -g" @@ -2090,79 +2145,108 @@ msgstr "" " -fgen-c-labels C kaynaklarında ek etiketler üret\n" " * -g ile açılır" -#: cobc/flag.def:214 +#: cobc/flag.def:226 +#, fuzzy +#| msgid "" +#| " -fno-theaders suppress all headers and output of compilation\n" +#| " options from listing while keeping page breaks" msgid "" -" -fno-theaders suppress all headers and output of compilation\n" -" options from listing while keeping page breaks" +" -fno-theaders suppress all headers from listing while keeping\n" +" page breaks" msgstr "" " -fno-theaders tüm üstbilgiyi ve derleme seçeneklerinin\n" " çıktısını sustur; sayfa sonlarını tut" -#: cobc/flag.def:218 +#: cobc/flag.def:230 msgid " -fno-tsource suppress source from listing" msgstr "" -#: cobc/flag.def:221 +#: cobc/flag.def:233 msgid " -fno-tmessages suppress warning and error summary from listing" msgstr "" -#: cobc/flag.def:224 +#: cobc/flag.def:236 msgid " -ftsymbols specify symbols in listing" msgstr "" -#: cobc/flag.def:227 +#: cobc/flag.def:239 +msgid " -ftcmd specify command line in listing" +msgstr "" + +#: cobc/flag.def:242 +msgid " -fno-ttimestamp suppress timestamp in listing headers" +msgstr "" + +#: cobc/flag.def:245 +msgid "" +" -fttitle=<title> set listing title with '_' replaced by spaces;\n" +" defaults to package name and version" +msgstr "" + +#: cobc/flag.def:249 msgid "" " -fno-diagnostics-show-option\tsuppress output of option that directly\n" " controls the diagnostic" msgstr "" -#: cobc/help.c:32 +#: cobc/flag.def:253 +msgid " -fno-diagnostics-show-caret\tdo not display source context on warning/error diagnostic" +msgstr "" + +#: cobc/flag.def:256 +msgid " -fno-diagnostics-show-line-numbers\tsuppress display of line numbers in diagnostics" +msgstr "" + +#: cobc/help.c:33 msgid "GnuCOBOL compiler for most COBOL dialects with lots of extensions" msgstr "" -#: cobc/help.c:34 +#: cobc/help.c:35 #, c-format msgid "Usage: %s [options]... file..." msgstr "" -#: cobc/help.c:47 bin/cobcrun.c:143 +#: cobc/help.c:48 bin/cobcrun.c:143 #, c-format msgid "" "Report bugs to: %s\n" "or (preferably) use the issue tracker via the home page." msgstr "" -#: cobc/help.c:51 -msgid "GnuCOBOL home page: <https://www.gnu.org/software/gnucobol/>" -msgstr "" +#: cobc/help.c:52 bin/cobcrun.c:146 +#, fuzzy, c-format +#| msgid "GnuCOBOL module loader" +msgid "GnuCOBOL home page: <%s>" +msgstr "GnuCOBOL modülü yükleyici" -#: cobc/help.c:52 -msgid "General help using GNU software: <https://www.gnu.org/gethelp/>" -msgstr "" +#: cobc/help.c:54 bin/cobcrun.c:148 +#, c-format +msgid "General help using GNU software: <%s>" +msgstr "GNU yazılımları kullanımı için genel yardım: <%s>" -#: cobc/help.c:58 bin/cobcrun.c:125 +#: cobc/help.c:61 bin/cobcrun.c:125 msgid "Options:" msgstr "" -#: cobc/help.c:59 +#: cobc/help.c:62 #, fuzzy #| msgid " -h, -help display this help and exit" msgid " -h, --help display this help and exit" msgstr " -h, -help bu yardımı görüntüle ve çık" -#: cobc/help.c:60 +#: cobc/help.c:63 #, fuzzy #| msgid " -V, -version display cobcrun and runtime version and exit" msgid " -V, --version display compiler version information and exit" msgstr " -V, -version cobcrun ve çal. zam. sürümünü görüntüle ve çık" -#: cobc/help.c:61 +#: cobc/help.c:64 #, fuzzy #| msgid " -V, -version display cobcrun and runtime version and exit" msgid " -dumpversion display compiler version and exit" msgstr " -V, -version cobcrun ve çal. zam. sürümünü görüntüle ve çık" -#: cobc/help.c:62 +#: cobc/help.c:65 #, fuzzy #| msgid " -i, -info display runtime information (build/environment)" msgid "" @@ -2170,7 +2254,7 @@ msgid "" " and exit" msgstr " -i, -info çal. zam. bilgisi görüntüle (yapı/ortam)" -#: cobc/help.c:64 +#: cobc/help.c:67 msgid "" " -v, --verbose verbose mode, display additional information;\n" " multiple -v options increase the verbosity,\n" @@ -2181,29 +2265,29 @@ msgid "" " (3) pass verbose option to linker" msgstr "" -#: cobc/help.c:71 +#: cobc/help.c:74 #, fuzzy #| msgid " -q, -brief reduced displays" msgid " -q, --brief reduced displays, commands invoked not shown" msgstr " -q, -brief azaltılmış görüntülemeler" -#: cobc/help.c:72 +#: cobc/help.c:75 msgid " -### like -v but commands not executed" msgstr "" -#: cobc/help.c:73 +#: cobc/help.c:76 msgid " -x build an executable program" msgstr "" -#: cobc/help.c:74 +#: cobc/help.c:77 msgid " -m build a dynamically loadable module (default)" msgstr "" -#: cobc/help.c:75 +#: cobc/help.c:78 msgid " -j [<args>], --job[=<args>]\trun program after build, passing <args>" msgstr "" -#: cobc/help.c:76 +#: cobc/help.c:79 msgid "" " -std=<dialect> warnings/features for a specific dialect\n" " <dialect> can be one of:\n" @@ -2215,35 +2299,35 @@ msgid "" " see configuration files in directory config" msgstr "" -#: cobc/help.c:84 +#: cobc/help.c:87 msgid " -F, --free use free source format (alias for -fformat=free)" msgstr "" -#: cobc/help.c:85 +#: cobc/help.c:88 msgid "" " --fixed use fixed source format (default; alias for\n" " -fformat=fixed)" msgstr "" -#: cobc/help.c:87 +#: cobc/help.c:90 msgid " -O, -O2, -O3, -Os enable optimization" msgstr "" -#: cobc/help.c:88 +#: cobc/help.c:91 msgid " -O0 disable optimization" msgstr "" -#: cobc/help.c:89 +#: cobc/help.c:92 msgid " -g enable C compiler debug and stack check" msgstr "" -#: cobc/help.c:90 +#: cobc/help.c:93 msgid "" " -d, --debug enable all run-time error checking,\n" " equal to -fstack-check -fec=EC-ALL" msgstr "" -#: cobc/help.c:93 +#: cobc/help.c:97 #, fuzzy #| msgid "" #| " -fec=<exception-name>\tenable code generation for <exception-name>,\n" @@ -2256,80 +2340,76 @@ msgstr "" " -fec=<istisna-adı> <istisna-adı> için kod üretimini etkinleştir,\n" " -fsource-location ayarlar" -#: cobc/help.c:97 +#: cobc/help.c:100 +msgid " -fno-ec=<exception-name>\tdisable code generation for <exception-name>" +msgstr " -fno-ec=<istisna-adı>\t<istisna-adı> için kod üretimini kapat" + +#: cobc/help.c:101 msgid " -o <file> place the output into <file>" msgstr "" -#: cobc/help.c:98 +#: cobc/help.c:102 msgid "" " -b combine all input files into a single\n" " dynamically loadable module" msgstr "" -#: cobc/help.c:100 +#: cobc/help.c:104 msgid " -E preprocess only; do not compile or link" msgstr "" -#: cobc/help.c:101 +#: cobc/help.c:105 msgid " -C translation only; convert COBOL to C" msgstr "" -#: cobc/help.c:102 +#: cobc/help.c:106 msgid " -S compile only; output assembly file" msgstr "" -#: cobc/help.c:103 +#: cobc/help.c:107 msgid " -c compile and assemble, but do not link" msgstr "" -#: cobc/help.c:104 +#: cobc/help.c:108 msgid " -T <file> generate and place a wide program listing into <file>" msgstr "" -#: cobc/help.c:105 +#: cobc/help.c:109 msgid " -t <file> generate and place a program listing into <file>" msgstr "" -#: cobc/help.c:106 +#: cobc/help.c:110 msgid " --tlines=<lines> specify lines per page in listing, default = 55" msgstr "" -#: cobc/help.c:108 -msgid " --tsymbols specify symbols in listing, use -ftsymbols instead" -msgstr "" - -#: cobc/help.c:110 +#: cobc/help.c:111 msgid " -P[=<dir or file>] generate preprocessed program listing (.lst)" msgstr "" -#: cobc/help.c:112 +#: cobc/help.c:113 msgid "" " -X, --Xref generate cross reference through 'cobxref'\n" " (V. Coen's 'cobxref' must be in path)" msgstr "" -#: cobc/help.c:115 +#: cobc/help.c:116 msgid " -X, --Xref specify cross reference in listing" msgstr "" -#: cobc/help.c:117 -msgid " -I <directory> add <directory> to copy/include search path" -msgstr "" - #: cobc/help.c:118 -msgid " -L <directory> add <directory> to library search path" +msgid " -I <directory> add <directory> to copy/include search path" msgstr "" #: cobc/help.c:119 -msgid " -l <lib> link the library <lib>" +msgid " -L <directory> add <directory> to library search path" msgstr "" #: cobc/help.c:120 -msgid " -A <options> add <options> to the C compile phase" +msgid " -l <lib> link the library <lib>" msgstr "" #: cobc/help.c:121 -msgid " -Q <options> add <options> to the C link phase" +msgid " -K <entry> generate CALL to <entry> as static" msgstr "" #: cobc/help.c:122 @@ -2337,104 +2417,124 @@ msgid " -D <define> define <define> for COBOL compilation" msgstr "" #: cobc/help.c:123 -msgid " -K <entry> generate CALL to <entry> as static" +msgid " -A <options> add <options> to the C compile phase" msgstr "" #: cobc/help.c:124 +msgid " -Q <options> add <options> to the C link phase" +msgstr "" + +#: cobc/help.c:125 +msgid " --coverage instrument generated binaries for coverage" +msgstr "" + +#: cobc/help.c:126 #, fuzzy #| msgid " -c <file>, -config=<file> set runtime configuration from <file>" msgid " --conf=<file> user-defined dialect configuration; see -std" msgstr " -c <dosya>, -config=<dosya> <dosya>'dan çal. zam. yapılandırması yükle" -#: cobc/help.c:125 +#: cobc/help.c:127 msgid " --list-reserved display reserved words" msgstr "" -#: cobc/help.c:126 +#: cobc/help.c:128 #, fuzzy #| msgid "'%s' is not an intrinsic function" msgid " --list-intrinsics display intrinsic functions" msgstr "'%s', yerleşik bir işlev değil" -#: cobc/help.c:127 +#: cobc/help.c:129 msgid " --list-mnemonics display mnemonic names" msgstr "" -#: cobc/help.c:128 +#: cobc/help.c:130 msgid " --list-exceptions display exception names" msgstr "" -#: cobc/help.c:129 +#: cobc/help.c:131 msgid " --list-system display system routines" msgstr "" -#: cobc/help.c:130 +#: cobc/help.c:132 msgid "" " --save-temps[=<dir>] save intermediate files\n" " * default: current directory" msgstr "" -#: cobc/help.c:132 +#: cobc/help.c:134 +msgid " -MT <target> set/add target file used in dependency list" +msgstr "" + +#: cobc/help.c:135 +msgid " -MF <file> place dependency list into <file>" +msgstr "" + +#: cobc/help.c:136 msgid " -ext <extension> add file extension for resolving COPY" msgstr "" -#: cobc/help.c:139 +#: cobc/help.c:143 msgid "Warning options:" msgstr "" -#: cobc/help.c:140 +#: cobc/help.c:144 msgid " -Wall enable most warnings (all except as noted below)" msgstr "" -#: cobc/help.c:141 +#: cobc/help.c:145 msgid " -Wextra like -Wall but enable some extra warning flags" msgstr "" -#: cobc/help.c:142 +#: cobc/help.c:146 msgid " -w disable all warnings" msgstr "" -#: cobc/help.c:143 +#: cobc/help.c:147 msgid " -Wno-<warning> disable warning enabled by default, -Wall or -Wextra" msgstr "" #. TRANSLATORS: This msgid is appended to msgid for -Wno-pending and others -#: cobc/help.c:149 +#: cobc/help.c:153 msgid " * ALWAYS active" msgstr "" #. TRANSLATORS: This msgid is appended to msgid for -Wpossible-truncate and others -#: cobc/help.c:153 +#: cobc/help.c:157 msgid " * NOT set with -Wall" msgstr "" -#: cobc/help.c:161 +#: cobc/help.c:165 +msgid " -fdiagnostics-plain-output\tmake diagnostic output as plain as possible" +msgstr "" + +#: cobc/help.c:166 msgid " -Werror treat all warnings as errors" msgstr "" -#: cobc/help.c:162 +#: cobc/help.c:167 msgid " -Wno-error don't treat warnings as errors" msgstr "" -#: cobc/help.c:163 +#: cobc/help.c:168 msgid " -Werror=<warning> treat specified <warning> as error" msgstr "" -#: cobc/help.c:164 +#: cobc/help.c:169 msgid " -Wno-error=<warning> don't treat specified <warning> as error" msgstr "" -#: cobc/help.c:180 +#: cobc/help.c:185 msgid "Compiler options:" msgstr "" -#: cobc/help.c:198 +#: cobc/help.c:203 msgid "" " -fibmcomp sets -fbinary-size=2-4-8 -fsynchronized-clause=ok\n" " -fno-ibmcomp sets -fbinary-size=1--8 -fsynchronized-clause=ignore" msgstr "" -#: cobc/help.c:201 +#: cobc/help.c:206 #, fuzzy #| msgid "-falternate-ebcdic use restricted ASCII to EBCDIC translate" msgid "" @@ -2442,3608 +2542,3664 @@ msgid "" " -fno-alternate-ebcdic use extended ASCII to EBCDIC translate" msgstr "-falternate-ebcdic kısıtlanmış ASCII'den EBCDIC'ye çevirme kullan" -#: cobc/help.c:230 +#: cobc/help.c:235 msgid "Compiler dialect configuration options:" msgstr "" -#: cobc/help.c:232 cobc/help.c:238 +#: cobc/help.c:237 cobc/help.c:243 msgid "<value>" msgstr "" -#: cobc/help.c:242 +#: cobc/help.c:247 msgid "<support>" msgstr "" -#: cobc/help.c:251 +#: cobc/help.c:256 msgid "where <support> is one of the following:" msgstr "" #. TRANSLATORS: This msgid is used when a variable name #. or label is referenced in a compiler message. -#: cobc/help.c:254 cobc/help.c:257 cobc/help.c:260 cobc/help.c:263 -#: cobc/help.c:266 cobc/help.c:269 cobc/help.c:272 cobc/help.c:275 -#: cobc/typeck.c:2361 +#: cobc/help.c:259 cobc/help.c:262 cobc/help.c:265 cobc/help.c:268 +#: cobc/help.c:271 cobc/help.c:274 cobc/help.c:277 cobc/help.c:280 +#: cobc/typeck.c:2378 #, c-format msgid "'%s'" msgstr "" -#: cobc/help.c:277 +#: cobc/help.c:282 msgid "word to be taken out of the reserved words list" msgstr "" -#: cobc/help.c:277 cobc/help.c:278 cobc/help.c:280 +#: cobc/help.c:282 cobc/help.c:283 cobc/help.c:285 msgid "<word>" msgstr "" -#: cobc/help.c:278 +#: cobc/help.c:283 msgid "word to be added to reserved words list" msgstr "" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "word to be added to reserved words list as alias" msgstr "" -#: cobc/help.c:279 +#: cobc/help.c:284 msgid "<word>:<alias>" msgstr "" -#: cobc/help.c:280 +#: cobc/help.c:285 msgid "special register to disable" msgstr "" -#: cobc/help.c:281 +#: cobc/help.c:286 msgid "special register to enable" msgstr "" -#: cobc/help.c:282 +#: cobc/help.c:287 msgid "<word> or <word>:<definition>, where definition uses backslash escaped spaces" msgstr "" -#: cobc/parser.y:315 cobc/parser.y:323 +#: cobc/parser.y:307 #, c-format msgid "'%s' should start in Area A" msgstr "" -#: cobc/parser.y:331 cobc/parser.y:333 +#: cobc/parser.y:315 +#, c-format +msgid "%s should start in Area A" +msgstr "" + +#: cobc/parser.y:322 +#, fuzzy, c-format +#| msgid "should not contain '%c'" +msgid "%s should not start in Area A" +msgstr "'%c' içermemeli" + +#: cobc/parser.y:330 cobc/parser.y:332 msgid "start of statement in Area A" msgstr "" -#: cobc/parser.y:344 cobc/parser.y:379 +#: cobc/parser.y:428 #, c-format msgid "unreachable statement '%s'" msgstr "" -#: cobc/parser.y:470 +#: cobc/parser.y:542 #, c-format msgid "ENTRY '%s' duplicated" msgstr "" -#: cobc/parser.y:520 +#: cobc/parser.y:594 #, c-format msgid "ENTRY FOR GO TO '%s' duplicated" msgstr "" -#: cobc/parser.y:536 +#: cobc/parser.y:610 #, c-format msgid "maximum nested program depth exceeded (%d)" msgstr "" -#: cobc/parser.y:562 cobc/parser.y:589 +#: cobc/parser.y:636 cobc/parser.y:663 #, c-format msgid "%s statement not terminated by %s" msgstr "" -#: cobc/parser.y:592 +#: cobc/parser.y:666 #, c-format msgid "%s statement not terminated" msgstr "" -#: cobc/parser.y:634 -msgid "USE statement invalid for SORT file" -msgstr "" - -#: cobc/parser.y:676 cobc/parser.y:1670 cobc/parser.y:1673 -#, c-format -msgid "cannot specify both %s and %s" +#: cobc/parser.y:708 +msgid "USE statement invalid for SD file" msgstr "" -#: cobc/parser.y:677 +#: cobc/parser.y:751 #, fuzzy, c-format #| msgid "%s ignored" msgid "%s is ignored" msgstr "%s yok sayıldı" -#: cobc/parser.y:686 +#: cobc/parser.y:760 #, c-format -msgid "Cannot specify %s without number of lines on page" +msgid "cannot specify %s without number of lines on page" msgstr "" -#: cobc/parser.y:696 +#: cobc/parser.y:770 #, c-format msgid "maximum OCCURS depth exceeded (%d)" msgstr "" -#: cobc/parser.y:704 cobc/typeck.c:3037 +#: cobc/parser.y:785 cobc/typeck.c:3127 #, c-format msgid "'%s' is not in LINKAGE SECTION" msgstr "" -#: cobc/parser.y:725 +#: cobc/parser.y:806 msgid "TO phrase without DEPENDING phrase" msgstr "" -#: cobc/parser.y:727 +#: cobc/parser.y:808 msgid "maximum number of occurrences assumed to be exact number" msgstr "" -#: cobc/parser.y:732 cobc/parser.y:8032 +#: cobc/parser.y:813 cobc/parser.y:8398 msgid "OCCURS TO must be greater than OCCURS FROM" msgstr "" -#: cobc/parser.y:741 +#: cobc/parser.y:823 msgid "OCCURS DEPENDING ON without TO phrase" msgstr "" -#: cobc/parser.y:806 +#: cobc/parser.y:899 #, c-format msgid "%s header missing" msgstr "" -#: cobc/parser.y:807 +#: cobc/parser.y:900 #, c-format msgid "%s header assumed" msgstr "" -#: cobc/parser.y:939 -#, c-format -msgid "duplicate %s" -msgstr "" - -#: cobc/parser.y:941 +#: cobc/parser.y:1053 #, c-format msgid "%s incorrectly after %s" msgstr "" -#: cobc/parser.y:1078 +#: cobc/parser.y:1208 #, c-format msgid "redefinition of program name '%s'" msgstr "" -#: cobc/parser.y:1083 +#: cobc/parser.y:1213 #, c-format msgid "redefinition of program ID '%s'" msgstr "" -#: cobc/parser.y:1117 +#: cobc/parser.y:1247 #, c-format msgid "FUNCTION '%s' has no PROCEDURE DIVISION" msgstr "" -#: cobc/parser.y:1228 +#: cobc/parser.y:1372 msgid "functions may not be defined within a program/function" msgstr "" -#: cobc/parser.y:1278 +#: cobc/parser.y:1426 #, c-format msgid "END FUNCTION '%s' is different from FUNCTION-ID '%s'" msgstr "" -#: cobc/parser.y:1292 +#: cobc/parser.y:1440 #, c-format msgid "END PROGRAM '%s' is different from PROGRAM-ID '%s'" msgstr "" -#: cobc/parser.y:1341 +#: cobc/parser.y:1489 msgid "currency symbol must be one character long" msgstr "" -#: cobc/parser.y:1398 +#: cobc/parser.y:1546 #, c-format msgid "invalid character '%c' in currency symbol" msgstr "" -#: cobc/parser.y:1414 +#: cobc/parser.y:1562 msgid "prototype has same name as current function and will be ignored" msgstr "" -#: cobc/parser.y:1441 +#: cobc/parser.y:1589 #, c-format msgid "duplicate REPOSITORY entries for '%s' do not match" msgstr "" -#: cobc/parser.y:1445 +#: cobc/parser.y:1593 #, c-format msgid "duplicate REPOSITORY entry for '%s'" msgstr "" -#: cobc/parser.y:1510 +#: cobc/parser.y:1658 #, c-format msgid "ORGANIZATION %s is incompatible with RECORD DELIMITER" msgstr "" -#: cobc/parser.y:1548 cobc/parser.y:1939 cobc/typeck.c:829 +#: cobc/parser.y:1694 cobc/parser.y:2142 cobc/typeck.c:835 #, c-format msgid "condition-name not allowed here: '%s'" msgstr "" -#: cobc/parser.y:1554 cobc/parser.y:2127 +#: cobc/parser.y:1700 cobc/parser.y:2345 msgid "SCREEN item cannot be used here" msgstr "" -#: cobc/parser.y:1557 +#: cobc/parser.y:1703 msgid "REPORT item cannot be used here" msgstr "" -#: cobc/parser.y:1563 +#: cobc/parser.y:1709 msgid "TYPEDEF item cannot be used here" msgstr "" -#: cobc/parser.y:1572 +#: cobc/parser.y:1718 msgid "elementary item expected" msgstr "" -#: cobc/parser.y:1579 +#: cobc/parser.y:1725 msgid "item may not reference itself" msgstr "" -#: cobc/parser.y:1586 +#: cobc/parser.y:1733 msgid "item may not be subordinate to any item with USAGE clause" msgstr "" -#: cobc/parser.y:1588 +#: cobc/parser.y:1735 msgid "item may not be subordinate to any item with SIGN clause" msgstr "" -#: cobc/parser.y:1631 +#: cobc/parser.y:1780 #, c-format msgid "illegal combination of %s with other clauses" msgstr "" -#: cobc/parser.y:1641 +#: cobc/parser.y:1794 #, c-format msgid "entry following %s may not be subordinate to it" msgstr "" -#: cobc/parser.y:1859 +#: cobc/parser.y:2042 +msgid "INITIAL specified on non-input field" +msgstr "" + +#: cobc/parser.y:2054 +msgid "relative LINE/COLUMN clause required with OCCURS" +msgstr "" + +#: cobc/parser.y:2072 msgid "FOR phrase cannot immediately follow ALL/LEADING/TRAILING" msgstr "" -#: cobc/parser.y:1861 +#: cobc/parser.y:2074 msgid "missing CHARACTERS/ALL/LEADING/TRAILING phrase after FOR phrase" msgstr "" -#: cobc/parser.y:1868 +#: cobc/parser.y:2081 msgid "missing value between ALL/LEADING/TRAILING words" msgstr "" -#: cobc/parser.y:1873 +#: cobc/parser.y:2086 msgid "missing FOR phrase before CHARACTERS/ALL/LEADING/TRAILING phrase" msgstr "" -#: cobc/parser.y:1880 +#: cobc/parser.y:2093 msgid "missing ALL/LEADING/TRAILING before value" msgstr "" -#: cobc/parser.y:1935 +#: cobc/parser.y:2138 msgid "use of condition-name in place of data-name" msgstr "" -#: cobc/parser.y:1966 +#: cobc/parser.y:2169 msgid "cannot specify NO ADVANCING in screen DISPLAY" msgstr "" -#: cobc/parser.y:2029 cobc/parser.y:2046 +#: cobc/parser.y:2232 cobc/parser.y:2249 msgid "non-standard DISPLAY" msgstr "" -#: cobc/parser.y:2033 +#: cobc/parser.y:2236 msgid "screens may only be displayed on CRT" msgstr "" -#: cobc/parser.y:2038 cobc/parser.y:2081 +#: cobc/parser.y:2241 cobc/parser.y:2284 msgid "cannot mix screens and fields in the same DISPLAY statement" msgstr "" -#: cobc/parser.y:2042 +#: cobc/parser.y:2245 msgid "screen clauses may only be used for DISPLAY on CRT" msgstr "" -#: cobc/parser.y:2087 +#: cobc/parser.y:2290 msgid "ambiguous DISPLAY; put items to display on device in separate DISPLAY" msgstr "" -#: cobc/parser.y:2103 +#: cobc/parser.y:2301 #, c-format msgid "%s is not an alphanumeric literal" msgstr "" -#: cobc/parser.y:2105 +#: cobc/parser.y:2305 #, c-format msgid "'%s' is not USAGE DISPLAY" msgstr "" -#: cobc/parser.y:2120 cobc/typeck.c:9790 +#: cobc/parser.y:2322 cobc/parser.y:19534 +#, c-format +msgid "'%s' is not a field" +msgstr "" + +#: cobc/parser.y:2338 cobc/typeck.c:10231 #, c-format msgid "invalid target for %s" msgstr "" -#: cobc/parser.y:2129 +#: cobc/parser.y:2347 msgid "RENAMES item may not be used here" msgstr "" -#: cobc/parser.y:2131 cobc/typeck.c:2737 cobc/typeck.c:2828 +#: cobc/parser.y:2349 cobc/typeck.c:2822 cobc/typeck.c:2913 msgid "ANY LENGTH item not allowed here" msgstr "" -#: cobc/parser.y:2135 +#: cobc/parser.y:2353 #, c-format msgid "item '%s' has wrong class for VALIDATE" msgstr "" -#: cobc/parser.y:2144 +#: cobc/parser.y:2362 msgid "WHEN clause must follow EVERY clause" msgstr "" -#: cobc/parser.y:2229 cobc/parser.y:18631 +#: cobc/parser.y:2447 cobc/parser.y:19251 msgid "non-zero value expected" msgstr "" -#: cobc/parser.y:2235 cobc/tree.c:4735 +#: cobc/parser.y:2453 cobc/tree.c:4803 #, c-format msgid "RECORD size (IDX) exceeds maximum allowed (%d)" msgstr "" -#: cobc/parser.y:2239 cobc/tree.c:4739 +#: cobc/parser.y:2457 cobc/tree.c:4807 #, c-format msgid "RECORD size exceeds maximum allowed (%d)" msgstr "" -#: cobc/parser.y:2244 +#: cobc/parser.y:2462 msgid "RECORD clause invalid" msgstr "" -#: cobc/parser.y:3368 +#: cobc/parser.y:3595 msgid "multiple PROGRAM-ID's without matching END PROGRAM" msgstr "" -#: cobc/parser.y:3371 +#: cobc/parser.y:3598 msgid "executable requested but no program found" msgstr "" -#: cobc/parser.y:3488 +#: cobc/parser.y:3717 msgid "prototypes must be come before any program/function definitions" msgstr "" -#: cobc/parser.y:3691 +#: cobc/parser.y:3930 msgid "COMMON may only be used in a contained program" msgstr "" -#: cobc/parser.y:3778 +#: cobc/parser.y:4017 msgid "CALL prototypes" msgstr "" -#: cobc/parser.y:3953 cobc/parser.y:4235 cobc/parser.y:4281 cobc/parser.y:4394 -#: cobc/parser.y:4608 cobc/parser.y:4705 cobc/parser.y:4744 cobc/parser.y:4803 -#: cobc/parser.y:4824 cobc/parser.y:4867 cobc/parser.y:4946 cobc/parser.y:4965 -#: cobc/parser.y:4981 cobc/parser.y:4999 cobc/parser.y:5017 cobc/parser.y:5034 -#: cobc/parser.y:5052 cobc/parser.y:7404 cobc/parser.y:8628 +#: cobc/parser.y:4192 cobc/parser.y:4471 cobc/parser.y:4517 cobc/parser.y:4632 +#: cobc/parser.y:4846 cobc/parser.y:4943 cobc/parser.y:4982 cobc/parser.y:5041 +#: cobc/parser.y:5062 cobc/parser.y:5105 cobc/parser.y:5184 cobc/parser.y:5203 +#: cobc/parser.y:5219 cobc/parser.y:5237 cobc/parser.y:5255 cobc/parser.y:5272 +#: cobc/parser.y:5290 cobc/parser.y:7685 cobc/parser.y:9028 #, c-format msgid "%s not allowed in nested programs" msgstr "" -#: cobc/parser.y:4109 +#: cobc/parser.y:4345 msgid "segment-number must be in range of values 1 to 49" msgstr "" -#: cobc/parser.y:4121 +#: cobc/parser.y:4357 msgid "duplicate CLASSIFICATION clause" msgstr "" -#: cobc/parser.y:4200 +#: cobc/parser.y:4436 msgid "PROGRAM phrase" msgstr "" -#: cobc/parser.y:4302 cobc/parser.y:4313 cobc/parser.y:4657 +#: cobc/parser.y:4538 cobc/parser.y:4549 cobc/parser.y:4895 #, c-format msgid "invalid %s clause" msgstr "" -#: cobc/parser.y:4616 cobc/parser.y:4754 +#: cobc/parser.y:4854 cobc/parser.y:4992 #, fuzzy #| msgid "literal type does not match numeric data type" msgid "type does not match alphabet" msgstr "düz veri türü, nümerik veri türüyle eşleşmiyor" -#: cobc/parser.y:4760 +#: cobc/parser.y:4998 msgid "CLASS IS integer IN alphabet-name" msgstr "" -#: cobc/parser.y:4780 cobc/parser.y:4784 +#: cobc/parser.y:5018 cobc/parser.y:5022 msgid "CLASS literal with THRU must have size 1" msgstr "" -#: cobc/parser.y:4879 +#: cobc/parser.y:5117 msgid "separate currency symbol and currency string" msgstr "" -#: cobc/parser.y:4912 +#: cobc/parser.y:5150 #, c-format msgid "invalid CURRENCY SIGN '%s'" msgstr "" -#: cobc/parser.y:5139 +#: cobc/parser.y:5377 msgid "cannot use RELATIVE KEY clause on INDEXED files" msgstr "" -#: cobc/parser.y:5143 +#: cobc/parser.y:5381 msgid "cannot use RECORD KEY clause on RELATIVE files" msgstr "" -#: cobc/parser.y:5215 +#: cobc/parser.y:5453 msgid "EXTERNAL/DYNAMIC cannot be used with literals" msgstr "" -#: cobc/parser.y:5235 +#: cobc/parser.y:5473 msgid "EXTERNAL/DYNAMIC cannot be used with USING/VARYING" msgstr "" -#: cobc/parser.y:5246 +#: cobc/parser.y:5484 msgid "EXTERNAL/DYNAMIC cannot be used with DISK FROM" msgstr "" -#: cobc/parser.y:5248 -msgid "ASSIGN DISK FROM" -msgstr "" - -#: cobc/parser.y:5370 +#: cobc/parser.y:5608 msgid "ASSIGN EXTERNAL/DYNAMIC" msgstr "" -#: cobc/parser.y:5486 cobc/parser.y:5666 +#: cobc/parser.y:5724 cobc/parser.y:5921 #, c-format msgid "%s only valid with ORGANIZATION %s" msgstr "" -#: cobc/parser.y:5583 +#: cobc/parser.y:5818 cobc/typeck.c:3818 #, c-format msgid "'%s' is not an alphabet-name" msgstr "" -#: cobc/parser.y:5599 +#: cobc/parser.y:5854 msgid "VSAM status" msgstr "" -#: cobc/parser.y:5733 cobc/parser.y:5758 +#: cobc/parser.y:5988 cobc/parser.y:6013 #, c-format msgid "RECORD DELIMITER %s only allowed with SEQUENTIAL files" msgstr "" -#: cobc/parser.y:5745 +#: cobc/parser.y:6000 #, c-format msgid "RECORD DELIMITER %s only allowed with (LINE) SEQUENTIAL files" msgstr "" -#: cobc/parser.y:5751 +#: cobc/parser.y:6006 msgid "LINE-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5764 +#: cobc/parser.y:6019 msgid "BINARY-SEQUENTIAL phrase" msgstr "" -#: cobc/parser.y:5772 +#: cobc/parser.y:6027 msgid "RECORD DELIMITER clause only allowed with (LINE) SEQUENTIAL files" msgstr "" -#: cobc/parser.y:5776 +#: cobc/parser.y:6031 #, c-format msgid "RECORD DELIMITER %s not recognized; will be ignored" msgstr "" -#: cobc/parser.y:5814 +#: cobc/parser.y:6069 msgid "DUPLICATES for primary keys" msgstr "" -#: cobc/parser.y:6058 +#: cobc/parser.y:6313 msgid "DOS/VS APPLY phrase" msgstr "" -#: cobc/parser.y:6212 +#: cobc/parser.y:6467 msgid "RECORD description missing or invalid" msgstr "" -#: cobc/parser.y:6239 +#: cobc/parser.y:6494 #, c-format msgid "duplicate file description for %s" msgstr "" -#: cobc/parser.y:6288 cobc/parser.y:6893 cobc/parser.y:7389 -#: cobc/parser.y:13485 cobc/parser.y:16686 +#: cobc/parser.y:6543 cobc/parser.y:7170 cobc/parser.y:7670 cobc/parser.y:13913 +#: cobc/parser.y:17210 #, c-format msgid "%s is invalid in a user FUNCTION" msgstr "" -#: cobc/parser.y:6326 cobc/parser.y:6336 +#: cobc/parser.y:6581 cobc/parser.y:6591 msgid "RECORD clause ignored for LINE SEQUENTIAL" msgstr "" -#: cobc/parser.y:6433 +#: cobc/parser.y:6688 msgid "LINAGE clause with wrong file type" msgstr "" -#: cobc/parser.y:6495 +#: cobc/parser.y:6750 msgid "RECORDING MODE U or S can only be used with RECORD SEQUENTIAL files" msgstr "" -#: cobc/parser.y:6532 +#: cobc/parser.y:6787 #, c-format msgid "ignoring CODE-SET '%s'" msgstr "" -#: cobc/parser.y:6541 +#: cobc/parser.y:6796 msgid "CODE-SET clause invalid for file type" msgstr "" -#: cobc/parser.y:6562 +#: cobc/parser.y:6817 msgid "REPORT clause with wrong file type" msgstr "" -#: cobc/parser.y:6641 +#: cobc/parser.y:6899 msgid "CD record missing" msgstr "" -#: cobc/parser.y:7091 +#: cobc/parser.y:7372 msgid "CONSTANT item not at 01 level" msgstr "" -#: cobc/parser.y:7236 +#: cobc/parser.y:7517 msgid "REDEFINES clause not following entry-name" msgstr "" -#: cobc/parser.y:7309 cobc/parser.y:7339 cobc/parser.y:7381 cobc/parser.y:7470 -#: cobc/parser.y:8233 +#: cobc/parser.y:7590 cobc/parser.y:7620 cobc/parser.y:7662 cobc/parser.y:7751 +#: cobc/parser.y:8606 #, c-format msgid "%s only allowed at 01/77 level" msgstr "" -#: cobc/parser.y:7312 cobc/parser.y:7341 cobc/parser.y:7383 cobc/parser.y:8235 -#: cobc/parser.y:8587 cobc/parser.y:8609 +#: cobc/parser.y:7593 cobc/parser.y:7622 cobc/parser.y:7664 cobc/parser.y:8608 +#: cobc/parser.y:8987 cobc/parser.y:9009 #, c-format msgid "%s requires a data name" msgstr "" -#: cobc/parser.y:7316 cobc/parser.y:7565 +#: cobc/parser.y:7597 cobc/parser.y:7846 #, c-format msgid "%s not allowed in %s" msgstr "" -#: cobc/parser.y:7337 cobc/parser.y:7391 cobc/parser.y:8231 cobc/parser.y:8583 -#: cobc/parser.y:8607 +#: cobc/parser.y:7618 cobc/parser.y:7672 cobc/parser.y:8604 cobc/parser.y:8983 +#: cobc/parser.y:9007 #, c-format msgid "%s not allowed here" msgstr "" -#: cobc/parser.y:7528 +#: cobc/parser.y:7809 #, c-format msgid "%s requires DEPENDING clause" msgstr "" -#: cobc/parser.y:7544 +#: cobc/parser.y:7825 msgid "a locale-format PICTURE string must only consist of '9', '.', '+', 'Z' and the currency-sign" msgstr "" -#: cobc/parser.y:7554 +#: cobc/parser.y:7835 msgid "DEPENDING clause needs either an OCCURS clause or a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7560 +#: cobc/parser.y:7841 msgid "only USAGE DISPLAY may specify a variable-length PICTURE" msgstr "" -#: cobc/parser.y:7610 cobc/typeck.c:4752 +#: cobc/parser.y:7893 cobc/typeck.c:4916 #, c-format msgid "'%s' is not a locale-name" msgstr "" -#: cobc/parser.y:7656 +#: cobc/parser.y:7939 #, c-format msgid "'%s' is not a valid USAGE" msgstr "" -#: cobc/parser.y:7661 +#: cobc/parser.y:7944 #, c-format msgid "unknown USAGE: %s" msgstr "" -#: cobc/parser.y:7808 +#: cobc/parser.y:8139 #, c-format msgid "unknown HANDLE type: %s" msgstr "" -#: cobc/parser.y:8082 +#: cobc/parser.y:8347 +#, c-format +msgid "'%s' is not USAGE UTF-8" +msgstr "" + +#: cobc/parser.y:8448 msgid "INDEXED should follow ASCENDING/DESCENDING" msgstr "" -#: cobc/parser.y:8317 +#: cobc/parser.y:8658 cobc/parser.y:8660 +#, fuzzy, c-format +#| msgid "unexpected size: %d" +msgid "unexpected %s" +msgstr "beklenmedik boyut: %d" + +#: cobc/parser.y:8709 msgid "amount of entries in FROM and TO must match" msgstr "" -#: cobc/parser.y:8326 +#: cobc/parser.y:8718 #, c-format msgid "entry in FROM (%d) must be <= entry in TO (%d)" msgstr "" -#: cobc/parser.y:8585 +#: cobc/parser.y:8985 #, c-format msgid "%s only allowed at 01 level" msgstr "" -#: cobc/parser.y:8589 cobc/parser.y:8611 +#: cobc/parser.y:8989 cobc/parser.y:9011 #, c-format msgid "%s and %s combination not allowed" msgstr "" -#: cobc/parser.y:8723 +#: cobc/parser.y:9127 msgid "GLOBAL is not allowed with RD" msgstr "" -#: cobc/parser.y:9247 +#: cobc/parser.y:9650 #, c-format msgid "%s is not valid for VARYING" msgstr "" -#: cobc/parser.y:9283 +#: cobc/parser.y:9686 #, fuzzy #| msgid "Nested OCCURS in report" msgid "LINE with OCCURS is not supported" msgstr "Rapor içinde iç içe geçmiş OCCURS" -#: cobc/parser.y:9323 +#: cobc/parser.y:9726 msgid "PLUS is not recommended with LEFT, RIGHT or CENTER" msgstr "" -#: cobc/parser.y:9325 +#: cobc/parser.y:9728 msgid "PLUS is not allowed with LEFT, RIGHT or CENTER" msgstr "" -#: cobc/parser.y:9363 +#: cobc/parser.y:9766 msgid "PLUS is ignored on first field of line" msgstr "" -#: cobc/parser.y:9394 +#: cobc/parser.y:9797 msgid "invalid COLUMN integer; must be > 0" msgstr "" -#: cobc/parser.y:9396 -msgid "COLUMN numbers should increase" -msgstr "" - -#: cobc/parser.y:9492 cobc/parser.y:9547 -msgid "INITIAL specified on non-input field" -msgstr "" - -#: cobc/parser.y:9504 cobc/parser.y:9559 -msgid "relative LINE/COLUMN clause required with OCCURS" +#: cobc/parser.y:9799 +msgid "COLUMN numbers should increase" msgstr "" -#: cobc/parser.y:9661 cobc/parser.y:9665 +#: cobc/parser.y:9990 cobc/parser.y:9994 msgid "screen positions from data-item" msgstr "" -#: cobc/parser.y:9821 +#: cobc/parser.y:10153 #, fuzzy, c-format #| msgid "missing definitions:" msgid "missing %s" msgstr "eksik tanımlar:" -#: cobc/parser.y:10508 +#: cobc/parser.y:10840 msgid "OCCURS screen items" msgstr "" -#: cobc/parser.y:10520 +#: cobc/parser.y:10852 msgid "GLOBAL screen items" msgstr "" -#: cobc/parser.y:10571 +#: cobc/parser.y:10904 msgid "overriding convention specified in ENTRY-CONVENTION" msgstr "" -#: cobc/parser.y:10586 +#: cobc/parser.y:10917 msgid "executable program requested but PROCEDURE/ENTRY has USING clause" msgstr "" -#: cobc/parser.y:10654 cobc/parser.y:10671 cobc/parser.y:12278 +#: cobc/parser.y:10987 cobc/parser.y:11004 cobc/parser.y:12667 #, c-format msgid "number of arguments exceeds maximum %d" msgstr "" -#: cobc/parser.y:10663 +#: cobc/parser.y:10996 msgid "CHAINING invalid in user FUNCTION" msgstr "" -#: cobc/parser.y:10699 +#: cobc/parser.y:11032 msgid "ANY LENGTH items may only be BY REFERENCE formal parameters" msgstr "" -#: cobc/parser.y:10716 cobc/parser.y:12337 cobc/parser.y:12350 +#: cobc/parser.y:11049 cobc/parser.y:12728 cobc/parser.y:12741 #, c-format msgid "%s not allowed in CHAINED programs" msgstr "" -#: cobc/parser.y:10718 +#: cobc/parser.y:11051 msgid "parameters passed BY VALUE" msgstr "" -#: cobc/parser.y:10733 cobc/parser.y:10742 cobc/parser.y:10750 -#: cobc/parser.y:10771 +#: cobc/parser.y:11066 cobc/parser.y:11075 cobc/parser.y:11083 +#: cobc/parser.y:11104 msgid "SIZE only allowed for BY VALUE items" msgstr "" -#: cobc/parser.y:10773 cobc/parser.y:10798 +#: cobc/parser.y:11106 cobc/parser.y:11131 msgid "invalid value for SIZE" msgstr "" -#: cobc/parser.y:10813 +#: cobc/parser.y:11146 msgid "MEMORY SIZE phrase in CALL statement" msgstr "" -#: cobc/parser.y:10825 +#: cobc/parser.y:11162 msgid "OPTIONAL only allowed for BY REFERENCE items" msgstr "" -#: cobc/parser.y:10837 +#: cobc/parser.y:11177 msgid "RETURNING clause is required for a FUNCTION" msgstr "" -#: cobc/parser.y:10843 +#: cobc/parser.y:11183 msgid "RETURNING clause cannot be OMITTED for main program" msgstr "" -#: cobc/parser.y:10846 +#: cobc/parser.y:11186 msgid "RETURNING clause cannot be OMITTED for a FUNCTION" msgstr "" -#: cobc/parser.y:10859 +#: cobc/parser.y:11199 msgid "RETURNING item is not defined in LINKAGE SECTION" msgstr "" -#: cobc/parser.y:10861 +#: cobc/parser.y:11201 msgid "RETURNING item must have level 01" msgstr "" -#: cobc/parser.y:10863 +#: cobc/parser.y:11203 msgid "RETURNING item should not have OCCURS" msgstr "" -#: cobc/parser.y:10867 +#: cobc/parser.y:11207 msgid "function RETURNING item may not be ANY LENGTH" msgstr "" -#: cobc/parser.y:11080 +#: cobc/parser.y:11421 #, c-format msgid "'%s' is not a statement" msgstr "" -#: cobc/parser.y:11083 +#: cobc/parser.y:11424 #, c-format msgid "unknown statement '%s'; it may exist in another dialect" msgstr "" -#: cobc/parser.y:11087 +#: cobc/parser.y:11428 #, c-format msgid "unknown statement '%s'" msgstr "" -#: cobc/parser.y:11105 +#: cobc/parser.y:11446 msgid "SECTION segment-number must be less than or equal to 99" msgstr "" -#: cobc/parser.y:11108 +#: cobc/parser.y:11449 msgid "SECTION segment-number in DECLARATIVES must be less than 50" msgstr "" -#: cobc/parser.y:11116 +#: cobc/parser.y:11457 msgid "SECTION segment within DECLARATIVES" msgstr "" -#: cobc/parser.y:11313 cobc/parser.y:11448 +#: cobc/parser.y:11667 cobc/parser.y:11806 msgid "non-standard ACCEPT" msgstr "" -#: cobc/parser.y:11325 +#: cobc/parser.y:11679 msgid "PROMPT clause" msgstr "" -#: cobc/parser.y:11329 +#: cobc/parser.y:11683 msgid "SIZE IS clause" msgstr "" -#: cobc/parser.y:11549 cobc/parser.y:11842 +#: cobc/parser.y:11907 cobc/parser.y:12226 msgid "TIME-OUT or BEFORE TIME clauses" msgstr "" -#: cobc/parser.y:11575 cobc/parser.y:11591 cobc/parser.y:11606 +#: cobc/parser.y:11937 cobc/parser.y:11960 cobc/parser.y:11978 msgid "AT screen-location" msgstr "" -#: cobc/parser.y:11607 +#: cobc/parser.y:11979 msgid "LINE or COLUMN" msgstr "" -#: cobc/parser.y:11972 +#: cobc/parser.y:12358 msgid "ALLOCATE CHARACTERS requires RETURNING clause" msgstr "" -#: cobc/parser.y:11987 cobc/parser.y:13289 +#: cobc/parser.y:12373 #, c-format msgid "ignoring %s phrase" msgstr "" -#: cobc/parser.y:11989 +#: cobc/parser.y:12375 msgid "addressing mode should be either 24 or 31 bit" msgstr "" -#: cobc/parser.y:12061 +#: cobc/parser.y:12446 msgid "CALL to own PROGRAM-ID" msgstr "" -#: cobc/parser.y:12062 +#: cobc/parser.y:12447 msgid "assuming RECURSIVE attribute" msgstr "" -#: cobc/parser.y:12082 +#: cobc/parser.y:12467 msgid "STATIC CALL convention ignored because of ON EXCEPTION" msgstr "" -#: cobc/parser.y:12091 +#: cobc/parser.y:12476 msgid "ON EXCEPTION ignored because of STATIC CALL" msgstr "" -#: cobc/parser.y:12205 cobc/typeck.c:13644 +#: cobc/parser.y:12594 cobc/typeck.c:14450 msgid "invalid mnemonic name" msgstr "" -#: cobc/parser.y:12229 +#: cobc/parser.y:12618 msgid "id/literal ignored, using prototype name" msgstr "" -#: cobc/parser.y:12235 +#: cobc/parser.y:12624 msgid "NESTED phrase is only valid with literal" msgstr "" -#: cobc/parser.y:12296 +#: cobc/parser.y:12685 #, c-format msgid "%s only allowed when arguments are passed %s" msgstr "" -#: cobc/parser.y:12385 +#: cobc/parser.y:12776 msgid "RETURNING item must have level 01 or 77" msgstr "" -#: cobc/parser.y:12389 +#: cobc/parser.y:12780 msgid "RETURNING item must be a LINKAGE SECTION item or have BASED clause" msgstr "" -#: cobc/parser.y:12423 cobc/parser.y:17409 cobc/parser.y:17464 +#: cobc/parser.y:12814 cobc/parser.y:17937 cobc/parser.y:18000 msgid "NOT EXCEPTION before EXCEPTION" msgstr "" -#: cobc/parser.y:13162 +#: cobc/parser.y:13572 #, c-format msgid "HANDLE must be a %s HANDLE" msgstr "" -#: cobc/parser.y:13174 +#: cobc/parser.y:13584 msgid "HANDLE must be a generic HANDLE" msgstr "" -#: cobc/parser.y:13251 +#: cobc/parser.y:13661 #, c-format msgid "HANDLE clause invalid for %s" msgstr "" -#: cobc/parser.y:13483 cobc/parser.y:16876 +#: cobc/parser.y:13911 cobc/parser.y:17400 #, c-format msgid "%s is invalid in nested program" msgstr "" -#: cobc/parser.y:13521 cobc/parser.y:13564 cobc/parser.y:13575 -#: cobc/parser.y:13586 +#: cobc/parser.y:13940 cobc/parser.y:13983 cobc/parser.y:13994 +#: cobc/parser.y:14005 #, c-format msgid "maximum evaluate depth exceeded (%d)" msgstr "" -#: cobc/parser.y:13627 cobc/parser.y:13637 +#: cobc/parser.y:14048 cobc/parser.y:14089 cobc/parser.y:14633 +#: cobc/parser.y:14644 cobc/parser.y:14653 cobc/parser.y:17959 +#: cobc/parser.y:17981 cobc/parser.y:18022 cobc/parser.y:18038 +#: cobc/parser.y:18078 cobc/parser.y:18095 cobc/parser.y:18132 +#: cobc/parser.y:18149 cobc/parser.y:18199 cobc/parser.y:18216 +#: cobc/parser.y:18252 cobc/parser.y:18269 cobc/parser.y:18310 +#: cobc/parser.y:18327 +#, c-format +msgid "%s without imperative statement" +msgstr "" + +#: cobc/parser.y:14056 cobc/parser.y:14066 msgid "WHEN without imperative statement" msgstr "" -#: cobc/parser.y:13655 cobc/parser.y:13665 +#: cobc/parser.y:14097 cobc/parser.y:14107 msgid "WHEN OTHER without imperative statement" msgstr "" -#: cobc/parser.y:13745 +#: cobc/parser.y:14191 msgid "invalid THROUGH usage" msgstr "" -#: cobc/parser.y:13909 +#: cobc/parser.y:14372 msgid "EXIT PROGRAM is not allowed within a USE GLOBAL procedure" msgstr "" -#: cobc/parser.y:13913 +#: cobc/parser.y:14376 msgid "EXIT PROGRAM not allowed within a FUNCTION" msgstr "" -#: cobc/parser.y:13927 +#: cobc/parser.y:14390 msgid "EXIT FUNCTION is not allowed within a USE GLOBAL procedure" msgstr "" -#: cobc/parser.y:13931 +#: cobc/parser.y:14394 msgid "EXIT FUNCTION only allowed within a FUNCTION" msgstr "" -#: cobc/parser.y:13945 cobc/parser.y:13968 +#: cobc/parser.y:14408 cobc/parser.y:14431 msgid "EXIT PERFORM is only valid with inline PERFORM" msgstr "" -#: cobc/parser.y:13990 +#: cobc/parser.y:14453 msgid "EXIT SECTION is only valid with an active SECTION" msgstr "" -#: cobc/parser.y:14011 +#: cobc/parser.y:14474 msgid "EXIT PARAGRAPH is only valid with an active PARAGRAPH" msgstr "" -#: cobc/parser.y:14034 +#: cobc/parser.y:14497 msgid "RETURNING/GIVING not allowed for non-returning runtime elements" msgstr "" -#: cobc/parser.y:14166 +#: cobc/parser.y:14640 msgid "IF without imperative statement" msgstr "" -#: cobc/parser.y:14497 cobc/parser.y:14506 +#: cobc/parser.y:14983 cobc/parser.y:14992 msgid "single-character literal or data item expected" msgstr "" -#: cobc/parser.y:14524 +#: cobc/parser.y:15010 msgid "TALLYING clause is incomplete" msgstr "" -#: cobc/parser.y:14640 +#: cobc/parser.y:15126 msgid "INSPECT missing ALL/FIRST/LEADING/TRAILING" msgstr "" -#: cobc/parser.y:14902 +#: cobc/parser.y:15390 msgid "LOCK clauses" msgstr "" -#: cobc/parser.y:15059 +#: cobc/parser.y:15547 msgid "inline PERFORM without imperative statement" msgstr "" -#: cobc/parser.y:15180 cobc/parser.y:15188 cobc/parser.y:15196 +#: cobc/parser.y:15670 cobc/parser.y:15678 cobc/parser.y:15686 #, c-format msgid "PERFORM VARYING '%s' (line %d of %s) is not a numeric field" msgstr "" -#: cobc/parser.y:15212 +#: cobc/parser.y:15702 msgid "PERFORM VARYING without BY phrase" msgstr "" -#: cobc/parser.y:15252 +#: cobc/parser.y:15742 #, c-format msgid "'%s' is not an object-reference" msgstr "" -#: cobc/parser.y:15292 cobc/typeck.c:12295 cobc/typeck.c:13552 +#: cobc/parser.y:15782 cobc/typeck.c:13066 cobc/typeck.c:14358 msgid "LOCK clause invalid with file LOCK AUTOMATIC" msgstr "" -#: cobc/parser.y:15297 +#: cobc/parser.y:15787 msgid "KEY clause invalid with this file type" msgstr "" -#: cobc/parser.y:15302 cobc/typeck.c:12291 cobc/typeck.c:13548 +#: cobc/parser.y:15792 cobc/typeck.c:13062 cobc/typeck.c:14354 msgid "INVALID KEY clause invalid with this file type" msgstr "" -#: cobc/parser.y:15986 -msgid "file sort requires KEY phrase" +#: cobc/parser.y:16494 +msgid "MERGE requires KEY phrase" +msgstr "" + +#: cobc/parser.y:16498 +msgid "file SORT requires KEY phrase" msgstr "" -#: cobc/parser.y:16010 +#: cobc/parser.y:16522 msgid "table SORT requires KEY phrase" msgstr "" -#: cobc/parser.y:16072 -msgid "file sort requires USING or INPUT PROCEDURE" +#: cobc/parser.y:16527 +msgid "must be an SD filename" +msgstr "" + +#: cobc/parser.y:16585 +msgid "MERGE requires USING files" +msgstr "" + +#: cobc/parser.y:16587 +msgid "file SORT requires USING or INPUT PROCEDURE" msgstr "" -#: cobc/parser.y:16079 +#: cobc/parser.y:16595 msgid "USING invalid with table SORT" msgstr "" -#: cobc/parser.y:16089 +#: cobc/parser.y:16605 msgid "INPUT PROCEDURE invalid with table SORT" msgstr "" -#: cobc/parser.y:16091 +#: cobc/parser.y:16607 msgid "INPUT PROCEDURE invalid with MERGE" msgstr "" -#: cobc/parser.y:16104 -msgid "file sort requires GIVING or OUTPUT PROCEDURE" +#: cobc/parser.y:16621 +msgid "MERGE requires GIVING or OUTPUT PROCEDURE" +msgstr "" + +#: cobc/parser.y:16623 +msgid "file SORT requires GIVING or OUTPUT PROCEDURE" msgstr "" -#: cobc/parser.y:16111 +#: cobc/parser.y:16631 msgid "GIVING invalid with table SORT" msgstr "" -#: cobc/parser.y:16121 +#: cobc/parser.y:16641 msgid "OUTPUT PROCEDURE invalid with table SORT" msgstr "" -#: cobc/parser.y:16148 +#: cobc/parser.y:16668 msgid "SIZE/LENGTH invalid here" msgstr "" -#: cobc/parser.y:16197 +#: cobc/parser.y:16717 msgid "NOT EQUAL condition not allowed on START statement" msgstr "" -#: cobc/parser.y:16255 +#: cobc/parser.y:16776 #, c-format msgid "%s is replaced by %s" msgstr "" -#: cobc/parser.y:16304 +#: cobc/parser.y:16825 msgid "STOP literal" msgstr "" -#: cobc/parser.y:16308 +#: cobc/parser.y:16829 msgid "STOP identifier" msgstr "" -#: cobc/parser.y:16446 +#: cobc/parser.y:16969 msgid "SUPPRESS statement must be within DECLARATIVES" msgstr "" -#: cobc/parser.y:16520 -msgid "UNLOCK invalid for SORT files" +#: cobc/parser.y:17043 +msgid "UNLOCK invalid for SD files" msgstr "" -#: cobc/parser.y:16656 cobc/parser.y:16736 +#: cobc/parser.y:17180 cobc/parser.y:17260 msgid "USE statement must be within DECLARATIVES" msgstr "" -#: cobc/parser.y:16658 +#: cobc/parser.y:17182 msgid "SECTION header missing before USE statement" msgstr "" -#: cobc/parser.y:16738 +#: cobc/parser.y:17262 msgid "USE DEBUGGING not supported in contained program" msgstr "" -#: cobc/parser.y:16786 cobc/parser.y:16795 cobc/parser.y:16813 -#: cobc/parser.y:16849 cobc/typeck.c:4886 +#: cobc/parser.y:17310 cobc/parser.y:17319 cobc/parser.y:17337 +#: cobc/parser.y:17373 cobc/typeck.c:5050 #, c-format msgid "duplicate DEBUGGING target: '%s'" msgstr "" -#: cobc/parser.y:16811 +#: cobc/parser.y:17335 msgid "constant item cannot be used here" msgstr "" -#: cobc/parser.y:16837 +#: cobc/parser.y:17361 msgid "duplicate USE DEBUGGING ON ALL PROCEDURES" msgstr "" -#: cobc/parser.y:17089 +#: cobc/parser.y:17614 msgid "ENCODING clause must come before XML-DECLARATION" msgstr "" -#: cobc/parser.y:17091 +#: cobc/parser.y:17616 msgid "ENCODING clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17094 +#: cobc/parser.y:17619 msgid "XML GENERATE ENCODING clause" msgstr "" -#: cobc/parser.y:17101 +#: cobc/parser.y:17626 msgid "XML-DECLARATION clause must come before ATTRIBUTES" msgstr "" -#: cobc/parser.y:17104 +#: cobc/parser.y:17629 msgid "XML GENERATE XML-DECLARATION clause" msgstr "" -#: cobc/parser.y:17110 +#: cobc/parser.y:17635 msgid "XML GENERATE WITH ATTRIBUTES clause" msgstr "" -#: cobc/parser.y:17123 +#: cobc/parser.y:17648 msgid "XML GENERATE NAMESPACE clause" msgstr "" -#: cobc/parser.y:17147 +#: cobc/parser.y:17672 msgid "XML GENERATE NAME OF clause" msgstr "" -#: cobc/parser.y:17211 +#: cobc/parser.y:17736 msgid "XML GENERATE TYPE OF clause" msgstr "" -#: cobc/parser.y:17252 +#: cobc/parser.y:17777 msgid "XML GENERATE SUPPRESS clause" msgstr "" -#: cobc/parser.y:17392 +#: cobc/parser.y:17920 #, fuzzy, c-format #| msgid "'%s' is not defined" msgid "'%s' is not a schema name" msgstr "'%s' tanımlanmamış" -#: cobc/parser.y:17510 +#: cobc/parser.y:18055 msgid "NOT SIZE ERROR before SIZE ERROR" msgstr "" -#: cobc/parser.y:17556 +#: cobc/parser.y:18109 msgid "NOT OVERFLOW before OVERFLOW" msgstr "" -#: cobc/parser.y:17655 +#: cobc/parser.y:18161 cobc/parser.y:18176 +#, fuzzy +#| msgid "NOT ON EXCEPTION before ON EXCEPTION" +msgid "NOT AT END before AT END" +msgstr "ON EXCEPTİON öncesi NOT ON EXCEPTİON" + +#: cobc/parser.y:18229 msgid "NOT AT END-OF-PAGE before AT END-OF-PAGE" msgstr "" -#: cobc/parser.y:17705 +#: cobc/parser.y:18287 msgid "NOT INVALID KEY before INVALID KEY" msgstr "" -#: cobc/parser.y:18048 +#: cobc/parser.y:18644 msgid "LINAGE-COUNTER must be qualified here" msgstr "" -#: cobc/parser.y:18051 +#: cobc/parser.y:18647 msgid "invalid LINAGE-COUNTER usage" msgstr "" -#: cobc/parser.y:18062 cobc/parser.y:18158 cobc/parser.y:18247 +#: cobc/parser.y:18658 cobc/parser.y:18754 cobc/parser.y:18843 #, c-format msgid "'%s' is not a file name" msgstr "" -#: cobc/parser.y:18072 +#: cobc/parser.y:18668 msgid "LINE-COUNTER must be qualified here" msgstr "" -#: cobc/parser.y:18076 +#: cobc/parser.y:18672 msgid "invalid LINE-COUNTER usage" msgstr "" -#: cobc/parser.y:18087 cobc/parser.y:18112 +#: cobc/parser.y:18683 cobc/parser.y:18708 #, c-format msgid "'%s' is not a report name" msgstr "" -#: cobc/parser.y:18097 +#: cobc/parser.y:18693 msgid "PAGE-COUNTER must be qualified here" msgstr "" -#: cobc/parser.y:18101 +#: cobc/parser.y:18697 msgid "invalid PAGE-COUNTER usage" msgstr "" -#: cobc/parser.y:18148 cobc/typeck.c:12256 cobc/typeck.c:12339 -#: cobc/typeck.c:13516 +#: cobc/parser.y:18744 cobc/typeck.c:13027 cobc/typeck.c:13110 +#: cobc/typeck.c:14322 #, c-format msgid "%s requires a record name as subject" msgstr "" -#: cobc/parser.y:18175 +#: cobc/parser.y:18771 #, c-format msgid "'%s' not indexed" msgstr "" -#: cobc/parser.y:18180 +#: cobc/parser.y:18776 msgid "SEARCH ALL requires KEY phrase" msgstr "" -#: cobc/parser.y:18204 cobc/parser.y:18229 +#: cobc/parser.y:18800 cobc/parser.y:18825 #, c-format msgid "multiple reference to '%s' " msgstr "" -#: cobc/parser.y:18259 +#: cobc/parser.y:18855 #, c-format msgid "'%s' is not a CD name" msgstr "" -#: cobc/parser.y:18273 +#: cobc/parser.y:18869 #, c-format msgid "'%s' is not a valid report name" msgstr "" -#: cobc/parser.y:18526 +#: cobc/parser.y:19134 msgid "invalid mnemonic identifier" msgstr "" -#: cobc/parser.y:18606 +#: cobc/parser.y:19214 +#, fuzzy +#| msgid "a non-numeric literal is expected for '%s'" +msgid "an alphanumeric literal is expected here" +msgstr "'%s' için bir sayı olmayan düz veri bekleniyor" + +#: cobc/parser.y:19226 msgid "a numeric literal is expected here" msgstr "" -#: cobc/parser.y:18618 cobc/parser.y:19366 +#: cobc/parser.y:19238 cobc/parser.y:19979 msgid "a non-numeric literal is expected here" msgstr "" -#: cobc/parser.y:18784 cobc/typeck.c:7302 cobc/typeck.c:7309 +#: cobc/parser.y:19404 cobc/typeck.c:993 cobc/typeck.c:4825 cobc/typeck.c:7679 +#: cobc/typeck.c:7686 #, c-format msgid "'%s' is not numeric" msgstr "" -#: cobc/parser.y:18800 +#: cobc/parser.y:19420 #, c-format msgid "'%s' is not a field or file" msgstr "" -#: cobc/parser.y:18820 cobc/parser.y:18859 cobc/parser.y:18935 -#, c-format -msgid "'%s' is not a field" -msgstr "" - -#: cobc/parser.y:18841 +#: cobc/parser.y:19446 #, c-format msgid "'%s' is not a type-name" msgstr "" -#: cobc/parser.y:18927 cobc/typeck.c:2328 cobc/typeck.c:2407 +#: cobc/parser.y:19526 cobc/typeck.c:2345 cobc/typeck.c:2401 cobc/typeck.c:2550 #, c-format msgid "'%s' cannot be reference modified" msgstr "" -#: cobc/parser.y:19015 +#: cobc/parser.y:19627 #, c-format msgid "'%s' is not a field or alphabet" msgstr "" -#: cobc/parser.y:19041 +#: cobc/parser.y:19653 msgid "a subscripted data-item cannot be used here" msgstr "" -#: cobc/parser.y:19089 +#: cobc/parser.y:19701 msgid "unsigned integer value expected" msgstr "" -#: cobc/parser.y:19101 cobc/parser.y:19105 cobc/parser.y:19155 +#: cobc/parser.y:19713 cobc/parser.y:19717 cobc/parser.y:19767 msgid "integer value expected" msgstr "" -#: cobc/parser.y:19110 +#: cobc/parser.y:19722 msgid "invalid symbolic integer" msgstr "" -#: cobc/parser.y:19126 cobc/parser.y:19130 +#: cobc/parser.y:19738 cobc/parser.y:19742 msgid "unsigned positive integer value expected" msgstr "" -#: cobc/parser.y:19159 -msgid "invalid CLASS value" +#: cobc/parser.y:19772 +#, c-format +msgid "CLASS value %d outside of range for the used character set" msgstr "" -#: cobc/parser.y:19246 +#: cobc/parser.y:19859 msgid "PHYSICAL argument for LENGTH functions" msgstr "" -#: cobc/parser.y:19418 cobc/parser.y:19435 +#: cobc/parser.y:20031 cobc/parser.y:20048 msgid "cannot specify offset and SYSTEM-OFFSET at the same time" msgstr "" -#: cobc/parser.y:19702 cobc/parser.y:19711 cobc/parser.y:19721 -#: cobc/parser.y:19731 cobc/parser.y:19751 cobc/parser.y:19771 -#: cobc/parser.y:19777 +#: cobc/parser.y:20228 +msgid "terminator" +msgstr "" + +#: cobc/parser.y:20317 cobc/parser.y:20327 cobc/parser.y:20338 +#: cobc/parser.y:20348 cobc/parser.y:20369 cobc/parser.y:20389 +#: cobc/parser.y:20396 msgid "optional period" msgstr "" -#: cobc/pplex.l:257 cobc/pplex.l:2219 cobc/pplex.l:2233 +#: cobc/pplex.l:261 cobc/pplex.l:2448 cobc/pplex.l:2462 msgid "debugging indicator" msgstr "" -#: cobc/pplex.l:334 +#: cobc/pplex.l:348 msgid "ignoring empty directive" msgstr "" -#: cobc/pplex.l:344 cobc/pplex.l:411 +#: cobc/pplex.l:358 cobc/pplex.l:431 #, c-format msgid "ignoring invalid directive: '%s'" msgstr "" -#: cobc/pplex.l:351 +#: cobc/pplex.l:365 msgid "ignoring invalid directive" msgstr "" -#: cobc/pplex.l:358 +#: cobc/pplex.l:372 msgid "VCS directive" msgstr "" -#: cobc/pplex.l:420 cobc/pplex.l:441 +#: cobc/pplex.l:440 cobc/pplex.l:461 #, c-format msgid "ignoring unknown directive: '%s'" msgstr "" -#: cobc/pplex.l:1065 +#: cobc/pplex.l:1164 msgid "IF/ELIF/ELSE directive without matching END-IF" msgstr "" -#: cobc/pplex.l:1409 +#: cobc/pplex.l:1332 +msgid "free format detected" +msgstr "" + +#: cobc/pplex.l:1608 #, c-format msgid "copybook not found in library '%s', library-name ignored" msgstr "" -#: cobc/pplex.l:1469 +#: cobc/pplex.l:1667 #, c-format msgid "ignoring %s directive because of %s" msgstr "" -#: cobc/pplex.l:1645 +#: cobc/pplex.l:1854 #, c-format msgid "directive nest depth exceeded: %d" msgstr "" -#: cobc/pplex.l:1663 +#: cobc/pplex.l:1872 msgid "ELSE directive without matching IF/ELIF" msgstr "" -#: cobc/pplex.l:1679 +#: cobc/pplex.l:1888 msgid "END-IF directive without matching IF/ELIF/ELSE" msgstr "" -#: cobc/pplex.l:1695 +#: cobc/pplex.l:1904 msgid "ELIF directive without matching IF/ELIF" msgstr "" -#: cobc/pplex.l:1717 +#: cobc/pplex.l:1926 #, c-format msgid "invalid internal case: %u" msgstr "" -#: cobc/pplex.l:1914 +#: cobc/pplex.l:2139 msgid "buffer overrun - too many continuation lines" msgstr "" -#: cobc/pplex.l:2009 cobc/pplex.l:2019 +#: cobc/pplex.l:2236 cobc/pplex.l:2246 msgid "line not terminated by a newline" msgstr "" -#: cobc/pplex.l:2013 cobc/pplex.l:2023 +#: cobc/pplex.l:2240 cobc/pplex.l:2250 #, c-format msgid "source text exceeds %d bytes, will be truncated" msgstr "" -#: cobc/pplex.l:2042 +#: cobc/pplex.l:2269 msgid "version control conflict marker in file" msgstr "" -#: cobc/pplex.l:2194 +#: cobc/pplex.l:2423 msgid "invalid continuation in comment entry" msgstr "" -#: cobc/pplex.l:2241 +#: cobc/pplex.l:2470 #, c-format msgid "invalid indicator '\\' at column %d" msgstr "" -#: cobc/pplex.l:2253 +#: cobc/pplex.l:2482 #, fuzzy, c-format #| msgid "invalid internal call of %s" msgid "invalid indicator '%c' at column %d" msgstr "%s geçersiz iç çağrısı" -#: cobc/pplex.l:2312 cobc/pplex.l:2323 +#: cobc/pplex.l:2541 cobc/pplex.l:2552 msgid "invalid line continuation" msgstr "" -#: cobc/pplex.l:2331 +#: cobc/pplex.l:2560 msgid "continuation character expected" msgstr "" -#: cobc/pplex.l:2399 +#: cobc/pplex.l:2628 #, c-format msgid "source text after program-text area (column %d)" msgstr "" -#: cobc/ppparse.y:107 +#: cobc/ppparse.y:102 cobc/ppparse.y:106 +msgid "partial replacing with literal" +msgstr "düz veri ile değiştirilen kısımsal" + +#: cobc/ppparse.y:109 msgid "unexpected COBOL word in partial replacement phrase" msgstr "" -#: cobc/ppparse.y:256 +#: cobc/ppparse.y:176 +#, fuzzy +#| msgid "partial replacing with literal" +msgid "invalid partial replacing operand" +msgstr "düz veri ile değiştirilen kısımsal" + +#: cobc/ppparse.y:291 msgid "directive comparison on different types" msgstr "" -#: cobc/ppparse.y:324 +#: cobc/ppparse.y:359 #, c-format msgid "duplicate DEFINE directive '%s'" msgstr "" -#: cobc/ppparse.y:331 cobc/ppparse.y:341 +#: cobc/ppparse.y:366 cobc/ppparse.y:376 #, c-format msgid "invalid constant %s in DEFINE directive" msgstr "" -#: cobc/ppparse.y:439 +#: cobc/ppparse.y:474 #, c-format msgid "compiler flag '%s' unknown" msgstr "" -#: cobc/ppparse.y:486 +#: cobc/ppparse.y:521 #, c-format msgid "invalid %s directive option '%s'" msgstr "" -#: cobc/ppparse.y:488 +#: cobc/ppparse.y:523 #, c-format msgid "invalid %s directive option" msgstr "" -#: cobc/ppparse.y:839 cobc/ppparse.y:848 cobc/ppparse.y:1258 +#: cobc/ppparse.y:875 cobc/ppparse.y:884 cobc/ppparse.y:1294 #, c-format msgid "invalid %s directive" msgstr "" -#: cobc/ppparse.y:1330 +#: cobc/ppparse.y:1366 msgid "LEAP-SECOND ON directive" msgstr "" -#: cobc/ppparse.y:1439 cobc/ppparse.y:1471 +#: cobc/ppparse.y:1475 cobc/ppparse.y:1507 msgid "invalid constant" msgstr "" -#: cobc/reserved.c:4012 +#: cobc/reserved.c:4029 msgid "device name" msgstr "" -#: cobc/reserved.c:4015 +#: cobc/reserved.c:4032 msgid "switch name" msgstr "" -#: cobc/reserved.c:4018 +#: cobc/reserved.c:4035 msgid "feature name" msgstr "" -#: cobc/reserved.c:4129 +#: cobc/reserved.c:4146 #, c-format msgid "reserved word (%s) must have less than %d characters" msgstr "" -#: cobc/reserved.c:4149 +#: cobc/reserved.c:4166 #, fuzzy, c-format #| msgid "should not contain '%c'" msgid "reserved word (%s) may not contain '%c'" msgstr "'%c' içermemeli" -#: cobc/reserved.c:4166 +#: cobc/reserved.c:4183 msgid "ignored asterisk at end of alias target" msgstr "" -#: cobc/reserved.c:4229 +#: cobc/reserved.c:4248 #, c-format msgid "alias target '%s' is not a default reserved word" msgstr "" -#: cobc/reserved.c:4719 +#: cobc/reserved.c:4738 #, c-format msgid "invalid system-name '%s'" msgstr "" -#: cobc/reserved.c:4883 +#: cobc/reserved.c:4902 #, c-format msgid "'%s' is a reserved word, but isn't supported" msgstr "" -#: cobc/reserved.c:4988 +#: cobc/reserved.c:5005 #, c-format msgid "intrinsic function %s is unknown" msgstr "" -#: cobc/reserved.c:5016 +#: cobc/reserved.c:5033 msgid "Intrinsic Function" msgstr "" -#: cobc/reserved.c:5016 cobc/reserved.c:5249 cobc/reserved.c:5386 +#: cobc/reserved.c:5033 cobc/reserved.c:5266 cobc/reserved.c:5403 msgid "Implemented" msgstr "" -#: cobc/reserved.c:5016 cobc/typeck.c:1163 +#: cobc/reserved.c:5033 cobc/typeck.c:1178 msgid "Parameters" msgstr "" -#: cobc/reserved.c:5020 cobc/reserved.c:5253 cobc/reserved.c:5400 -#: cobc/reserved.c:5406 +#: cobc/reserved.c:5037 cobc/reserved.c:5270 cobc/reserved.c:5417 +#: cobc/reserved.c:5423 msgid "Yes" msgstr "" -#: cobc/reserved.c:5023 cobc/reserved.c:5256 cobc/reserved.c:5410 +#: cobc/reserved.c:5040 cobc/reserved.c:5273 cobc/reserved.c:5427 msgid "No" msgstr "" -#: cobc/reserved.c:5029 +#: cobc/reserved.c:5046 msgid "Unlimited" msgstr "" -#: cobc/reserved.c:5046 +#: cobc/reserved.c:5063 msgid "Exception Name" msgstr "" -#: cobc/reserved.c:5148 +#: cobc/reserved.c:5165 #, c-format msgid "special register '%s' is unknown, needs a definition" msgstr "" -#: cobc/reserved.c:5155 +#: cobc/reserved.c:5172 #, c-format msgid "special register '%s' has a bad definition: %s" msgstr "" -#: cobc/reserved.c:5159 +#: cobc/reserved.c:5176 #, c-format msgid "special register '%s' is unknown" msgstr "" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Internal registers" msgstr "" -#: cobc/reserved.c:5249 +#: cobc/reserved.c:5266 msgid "Definition" msgstr "" -#: cobc/reserved.c:5337 +#: cobc/reserved.c:5354 #, c-format msgid "unknown system-name '%s'" msgstr "" -#: cobc/reserved.c:5363 +#: cobc/reserved.c:5380 msgid "System names" msgstr "" -#: cobc/reserved.c:5386 +#: cobc/reserved.c:5403 msgid "Reserved Words" msgstr "" -#: cobc/reserved.c:5398 +#: cobc/reserved.c:5415 msgid "Yes (Context sensitive)" msgstr "" -#: cobc/reserved.c:5408 +#: cobc/reserved.c:5425 msgid "No (Context sensitive)" msgstr "" -#: cobc/scanner.l:272 +#: cobc/scanner.l:281 #, fuzzy, c-format #| msgid "'%s' is not defined, but is a reserved word in another dialect" msgid "'%s' is not a reserved word, so cannot be removed" msgstr "'%s' tanımlanmamış; ancak başka bir lehçede rezerve bir sözcük" -#: cobc/scanner.l:320 +#: cobc/scanner.l:329 msgid "separator period in Area A" msgstr "" -#: cobc/scanner.l:1067 +#: cobc/scanner.l:1096 #, c-format msgid "a constant may not be used here - '%s'" msgstr "" -#: cobc/scanner.l:1137 +#: cobc/scanner.l:1170 msgid "ignoring redundant ." msgstr "" -#: cobc/scanner.l:1195 +#: cobc/scanner.l:1249 #, c-format msgid "invalid symbol '%s' - skipping word" msgstr "" -#: cobc/scanner.l:1289 +#: cobc/scanner.l:1323 msgid "invalid national literal" msgstr "" -#: cobc/scanner.l:1293 cobc/tree.c:2800 +#: cobc/scanner.l:1327 cobc/tree.c:2822 #, c-format msgid "invalid literal: '%s'" msgstr "" -#: cobc/scanner.l:1295 +#: cobc/scanner.l:1329 #, c-format msgid "invalid hexadecimal literal: '%s'" msgstr "" -#: cobc/scanner.l:1297 cobc/tree.c:1779 +#: cobc/scanner.l:1331 cobc/tree.c:1803 #, c-format msgid "invalid numeric literal: '%s'" msgstr "" -#: cobc/scanner.l:1299 +#: cobc/scanner.l:1333 #, c-format msgid "invalid floating-point literal: '%s'" msgstr "" -#: cobc/scanner.l:1301 +#: cobc/scanner.l:1335 cobc/scanner.l:1337 #, c-format msgid "invalid %s literal: '%s'" msgstr "" -#: cobc/scanner.l:1350 +#: cobc/scanner.l:1365 +#, c-format +msgid "character code %s out of encoding range %s" +msgstr "" + +#: cobc/scanner.l:1422 +msgid "extraneous separator ',' at end of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1435 +msgid "extraneous character ',' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1440 +#, c-format +msgid "invalid character '%c' in sequence of symbolic EBCDIC characters" +msgstr "" + +#: cobc/scanner.l:1470 #, fuzzy, c-format #| msgid "%s: PROGRAM name exceeds %d characters" msgid "literal length exceeds %u characters" msgstr "%s: PROGRAM adı, %d karakteri aşıyor" -#: cobc/scanner.l:1365 +#: cobc/scanner.l:1485 #, c-format msgid "missing terminating %c character" msgstr "" -#: cobc/scanner.l:1382 cobc/scanner.l:1444 cobc/scanner.l:1729 +#: cobc/scanner.l:1502 cobc/scanner.l:1569 cobc/scanner.l:1868 msgid "zero-length literal" msgstr "" -#: cobc/scanner.l:1385 +#: cobc/scanner.l:1505 msgid "national literal has zero length; a SPACE will be assumed" msgstr "" -#: cobc/scanner.l:1386 +#: cobc/scanner.l:1506 msgid "alphanumeric literal has zero length; a SPACE will be assumed" msgstr "" -#: cobc/scanner.l:1412 cobc/scanner.l:1413 cobc/scanner.l:1417 -#: cobc/scanner.l:1494 +#: cobc/scanner.l:1519 +msgid "UTF-8 literal" +msgstr "" + +#: cobc/scanner.l:1536 cobc/scanner.l:1537 cobc/scanner.l:1541 +#: cobc/scanner.l:1624 msgid "national literal" msgstr "" -#: cobc/scanner.l:1416 +#: cobc/scanner.l:1540 msgid "national-character literal" msgstr "" -#: cobc/scanner.l:1447 +#: cobc/scanner.l:1571 msgid "hexadecimal literal has zero length; X'00' will be assumed" msgstr "" -#: cobc/scanner.l:1472 +#: cobc/scanner.l:1575 cobc/scanner.l:1601 msgid "hexadecimal-boolean literal" msgstr "" -#: cobc/scanner.l:1480 cobc/scanner.l:1499 cobc/scanner.l:1608 -#: cobc/scanner.l:1659 cobc/scanner.l:1754 cobc/scanner.l:1824 -#, c-format -msgid "literal length %lu exceeds %u characters" +#: cobc/scanner.l:1579 cobc/scanner.l:1619 +msgid "hexadecimal-national literal" msgstr "" -#: cobc/scanner.l:1490 -msgid "hexadecimal-national literal" +#: cobc/scanner.l:1609 cobc/scanner.l:1629 cobc/scanner.l:1744 +#: cobc/scanner.l:1798 cobc/scanner.l:1893 cobc/scanner.l:1963 +#, c-format +msgid "literal length %lu exceeds %u characters" msgstr "" -#: cobc/scanner.l:1521 cobc/scanner.l:1551 cobc/scanner.l:1674 -#: cobc/scanner.l:1771 cobc/scanner.l:1835 +#: cobc/scanner.l:1651 cobc/scanner.l:1680 cobc/scanner.l:1813 +#: cobc/scanner.l:1910 cobc/scanner.l:1974 #, c-format msgid "literal contains invalid character '%c'" msgstr "" -#: cobc/scanner.l:1573 +#: cobc/scanner.l:1704 #, c-format msgid "literal does not have an even number of digits" msgstr "" -#: cobc/scanner.l:1599 +#: cobc/scanner.l:1735 cobc/scanner.l:1788 #, c-format msgid "%s literals must contain at least one character" msgstr "" -#: cobc/scanner.l:1639 cobc/scanner.l:1739 cobc/scanner.l:1813 +#: cobc/scanner.l:1775 cobc/scanner.l:1878 cobc/scanner.l:1952 msgid "ACUCOBOL numeric literal" msgstr "" -#: cobc/scanner.l:1651 -msgid "H literals must contain at least one character" -msgstr "" - -#: cobc/scanner.l:1690 cobc/scanner.l:1783 cobc/scanner.l:1846 +#: cobc/scanner.l:1829 cobc/scanner.l:1922 cobc/scanner.l:1985 #, c-format msgid "literal exceeds limit %u" msgstr "" -#: cobc/scanner.l:1724 +#: cobc/scanner.l:1863 msgid "numeric boolean literal" msgstr "" -#: cobc/scanner.l:1731 -msgid "Boolean literal has zero length; B'0' will be assumed" +#: cobc/scanner.l:1870 +msgid "boolean literal has zero length; B'0' will be assumed" msgstr "" -#: cobc/scanner.l:1807 +#: cobc/scanner.l:1946 msgid "HP COBOL octal literal" msgstr "" -#: cobc/scanner.l:1921 +#: cobc/scanner.l:2059 #, fuzzy, c-format #| msgid " - length exceeds maximum" msgid "literal length %lu exceeds maximum of %u digits" msgstr " - uzunluk izin verilen en fazlayı aşıyor" -#: cobc/scanner.l:1927 +#: cobc/scanner.l:2065 #, c-format msgid "literal length %lu exceeds %u digits" msgstr "" -#: cobc/scanner.l:2039 cobc/tree.c:3845 +#: cobc/scanner.l:2177 cobc/tree.c:3888 #, c-format msgid "significand has more than %d digits" msgstr "" -#: cobc/scanner.l:2044 +#: cobc/scanner.l:2182 #, c-format msgid "exponent has decimal point" msgstr "" -#: cobc/scanner.l:2050 cobc/tree.c:3853 +#: cobc/scanner.l:2188 cobc/tree.c:3896 #, c-format msgid "exponent has more than 4 digits" msgstr "" -#: cobc/scanner.l:2080 +#: cobc/scanner.l:2218 #, c-format msgid "exponent not between -6143 and 6144" msgstr "" -#: cobc/scanner.l:2089 +#: cobc/scanner.l:2227 #, c-format msgid "significand of 0 must be positive" msgstr "" -#: cobc/scanner.l:2094 +#: cobc/scanner.l:2232 #, c-format msgid "exponent of 0 must be 0" msgstr "" -#: cobc/scanner.l:2099 +#: cobc/scanner.l:2237 #, c-format msgid "exponent of 0 must be positive" msgstr "" -#: cobc/scanner.l:2261 +#: cobc/scanner.l:2399 #, c-format msgid "invalid CONSTANT: %s" msgstr "" -#: cobc/scanner.l:2271 +#: cobc/scanner.l:2409 #, c-format msgid "invalid alphanumeric CONSTANT: %s" msgstr "" -#: cobc/scanner.l:2275 +#: cobc/scanner.l:2413 #, c-format msgid "empty alphanumeric CONSTANT: %s" msgstr "" -#: cobc/scanner.l:2292 cobc/scanner.l:2300 cobc/scanner.l:2305 +#: cobc/scanner.l:2430 cobc/scanner.l:2438 cobc/scanner.l:2443 #, c-format msgid "invalid numeric CONSTANT: %s" msgstr "" -#: cobc/scanner.l:2384 cobc/scanner.l:2411 +#: cobc/scanner.l:2522 cobc/scanner.l:2549 #, c-format msgid "'%s' is not a default reserved word, so cannot be aliased" msgstr "" -#: cobc/scanner.l:2387 +#: cobc/scanner.l:2525 #, c-format msgid "'%s' is already reserved" msgstr "" -#: cobc/scanner.l:2389 +#: cobc/scanner.l:2527 msgid "you may want MAKESYN instead" msgstr "" -#: cobc/scanner.l:2414 +#: cobc/scanner.l:2552 #, fuzzy, c-format #| msgid "'%s' is not defined" msgid "'%s' is not a reserved word" msgstr "'%s' tanımlanmamış" -#: cobc/scanner.l:2415 +#: cobc/scanner.l:2553 msgid "you may want ADDSYN or OVERRIDE instead" msgstr "" -#: cobc/tree.c:391 +#: cobc/tree.c:392 #, c-format msgid "%s clause is required for file '%s'" msgstr "" -#: cobc/tree.c:395 +#: cobc/tree.c:396 #, c-format msgid "%s clause is invalid for file '%s' (file type)" msgstr "" -#: cobc/tree.c:399 +#: cobc/tree.c:400 #, c-format msgid "%s clause is invalid for file '%s'" msgstr "" -#: cobc/tree.c:426 +#: cobc/tree.c:427 #, c-format msgid "FOR item '%s' is a record" msgstr "" -#: cobc/tree.c:435 +#: cobc/tree.c:436 #, c-format msgid "FOR item '%s' is in different record to '%s'" msgstr "" -#: cobc/tree.c:444 +#: cobc/tree.c:445 #, c-format msgid "FOR item '%s' is not in a record associated with '%s'" msgstr "" -#: cobc/tree.c:558 +#: cobc/tree.c:559 msgid "internal error node" msgstr "" -#: cobc/tree.c:560 +#: cobc/tree.c:561 msgid "unknown constant" msgstr "" -#: cobc/tree.c:571 +#: cobc/tree.c:572 #, c-format msgid "literal \"%s\"" msgstr "" -#: cobc/tree.c:842 -#, c-format -msgid "FUNCTION %s has invalid/not supported arguments - tag %d" -msgstr "" - -#: cobc/tree.c:963 +#: cobc/tree.c:969 #, c-format msgid "invalid date/time function: '%d'" msgstr "" -#: cobc/tree.c:995 +#: cobc/tree.c:1001 #, c-format msgid "FUNCTION '%s' has invalid date/time format" msgstr "" -#: cobc/tree.c:1002 +#: cobc/tree.c:1008 #, c-format msgid "FUNCTION '%s' has format in variable" msgstr "" -#: cobc/tree.c:1482 +#: cobc/tree.c:1488 #, c-format msgid "unknown tree tag: %d, category: %d" msgstr "" -#: cobc/tree.c:1577 +#: cobc/tree.c:1590 #, c-format msgid "unexpected numeric USAGE: %d" msgstr "" -#: cobc/tree.c:1591 +#: cobc/tree.c:1604 #, c-format msgid "unexpected category: %d" msgstr "" -#: cobc/tree.c:1790 +#: cobc/tree.c:1814 #, c-format msgid "literal length %d exceeds maximum of %d digits" msgstr "" -#: cobc/tree.c:1795 +#: cobc/tree.c:1819 #, c-format msgid "literal length %d exceeds %d digits" msgstr "" -#: cobc/tree.c:1844 cobc/tree.c:1856 cobc/tree.c:1913 cobc/tree.c:1963 +#: cobc/tree.c:1868 cobc/tree.c:1880 cobc/tree.c:1937 cobc/tree.c:1987 #, c-format msgid "numeric literal '%s' exceeds limit '%s'" msgstr "" -#: cobc/tree.c:2655 +#: cobc/tree.c:2676 msgid "invalid LOCALE literal" msgstr "" -#: cobc/tree.c:2782 +#: cobc/tree.c:2803 msgid "only literals with the same category can be concatenated" msgstr "" -#: cobc/tree.c:2789 -msgid "only alphanumeric, national or boolean literals may be concatenated" +#: cobc/tree.c:2811 +msgid "only alphanumeric, utf-8, national or boolean literals may be concatenated" msgstr "" -#: cobc/tree.c:2801 +#: cobc/tree.c:2823 #, c-format msgid "literal length %d exceeds %d characters" msgstr "" -#: cobc/tree.c:3078 +#: cobc/tree.c:3103 msgid "B, 0 or /" msgstr "" -#: cobc/tree.c:3092 +#: cobc/tree.c:3117 msgid "the sign of the floating-point exponent" msgstr "" -#: cobc/tree.c:3094 +#: cobc/tree.c:3119 msgid "a leading +/- sign" msgstr "" -#: cobc/tree.c:3096 +#: cobc/tree.c:3121 msgid "a trailing +/- sign" msgstr "" -#: cobc/tree.c:3098 +#: cobc/tree.c:3123 msgid "CR or DB" msgstr "" -#: cobc/tree.c:3100 +#: cobc/tree.c:3125 msgid "a leading currency symbol" msgstr "" -#: cobc/tree.c:3102 +#: cobc/tree.c:3127 msgid "a trailing currency symbol" msgstr "" -#: cobc/tree.c:3104 +#: cobc/tree.c:3129 msgid "a Z or * which is before the decimal point" msgstr "" -#: cobc/tree.c:3106 +#: cobc/tree.c:3131 msgid "a Z or * which is after the decimal point" msgstr "" -#: cobc/tree.c:3108 +#: cobc/tree.c:3133 msgid "a floating +/- string which is before the decimal point" msgstr "" -#: cobc/tree.c:3110 +#: cobc/tree.c:3135 msgid "a floating +/- string which is after the decimal point" msgstr "" -#: cobc/tree.c:3112 +#: cobc/tree.c:3137 msgid "a floating currency symbol string which is before the decimal point" msgstr "" -#: cobc/tree.c:3114 +#: cobc/tree.c:3139 msgid "a floating currency symbol string which is after the decimal point" msgstr "" -#: cobc/tree.c:3118 +#: cobc/tree.c:3143 msgid "A or X" msgstr "" -#: cobc/tree.c:3126 +#: cobc/tree.c:3151 msgid "a P which is before the decimal point" msgstr "" -#: cobc/tree.c:3128 +#: cobc/tree.c:3153 msgid "a P which is after the decimal point" msgstr "" -#: cobc/tree.c:3149 cobc/tree.c:3599 +#: cobc/tree.c:3176 cobc/tree.c:3638 #, c-format msgid "%s may only occur once in a PICTURE string" msgstr "" -#: cobc/tree.c:3151 cobc/tree.c:3541 +#: cobc/tree.c:3178 cobc/tree.c:3570 #, c-format msgid "%s cannot follow %s" msgstr "" -#: cobc/tree.c:3154 +#: cobc/tree.c:3181 msgid "invalid PICTURE string detected" msgstr "" -#: cobc/tree.c:3271 +#: cobc/tree.c:3299 msgid "number or constant in parentheses is not an unsigned integer" msgstr "" -#: cobc/tree.c:3280 +#: cobc/tree.c:3308 #, c-format msgid "only up to %d significant digits are permitted within parentheses" msgstr "" -#: cobc/tree.c:3288 +#: cobc/tree.c:3316 msgid "number or constant in parentheses must be greater than zero" msgstr "" -#: cobc/tree.c:3299 +#: cobc/tree.c:3327 msgid "parentheses must be preceded by a picture symbol" msgstr "" -#: cobc/tree.c:3329 +#: cobc/tree.c:3353 msgid "unbalanced parentheses" msgstr "" -#: cobc/tree.c:3337 +#: cobc/tree.c:3361 msgid "parentheses must contain an unsigned integer" msgstr "" -#: cobc/tree.c:3375 +#: cobc/tree.c:3409 #, c-format msgid "'%s' is not a constant-name" msgstr "" -#: cobc/tree.c:3382 -#, c-format -msgid "'%s' is not a numeric literal" -msgstr "" - -#: cobc/tree.c:3386 -#, c-format -msgid "'%s' is not an integer" -msgstr "" - -#: cobc/tree.c:3390 -#, c-format -msgid "'%s' is not unsigned" -msgstr "" +#: cobc/tree.c:3422 +#, fuzzy, c-format +#| msgid "'%s' is not an intrinsic function" +msgid "'%s' is not an unsigned positive integer" +msgstr "'%s', yerleşik bir işlev değil" -#: cobc/tree.c:3450 +#: cobc/tree.c:3479 msgid "missing PICTURE string" msgstr "" -#: cobc/tree.c:3479 +#: cobc/tree.c:3508 msgid "C must be followed by R" msgstr "" -#: cobc/tree.c:3482 +#: cobc/tree.c:3511 msgid "D must be followed by B" msgstr "" -#: cobc/tree.c:3497 cobc/tree.c:3596 cobc/tree.c:3622 cobc/tree.c:3733 +#: cobc/tree.c:3526 cobc/tree.c:3635 cobc/tree.c:3661 cobc/tree.c:3773 msgid "uncommon parentheses" msgstr "" -#: cobc/tree.c:3541 +#: cobc/tree.c:3570 msgid "exponent" msgstr "" -#: cobc/tree.c:3586 +#: cobc/tree.c:3625 msgid "L must be at start of PICTURE string" msgstr "" -#: cobc/tree.c:3604 +#: cobc/tree.c:3643 msgid "S must be at start of PICTURE string" msgstr "" -#: cobc/tree.c:3660 +#: cobc/tree.c:3699 msgid "P must be at start or end of PICTURE string" msgstr "" -#: cobc/tree.c:3690 +#: cobc/tree.c:3730 msgid "cannot have both Z and * in PICTURE string" msgstr "" -#: cobc/tree.c:3768 +#: cobc/tree.c:3808 #, c-format msgid "invalid PICTURE character '%c'" msgstr "" -#: cobc/tree.c:3798 +#: cobc/tree.c:3841 #, c-format msgid "PICTURE string may not contain more than %d characters; contains %d characters" msgstr "" -#: cobc/tree.c:3803 -msgid "PICTURE string must contain at least one of the set A, N, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" +#: cobc/tree.c:3846 +msgid "PICTURE string must contain at least one of the set A, N, U, X, Z, 1, 9 and *; or at least two of the set +, - and the currency symbol" msgstr "" -#: cobc/tree.c:3830 +#: cobc/tree.c:3873 #, c-format msgid "numeric field cannot be larger than %d digits" msgstr "" -#: cobc/tree.c:4267 +#: cobc/tree.c:4333 #, fuzzy, c-format #| msgid "PICTURE clause required for '%s'" msgid "needs PICTURE clause for SUM %s" msgstr "'%s' için PICTURE yantümcesi gerekiyor" -#: cobc/tree.c:4274 +#: cobc/tree.c:4340 #, fuzzy, c-format #| msgid "PICTURE clause required for '%s'" msgid "non-numeric PICTURE clause for SUM %s" msgstr "'%s' için PICTURE yantümcesi gerekiyor" -#: cobc/tree.c:4346 cobc/tree.c:4359 +#: cobc/tree.c:4412 cobc/tree.c:4425 #, c-format msgid "no DETAIL line defined in report %s" msgstr "" -#: cobc/tree.c:4361 +#: cobc/tree.c:4427 msgid "PAGE LIMIT FIRST DETAIL should be >= HEADING" msgstr "" -#: cobc/tree.c:4364 +#: cobc/tree.c:4430 msgid "PAGE LIMIT FOOTING should be >= HEADING" msgstr "" -#: cobc/tree.c:4366 +#: cobc/tree.c:4432 msgid "PAGE LIMIT LAST DETAIL should be >= FIRST DETAIL" msgstr "" -#: cobc/tree.c:4368 +#: cobc/tree.c:4434 msgid "PAGE LIMIT FOOTING should be >= LAST DETAIL" msgstr "" -#: cobc/tree.c:4370 +#: cobc/tree.c:4436 msgid "PAGE LIMIT LINES should be >= FOOTING" msgstr "" -#: cobc/tree.c:4563 libcob/fileio.c:8999 +#: cobc/tree.c:4631 libcob/fileio.c:9358 #, c-format msgid "maximum keys (%d/%d) exceeded for file '%s'" msgstr "" -#: cobc/tree.c:4627 cobc/tree.c:4650 +#: cobc/tree.c:4695 cobc/tree.c:4718 #, c-format msgid "invalid KEY item '%s', not in file '%s'" msgstr "" -#: cobc/tree.c:4661 +#: cobc/tree.c:4729 #, c-format msgid "minimal record length %d can not hold the key item '%s'; needs to be at least %d" msgstr "" -#: cobc/tree.c:4696 +#: cobc/tree.c:4764 #, c-format msgid "missing file description for %s" msgstr "" -#: cobc/tree.c:4745 +#: cobc/tree.c:4813 #, c-format msgid "size of record '%s' (%d) smaller than minimum of file '%s' (%d)" msgstr "" -#: cobc/tree.c:4748 cobc/tree.c:4765 +#: cobc/tree.c:4816 cobc/tree.c:4833 msgid "file size adjusted" msgstr "" -#: cobc/tree.c:4760 +#: cobc/tree.c:4828 #, c-format msgid "size of record '%s' (%d) larger than maximum of file '%s' (%d)" msgstr "" -#: cobc/tree.c:4793 +#: cobc/tree.c:4861 msgid "RECORD VARYING specified without limits, but implied limits are equal" msgstr "" -#: cobc/tree.c:4795 +#: cobc/tree.c:4863 #, c-format msgid "%s clause ignored" msgstr "" -#: cobc/tree.c:4890 cobc/typeck.c:7695 cobc/typeck.c:14389 cobc/typeck.c:14441 -#: cobc/typeck.c:14477 libcob/fileio.c:4598 libcob/screenio.c:3720 -#: libcob/screenio.c:3750 +#: cobc/tree.c:4958 cobc/typeck.c:8128 cobc/typeck.c:15186 cobc/typeck.c:15238 +#: cobc/typeck.c:15275 libcob/fileio.c:4724 libcob/screenio.c:4613 +#: libcob/screenio.c:4639 #, fuzzy, c-format #| msgid "runtime library is not configured for this operation" msgid "runtime is not configured to support %s" msgstr "çalışma zamanı kitaplığı, bu işlem için yapılandırılmamış" -#: cobc/tree.c:5395 +#: cobc/tree.c:5474 #, c-format msgid "literal '%.38s' is longer than '%s'" msgstr "" -#: cobc/tree.c:5399 +#: cobc/tree.c:5478 #, c-format msgid "literal '%.38s' is longer than reference-modification of '%s'" msgstr "" -#: cobc/tree.c:5424 +#: cobc/tree.c:5508 #, c-format msgid "literal '%s' is alphanumeric but '%s' is numeric" msgstr "" -#: cobc/tree.c:5466 +#: cobc/tree.c:5550 #, c-format msgid "literal '%s' has more decimals than '%s'" msgstr "" -#: cobc/tree.c:5508 +#: cobc/tree.c:5598 #, c-format msgid "literal '%s' has more digits than '%s'" msgstr "" -#: cobc/tree.c:5548 cobc/tree.c:5572 +#: cobc/tree.c:5646 cobc/tree.c:5676 #, c-format msgid "unsigned '%s' may not be %s %s" msgstr "" -#: cobc/tree.c:5558 cobc/tree.c:5581 +#: cobc/tree.c:5658 cobc/tree.c:5689 #, c-format msgid "unsigned '%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5614 cobc/tree.c:5639 +#: cobc/tree.c:5726 cobc/tree.c:5756 #, c-format msgid "'%s' may not be %s %s" msgstr "" -#: cobc/tree.c:5625 cobc/tree.c:5650 +#: cobc/tree.c:5738 cobc/tree.c:5768 #, c-format msgid "'%s' may always be %s %s" msgstr "" -#: cobc/tree.c:5795 +#: cobc/tree.c:5917 msgid "divide by constant ZERO" msgstr "" -#: cobc/tree.c:5879 cobc/tree.c:5886 +#: cobc/tree.c:6001 cobc/tree.c:6008 #, c-format msgid "%s should be COMP-X/COMP-5 for logical operator" msgstr "" -#: cobc/tree.c:5927 cobc/tree.c:5932 cobc/tree.c:6151 cobc/typeck.c:5675 -#: cobc/typeck.c:5684 cobc/typeck.c:5691 cobc/typeck.c:6772 cobc/typeck.c:6913 -msgid "invalid expression" -msgstr "" - -#: cobc/tree.c:6148 +#: cobc/tree.c:6283 #, c-format msgid "invalid expression: %s %s %s" msgstr "" -#: cobc/tree.c:6195 +#: cobc/tree.c:6286 +msgid "invalid expression: boolean expected with logical operator" +msgstr "" + +#: cobc/tree.c:6330 #, c-format msgid "unexpected operator: %d" msgstr "" -#: cobc/tree.c:6206 +#: cobc/tree.c:6341 #, c-format msgid "expression '%.38s' %s '%.38s' is always TRUE" msgstr "" -#: cobc/tree.c:6212 +#: cobc/tree.c:6347 msgid "expression is always TRUE" msgstr "" -#: cobc/tree.c:6225 +#: cobc/tree.c:6360 #, c-format msgid "expression '%.38s' %s '%.38s' is always FALSE" msgstr "" -#: cobc/tree.c:6231 +#: cobc/tree.c:6366 msgid "expression is always FALSE" msgstr "" -#: cobc/tree.c:6443 +#: cobc/tree.c:6588 msgid "invalid file name reference" msgstr "" -#: cobc/tree.c:6451 +#: cobc/tree.c:6596 #, c-format msgid "BY CONTENT assumed for alphanumeric item '%s'" msgstr "" -#: cobc/tree.c:6456 +#: cobc/tree.c:6601 #, c-format msgid "BY CONTENT assumed for national item '%s'" msgstr "" -#: cobc/tree.c:6595 +#: cobc/tree.c:6740 msgid "PERFORM FOREVER since UNTIL is always FALSE" msgstr "" -#: cobc/tree.c:6599 +#: cobc/tree.c:6744 msgid "PERFORM ONCE since UNTIL is always TRUE" msgstr "" -#: cobc/tree.c:6602 +#: cobc/tree.c:6747 msgid "PERFORM NEVER since UNTIL is always TRUE" msgstr "" -#: cobc/tree.c:6726 +#: cobc/tree.c:6871 #, c-format msgid "no definition/prototype seen for FUNCTION '%s'" msgstr "" -#: cobc/tree.c:6728 +#: cobc/tree.c:6873 #, c-format msgid "no definition/prototype seen for PROGRAM '%s'" msgstr "" -#: cobc/tree.c:6737 +#: cobc/tree.c:6882 #, c-format msgid "no definition/prototype seen for FUNCTION with external name '%s'" msgstr "" -#: cobc/tree.c:6739 +#: cobc/tree.c:6884 #, c-format msgid "no definition/prototype seen for PROGRAM with external name '%s'" msgstr "" -#: cobc/tree.c:6831 +#: cobc/tree.c:6976 cobc/tree.c:7158 cobc/tree.c:7233 cobc/tree.c:7239 +#: cobc/tree.c:7247 cobc/tree.c:7255 cobc/tree.c:7277 cobc/tree.c:7287 +#: cobc/tree.c:7292 #, c-format -msgid "FUNCTION %s has invalid argument" +msgid "FUNCTION '%s' has invalid argument" msgstr "" -#: cobc/tree.c:6833 +#: cobc/tree.c:6978 #, c-format -msgid "either all arguments or none should be if type %s" +msgid "either all arguments or none should be of type %s" msgstr "" -#: cobc/tree.c:6863 cobc/tree.c:6869 cobc/tree.c:6911 cobc/tree.c:6916 +#: cobc/tree.c:7010 cobc/tree.c:7016 cobc/tree.c:7057 cobc/tree.c:7063 #, c-format msgid "FUNCTION '%s' has invalid reference modification" msgstr "" -#: cobc/tree.c:6880 cobc/tree.c:7194 +#: cobc/tree.c:7027 cobc/tree.c:7344 #, c-format msgid "FUNCTION '%s' unknown" msgstr "" -#: cobc/tree.c:6884 +#: cobc/tree.c:7031 #, c-format msgid "FUNCTION '%s' is not implemented" msgstr "" -#: cobc/tree.c:6891 cobc/tree.c:6898 cobc/tree.c:7179 +#: cobc/tree.c:7037 cobc/tree.c:7044 cobc/tree.c:7329 #, c-format msgid "FUNCTION '%s' has wrong number of arguments" msgstr "" -#: cobc/tree.c:6905 +#: cobc/tree.c:7051 #, c-format msgid "FUNCTION '%s' cannot have reference modification" msgstr "" -#: cobc/tree.c:7008 cobc/tree.c:7083 cobc/tree.c:7089 cobc/tree.c:7097 -#: cobc/tree.c:7105 cobc/tree.c:7127 cobc/tree.c:7137 cobc/tree.c:7142 -#, c-format -msgid "FUNCTION '%s' has invalid argument" -msgstr "" - -#: cobc/tree.c:7185 +#: cobc/tree.c:7335 #, c-format msgid "FUNCTION '%s' has invalid first argument" msgstr "" -#: cobc/typeck.c:584 +#: cobc/typeck.c:590 #, c-format msgid "%s should be COMP-5/COMP-X for logical operator" msgstr "" -#: cobc/typeck.c:850 +#: cobc/typeck.c:856 #, c-format msgid "%s item not allowed here: '%s'" msgstr "" -#: cobc/typeck.c:892 +#: cobc/typeck.c:898 #, c-format msgid "'%s' is not a group name" msgstr "" -#: cobc/typeck.c:911 +#: cobc/typeck.c:921 #, c-format msgid "'%s' is not a numeric name" msgstr "" -#: cobc/typeck.c:934 +#: cobc/typeck.c:944 #, c-format msgid "'%s' is not a numeric or numeric-edited name" msgstr "" -#: cobc/typeck.c:974 -#, c-format -msgid "'%s' is Alpha, instead of a numeric value" -msgstr "" - -#: cobc/typeck.c:977 -#, c-format -msgid "'%s' is Alpha Edited, instead of a numeric value" -msgstr "" - -#: cobc/typeck.c:990 -#, c-format -msgid "'%s' is not a numeric value" -msgstr "" - -#: cobc/typeck.c:1040 +#: cobc/typeck.c:1043 #, c-format -msgid "'%s' is not an integer value" +msgid "'%s' is not an integer" msgstr "" -#: cobc/typeck.c:1044 +#: cobc/typeck.c:1047 msgid "positive numeric integer is required here" msgstr "" -#: cobc/typeck.c:1163 +#: cobc/typeck.c:1178 msgid "System routine" msgstr "" -#: cobc/typeck.c:2054 libcob/call.c:1180 +#: cobc/typeck.c:2037 libcob/call.c:1172 #, c-format msgid "'%s' literal includes leading spaces which are omitted" msgstr "" -#: cobc/typeck.c:2058 +#: cobc/typeck.c:2041 #, c-format msgid "'%s' literal includes trailing spaces which are omitted" msgstr "" -#: cobc/typeck.c:2125 +#: cobc/typeck.c:2108 msgid "ON/OFF usage requires a SWITCH name" msgstr "" -#: cobc/typeck.c:2143 +#: cobc/typeck.c:2126 #, c-format msgid "word length exceeds maximum of %d characters: '%s'" msgstr "" -#: cobc/typeck.c:2146 +#: cobc/typeck.c:2129 #, c-format msgid "word length exceeds %d characters: '%s'" msgstr "" -#: cobc/typeck.c:2223 +#: cobc/typeck.c:2206 #, c-format msgid "ASSIGN %s interpreted as '%s'" msgstr "" -#: cobc/typeck.c:2315 cobc/typeck.c:2487 +#: cobc/typeck.c:2332 cobc/typeck.c:2631 #, c-format msgid "subscript missing for '%s' - defaulting to 1" msgstr "" -#: cobc/typeck.c:2338 cobc/typeck.c:2403 cobc/typeck.c:2659 +#: cobc/typeck.c:2355 cobc/typeck.c:2546 cobc/typeck.c:2746 #, c-format msgid "'%s' cannot be subscripted" msgstr "" -#: cobc/typeck.c:2342 cobc/typeck.c:2663 +#: cobc/typeck.c:2359 cobc/typeck.c:2750 #, c-format msgid "'%s' requires one subscript" msgstr "" -#: cobc/typeck.c:2345 cobc/typeck.c:2666 +#: cobc/typeck.c:2362 cobc/typeck.c:2753 #, c-format msgid "'%s' requires %d subscripts" msgstr "" -#: cobc/typeck.c:2363 +#: cobc/typeck.c:2380 #, c-format msgid "'%s' (accessed by '%s')" msgstr "" -#: cobc/typeck.c:2471 +#: cobc/typeck.c:2399 cobc/typeck.c:4987 #, c-format -msgid "'%s' has no OCCURS clause" +msgid "%s may not be reference modified" msgstr "" -#: cobc/typeck.c:2537 libcob/common.c:3941 libcob/common.c:3952 +#: cobc/typeck.c:2437 cobc/typeck.c:2442 cobc/typeck.c:2466 +#: libcob/common.c:4477 libcob/common.c:4521 #, c-format -msgid "subscript of '%s' out of bounds: %d" +msgid "length of '%s' out of bounds: %d" msgstr "" -#: cobc/typeck.c:2587 cobc/typeck.c:2598 libcob/common.c:3976 -#: libcob/common.c:4027 +#: cobc/typeck.c:2453 cobc/typeck.c:2462 libcob/common.c:4462 +#: libcob/common.c:4513 #, c-format msgid "offset of '%s' out of bounds: %d" msgstr "" -#: cobc/typeck.c:2592 cobc/typeck.c:2603 cobc/typeck.c:2612 -#: libcob/common.c:3991 libcob/common.c:4035 +#: cobc/typeck.c:2458 +msgid "suspicious reference-modification: always using max. position" +msgstr "" + +#: cobc/typeck.c:2475 +msgid "suspicious reference-modification: always using max. length" +msgstr "" + +#: cobc/typeck.c:2615 #, c-format -msgid "length of '%s' out of bounds: %d" +msgid "'%s' has no OCCURS clause" +msgstr "" + +#: cobc/typeck.c:2694 libcob/common.c:4427 libcob/common.c:4438 +#, c-format +msgid "subscript of '%s' out of bounds: %d" msgstr "" -#: cobc/typeck.c:2727 cobc/typeck.c:2806 +#: cobc/typeck.c:2812 cobc/typeck.c:2891 msgid "reference modification not allowed here" msgstr "" -#: cobc/typeck.c:2741 cobc/typeck.c:2832 +#: cobc/typeck.c:2826 cobc/typeck.c:2917 msgid "88 level item not allowed here" msgstr "" -#: cobc/typeck.c:2745 cobc/typeck.c:2836 cobc/typeck.c:2844 cobc/typeck.c:2906 +#: cobc/typeck.c:2830 cobc/typeck.c:2921 cobc/typeck.c:2929 cobc/typeck.c:2991 msgid "variable length item not allowed here" msgstr "" -#: cobc/typeck.c:2774 +#: cobc/typeck.c:2859 #, c-format msgid "'%s' has not been DEFINEd" msgstr "" -#: cobc/typeck.c:2810 +#: cobc/typeck.c:2895 msgid "only field names allowed here" msgstr "" -#: cobc/typeck.c:2821 +#: cobc/typeck.c:2906 #, c-format msgid "VALUE of '%s': %s target '%s' is invalid" msgstr "" -#: cobc/typeck.c:2823 cobc/typeck.c:2889 +#: cobc/typeck.c:2908 cobc/typeck.c:2974 msgid "target must be in FILE SECTION or LINKAGE SECTION or have the EXTERNAL clause" msgstr "" -#: cobc/typeck.c:2879 cobc/typeck.c:2888 +#: cobc/typeck.c:2964 cobc/typeck.c:2973 #, c-format msgid "VALUE of '%s': %s target is invalid" msgstr "" -#: cobc/typeck.c:2881 +#: cobc/typeck.c:2966 msgid "no previous data-item found" msgstr "" -#: cobc/typeck.c:3040 cobc/typeck.c:4799 +#: cobc/typeck.c:3130 cobc/typeck.c:4963 #, c-format msgid "'%s' cannot be BASED/EXTERNAL" msgstr "" -#: cobc/typeck.c:3045 +#: cobc/typeck.c:3135 #, c-format msgid "'%s' is not in WORKING-STORAGE SECTION" msgstr "" -#: cobc/typeck.c:3052 cobc/typeck.c:4796 +#: cobc/typeck.c:3142 cobc/typeck.c:4960 #, c-format msgid "'%s' not level 01 or 77" msgstr "" -#: cobc/typeck.c:3055 cobc/typeck.c:3090 cobc/typeck.c:4802 +#: cobc/typeck.c:3145 cobc/typeck.c:3180 cobc/typeck.c:4966 #, c-format msgid "'%s' REDEFINES field not allowed here" msgstr "" -#: cobc/typeck.c:3075 cobc/typeck.c:8423 +#: cobc/typeck.c:3165 cobc/typeck.c:8876 #, c-format msgid "duplicate USING BY REFERENCE item '%s'" msgstr "" -#: cobc/typeck.c:3103 +#: cobc/typeck.c:3193 #, c-format msgid "'%s' USING item duplicates RETURNING item" msgstr "" -#: cobc/typeck.c:3177 +#: cobc/typeck.c:3268 #, fuzzy, c-format #| msgid "redefinition of '%s'" msgid "prototype and definition of '%s' do not match" msgstr "'%s' yeniden tanımı" -#: cobc/typeck.c:3256 +#: cobc/typeck.c:3389 cobc/typeck.c:3486 #, c-format msgid "parameters #%d ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3259 +#: cobc/typeck.c:3393 #, c-format msgid "returning items ('%s' in the definition and '%s' in the prototype) differ" msgstr "" -#: cobc/typeck.c:3295 +#: cobc/typeck.c:3429 msgid "definition is a program but the prototype is a function" msgstr "" -#: cobc/typeck.c:3299 +#: cobc/typeck.c:3433 msgid "definition is a function but the prototype is a program" msgstr "" -#: cobc/typeck.c:3306 -msgid "DECIMAL-POINT IS COMMA clauses differ" -msgstr "" - -#: cobc/typeck.c:3312 -msgid "CURRENCY clauses differ" -msgstr "" - -#: cobc/typeck.c:3348 +#: cobc/typeck.c:3496 msgid "number of parameters differ" msgstr "" -#: cobc/typeck.c:3358 +#: cobc/typeck.c:3506 msgid "definition has a RETURNING item but prototype does not" msgstr "" -#: cobc/typeck.c:3362 +#: cobc/typeck.c:3510 msgid "definition does not have a RETURNING item but prototype does" msgstr "" -#: cobc/typeck.c:3411 +#: cobc/typeck.c:3560 #, c-format msgid "unexpected tree tag: %d" msgstr "beklenmedik ağaç etiketi: %d" -#: cobc/typeck.c:3433 +#: cobc/typeck.c:3584 #, c-format msgid "expected argument #%d, %s, to be passed BY VALUE" msgstr "" -#: cobc/typeck.c:3437 +#: cobc/typeck.c:3589 #, c-format msgid "expected argument #%d, %s, to be passed BY REFERENCE/CONTENT" msgstr "" -#: cobc/typeck.c:3455 cobc/typeck.c:3580 cobc/typeck.c:3583 +#: cobc/typeck.c:3608 cobc/typeck.c:3733 cobc/typeck.c:3736 #, c-format msgid "argument #%d is not optional" msgstr "" -#: cobc/typeck.c:3468 +#: cobc/typeck.c:3622 #, c-format msgid "argument #%d must be at least %d bytes long" msgstr "" -#: cobc/typeck.c:3483 +#: cobc/typeck.c:3637 #, c-format msgid "argument #%d is a different type of pointer than the parameter" msgstr "" -#: cobc/typeck.c:3490 +#: cobc/typeck.c:3644 #, c-format msgid "argument #%d is ANY LENGTH, but expecting a fixed size item" msgstr "" -#: cobc/typeck.c:3518 +#: cobc/typeck.c:3672 #, c-format msgid "argument #%d, %s, does not conform to the parameter definition" msgstr "" -#: cobc/typeck.c:3566 +#: cobc/typeck.c:3719 #, c-format msgid "expecting up to %d arguments, but found %d" msgstr "" -#: cobc/typeck.c:3598 +#: cobc/typeck.c:3752 msgid "the RETURNING item is of a fixed size, not ANY LENGTH" msgstr "" -#: cobc/typeck.c:3603 +#: cobc/typeck.c:3758 #, c-format msgid "RETURNING item %s is not a valid type" msgstr "" -#: cobc/typeck.c:3609 +#: cobc/typeck.c:3764 #, fuzzy #| msgid "unexpected CONSTANT item" msgid "unexpected RETURNING item" msgstr "beklenmedik CONSTANT ögesi" -#: cobc/typeck.c:3612 +#: cobc/typeck.c:3767 msgid "expecting a RETURNING item, but none provided" msgstr "" -#: cobc/typeck.c:3663 -#, c-format -msgid "'%s' is not an alphabet name" -msgstr "" - -#: cobc/typeck.c:3939 +#: cobc/typeck.c:4091 #, c-format msgid "duplicate character values in alphabet '%s': %s" msgstr "" -#: cobc/typeck.c:3944 +#: cobc/typeck.c:4096 #, c-format msgid "invalid character values in alphabet '%s', starting at position %d" msgstr "" -#: cobc/typeck.c:4045 +#: cobc/typeck.c:4198 #, c-format msgid "duplicate character values in class '%s'" msgstr "" -#: cobc/typeck.c:4074 +#: cobc/typeck.c:4227 msgid "invalid ALPHABET name" msgstr "" -#: cobc/typeck.c:4103 +#: cobc/typeck.c:4256 #, c-format msgid "'%s' is not a locale name" msgstr "" -#: cobc/typeck.c:4257 +#: cobc/typeck.c:4410 msgid "invalid RECORD DEPENDING item" msgstr "" -#: cobc/typeck.c:4262 +#: cobc/typeck.c:4415 msgid "RECORD DEPENDING must reference a data-item" msgstr "" -#: cobc/typeck.c:4285 +#: cobc/typeck.c:4438 #, c-format msgid "RECORD DEPENDING item '%s' should be defined in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE SECTION" msgstr "" -#: cobc/typeck.c:4298 +#: cobc/typeck.c:4451 #, c-format msgid "file %s: RELATIVE KEY %s is not numeric" msgstr "" -#: cobc/typeck.c:4307 +#: cobc/typeck.c:4460 #, c-format msgid "file %s: RELATIVE KEY %s must be integer" msgstr "" -#: cobc/typeck.c:4312 +#: cobc/typeck.c:4465 #, c-format msgid "file %s: RELATIVE KEY %s must be unsigned" msgstr "" -#: cobc/typeck.c:4319 +#: cobc/typeck.c:4472 #, c-format msgid "file %s: RELATIVE KEY %s cannot have OCCURS" msgstr "" -#: cobc/typeck.c:4325 +#: cobc/typeck.c:4478 #, c-format msgid "RELATIVE KEY %s cannot be in file record belonging to %s" msgstr "" -#: cobc/typeck.c:4334 +#: cobc/typeck.c:4487 #, c-format msgid "file %s: RELATIVE KEY %s declared outside WORKING-STORAGE" msgstr "" -#: cobc/typeck.c:4356 cobc/typeck.c:8396 +#: cobc/typeck.c:4509 cobc/typeck.c:8833 #, c-format msgid "'%s' is not a valid data name" msgstr "" -#: cobc/typeck.c:4363 +#: cobc/typeck.c:4516 #, c-format msgid "CRT STATUS item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "" -#: cobc/typeck.c:4369 +#: cobc/typeck.c:4522 #, c-format msgid "'%s' numeric CRT STATUS must have at least 4 digits" msgstr "" -#: cobc/typeck.c:4375 +#: cobc/typeck.c:4528 #, c-format msgid "'%s' CRT STATUS must be 3 or 4 characters long" msgstr "" -#: cobc/typeck.c:4397 +#: cobc/typeck.c:4550 #, c-format msgid "FILE STATUS '%s' is not a field" msgstr "" -#: cobc/typeck.c:4409 +#: cobc/typeck.c:4562 #, c-format msgid "FILE STATUS '%s' may not be a decimal or have a PIC with a P" msgstr "" -#: cobc/typeck.c:4414 +#: cobc/typeck.c:4567 #, c-format msgid "FILE STATUS '%s' is a numeric field, but I-O status codes are not numeric in general" msgstr "" -#: cobc/typeck.c:4418 +#: cobc/typeck.c:4571 #, c-format msgid "FILE STATUS '%s' must be an alphanumeric or numeric field" msgstr "" -#: cobc/typeck.c:4425 +#: cobc/typeck.c:4578 #, c-format msgid "FILE STATUS '%s' must be USAGE DISPLAY" msgstr "" -#: cobc/typeck.c:4432 +#: cobc/typeck.c:4585 #, c-format msgid "FILE STATUS '%s' must be 2 characters long" msgstr "" -#: cobc/typeck.c:4440 +#: cobc/typeck.c:4593 #, c-format msgid "FILE STATUS '%s' must be in WORKING-STORAGE, LOCAL-STORAGE or LINKAGE" msgstr "" -#: cobc/typeck.c:4446 +#: cobc/typeck.c:4599 #, c-format msgid "FILE STATUS '%s' may not be located after an OCCURS DEPENDING field" msgstr "" -#: cobc/typeck.c:4460 +#: cobc/typeck.c:4613 #, c-format msgid "variable '%s' will be implicitly defined" msgstr "" -#: cobc/typeck.c:4489 cobc/typeck.c:4550 +#: cobc/typeck.c:4703 msgid "ASSIGN variable" msgstr "" -#: cobc/typeck.c:4555 +#: cobc/typeck.c:4708 #, c-format msgid "ASSIGN data item '%s' is invalid" msgstr "" -#: cobc/typeck.c:4619 +#: cobc/typeck.c:4773 #, c-format msgid "'%s' CURSOR must be 4 or 6 characters long" msgstr "" -#: cobc/typeck.c:4680 +#: cobc/typeck.c:4844 #, c-format msgid "'%s' cannot have nested OCCURS DEPENDING" msgstr "" -#: cobc/typeck.c:4694 +#: cobc/typeck.c:4858 #, c-format msgid "'%s' OCCURS DEPENDING ON field item invalid here" msgstr "" -#: cobc/typeck.c:4704 +#: cobc/typeck.c:4868 #, c-format msgid "'%s' cannot have OCCURS DEPENDING because of '%s'" msgstr "" -#: cobc/typeck.c:4716 +#: cobc/typeck.c:4880 #, c-format msgid "'%s' OCCURS DEPENDING ON item must have GLOBAL attribute" msgstr "" -#: cobc/typeck.c:4730 +#: cobc/typeck.c:4894 #, c-format msgid "PASSWORD '%s' for EXTERNAL file '%s' must have EXTERNAL attribute" msgstr "" -#: cobc/typeck.c:4768 +#: cobc/typeck.c:4932 #, c-format msgid "duplicate APPLY COMMIT target: '%s'" msgstr "" -#: cobc/typeck.c:4782 +#: cobc/typeck.c:4946 msgid "APPLY COMMIT statement invalid for SORT file" msgstr "" -#: cobc/typeck.c:4785 +#: cobc/typeck.c:4949 msgid "APPLY COMMIT statement invalid for REPORT file" msgstr "" -#: cobc/typeck.c:4792 +#: cobc/typeck.c:4956 #, c-format msgid "APPLY COMMIT item '%s' should be defined in WORKING-STORAGE or LOCAL-STORAGE" msgstr "" -#: cobc/typeck.c:4806 +#: cobc/typeck.c:4970 #, c-format msgid "item not allowed here: '%s'" msgstr "" -#: cobc/typeck.c:4819 +#: cobc/typeck.c:4983 #, c-format msgid "%s may not be subscripted" msgstr "" -#: cobc/typeck.c:4823 -#, c-format -msgid "%s may not be reference modified" -msgstr "" - -#: cobc/typeck.c:4883 +#: cobc/typeck.c:5047 #, c-format msgid "DEBUGGING target invalid: '%s'" msgstr "" -#: cobc/typeck.c:4889 +#: cobc/typeck.c:5053 #, c-format msgid "DEBUGGING target already specified with ALL PROCEDURES: '%s'" msgstr "" -#: cobc/typeck.c:4909 +#: cobc/typeck.c:5073 msgid "DEBUGGING target" msgstr "" -#: cobc/typeck.c:4916 +#: cobc/typeck.c:5080 #, c-format msgid "'%s' is not a valid DEBUGGING target" msgstr "" -#: cobc/typeck.c:4962 cobc/typeck.c:4970 +#: cobc/typeck.c:5126 cobc/typeck.c:5134 #, c-format msgid "'%s' is not in DECLARATIVES" msgstr "" -#: cobc/typeck.c:4984 +#: cobc/typeck.c:5148 #, c-format msgid "invalid reference to '%s' (in DECLARATIVES)" msgstr "" -#: cobc/typeck.c:4996 +#: cobc/typeck.c:5162 #, c-format msgid "GO TO paragraph '%s' which is defined in another SECTION" msgstr "" -#: cobc/typeck.c:5006 +#: cobc/typeck.c:5172 #, c-format msgid "'%s' is not a procedure name" msgstr "" -#: cobc/typeck.c:5041 +#: cobc/typeck.c:5207 #, fuzzy, c-format #| msgid "'%s' and '%s' must be in the same record" msgid "%s and %s are not in the same SECTION" msgstr "'%s' ve '%s' aynı kayıtta olmalı" -#: cobc/typeck.c:5046 +#: cobc/typeck.c:5212 #, fuzzy, c-format #| msgid "'%s' defined here" msgid "%s is defined before %s" msgstr "'%s' burada tanımlanmış" -#: cobc/typeck.c:5088 +#: cobc/typeck.c:5254 #, c-format msgid "'%s' ANY LENGTH item must be a formal parameter" msgstr "" -#: cobc/typeck.c:5136 +#: cobc/typeck.c:5302 #, c-format msgid "LINKAGE item '%s' is not a PROCEDURE USING parameter" msgstr "" -#: cobc/typeck.c:5192 +#: cobc/typeck.c:5358 #, c-format msgid "'%s' is not an alterable paragraph" msgstr "" -#: cobc/typeck.c:5802 cobc/typeck.c:5806 +#: cobc/typeck.c:5852 +#, fuzzy +#| msgid "invalid operator '%s' in expression" +msgid "invalid expression: unfinished expression" +msgstr "ifadede geçersiz işleç '%s'" + +#: cobc/typeck.c:5858 cobc/typeck.c:5865 +msgid "invalid expression" +msgstr "" + +#: cobc/typeck.c:5990 cobc/typeck.c:5994 #, c-format msgid "suggest parentheses around %s within %s" msgstr "" -#: cobc/typeck.c:5815 +#: cobc/typeck.c:6003 msgid "invalid conditional expression" msgstr "" -#: cobc/typeck.c:5932 +#: cobc/typeck.c:6120 #, c-format msgid "internal decimal structure size exceeded: %d" msgstr "" -#: cobc/typeck.c:5935 +#: cobc/typeck.c:6123 msgid "Try to minimize the number of parentheses or split into multiple computations." msgstr "" -#: cobc/typeck.c:5959 +#: cobc/typeck.c:6147 #, c-format msgid "more than %d nested expressions" msgstr "" -#: cobc/typeck.c:6000 +#: cobc/typeck.c:6188 msgid "precision of result may change with arithmetic-osvs" msgstr "" -#: cobc/typeck.c:6080 +#: cobc/typeck.c:6268 #, c-format msgid "unexpected operation: %c (%d)" msgstr "" -#: cobc/typeck.c:6085 +#: cobc/typeck.c:6273 #, c-format msgid "%s operator may be misplaced" msgstr "" -#: cobc/typeck.c:6160 +#: cobc/typeck.c:6349 msgid "unexpected constant expansion" msgstr "" -#: cobc/typeck.c:6882 cobc/typeck.c:11024 +#: cobc/typeck.c:7106 cobc/typeck.c:11656 cobc/typeck.c:11661 msgid "alphanumeric value is expected" msgstr "" -#: cobc/typeck.c:6884 cobc/typeck.c:11019 +#: cobc/typeck.c:7109 cobc/typeck.c:11651 msgid "numeric value is expected" msgstr "" -#: cobc/typeck.c:6954 +#: cobc/typeck.c:7203 +msgid "invalid expression: condition expected" +msgstr "" + +#: cobc/typeck.c:7271 +#, fuzzy +#| msgid "invalid operator '%s' in expression" +msgid "incomplete expression" +msgstr "ifadede geçersiz işleç '%s'" + +#: cobc/typeck.c:7312 #, c-format msgid "more than %d nested conditions" msgstr "" -#: cobc/typeck.c:7290 cobc/typeck.c:7371 +#: cobc/typeck.c:7667 cobc/typeck.c:7748 msgid "no CORRESPONDING items found" msgstr "" -#: cobc/typeck.c:7443 +#: cobc/typeck.c:7820 msgid "no items to ACCEPT found" msgstr "" -#: cobc/typeck.c:7493 +#: cobc/typeck.c:7870 msgid "no items to DISPLAY found" msgstr "" -#: cobc/typeck.c:7605 +#: cobc/typeck.c:7981 msgid "cannot specify figurative constant ZERO in AT clause" msgstr "" -#: cobc/typeck.c:7609 +#: cobc/typeck.c:7985 msgid "value in AT clause is not numeric" msgstr "" -#: cobc/typeck.c:7615 +#: cobc/typeck.c:7991 msgid "value in AT clause must have 4 or 6 digits" msgstr "" -#: cobc/typeck.c:7737 +#: cobc/typeck.c:8168 msgid "invalid PROMPT literal" msgstr "" -#: cobc/typeck.c:7742 +#: cobc/typeck.c:8173 msgid "invalid PROMPT identifier" msgstr "" -#: cobc/typeck.c:8032 +#: cobc/typeck.c:8465 #, c-format msgid "'%s' is not an input device" msgstr "" -#: cobc/typeck.c:8059 cobc/typeck.c:9242 +#: cobc/typeck.c:8492 cobc/typeck.c:9708 #, c-format msgid "'%s' is not defined in SPECIAL-NAMES" msgstr "" -#: cobc/typeck.c:8064 +#: cobc/typeck.c:8497 #, c-format msgid "invalid input device '%s'" msgstr "" -#: cobc/typeck.c:8069 cobc/typeck.c:9246 +#: cobc/typeck.c:8502 cobc/typeck.c:9712 #, c-format msgid "unknown device '%s'; it may exist in another dialect" msgstr "" -#: cobc/typeck.c:8072 cobc/typeck.c:9249 +#: cobc/typeck.c:8505 cobc/typeck.c:9715 #, c-format msgid "unknown device '%s'; not defined in SPECIAL-NAMES" msgstr "" -#: cobc/typeck.c:8088 +#: cobc/typeck.c:8524 msgid "target of RETURNING is not a data pointer" msgstr "" -#: cobc/typeck.c:8115 cobc/typeck.c:12634 cobc/typeck.c:12700 -#: cobc/typeck.c:12768 +#: cobc/typeck.c:8551 cobc/typeck.c:13410 cobc/typeck.c:13479 +#: cobc/typeck.c:13547 #, c-format msgid "cannot change address of '%s', which is not BASED or a LINKAGE item" msgstr "" -#: cobc/typeck.c:8121 +#: cobc/typeck.c:8557 msgid "target of ALLOCATE must have BASED clause" msgstr "" -#: cobc/typeck.c:8155 cobc/typeck.c:8571 +#: cobc/typeck.c:8591 cobc/typeck.c:9023 msgid "amount must be specified as a numeric expression" msgstr "" -#: cobc/typeck.c:8161 +#: cobc/typeck.c:8597 msgid "INITIALIZED TO item is not alphanumeric" msgstr "" -#: cobc/typeck.c:8232 +#: cobc/typeck.c:8667 msgid "only alphanumeric FUNCTION types are allowed here" msgstr "" -#: cobc/typeck.c:8240 +#: cobc/typeck.c:8675 msgid "invalid RETURNING field" msgstr "" -#: cobc/typeck.c:8259 +#: cobc/typeck.c:8694 msgid "STDCALL not available on this platform" msgstr "" -#: cobc/typeck.c:8263 +#: cobc/typeck.c:8698 msgid "STDCALL used on 64-bit Windows platform" msgstr "" -#: cobc/typeck.c:8268 +#: cobc/typeck.c:8703 msgid "STATIC CALL convention requires a literal program name" msgstr "" -#: cobc/typeck.c:8273 cobc/typeck.c:11975 cobc/typeck.c:12900 -#: cobc/typeck.c:13271 +#: cobc/typeck.c:8708 cobc/typeck.c:12746 cobc/typeck.c:13681 +#: cobc/typeck.c:14077 msgid "HANDLE must be either a generic or a THREAD HANDLE" msgstr "" -#: cobc/typeck.c:8291 +#: cobc/typeck.c:8726 msgid "numeric literal is negative" msgstr "" -#: cobc/typeck.c:8370 +#: cobc/typeck.c:8805 msgid "numeric literal exceeds size limits" msgstr "" -#: cobc/typeck.c:8385 +#: cobc/typeck.c:8820 #, c-format msgid "figurative constant %s invalid here" msgstr "" -#: cobc/typeck.c:8403 +#: cobc/typeck.c:8840 #, c-format msgid "'%s' is not a 01 or 77 level item" msgstr "" -#: cobc/typeck.c:8407 +#: cobc/typeck.c:8856 #, c-format msgid "'%s' ANY LENGTH item not passed BY REFERENCE" msgstr "" -#: cobc/typeck.c:8457 cobc/typeck.c:8462 +#: cobc/typeck.c:8909 cobc/typeck.c:8914 #, c-format msgid "wrong number of CALL parameters for '%s', %d given, %d expected" msgstr "" -#: cobc/typeck.c:8529 cobc/typeck.c:8603 cobc/typeck.c:8607 cobc/typeck.c:8637 -#: cobc/typeck.c:11932 cobc/typeck.c:12092 cobc/typeck.c:12281 -#: cobc/typeck.c:12285 cobc/typeck.c:13206 cobc/typeck.c:13539 -#: cobc/typeck.c:13542 +#: cobc/typeck.c:8981 cobc/typeck.c:9055 cobc/typeck.c:9059 cobc/typeck.c:9095 +#: cobc/typeck.c:12703 cobc/typeck.c:12863 cobc/typeck.c:13052 +#: cobc/typeck.c:13056 cobc/typeck.c:14012 cobc/typeck.c:14345 +#: cobc/typeck.c:14348 #, c-format msgid "%s not allowed on %s files" msgstr "" -#: cobc/typeck.c:8704 +#: cobc/typeck.c:9172 msgid "positions cannot be specified for main windows" msgstr "" -#: cobc/typeck.c:8714 cobc/typeck.c:8718 cobc/typeck.c:8740 +#: cobc/typeck.c:9183 cobc/typeck.c:9187 cobc/typeck.c:9211 msgid "HANDLE must be either a generic or a WINDOW HANDLE or X(10)" msgstr "" -#: cobc/typeck.c:8849 +#: cobc/typeck.c:9324 #, c-format msgid "'%s' is an invalid type for DISPLAY operand" msgstr "" -#: cobc/typeck.c:8854 +#: cobc/typeck.c:9329 msgid "invalid type for DISPLAY operand" msgstr "" -#: cobc/typeck.c:9202 cobc/typeck.c:9235 +#: cobc/typeck.c:9668 cobc/typeck.c:9701 #, c-format msgid "'%s' is not an output device" msgstr "" -#: cobc/typeck.c:9335 +#: cobc/typeck.c:9800 msgid "invalid use of 88 level in WHEN expression" msgstr "" -#: cobc/typeck.c:9396 +#: cobc/typeck.c:9861 msgid "wrong number of WHEN parameters" msgstr "" -#: cobc/typeck.c:9518 cobc/typeck.c:9530 +#: cobc/typeck.c:9983 cobc/typeck.c:9995 #, c-format msgid "target %d of FREE is not a BASED data item" msgstr "" -#: cobc/typeck.c:9536 +#: cobc/typeck.c:10001 #, c-format msgid "target %d of FREE must be a data pointer" msgstr "" -#: cobc/typeck.c:9550 +#: cobc/typeck.c:10015 msgid "GO TO without procedure-name" msgstr "" -#: cobc/typeck.c:9560 +#: cobc/typeck.c:10023 msgid "GO TO with multiple procedure-names" msgstr "" -#: cobc/typeck.c:9582 -msgid "GO TO ENTRY with multiple entry-names" -msgstr "" - -#: cobc/typeck.c:9646 +#: cobc/typeck.c:10088 msgid "invalid INITIALIZE statement" msgstr "" -#: cobc/typeck.c:9752 cobc/typeck.c:9755 +#: cobc/typeck.c:10193 cobc/typeck.c:10196 #, c-format msgid "%s operands differ in size" msgstr "" -#: cobc/typeck.c:9785 +#: cobc/typeck.c:10226 #, c-format msgid "unexpected clause %d" msgstr "" -#: cobc/typeck.c:9860 cobc/typeck.c:9871 cobc/typeck.c:9882 cobc/typeck.c:9893 +#: cobc/typeck.c:10301 cobc/typeck.c:10312 cobc/typeck.c:10323 +#: cobc/typeck.c:10334 #, c-format msgid "data name expected before %s" msgstr "" -#: cobc/typeck.c:9903 +#: cobc/typeck.c:10344 #, c-format msgid "ALL, LEADING or TRAILING expected before '%s'" msgstr "" -#: cobc/typeck.c:9913 +#: cobc/typeck.c:10354 msgid "operand has wrong size" msgstr "" -#: cobc/typeck.c:10007 +#: cobc/typeck.c:10448 #, c-format msgid "'%s' defined here as PIC %s" msgstr "" -#: cobc/typeck.c:10011 +#: cobc/typeck.c:10452 #, c-format msgid "'%s' defined here as a group of length %d" msgstr "" -#: cobc/typeck.c:10017 +#: cobc/typeck.c:10458 #, c-format msgid "internal register '%s' defined as USAGE %s" msgstr "" -#: cobc/typeck.c:10020 +#: cobc/typeck.c:10461 #, c-format msgid "'%s' defined here as USAGE %s" msgstr "" -#: cobc/typeck.c:10045 cobc/typeck.c:10063 +#: cobc/typeck.c:10486 cobc/typeck.c:10504 #, c-format msgid "value size is %d" msgstr "" -#: cobc/typeck.c:10059 +#: cobc/typeck.c:10500 #, c-format msgid "value is %s" msgstr "" -#: cobc/typeck.c:10338 -msgid "invalid destination for MOVE" -msgstr "" - -#: cobc/typeck.c:10380 +#: cobc/typeck.c:10824 msgid "MOVE of figurative constant SPACE to numeric item" msgstr "" -#: cobc/typeck.c:10395 +#: cobc/typeck.c:10839 msgid "MOVE of figurative constant QUOTE to numeric item" msgstr "" -#: cobc/typeck.c:10400 cobc/typeck.c:10411 +#: cobc/typeck.c:10844 cobc/typeck.c:10855 msgid "MOVE of figurative constant to numeric item" msgstr "" -#: cobc/typeck.c:10469 +#: cobc/typeck.c:10936 msgid "numeric literal in VALUE clause of numeric-edited item" msgstr "" -#: cobc/typeck.c:10494 +#: cobc/typeck.c:10966 msgid "numeric move to ALPHABETIC" msgstr "" -#: cobc/typeck.c:10506 +#: cobc/typeck.c:10978 msgid "data item not signed" msgstr "" -#: cobc/typeck.c:10509 +#: cobc/typeck.c:10981 msgid "ignoring sign" msgstr "" -#: cobc/typeck.c:10821 +#: cobc/typeck.c:11381 msgid "overlapping MOVE may occur and produce unpredictable results" msgstr "" -#: cobc/typeck.c:10828 +#: cobc/typeck.c:11388 msgid "overlapping MOVE may produce unpredictable results" msgstr "" -#: cobc/typeck.c:10961 +#: cobc/typeck.c:11593 msgid "invalid source for MOVE" msgstr "" -#: cobc/typeck.c:10982 +#: cobc/typeck.c:11614 msgid "source is non-numeric - substituting zero" msgstr "" -#: cobc/typeck.c:10988 cobc/typeck.c:10999 +#: cobc/typeck.c:11620 cobc/typeck.c:11631 msgid "invalid VALUE clause" msgstr "" -#: cobc/typeck.c:10991 cobc/typeck.c:12841 cobc/typeck.c:12846 -#: cobc/typeck.c:12873 cobc/typeck.c:12878 +#: cobc/typeck.c:11623 cobc/typeck.c:13622 cobc/typeck.c:13627 +#: cobc/typeck.c:13654 cobc/typeck.c:13659 msgid "invalid SET statement" msgstr "" -#: cobc/typeck.c:10993 +#: cobc/typeck.c:11625 msgid "invalid MOVE statement" msgstr "" -#: cobc/typeck.c:11000 +#: cobc/typeck.c:11632 msgid "literal exceeds data size" msgstr "" -#: cobc/typeck.c:11004 +#: cobc/typeck.c:11636 msgid "numeric literal exceeds data size" msgstr "" -#: cobc/typeck.c:11013 +#: cobc/typeck.c:11645 msgid "MOVE of non-integer to alphanumeric" msgstr "" -#: cobc/typeck.c:11029 +#: cobc/typeck.c:11666 cobc/typeck.c:11671 +msgid "national value is expected" +msgstr "" + +#: cobc/typeck.c:11676 msgid "value does not fit the picture string" msgstr "" -#: cobc/typeck.c:11035 +#: cobc/typeck.c:11682 msgid "value size exceeds data size" msgstr "" -#: cobc/typeck.c:11040 +#: cobc/typeck.c:11687 msgid "sending field larger than receiving field" msgstr "" -#: cobc/typeck.c:11045 +#: cobc/typeck.c:11692 msgid "some digits may be truncated" msgstr "" -#: cobc/typeck.c:11798 cobc/typeck.c:11848 +#: cobc/typeck.c:12566 cobc/typeck.c:12619 #, c-format msgid "invalid MOVE target: %s" msgstr "" -#: cobc/typeck.c:12105 +#: cobc/typeck.c:12876 msgid "READ PREVIOUS not allowed for this file type" msgstr "" -#: cobc/typeck.c:12113 +#: cobc/typeck.c:12884 msgid "KEY ignored with sequential READ" msgstr "" -#: cobc/typeck.c:12209 +#: cobc/typeck.c:12980 msgid "figurative constants not allowed in FROM clause" msgstr "" -#: cobc/typeck.c:12216 -msgid "literal in FROM clause must be alphanumeric, national or boolean" +#: cobc/typeck.c:12987 +msgid "literal in FROM clause must be alphanumeric, utf-8, national or boolean" msgstr "" -#: cobc/typeck.c:12239 cobc/typeck.c:13499 +#: cobc/typeck.c:13010 cobc/typeck.c:14305 #, c-format msgid "%s FILE requires a FROM clause" msgstr "" -#: cobc/typeck.c:12261 cobc/typeck.c:12345 cobc/typeck.c:13521 +#: cobc/typeck.c:13032 cobc/typeck.c:13116 cobc/typeck.c:14327 #, c-format msgid "%s subject does not refer to a record name" msgstr "" -#: cobc/typeck.c:12351 +#: cobc/typeck.c:13122 msgid "RELEASE not allowed on this record item" msgstr "" -#: cobc/typeck.c:12433 cobc/typeck.c:12454 cobc/typeck.c:12461 +#: cobc/typeck.c:13183 cobc/typeck.c:13209 cobc/typeck.c:13237 msgid "invalid SEARCH ALL condition" msgstr "" -#: cobc/typeck.c:12578 cobc/typeck.c:12585 +#: cobc/typeck.c:13231 +msgid "SEARCH ALL requires comparision of KEY field" +msgstr "" + +#: cobc/typeck.c:13354 cobc/typeck.c:13361 msgid "SET targets must be PROGRAM-POINTER" msgstr "" -#: cobc/typeck.c:12610 +#: cobc/typeck.c:13386 #, c-format msgid "SET target '%s' is not numeric, an INDEX or a POINTER" msgstr "" -#: cobc/typeck.c:12627 cobc/typeck.c:12696 cobc/typeck.c:12764 +#: cobc/typeck.c:13403 cobc/typeck.c:13475 cobc/typeck.c:13543 #, c-format msgid "cannot change address of '%s', which is not level 1 or 77" msgstr "" -#: cobc/typeck.c:12721 +#: cobc/typeck.c:13500 #, c-format msgid "SET target '%s' is not a POINTER for FCD" msgstr "" -#: cobc/typeck.c:12789 +#: cobc/typeck.c:13569 #, c-format msgid "SET target '%s' is not a POINTER for FCD-KEYDEF" msgstr "" -#: cobc/typeck.c:12882 +#: cobc/typeck.c:13663 msgid "field does not have a FALSE clause" msgstr "" -#: cobc/typeck.c:12913 +#: cobc/typeck.c:13694 msgid "THREAD-priority must be between 1 and 32767" msgstr "" -#: cobc/typeck.c:12933 +#: cobc/typeck.c:13714 msgid "SET ATTRIBUTE requires a screen item as subject" msgstr "" -#: cobc/typeck.c:12939 +#: cobc/typeck.c:13720 msgid "SET ATTRIBUTE subject does not refer to a screen item" msgstr "" -#: cobc/typeck.c:12990 -msgid "invalid SORT filename" -msgstr "" - -#: cobc/typeck.c:13051 -msgid "invalid SORT USING parameter" -msgstr "" - -#: cobc/typeck.c:13080 -msgid "invalid SORT GIVING parameter" -msgstr "" +#: cobc/typeck.c:13835 cobc/typeck.c:13875 +#, fuzzy, c-format +#| msgid "invalid parameter: %s" +msgid "invalid %s parameter" +msgstr "geçersiz parametre: %s" -#: cobc/typeck.c:13134 cobc/typeck.c:13161 cobc/typeck.c:13181 +#: cobc/typeck.c:13940 cobc/typeck.c:13967 cobc/typeck.c:13987 msgid "invalid key item" msgstr "" -#: cobc/typeck.c:13211 +#: cobc/typeck.c:14017 msgid "LENGTH/SIZE clause only allowed on INDEXED files" msgstr "" -#: cobc/typeck.c:13216 +#: cobc/typeck.c:14022 msgid "START not allowed with ACCESS MODE RANDOM" msgstr "" -#: cobc/typeck.c:13305 -#, c-format -msgid "%s item '%s' must be numeric and an integer" -msgstr "" - -#: cobc/typeck.c:13311 +#: cobc/typeck.c:14111 cobc/typeck.c:14117 #, c-format msgid "%s item '%s' must be an integer" msgstr "" -#: cobc/typeck.c:13315 +#: cobc/typeck.c:14121 #, c-format msgid "%s item '%s' may not have PICTURE with P in it" msgstr "" -#: cobc/typeck.c:13331 +#: cobc/typeck.c:14137 #, c-format msgid "'%s' is not an elementary item" msgstr "" -#: cobc/typeck.c:13407 +#: cobc/typeck.c:14213 msgid "STRING items must be all NATIONAL or none" msgstr "" -#: cobc/typeck.c:13555 +#: cobc/typeck.c:14361 msgid "LOCK clause invalid here" msgstr "" -#: cobc/typeck.c:13800 +#: cobc/typeck.c:14606 msgid "data item is not part of a report" msgstr "" -#: cobc/typeck.c:13820 +#: cobc/typeck.c:14626 msgid "improper use of SUPPRESS PRINTING" msgstr "" -#: cobc/typeck.c:13835 +#: cobc/typeck.c:14642 #, c-format msgid "%s must be alphanumeric or national" msgstr "" -#: cobc/typeck.c:13846 +#: cobc/typeck.c:14652 #, c-format msgid "%s may not be a figurative constant" msgstr "" -#: cobc/typeck.c:13885 +#: cobc/typeck.c:14690 #, c-format msgid "%s must be a child of the input record" msgstr "" -#: cobc/typeck.c:13911 +#: cobc/typeck.c:14715 #, c-format msgid "%s may not be an ignored item in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:13922 +#: cobc/typeck.c:14725 #, c-format msgid "%s must be elementary" msgstr "" -#: cobc/typeck.c:13935 +#: cobc/typeck.c:14737 #, fuzzy, c-format #| msgid "elementary items with SIGN clause must be USAGE DISPLAY or NATIONAL" msgid "STRING item '%s' must be USAGE DISPLAY or NATIONAL" msgstr "SIGN yantümceli temel ögeler USAGE DISPLAY veya NATIONAL olmalı" -#: cobc/typeck.c:13947 +#: cobc/typeck.c:14749 #, c-format msgid "%s must be USAGE DISPLAY or NATIONAL" msgstr "" -#: cobc/typeck.c:13961 +#: cobc/typeck.c:14761 #, c-format msgid "%s must be an integer" msgstr "" -#: cobc/typeck.c:13977 cobc/typeck.c:13983 +#: cobc/typeck.c:14776 cobc/typeck.c:14782 msgid "JSON/XML GENERATE receiving item" msgstr "" -#: cobc/typeck.c:13980 +#: cobc/typeck.c:14779 msgid "JSON/XML GENERATE receiving item may not have JUSTIFIED clause" msgstr "" -#: cobc/typeck.c:14068 +#: cobc/typeck.c:14867 msgid "JSON/XML GENERATE input record may not be reference modified" msgstr "" -#: cobc/typeck.c:14074 +#: cobc/typeck.c:14873 msgid "JSON/XML GENERATE input record may not have RENAMES clause" msgstr "" -#: cobc/typeck.c:14079 +#: cobc/typeck.c:14878 #, c-format msgid "all the children of '%s' are ignored in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14086 +#: cobc/typeck.c:14885 msgid "JSON/XML GENERATE input record has subrecords with non-unique names" msgstr "" -#: cobc/typeck.c:14091 +#: cobc/typeck.c:14890 msgid "floating-point items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14095 +#: cobc/typeck.c:14894 msgid "OCCURS items in JSON/XML GENERATE" msgstr "" -#: cobc/typeck.c:14142 +#: cobc/typeck.c:14941 msgid "NAMESPACE must be a valid URI" msgstr "" -#: cobc/typeck.c:14186 +#: cobc/typeck.c:14985 msgid "NAMESPACE-PREFIX must be a valid XML name" msgstr "" -#: cobc/typeck.c:14215 cobc/typeck.c:14223 +#: cobc/typeck.c:15014 cobc/typeck.c:15022 msgid "NAME OF item" msgstr "" -#: cobc/typeck.c:14220 +#: cobc/typeck.c:15019 msgid "NAME OF item must be the input record or a child of it" msgstr "" -#: cobc/typeck.c:14230 +#: cobc/typeck.c:15029 msgid "NAME OF ... OMITTED only valid for source identifier" msgstr "" -#: cobc/typeck.c:14238 +#: cobc/typeck.c:15037 #, c-format msgid "NAME OF literal must be a valid %s identifier" msgstr "" -#: cobc/typeck.c:14265 cobc/typeck.c:14266 cobc/typeck.c:14269 -#: cobc/typeck.c:14273 +#: cobc/typeck.c:15062 cobc/typeck.c:15063 cobc/typeck.c:15066 +#: cobc/typeck.c:15070 msgid "TYPE OF item" msgstr "" -#: cobc/typeck.c:14291 +#: cobc/typeck.c:15088 msgid "SUPPRESS WHEN SPACE item" msgstr "" -#: cobc/typeck.c:14294 +#: cobc/typeck.c:15091 msgid "SUPPRESS WHEN LOW-VALUE item" msgstr "" -#: cobc/typeck.c:14296 +#: cobc/typeck.c:15093 msgid "SUPPRESS WHEN HIGH-VALUE item" msgstr "" -#: cobc/typeck.c:14325 cobc/typeck.c:14333 cobc/typeck.c:14337 +#: cobc/typeck.c:15122 cobc/typeck.c:15130 cobc/typeck.c:15134 msgid "SUPPRESS item" msgstr "" -#: cobc/typeck.c:14329 +#: cobc/typeck.c:15126 msgid "SUPPRESS item with WHEN clause" msgstr "" -#: cobc/typeck.c:14407 +#: cobc/typeck.c:15204 msgid "WITH ATTRIBUTES specified, but no attributes can be generated" msgstr "" @@ -6100,169 +6256,183 @@ msgid " -Wparentheses warn if parentheses are omitted around AND within msgstr "" #: cobc/warning.def:70 -msgid " -Wstrict-typing warn strictly about type mismatch" +msgid " -Wstrict-typing warn strictly about type mismatch, even when same size" msgstr "" #: cobc/warning.def:73 -msgid " -Wimplicit-define warn whenever data items are implicitly defined" +msgid " -Wtyping warn about type mismatch" msgstr "" #: cobc/warning.def:76 -msgid " -Wno-corresponding do not warn about CORRESPONDING with no matching items" +msgid " -Wimplicit-define warn whenever data items are implicitly defined" msgstr "" #: cobc/warning.def:79 -msgid " -Winitial-value warn if initial VALUE clause is ignored" +msgid " -Wno-corresponding do not warn about CORRESPONDING with no matching items" msgstr "" #: cobc/warning.def:82 -msgid " -Wprototypes warn about missing FUNCTION prototypes/definitions" +msgid " -Winitial-value warn if initial VALUE clause is ignored" msgstr "" #: cobc/warning.def:85 -msgid " -Warithmetic-osvs warn if arithmetic expression precision has changed" +msgid " -Wprototypes warn about missing FUNCTION prototypes/definitions" msgstr "" #: cobc/warning.def:88 -msgid " -Wcall-params warn about non 01/77 items for CALL parameters" +msgid " -Warithmetic-osvs warn if arithmetic expression precision has changed" msgstr "" #: cobc/warning.def:91 -msgid " -Wconstant-expression warn about expressions that always resolve to true/false" +msgid " -Wcall-params warn about non 01/77 items for CALL parameters" msgstr "" #: cobc/warning.def:94 -msgid " -Wconstant-numlit-expression\twarn about numeric expressions that always resolve to true/false" +msgid " -Wconstant-expression warn about expressions that always resolve to true/false" msgstr "" #: cobc/warning.def:97 -msgid " -Wlarger-01-redefines warn about larger redefines allowed by COBOL standards" +msgid " -Wconstant-numlit-expression\twarn about numeric expressions that always resolve to true/false" msgstr "" #: cobc/warning.def:100 -msgid " -Wcolumn-overflow warn about text after program-text area, FIXED format" +msgid " -Wlarger-01-redefines warn about larger redefines allowed by COBOL standards" msgstr "" #: cobc/warning.def:103 -msgid " -Wterminator warn about lack of scope terminator END-XXX" +msgid " -Wcolumn-overflow warn about text after program-text area, FIXED format" msgstr "" #: cobc/warning.def:106 -msgid " -Wlinkage warn about dangling LINKAGE items" +msgid " -Wterminator warn about lack of scope terminator END-XXX" msgstr "" #: cobc/warning.def:109 -msgid " -Wunreachable warn about likely unreachable statements" +msgid " -Wlinkage warn about dangling LINKAGE items" msgstr "" #: cobc/warning.def:112 -msgid " -Wno-dialect do not warn about dialect specific issues" +msgid " -Wunreachable warn about likely unreachable statements" msgstr "" #: cobc/warning.def:115 -msgid " -Wno-goto-section do not warn about GO TO section-name" +msgid " -Wno-dialect do not warn about dialect specific issues" msgstr "" #: cobc/warning.def:118 -msgid " -Wgoto-different-section\twarn about GO TO a praragraph defined in a different section" +msgid " -Wno-goto-section do not warn about GO TO section-name" msgstr "" #: cobc/warning.def:121 -msgid " -Wsuspicious-perform-thru\twarn if PERFORM THRU references procedures not in ascending order or multiple sections" +msgid " -Wgoto-different-section\twarn about GO TO a praragraph defined in a different section" msgstr "" #: cobc/warning.def:124 -msgid " -Wdangling-text warn about source text after program-area" +msgid " -Wsuspicious-perform-thru\twarn if PERFORM THRU references procedures not in ascending order or multiple sections" msgstr "" #: cobc/warning.def:127 -msgid " -Wno-missing-newline do not warn about missing newlines" +msgid " -Wdangling-text warn about source text after program-area" msgstr "" #: cobc/warning.def:130 -msgid " -Wno-others do not warn about different issues" +msgid " -Wno-missing-newline do not warn about missing newlines" msgstr "" #: cobc/warning.def:133 +msgid " -Wno-others do not warn about different issues" +msgstr "" + +#: cobc/warning.def:136 msgid " -Wno-unsupported do not warn if runtime does not support a feature used" msgstr "" -#: libcob/call.c:94 +#: libcob/call.c:98 #, c-format msgid "LoadLibrary/GetProcAddress error %d" msgstr "" -#: libcob/call.c:841 +#: libcob/call.c:626 +#, c-format +msgid "preloading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:817 #, c-format msgid "%s: PROGRAM name exceeds %d characters" msgstr "%s: PROGRAM adı, %d karakteri aşıyor" -#: libcob/call.c:842 +#: libcob/call.c:818 #, fuzzy, c-format #| msgid "%s: PROGRAM name exceeds %d characters" msgid "%s: FUNCTION name exceeds %d characters" msgstr "%s: PROGRAM adı, %d karakteri aşıyor" -#: libcob/call.c:1067 +#: libcob/call.c:945 libcob/call.c:978 +#, c-format +msgid "loading from existing path '%s' failed; %s" +msgstr "" + +#: libcob/call.c:1049 msgid "indeterminable error in resolve of COBOL CALL" msgstr "" -#: libcob/call.c:1149 +#: libcob/call.c:1145 #, c-format msgid "user-defined FUNCTION '%s' not found" msgstr "" -#: libcob/call.c:1239 libcob/call.c:1325 libcob/call.c:1445 libcob/call.c:1472 +#: libcob/call.c:1247 libcob/call.c:1328 libcob/call.c:1448 libcob/call.c:1475 #, c-format msgid "NULL parameter passed to '%s'" msgstr "" -#: libcob/call.c:1329 +#: libcob/call.c:1332 #, c-format msgid "invalid number of arguments passed to '%s'" msgstr "" -#: libcob/call.c:1449 +#: libcob/call.c:1452 msgid "multiple call to 'cob_setjmp'" msgstr "" -#: libcob/call.c:1476 +#: libcob/call.c:1479 msgid "call to 'cob_longjmp' with no prior 'cob_setjmp'" msgstr "" -#: libcob/call.c:1703 libcob/call.c:1730 libcob/common.c:8144 +#: libcob/call.c:1608 +#, c-format +msgid "preloading of '%s' failed" +msgstr "" + +#: libcob/call.c:1706 libcob/call.c:1733 libcob/common.c:8965 msgid "cob_init() has not been called" msgstr "" -#: libcob/call.c:1709 +#: libcob/call.c:1712 #, c-format msgid "parameter %d is not within range of %d" msgstr "" -#: libcob/call.c:1715 +#: libcob/call.c:1718 #, c-format msgid "parameter %d is NULL" msgstr "" -#: libcob/call.c:2042 +#: libcob/call.c:2045 msgid "NULL field" msgstr "" -#: libcob/call.c:2050 +#: libcob/call.c:2053 msgid "field not allocated" msgstr "alan ayrılmamış" -#: libcob/call.c:2116 +#: libcob/call.c:2119 #, c-format msgid "attempt to over-write constant field with '%s'" msgstr "'%s' ile sabit alanının üzerine yazma girişimi" -#: libcob/call.c:2156 libcob/call.c:2212 -#, c-format -msgid "attempt to over-write constant parameter %d with " -msgstr "şununla sabit parametresi %d üzerine yazma girişimi: " - -#: libcob/call.c:2263 +#: libcob/call.c:2161 libcob/call.c:2219 libcob/call.c:2270 #, c-format msgid "attempt to over-write constant parameter %d with '%s'" msgstr "şununla sabit parametresi %d üzerine yazma girişimi: '%s'" @@ -6302,674 +6472,701 @@ msgstr "%s: geçersiz seçenek -- '%c'" msgid "%s: option requires an argument -- '%c'" msgstr "%s: seçenek, bir argüman gerektiriyor -- '%c'" -#: libcob/common.c:1242 +#: libcob/common.c:1074 +#, c-format +msgid "requested coredump creation failed with status %d" +msgstr "" + +#: libcob/common.c:1303 msgid "fatal arithmetic error" msgstr "onulmaz aritmetik hatası" -#: libcob/common.c:1245 +#: libcob/common.c:1306 msgid "interrupt from keyboard" msgstr "" -#: libcob/common.c:1249 +#: libcob/common.c:1310 msgid "hangup" msgstr "" -#: libcob/common.c:1253 +#: libcob/common.c:1314 msgid "quit" msgstr "" -#: libcob/common.c:1257 +#: libcob/common.c:1318 msgid "termination" msgstr "" -#: libcob/common.c:1261 +#: libcob/common.c:1322 msgid "emt termination" msgstr "" -#: libcob/common.c:1265 +#: libcob/common.c:1326 msgid "broken pipe" msgstr "" -#: libcob/common.c:1269 +#: libcob/common.c:1330 #, fuzzy #| msgid "signal %s" msgid "I/O signal" msgstr "%s sinyali" -#: libcob/common.c:1273 +#: libcob/common.c:1334 #, fuzzy #| msgid "attempt to reference unallocated memory" msgid "attempt to reference invalid memory address" msgstr "ayrılmamış belleğe başvurma girişimi" -#: libcob/common.c:1277 +#: libcob/common.c:1338 msgid "bus error" msgstr "veriyolu hatası" -#: libcob/common.c:1281 +#: libcob/common.c:1342 msgid "illegal instruction" msgstr "" -#: libcob/common.c:1285 +#: libcob/common.c:1346 #, fuzzy #| msgid "aborting" msgid "abort" msgstr "iptal ediliyor" -#: libcob/common.c:1289 +#: libcob/common.c:1350 msgid "process killed" msgstr "" -#: libcob/common.c:1293 +#: libcob/common.c:1354 #, fuzzy #| msgid "caught signal" msgid "alarm signal" msgstr "sinyal yakalandı" -#: libcob/common.c:1297 +#: libcob/common.c:1358 #, fuzzy #| msgid "preprocessing:" msgid "stop process" msgstr "ön işleme yapılıyor:" -#: libcob/common.c:1301 libcob/common.c:1305 +#: libcob/common.c:1362 libcob/common.c:1366 msgid "child process stopped" msgstr "" #. TRANSLATORS: This msgid is used for an OS signal like SIGABRT. -#: libcob/common.c:1312 +#: libcob/common.c:1373 #, fuzzy #| msgid "signal %s" msgid "signal" msgstr "%s sinyali" #. TRANSLATORS: This msgid is shown for a requested but not complete stack trace. -#: libcob/common.c:1314 +#: libcob/common.c:1375 msgid "(more COBOL runtime elements follow...)" msgstr "" -#: libcob/common.c:1316 libcob/common.c:8101 +#: libcob/common.c:1377 libcob/common.c:8922 #, c-format msgid "abnormal termination - file contents may be incorrect" msgstr "olağan olmayan sonlandırma - dosya sabitleri yanlış olabilir" -#: libcob/common.c:3145 libcob/common.c:8581 libcob/common.c:8595 +#: libcob/common.c:3441 libcob/common.c:9398 libcob/common.c:9412 msgid "version mismatch" msgstr "sürüm uyuşmazlığı" -#: libcob/common.c:3146 libcob/common.c:3148 libcob/common.c:8582 -#: libcob/common.c:8584 +#: libcob/common.c:3442 libcob/common.c:3444 libcob/common.c:9399 +#: libcob/common.c:9401 #, c-format msgid "%s has version %s.%d" msgstr "%s, %s.%d sürümüne iye" -#: libcob/common.c:3158 +#: libcob/common.c:3454 #, c-format msgid "CALL to %s requires %d arguments" msgstr "%s için CALL, %d argüman gerektiriyor" -#: libcob/common.c:3779 +#: libcob/common.c:4141 #, c-format msgid "code execution leaving %s" msgstr "" -#: libcob/common.c:3789 +#: libcob/common.c:4151 #, c-format msgid "BASED/LINKAGE item %s has NULL address" msgstr "BASED/LINKAGE ögesi %s, NULL adrese iye" -#: libcob/common.c:3802 libcob/common.c:3806 +#: libcob/common.c:4168 +#, c-format +msgid "memory violation detected for '%s' after %s" +msgstr "" + +#: libcob/common.c:4171 +#, c-format +msgid "memory violation detected after %s" +msgstr "" + +#: libcob/common.c:4229 libcob/common.c:4244 libcob/common.c:4283 +#: libcob/common.c:4287 #, c-format msgid "LINKAGE item %s not passed by caller" msgstr "LINKAGE ögesi %s, çağırıcı tarafından geçirilmemiş" -#: libcob/common.c:3892 +#: libcob/common.c:4253 +#, c-format +msgid "LINKAGE item %s (size %lu) too small in the caller (size %lu)" +msgstr "" + +#: libcob/common.c:4378 #, c-format msgid "'%s' (Type: %s) not numeric: '%s'" msgstr "'%s' (Tür: %s), sayısal değil: '%s'" -#: libcob/common.c:3917 +#: libcob/common.c:4403 #, c-format msgid "OCCURS DEPENDING ON '%s' out of bounds: %d" msgstr "OCCURS DEPENDİNG ON '%s', sınırlar dışında: %d" -#: libcob/common.c:3920 libcob/common.c:3958 +#: libcob/common.c:4406 libcob/common.c:4444 #, c-format msgid "maximum subscript for '%s': %d" msgstr "'%s' için en büyük altsimge: %d" -#: libcob/common.c:3922 +#: libcob/common.c:4408 #, c-format msgid "minimum subscript for '%s': %d" msgstr "'%s' için en küçük altsimge: %d" -#: libcob/common.c:3955 +#: libcob/common.c:4441 #, c-format msgid "current maximum subscript for '%s': %d" msgstr "'%s' için geçerli en büyük altsimge: %d" -#: libcob/common.c:3979 +#: libcob/common.c:4465 #, c-format msgid "offset of '%s' out of bounds: %d, maximum: %d" msgstr "'%s' ofseti sınırlar dışında: %d, en çok: %d" -#: libcob/common.c:3994 +#: libcob/common.c:4480 #, c-format msgid "length of '%s' out of bounds: %d, maximum: %d" msgstr "'%s' uzunluğu sınırlar dışında: %d, en çok: %d" -#: libcob/common.c:4005 +#: libcob/common.c:4491 #, c-format msgid "length of '%s' out of bounds: %d, starting at: %d, maximum: %d" msgstr "'%s' uzunluğu sınırlar dışında: %d, başlangıç konumu: %d, en çok: %d" -#: libcob/common.c:4093 libcob/common.c:4098 +#: libcob/common.c:4579 libcob/common.c:4584 #, c-format msgid "EXTERNAL item '%s' previously allocated with size %d, requested size is %d" msgstr "EXTENAL ögesi '%s', önceden %d boyutla ayrılmış; istenen boyut %d" -#: libcob/common.c:4593 +#: libcob/common.c:4961 libcob/common.c:5201 #, c-format msgid "COB_CURRENT_DATE '%s' is invalid" msgstr "COB_CURRENT_DATE '%s' geçersiz" -#: libcob/common.c:5641 libcob/common.c:5644 +#: libcob/common.c:6321 libcob/common.c:6324 msgid "Program abandoned at user request" msgstr "" -#: libcob/common.c:5668 +#: libcob/common.c:6348 #, c-format msgid "parameter to SYSTEM call is larger than %d characters" msgstr "SYSTEM çağrısı parametresi %d karakterden daha büyük" -#: libcob/common.c:6202 +#: libcob/common.c:6998 #, c-format msgid "error '%s' during CBL_GC_FORK" msgstr "CBL_GC_FORK sırasında '%s' hatası" -#: libcob/common.c:6207 libcob/common.c:6304 +#: libcob/common.c:7003 libcob/common.c:7100 #, c-format msgid "'%s' is not supported on this platform" msgstr "'%s', bu platformda desteklenmiyor" -#: libcob/common.c:6233 +#: libcob/common.c:7029 #, c-format msgid "error '%s' for P%d during CBL_GC_WAITPID" msgstr "CBL_GC_WAITPID sırasında '%s' hatası, P%d için" -#: libcob/common.c:6424 -msgid "Call to CBL_GC_GETOPT with wrong longoption size." +#: libcob/common.c:7220 +#, fuzzy +#| msgid "Call to CBL_GC_GETOPT with wrong longoption size." +msgid "call to CBL_GC_GETOPT with wrong longoption size" msgstr "Yanlış uzun seçenek boyutuyla CBL_GC_GETOPT çağrısı." -#: libcob/common.c:6429 -msgid "Call to CBL_GC_GETOPT with missing longind." +#: libcob/common.c:7225 +#, fuzzy +#| msgid "Call to CBL_GC_GETOPT with missing longind." +msgid "call to CBL_GC_GETOPT with missing longind" msgstr "Eksik uzun girinti ile CBL_GC_GETOPT çağrısı." -#: libcob/common.c:6856 libcob/common.c:6877 libcob/common.c:6890 -#: libcob/common.c:9107 libcob/common.c:9111 +#: libcob/common.c:7654 libcob/common.c:7675 libcob/common.c:7688 +#: libcob/common.c:9924 libcob/common.c:9928 #, c-format msgid "(default)" msgstr "(öntanımlı)" -#: libcob/common.c:7143 libcob/common.c:7162 +#: libcob/common.c:7973 libcob/common.c:7992 msgid "should be unsigned" msgstr "imzalanmamış olmalı" -#: libcob/common.c:7151 libcob/common.c:7200 +#: libcob/common.c:7981 libcob/common.c:8030 msgid "should be numeric" msgstr "sayısal olmalı" -#: libcob/common.c:7209 +#: libcob/common.c:8039 #, c-format msgid "minimum value: %lu" msgstr "en küçük değer: %lu" -#: libcob/common.c:7261 libcob/common.c:7825 libcob/common.c:7839 +#: libcob/common.c:8069 libcob/common.c:8640 libcob/common.c:8654 +#: bin/cobcrun.c:206 #, c-format msgid "should not contain '%c'" msgstr "'%c' içermemeli" -#: libcob/common.c:7342 libcob/common.c:7390 libcob/common.c:7418 -#: libcob/common.c:7427 libcob/common.c:7435 libcob/common.c:7460 +#: libcob/common.c:8150 libcob/common.c:8169 libcob/common.c:8231 +#: libcob/common.c:8240 libcob/common.c:8248 libcob/common.c:8273 #, c-format msgid "not set" msgstr "ayarlanmamış" -#: libcob/common.c:7410 libcob/common.c:7413 libcob/common.c:7416 +#: libcob/common.c:8223 libcob/common.c:8226 libcob/common.c:8229 #, c-format msgid "set by %s" msgstr "%s tarafından ayarlanmış" -#: libcob/common.c:7552 +#: libcob/common.c:8367 #, c-format msgid "WARNING - '%s' without a value - ignored!" msgstr "UYARI - '%s' ögesinin değeri yok - yok sayıldı!" -#: libcob/common.c:7555 +#: libcob/common.c:8370 #, c-format msgid "'%s' without a value!" msgstr "'%s' ögesinin değeri yok!" -#: libcob/common.c:7582 +#: libcob/common.c:8397 #, c-format msgid "WARNING - '%s %s' without a value - ignored!" msgstr "UYARI - '%s %s' ögesinin değeri yok - yok sayıldı!" -#: libcob/common.c:8085 +#: libcob/common.c:8906 msgid "error" msgstr "hata" -#: libcob/common.c:8127 +#: libcob/common.c:8948 msgid "attempt to CANCEL active program" msgstr "etkin programı CANCEL girişimi" -#: libcob/common.c:8154 +#: libcob/common.c:8975 msgid "CALL of program with CHAINING clause" msgstr "CHAINING yantümcesiyle program CALL" -#: libcob/common.c:8158 +#: libcob/common.c:8979 msgid "stack overflow, possible PERFORM depth exceeded" msgstr "yığın taşması, PERFORM derinliğinin aşılması olası" -#: libcob/common.c:8163 +#: libcob/common.c:8984 msgid "invalid entry/exit in GLOBAL USE procedure" msgstr "GLOBAL USE prosedüründe geçersiz giriş/çıkış" -#: libcob/common.c:8167 +#: libcob/common.c:8988 msgid "unable to allocate memory" msgstr "bellek ayrılamıyor" -#: libcob/common.c:8172 +#: libcob/common.c:8993 msgid "invalid entry into module" msgstr "modüle geçersiz giriş" -#: libcob/common.c:8179 +#: libcob/common.c:9000 #, c-format msgid "recursive CALL from '%s' to '%s' which is NOT RECURSIVE" msgstr "NOT RECURSIVE olmayan '%s' -> '%s' özyineli CALL" -#: libcob/common.c:8184 +#: libcob/common.c:9005 #, c-format msgid "invalid recursive COBOL CALL to '%s'" msgstr "'%s' için geçersiz özyineli COBOL CALL" -#: libcob/common.c:8199 +#: libcob/common.c:9020 msgid "end of file" msgstr "dosya sonu" -#: libcob/common.c:8202 +#: libcob/common.c:9023 msgid "key out of range" msgstr "anahtar erimin dışında" -#: libcob/common.c:8205 +#: libcob/common.c:9026 msgid "key order not ascending" msgstr "anahtar sırası artan değil" -#: libcob/common.c:8208 +#: libcob/common.c:9029 msgid "record key already exists" msgstr "kayıt anahtarı halihazırda var" -#: libcob/common.c:8211 +#: libcob/common.c:9032 msgid "record key does not exist" msgstr "kayıt anahtarı yok" -#: libcob/common.c:8214 +#: libcob/common.c:9035 msgid "permanent file error" msgstr "kalıcı dosya hatası" -#: libcob/common.c:8217 +#: libcob/common.c:9038 msgid "inconsistent file name" msgstr "tutarsız dosya adı" -#: libcob/common.c:8220 +#: libcob/common.c:9041 msgid "file does not exist" msgstr "dosya yok" -#: libcob/common.c:8223 +#: libcob/common.c:9044 msgid "permission denied" msgstr "izin reddedildi" -#: libcob/common.c:8226 +#: libcob/common.c:9047 msgid "mismatch of fixed file attributes" msgstr "" -#: libcob/common.c:8229 +#: libcob/common.c:9050 msgid "file already open" msgstr "dosya halihazırda açık" -#: libcob/common.c:8232 +#: libcob/common.c:9053 msgid "file not open" msgstr "dosya açık değil" -#: libcob/common.c:8235 +#: libcob/common.c:9056 msgid "READ must be executed first" msgstr "READ, ilk olarak yürütülmeli" -#: libcob/common.c:8238 +#: libcob/common.c:9059 msgid "record overflow" msgstr "kayıt taşması" -#: libcob/common.c:8241 +#: libcob/common.c:9062 msgid "READ after unsuccessful READ/START" msgstr "başarısız READ/START sonrası READ" -#: libcob/common.c:8244 +#: libcob/common.c:9065 msgid "READ/START not allowed, file not open for input" msgstr "READ/START'a izin verilmiyor, dosya girdi için açık değil" -#: libcob/common.c:8247 +#: libcob/common.c:9068 msgid "WRITE not allowed, file not open for output" msgstr "WRITE'a izin verilmiyor, dosya çıktı için açık değil" -#: libcob/common.c:8250 +#: libcob/common.c:9071 msgid "DELETE/REWRITE not allowed, file not open for I-O" msgstr "DELETE/REWRITE'a izin verilmiyor, dosya G-Ç için açık değil" -#: libcob/common.c:8253 +#: libcob/common.c:9074 msgid "record locked by another file connector" msgstr "kayıt, başka bir dosya bağlayanı tarafından kilitlenmiş" -#: libcob/common.c:8256 +#: libcob/common.c:9077 msgid "LINAGE values invalid" msgstr "LINAGE değerleri geçersiz" -#: libcob/common.c:8259 +#: libcob/common.c:9080 msgid "file sharing conflict" msgstr "dosya paylaşma çakışması" -#: libcob/common.c:8262 +#: libcob/common.c:9083 msgid "invalid data in LINE SEQUENTIAL file" msgstr "" -#: libcob/common.c:8266 +#: libcob/common.c:9087 msgid "runtime library is not configured for this operation" msgstr "çalışma zamanı kitaplığı, bu işlem için yapılandırılmamış" -#: libcob/common.c:8271 +#: libcob/common.c:9092 msgid "unknown file error" msgstr "bilinmeyen dosya hatası" -#: libcob/common.c:8278 +#: libcob/common.c:9099 #, c-format msgid "%s (status = %02d) for file %s" msgstr "%s (durum = %02d), %s dosyası için" -#: libcob/common.c:8281 +#: libcob/common.c:9102 #, c-format msgid "%s (status = %02d) for file %s on %s" msgstr "%s (durum = %02d), şuradaki %s dosyası için: %s" -#: libcob/common.c:8288 +#: libcob/common.c:9109 msgid "attempt to use non-implemented function" msgstr "henüz eklenmemiş işlevi kullanma girişimi" -#: libcob/common.c:8291 +#: libcob/common.c:9112 msgid "attempt to use non-implemented XML I/O" msgstr "henüz eklenmemiş XML G-Ç kullanma girişimi" -#: libcob/common.c:8294 +#: libcob/common.c:9115 msgid "attempt to use non-implemented JSON I/O" msgstr "henüz eklenmemiş JSON G-Ç kullanma girişimi" -#: libcob/common.c:8341 +#: libcob/common.c:9162 msgid "environment variables" msgstr "çevre değişkeni" -#: libcob/common.c:8466 libcob/common.c:8539 libcob/common.c:8554 -#: libcob/common.c:8859 libcob/common.c:8893 libcob/common.c:8910 -#: libcob/common.c:8925 +#: libcob/common.c:9283 libcob/common.c:9356 libcob/common.c:9371 +#: libcob/common.c:9676 libcob/common.c:9710 libcob/common.c:9727 +#: libcob/common.c:9742 #, c-format msgid "%s, version %d.%d.%d" msgstr "%s, sürüm %d.%d.%d" -#: libcob/common.c:8468 libcob/common.c:8541 libcob/common.c:8558 -#: libcob/common.c:8862 libcob/common.c:8913 libcob/common.c:8928 +#: libcob/common.c:9285 libcob/common.c:9358 libcob/common.c:9375 +#: libcob/common.c:9679 libcob/common.c:9730 libcob/common.c:9745 #, c-format msgid "%s, version %d.%d.%d (compiled with %d.%d)" msgstr "%s, sürüm %d.%d.%d (%d.%d ile derlendi)" -#: libcob/common.c:8471 +#: libcob/common.c:9288 #, c-format msgid "%s, version %s" msgstr "%s, sürüm %s" -#: libcob/common.c:8739 +#: libcob/common.c:9556 #, fuzzy, c-format #| msgid "License LGPLv3+: GNU LGPL version 3 or later <http://gnu.org/licenses/lgpl.html>" msgid "License LGPLv3+: GNU LGPL version 3 or later <%s>" msgstr "Lisans LGPLv3+: GNU LGPL sürüm 3 veya sonrası <http://gnu.org/licenses/lgpl.html>" -#: libcob/common.c:8803 libcob/common.c:8805 +#: libcob/common.c:9620 libcob/common.c:9622 msgid "dynamic loading" msgstr "devingen yükleme" -#: libcob/common.c:8938 +#: libcob/common.c:9755 msgid "mouse support" msgstr "fare desteği" -#: libcob/common.c:8955 +#: libcob/common.c:9772 msgid "CALL configuration" msgstr "CALL yapılandırması" -#: libcob/common.c:8956 +#: libcob/common.c:9773 msgid "File I/O configuration" msgstr "Dosya G-Ç yapılandırması" -#: libcob/common.c:8957 +#: libcob/common.c:9774 msgid "Screen I/O configuration" msgstr "Ekran G-Ç yapılandırması" -#: libcob/common.c:8958 +#: libcob/common.c:9775 msgid "Miscellaneous" msgstr "Çeşitli" -#: libcob/common.c:8959 +#: libcob/common.c:9776 msgid "System configuration" msgstr "Sistem yapılandırması" -#: libcob/common.c:8963 +#: libcob/common.c:9780 msgid "runtime configuration" msgstr "Çalışma zamanı yapılandırması" -#: libcob/common.c:8965 +#: libcob/common.c:9782 msgid "via" msgstr "şununla:" -#: libcob/common.c:9040 libcob/common.c:9068 +#: libcob/common.c:9857 libcob/common.c:9885 msgid "... removed from environment" msgstr "... ortamdan kaldırıldı" -#: libcob/common.c:9094 libcob/common.c:9096 +#: libcob/common.c:9911 libcob/common.c:9913 #, c-format msgid "(set by %s)" msgstr "(%s tarafından ayarlandı)" -#: libcob/common.c:9104 +#: libcob/common.c:9921 #, c-format msgid "(reset)" msgstr "(sıfırlandı)" -#: libcob/common.c:9334 +#: libcob/common.c:10151 msgid "compiler was not built with --enable-debug-log; COB_DEBUG_LOG ignored" msgstr "derleyici, --enable-debug-log ile yapılmamış, COB_DEBUG_LOG yok sayıldı" -#: libcob/common.c:9524 libcob/common.c:9550 +#: libcob/common.c:10338 libcob/common.c:10364 #, c-format msgid "%s called with unknown option: %d" msgstr "%s, bilinmeyen seçenekle çağrıldı: %d" #. TRANSLATORS: This msgid is shown for a requested but empty stack trace. -#: libcob/common.c:9597 +#: libcob/common.c:10411 msgid "No COBOL runtime elements on stack." msgstr "" -#: libcob/common.c:9915 +#: libcob/common.c:10734 #, c-format msgid "Module dump due to %s" msgstr "%s nedeniyle modül dökümü" -#: libcob/common.c:9943 +#: libcob/common.c:10762 #, c-format msgid "Dump Program-Id %s from %s compiled %s" msgstr "Program-Id %s, %s konumundan, %s derlemesi dök" -#: libcob/common.c:9969 +#: libcob/common.c:10788 #, c-format msgid "dump written to %s" msgstr "döküm, %s konumuna yazıldı" -#: libcob/fileio.c:816 libcob/fileio.c:1628 libcob/fileio.c:1882 -#: libcob/fileio.c:3812 libcob/fileio.c:4396 libcob/fileio.c:9658 -#: libcob/fileio.c:9686 libcob/numeric.c:1583 +#: libcob/fileio.c:784 libcob/fileio.c:1664 libcob/fileio.c:1926 +#: libcob/fileio.c:3938 libcob/fileio.c:4522 libcob/fileio.c:10049 +#: libcob/fileio.c:10077 libcob/numeric.c:1915 #, c-format msgid "invalid internal call of %s" msgstr "%s geçersiz iç çağrısı" -#: libcob/fileio.c:3359 +#: libcob/fileio.c:3486 #, c-format msgid "BDB error: %s" msgstr "BDB hatası: %s" -#: libcob/fileio.c:3369 +#: libcob/fileio.c:3496 #, c-format msgid "BDB error: %s %s" msgstr "BDB hatası: %s %s" -#: libcob/fileio.c:3383 libcob/fileio.c:3403 +#: libcob/fileio.c:3510 libcob/fileio.c:3530 #, c-format msgid "cannot join BDB environment (%s), error: %d %s" msgstr "BDB ortamına katılamıyor (%s), hata: %d %s" -#: libcob/fileio.c:3458 libcob/fileio.c:3483 libcob/fileio.c:3509 -#: libcob/fileio.c:3528 +#: libcob/fileio.c:3585 libcob/fileio.c:3610 libcob/fileio.c:3636 +#: libcob/fileio.c:3655 #, fuzzy, c-format #| msgid "BDB error: %s %s" msgid "BDB (%s), error: %d %s" msgstr "BDB hatası: %s %s" -#: libcob/fileio.c:6071 +#: libcob/fileio.c:6199 #, c-format msgid "ERROR FILE %s has ASSIGN field is NULL" msgstr "ERROR FILE %s, NULL olan ASSIGN alanı almış" -#: libcob/fileio.c:6862 +#: libcob/fileio.c:7050 #, c-format msgid "call to CBL_OPEN_FILE with wrong access mode: %d" msgstr "yanlış erişim kipiyle CBL_OPEN_FILE çağrısı: %d" -#: libcob/fileio.c:6946 +#: libcob/fileio.c:7135 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_lock: %d" msgstr "yanlış file_lock ile CBL_CREATE_FILE çağrısı: %d" -#: libcob/fileio.c:6949 +#: libcob/fileio.c:7138 #, c-format msgid "call to CBL_CREATE_FILE with wrong file_dev: %d" msgstr "yanlış file_dev ile CBL_CREATE_FILE çağrısı: %d" -#: libcob/fileio.c:7174 libcob/fileio.c:7457 +#: libcob/fileio.c:7362 libcob/fileio.c:7645 #, c-format msgid "'%s' - File detail area is too short" msgstr "'%s' - Dosya ayrıntı alanı pek kısa" -#: libcob/fileio.c:7686 +#: libcob/fileio.c:7871 msgid "SORT is unable to acquire temporary file" msgstr "SORT, geçici dosyayı alamıyor" #. TRANSLATORS: This msgid is concatenated with a filename; -#. setup translation to allow this to be followed on the right side. -#: libcob/fileio.c:8432 +#. setup translation to allow this to be followed on the right side, +#. if necessary use a colon or hyphen +#: libcob/fileio.c:8777 #, fuzzy #| msgid "implicit CLOSE of %s" msgid "implicit CLOSE of " msgstr "%s örtük CLOSE'u" -#: libcob/fileio.c:9617 libcob/fileio.c:9752 +#: libcob/fileio.c:10008 libcob/fileio.c:10193 #, c-format msgid "ERROR: EXTFH called with FCD version %d" msgstr "HATA: EXTFH, FCD sürümü %d ile çağrıldı" -#: libcob/fileio.c:9886 +#: libcob/fileio.c:10310 #, c-format msgid "ERROR: EXTFH called with wrong file organization %d" msgstr "HATA: EXTFH, %d yanlış dosya organizasyonuyla çağrıldı" -#: libcob/fileio.c:9893 +#: libcob/fileio.c:10317 #, fuzzy, c-format #| msgid "ERROR: EXTFH called with FCD version %d" msgid "ERROR: EXTFH called with no %s pointer" msgstr "HATA: EXTFH, FCD sürümü %d ile çağrıldı" -#: libcob/fileio.c:10029 +#: libcob/fileio.c:10461 #, fuzzy, c-format #| msgid "ERROR: EXTFH called with FCD version %d" msgid "ERROR: EXTFH called with no %s pointer; Function %d" msgstr "HATA: EXTFH, FCD sürümü %d ile çağrıldı" -#: libcob/fileio.c:10208 +#: libcob/fileio.c:10683 #, fuzzy, c-format #| msgid "ERROR: EXTFH called with FCD version %d" msgid "ERROR: EXTFH called with unknown Function %d" msgstr "HATA: EXTFH, FCD sürümü %d ile çağrıldı" -#: libcob/reportio.c:630 +#: libcob/reportio.c:629 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT %d" msgstr "INITIATE %s LINE %d, PAGE LIMIT %d değerini aşıyor" -#: libcob/reportio.c:637 libcob/reportio.c:652 +#: libcob/reportio.c:636 libcob/reportio.c:651 #, c-format msgid "INITIATE %s NEXT GROUP %d exceeds PAGE LIMIT" msgstr "INITIATE %s NEXT GROUP %d, PAGE LIMIT değerini aşıyor" -#: libcob/reportio.c:645 +#: libcob/reportio.c:644 #, c-format msgid "INITIATE %s LINE %d exceeds PAGE LIMIT" msgstr "INITIATE %s LINE %d, PAGE LIMIT değerini aşıyor" -#: libcob/reportio.c:1327 +#: libcob/reportio.c:1336 #, c-format msgid "INITIATE %s was already done" msgstr "INITIATE %s, halıhazırda yapılmış" -#: libcob/reportio.c:1343 +#: libcob/reportio.c:1352 #, c-format msgid "INITIATE %s PAGE LIMIT problem" msgstr "INITIATE %s PAGE LIMIT sorunu" -#: libcob/reportio.c:1420 +#: libcob/reportio.c:1429 #, c-format msgid "TERMINATE %s but no INITIATE was done" msgstr "TERMINATE %s; ancak bir INITIATE yapılmamış" -#: libcob/reportio.c:1565 +#: libcob/reportio.c:1574 #, c-format msgid "GENERATE %s but no INITIATE was done" msgstr "GENERATE %s; ancak bir INITIATE yapılmamış" -#: libcob/reportio.c:1917 +#: libcob/reportio.c:1926 #, c-format msgid "could not find line to SUPPRESS in report %s" msgstr "%s raporunda SUPPRESS satırı bulunamadı" -#: libcob/screenio.c:568 +#: libcob/screenio.c:1055 msgid "failed to initialize curses" msgstr "curses ilklendirilemedi" -#: libcob/screenio.c:4081 +#: libcob/screenio.c:5034 msgid "end of program, please press a key to exit" msgstr "program sonu, çıkmak için bir düğmeye basın" -#: libcob/termio.c:78 libcob/termio.c:117 +#: libcob/termio.c:76 libcob/termio.c:136 msgid "(Not representable)" msgstr "(Temsil edilemiyor)" -#: libcob/termio.c:354 +#: libcob/termio.c:406 #, c-format msgid "cannot open %s (=%s)" msgstr "%s açılamıyor (=%s)" -#: libcob/termio.c:369 +#: libcob/termio.c:421 msgid "COB_DISPLAY_PUNCH_FILE is invalid, output to SYSPUNCH skipped" msgstr "COB_DISPLAY_PUNCH_FILE geçersiz, SYSPUNCH çıktısı atlanıyor" @@ -7063,32 +7260,56 @@ msgstr "" " adı ve/veya yükleme yolu ayarla\n" " (COB_LIBRARY_PATH and/or COB_PRELOAD)" -#: bin/cobcrun.c:146 -#, fuzzy, c-format -#| msgid "GnuCOBOL module loader" -msgid "GnuCOBOL home page: <%s>" -msgstr "GnuCOBOL modülü yükleyici" - -#: bin/cobcrun.c:148 -#, c-format -msgid "General help using GNU software: <%s>" -msgstr "GNU yazılımları kullanımı için genel yardım: <%s>" - -#: bin/cobcrun.c:288 +#: bin/cobcrun.c:286 msgid "invalid configuration file name" msgstr "geçersiz yapılandırma dosyası adı" -#: bin/cobcrun.c:355 +#: bin/cobcrun.c:353 #, c-format msgid "invalid module argument '%s'" msgstr "geçersiz modül argümanı '%s'" -#: bin/cobcrun.c:410 +#: bin/cobcrun.c:408 #, c-format msgid "%s: missing PROGRAM name" msgstr "%s: PROGRAM adı eksik" -#: bin/cobcrun.c:412 +#: bin/cobcrun.c:410 #, c-format msgid "Try '%s --help' for more information." msgstr "Daha fazla bilgi için '%s --help' yazın." + +#~ msgid "unexpected error_node parameter" +#~ msgstr "beklenmedik error_node parametresi" + +#~ msgid "CONTROL DIVISION" +#~ msgstr "CONTROL DIVISION" + +#, c-format +#~ msgid "%s item '%s' should be USAGE DISPLAY" +#~ msgstr "%s ögesi '%s', USAGE DISPLAY olmalı" + +#, c-format +#~ msgid "'%s' cannot have JUSTIFIED RIGHT" +#~ msgstr "'%s', JUSTIFIED RIGHT alamaz" + +#~ msgid "cannot specify both FULL and JUSTIFIED" +#~ msgstr "hem FULL hem JUSTIFIED belirtilemez" + +#~ msgid "cannot specify both PIC and VALUE" +#~ msgstr "hem PIC hem VALUE belirtilemez" + +#, c-format +#~ msgid "unexpected USAGE: %d" +#~ msgstr "beklenmedik USAGE: %d" + +#~ msgid "" +#~ " -fec=<exception-name>\tenable code generation for <exception-name>,\n" +#~ " sets -fsource-location" +#~ msgstr "" +#~ " -fec=<istisna-adı> <istisna-adı> için kod üretimini etkinleştir,\n" +#~ " -fsource-location ayarlar" + +#, c-format +#~ msgid "attempt to over-write constant parameter %d with " +#~ msgstr "şununla sabit parametresi %d üzerine yazma girişimi: " diff --git a/tests/testsuite.src/data_packed.at b/tests/testsuite.src/data_packed.at index 674d8125b..2c8f3e415 100644 --- a/tests/testsuite.src/data_packed.at +++ b/tests/testsuite.src/data_packed.at @@ -5773,7 +5773,7 @@ AT_DATA([prog.cob], [ MOVE FLD0498A TO FLD0498C. MOVE FLD0499A TO FLD0499C. - 4000-COMPARE. + *4000-COMPARE. IF FLD0001C (1:) NOT EQUAL XPC-FLD0001C DISPLAY 'FLD0001C ==> ' HEX-OF (FLD0001C) @@ -10813,7 +10813,7 @@ AT_DATA([prog2.cob], [ MOVE FLD0998A TO FLD0998C. MOVE FLD0999A TO FLD0999C. - 4000-COMPARE. + *4000-COMPARE. IF FLD0500C (1:) NOT EQUAL XPC-FLD0500C DISPLAY 'FLD0500C ==> ' HEX-OF (FLD0500C) diff --git a/tests/testsuite.src/listings.at b/tests/testsuite.src/listings.at index 90d1a0e0c..6d3bd16a1 100644 --- a/tests/testsuite.src/listings.at +++ b/tests/testsuite.src/listings.at @@ -1552,7 +1552,7 @@ prog.cob:6: warning: numeric value is expected 1 error in compilation group ], [ignore]) -AT_CHECK([$COMPILE_LISTING0 -t- -fmax-errors=0 prog.cob], [97], +AT_CHECK([$COMPILE_LISTING0 -t- -Wfatal-errors prog.cob], [97], [GnuCOBOL V.R.P prog.cob LINE PG/LN A...B............................................................ @@ -3345,7 +3345,7 @@ AT_DATA([prog.cob], [ OCCURS 8 TIMES PIC 1(8) BIT. ]) -AT_CHECK([$COMPILE_LISTING0 -t prog.lst -ftsymbols -Wno-pending -Wno-unfinished -fword-continuation=ok prog.cob], [1], [], [ignore]) +AT_CHECK([$COMPILE_LISTING0 -t prog.lst -ftsymbols -Wno-pending -Wno-unfinished -fmax-errors=0 -fword-continuation=ok prog.cob], [1], [], [ignore]) AT_DATA([expected.lst], [GnuCOBOL V.R.P prog.cob diff --git a/tests/testsuite.src/run_file.at b/tests/testsuite.src/run_file.at index 1f290a7a4..2126dec17 100644 --- a/tests/testsuite.src/run_file.at +++ b/tests/testsuite.src/run_file.at @@ -1,4 +1,4 @@ -## Copyright (C) 2003-2012, 2014-2023 Free Software Foundation, Inc. +## Copyright (C) 2003-2012, 2014-2024 Free Software Foundation, Inc. ## Written by Keisuke Nishida, Roger While, Simon Sobisch, Ron Norman, ## Brian Tiffin, Joe Robbins, Edward Hart ## @@ -86,6 +86,147 @@ AT_CHECK([$COBCRUN_DIRECT ./prog], [0], [], []) AT_CLEANUP +AT_SETUP([CLOSE WITH LOCK]) +AT_KEYWORDS([runfile OPEN WRITE READ DELETE FILE]) + +AT_DATA([prog.cob], [ + IDENTIFICATION DIVISION. + PROGRAM-ID. prog. + ENVIRONMENT DIVISION. + INPUT-OUTPUT SECTION. + FILE-CONTROL. + SELECT FILE-TBL ASSIGN TO "testfile" + ORGANIZATION IS SEQUENTIAL + FILE STATUS IS WSFS. + SELECT FILE0 ASSIGN TO "testfile" + ORGANIZATION IS SEQUENTIAL + FILE STATUS IS WSFS. + DATA DIVISION. + FILE SECTION. + FD FILE0. + 01 F0REC PIC X(80). + FD FILE-TBL. + 01 FOREC PIC X(80). + WORKING-STORAGE SECTION. + 01 WSFS PIC X(2). + PROCEDURE DIVISION. + * + OPEN OUTPUT FILE-TBL + IF WSFS NOT = "00" + DISPLAY "STATUS OPEN OUTPUT:" WSFS. + MOVE ALL "A" TO FOREC + WRITE FOREC + IF WSFS NOT = "00" + DISPLAY "STATUS WRITE A:" WSFS. + CLOSE FILE-TBL WITH LOCK + IF WSFS NOT = "00" + DISPLAY "STATUS CLOSE WITH LOCK:" WSFS. + OPEN INPUT FILE-TBL + IF WSFS NOT = "38" + DISPLAY "STATUS INPUT after CLOSE LOCK:" WSFS. + CLOSE FILE-TBL + IF WSFS NOT = "42" + DISPLAY "STATUS CLOSE non-opened:" WSFS. + * + * Note: MicroFocus _does_ delete the file and returns status 00 here + DELETE FILE FILE-TBL + IF WSFS NOT = "38" + DISPLAY "STATUS DELETE FILE after CLOSE LOCK:" WSFS. + * + OPEN INPUT FILE0 + IF WSFS NOT = "00" + DISPLAY "STATUS INPUT separate file:" WSFS. + READ FILE0 NEXT + IF WSFS NOT = "00" + DISPLAY "STATUS READ A:" WSFS. + IF F0REC NOT = ALL "A" + DISPLAY "content not ALL 'A':" F0REC ":". + CLOSE FILE0 + IF WSFS NOT = "00" + DISPLAY "STATUS CLOSE:" WSFS. + * + STOP RUN. +]) + +AT_CHECK([$COMPILE prog.cob], [0], [], []) +AT_CHECK([$COBCRUN_DIRECT ./prog], [0], [], []) + +AT_CLEANUP + + +AT_SETUP([CLOSE WITH LOCK, EXTERNAL FILE]) +AT_KEYWORDS([runfile OPEN WRITE READ DELETE FILE]) + +AT_DATA([prog.cob], [ + IDENTIFICATION DIVISION. + PROGRAM-ID. prog. + ENVIRONMENT DIVISION. + INPUT-OUTPUT SECTION. + FILE-CONTROL. + SELECT FILE-TBL ASSIGN TO "testfile" + ORGANIZATION IS SEQUENTIAL + FILE STATUS IS WSFS. + DATA DIVISION. + FILE SECTION. + FD FILE-TBL EXTERNAL. + 01 FOREC PIC X(80). + WORKING-STORAGE SECTION. + 01 WSFS PIC X(2). + PROCEDURE DIVISION. + * + OPEN OUTPUT FILE-TBL + IF WSFS NOT = "00" + DISPLAY "STATUS OPEN OUTPUT:" WSFS. + MOVE ALL "A" TO FOREC + WRITE FOREC + IF WSFS NOT = "00" + DISPLAY "STATUS WRITE A:" WSFS. + CLOSE FILE-TBL WITH LOCK + IF WSFS NOT = "00" + DISPLAY "STATUS CLOSE WITH LOCK:" WSFS. + * + CALL "progb". + * + STOP RUN. +]) + +AT_DATA([progb.cob], [ + IDENTIFICATION DIVISION. + PROGRAM-ID. progb. + ENVIRONMENT DIVISION. + INPUT-OUTPUT SECTION. + FILE-CONTROL. + SELECT FILE-TBL ASSIGN TO "testfile" + ORGANIZATION IS SEQUENTIAL + FILE STATUS IS WSFS. + DATA DIVISION. + FILE SECTION. + FD FILE-TBL EXTERNAL. + 01 FOREC PIC X(80). + WORKING-STORAGE SECTION. + 01 WSFS PIC X(2). + PROCEDURE DIVISION. + * + OPEN INPUT FILE-TBL + IF WSFS NOT = "38" + DISPLAY "STATUS INPUT after CLOSE LOCK:" WSFS. + CLOSE FILE-TBL + IF WSFS NOT = "42" + DISPLAY "STATUS CLOSE non-opened:" WSFS. + DELETE FILE FILE-TBL + IF WSFS NOT = "38" + DISPLAY "STATUS DELETE FILE after CLOSE LOCK:" WSFS. + * + GOBACK. +]) + +AT_CHECK([$COMPILE prog.cob], [0], [], []) +AT_CHECK([$COMPILE_MODULE progb.cob], [0], [], []) +AT_CHECK([$COBCRUN_DIRECT ./prog], [0], [], []) + +AT_CLEANUP + + AT_SETUP([variable-length SEQUENTIAL data integrity]) AT_KEYWORDS([runfile record OPEN]) @@ -115,12 +256,12 @@ AT_DATA([prog.cob], [ DATA DIVISION. FILE SECTION. FD TEST-XML00 RECORD VARYING FROM 5 TO 500 CHARACTERS. - 01 E-ENR PIC X(500). + 01 E-ENR PIC X(500). WORKING-STORAGE SECTION. - 01 ST-TEST PIC X(2). - 01 W-TYPE PIC 9(03) VALUE ZERO. + 01 ST-TEST PIC X(2). + 01 W-TYPE PIC 9(03) VALUE ZERO. 01 EOF-TEST-XML PIC 9(03) VALUE ZERO. - 01 COUNT-PASS PIC 9(02) VALUE ZERO. + 01 COUNT-PASS PIC 9(02) VALUE ZERO. PROCEDURE DIVISION. DEBUT. OPEN INPUT TEST-XML00 @@ -1806,8 +1947,9 @@ AT_DATA([prog.cob], [ MOVE ALL "*" TO CM-TAPE. WRITE TSPFL-RECORD. - IF CUST-STAT NOT = "00" - AND CUST-STAT NOT = "02" + * Note: some ISAM implementations do not support status 02 + IF CUST-STAT NOT = "02" + AND CUST-STAT NOT = "00" DISPLAY "Key: " TSPFL-KEY ", Status: " CUST-STAT UPON CONSOLE. @@ -7015,9 +7157,9 @@ AT_DATA([prog.cob], [ MOVE "~~~" TO f-key1-2 START f KEY = f-key1-1 READ f NEXT - IF (f-status <> "00") OR - (file1-serial <> 4) - DISPLAY "FAILED 1: status " f-status "-" + IF (f-status <> "00") + OR (file1-serial <> 4) + DISPLAY "FAILED 1: status " f-status " - " "serial: " file1-serial END-IF @@ -7025,9 +7167,9 @@ AT_DATA([prog.cob], [ MOVE "~~~" TO f-key1-2 START f KEY < f-key1-1 READ f PREVIOUS - IF (f-status <> "00") OR - (file1-serial <> 3) - DISPLAY "FAILED 2: status " f-status "-" + IF (f-status <> "00") + OR (file1-serial <> 3) + DISPLAY "FAILED 2: status " f-status " - " "serial: " file1-serial END-IF @@ -7035,9 +7177,9 @@ AT_DATA([prog.cob], [ MOVE "~~~" TO f-key1-2 START f KEY > f-key1-1 READ f NEXT - IF (f-status <> "00") OR - (file1-serial <> 4) - DISPLAY "FAILED 3: status " f-status "-" + IF (f-status <> "00") + OR (file1-serial <> 4) + DISPLAY "FAILED 3: status " f-status " - " "serial: " file1-serial END-IF @@ -7045,9 +7187,9 @@ AT_DATA([prog.cob], [ MOVE "~~~" TO f-key2-2 START f KEY = f-key2-1 READ f NEXT - IF (f-status <> "00") OR - (file1-serial <> 4) - DISPLAY "FAILED 4: status " f-status "-" + IF (f-status <> "00") + OR (file1-serial <> 4) + DISPLAY "FAILED 4: status " f-status " - " "serial: " file1-serial END-IF @@ -7055,9 +7197,9 @@ AT_DATA([prog.cob], [ MOVE "~~~" TO f-key2-2 START f KEY < f-key2-1 READ f PREVIOUS - IF (f-status <> "00") OR - (file1-serial <> 3) - DISPLAY "FAILED 5: status " f-status "-" + IF (f-status <> "00") + OR (file1-serial <> 3) + DISPLAY "FAILED 5: status " f-status " - " "serial: " file1-serial END-IF @@ -7065,9 +7207,9 @@ AT_DATA([prog.cob], [ MOVE "~~~" TO f-key2-2 START f KEY > f-key2-1 READ f NEXT - IF (f-status <> "00") OR - (file1-serial <> 4) - DISPLAY "FAILED 6: status " f-status "-" + IF (f-status <> "00") + OR (file1-serial <> 4) + DISPLAY "FAILED 6: status " f-status " - " "serial: " file1-serial END-IF @@ -7075,12 +7217,12 @@ AT_DATA([prog.cob], [ START f KEY > f-key3-1 READ f NEXT * CHECK: Return file-status "02" if duplicates exist - IF (f-status <> "02" - * Depends on xISAM implementation and the way BDB is used (not yet - * implemented in 3.x) - AND f-status <> "00" - ) OR file1-serial <> 3 - DISPLAY "FAILED 7: status " f-status "-" + * Depends on xISAM implementation and also on the way BDB is used + IF (f-status <> "02" + AND f-status <> "00") + OR (file1-serial <> 3) + DISPLAY "FAILED 7: status " f-status " - " + "serial: " file1-serial END-IF CLOSE f STOP RUN @@ -12658,7 +12800,7 @@ AT_CLEANUP AT_SETUP([LINE SEQUENTIAL data]) -AT_KEYWORDS([runfile]) +AT_KEYWORDS([runfile LS_NULLS LS_VALIDATE]) AT_DATA([prog.cob], [ IDENTIFICATION DIVISION. @@ -12683,17 +12825,19 @@ AT_DATA([prog.cob], [ 10 CM-TYPE PICTURE X. 10 CM-COMPANY PICTURE X(25). 10 CM-DISK PICTURE X(8). - 10 CM-NO-TERMINALS PICTURE 9(4) COMP-4. - 10 CM-PK-DATE PICTURE S9(14) COMP-3. + 10 CM-NO-TERMINALS PICTURE 9(2) COMP-4. + 10 CM-NO-TERMINALS2 PICTURE 9(2) COMP-4. + 10 CM-PK-DATE PICTURE S9(9) COMP-3. WORKING-STORAGE SECTION. - 78 MAX-SUB VALUE 4. + 78 MAX-SUB VALUE 5. 77 CUST-STAT PICTURE X(2). 01 TEST-DATA. 02 DATA-CUST-NUM-TBL. + 05 FILLER PIC X(8) VALUE " 00000". 05 FILLER PIC X(8) VALUE "ALP00000". 05 FILLER PIC X(8) VALUE "BET00000". 05 FILLER PIC X(8) VALUE "GAM00000". @@ -12702,6 +12846,7 @@ AT_DATA([prog.cob], [ 02 DATA-CUST-NUM REDEFINES DATA-CUST-NUM-TBL PIC X(8) OCCURS MAX-SUB. 02 DATA-COMPANY-TBL. + 05 FILLER PIC X(25) VALUE "SPACE COMPANY ". 05 FILLER PIC X(25) VALUE "ALPHA ELECTRICAL CO. LTD.". 05 FILLER PIC X(25) VALUE "BETA SHOE MFG. INC. ". 05 FILLER PIC X(25) VALUE "GAMMA X-RAY TECHNOLOGY ". @@ -12709,6 +12854,7 @@ AT_DATA([prog.cob], [ 02 DATA-COMPANY REDEFINES DATA-COMPANY-TBL PIC X(25) OCCURS MAX-SUB. 02 DATA-ADDRESS-2-TBL. + 05 FILLER PIC X(10) VALUE "EARTH ". 05 FILLER PIC X(10) VALUE "NEW YORK ". 05 FILLER PIC X(10) VALUE "ATLANTA ". 05 FILLER PIC X(10) VALUE "WASHINGTON". @@ -12717,11 +12863,20 @@ AT_DATA([prog.cob], [ PIC X(10) OCCURS MAX-SUB. 02 DATA-NO-TERMINALS-TBL. + 05 FILLER PIC 9(3) VALUE 9. + 05 FILLER PIC 9(3) VALUE 9. + 05 FILLER PIC 9(3) VALUE 9. + 05 FILLER PIC 9(3) VALUE 9. + 05 FILLER PIC 9(3) VALUE 9. + 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL + PIC 9(3) OCCURS MAX-SUB. + 02 DATA-NO-TERMINALS-TBL2. + 05 FILLER PIC 9(3) VALUE 50. 05 FILLER PIC 9(3) VALUE 10. 05 FILLER PIC 9(3) VALUE 13. 05 FILLER PIC 9(3) VALUE 3. 05 FILLER PIC 9(3) VALUE 254. - 02 DATA-NO-TERMINALS REDEFINES DATA-NO-TERMINALS-TBL + 02 DATA-NO-TERMINALS2 REDEFINES DATA-NO-TERMINALS-TBL2 PIC 9(3) OCCURS MAX-SUB. 01 WORK-AREA. 05 SUB BINARY-SHORT UNSIGNED. @@ -12763,10 +12918,21 @@ AT_DATA([prog.cob], [ READ FLATFILE IF CUST-STAT NOT = "00" DISPLAY "Read Status: " CUST-STAT + * ignore truncation and skip next record (not portable to EBCDIC) + IF CUST-STAT = "06" + PERFORM SHOW-RECORD + READ FLATFILE + MOVE "00" TO CUST-STAT + END-IF ELSE - DISPLAY "Read " CM-CUST-NUM - " Trms:" CM-NO-TERMINALS + PERFORM SHOW-RECORD END-IF. + + + SHOW-RECORD. + DISPLAY "Read " CM-CUST-NUM + " Trms:" CM-NO-TERMINALS + "-" CM-NO-TERMINALS2. LOADFILE. OPEN OUTPUT FLATFILE. @@ -12781,9 +12947,13 @@ AT_DATA([prog.cob], [ MOVE DATA-CUST-NUM (SUB) TO CM-CUST-NUM. MOVE DATA-COMPANY (SUB) TO CM-COMPANY. MOVE DATA-NO-TERMINALS (SUB) TO CM-NO-TERMINALS. - MOVE 20070319 TO CM-PK-DATE. - IF SUB = 1 OR 4 OR 6 - MOVE -20070319 TO CM-PK-DATE. + MOVE DATA-NO-TERMINALS2 (SUB) TO CM-NO-TERMINALS2. + IF SUB = 1 + MOVE 505050505 TO CM-PK-DATE + ELSE IF SUB = 4 OR 6 + MOVE -20070319 TO CM-PK-DATE + ELSE + MOVE 20070319 TO CM-PK-DATE. IF ODD-RECORD MOVE "8417" TO CM-DISK @@ -12795,17 +12965,20 @@ AT_DATA([prog.cob], [ DATA-CUST-NUM (SUB). ]) -AT_CHECK([$COMPILE prog.cob], [0], [], []) +AT_CHECK([$COMPILE -fno-trunc prog.cob], [0], [], []) AT_CHECK([$COBCRUN_DIRECT ./prog], [0], [MF Load data MF Open Sts: 00 -Read ALP00000 Trms:0010 -Read BET00000 Trms:0013 -Read GAM00000 Trms:0003 -Read DEL00000 Trms:0254 +Read 00000 Trms:009-050 +Read ALP00000 Trms:009-010 +Read BET00000 Trms:009-013 +Read GAM00000 Trms:009-003 +Read DEL00000 Trms:009-254 Read Status: 10 Std Open Sts: 00 +Read Status: 06 +Read 00000 Trms:000-009 Read Status: 09 Std Load data Error status 71 writing record ALP00000 diff --git a/tests/testsuite.src/run_fundamental.at b/tests/testsuite.src/run_fundamental.at index 767556ad4..955c6fefc 100644 --- a/tests/testsuite.src/run_fundamental.at +++ b/tests/testsuite.src/run_fundamental.at @@ -552,7 +552,6 @@ AT_CHECK([$COMPILE_ONLY -Wstrict-typing -fdiagnostics-show-option prog.cob], [0] [prog.cob:8: warning: alphanumeric value is expected [[-Wtyping]] prog.cob:6: note: 'X' defined here as PIC X(04) [[-Wtyping]] prog.cob:10: warning: alphanumeric value is expected [[-Wstrict-typing]] -prog.cob:6: note: 'X' defined here as PIC X(04) [[-Wstrict-typing]] ]) AT_CHECK([$COMPILE_ONLY -Wextra -Wno-strict-typing -fdiagnostics-show-option prog.cob], [0], [], [prog.cob:8: warning: alphanumeric value is expected [[-Wtyping]] @@ -5021,6 +5020,39 @@ AT_CHECK([$COBCRUN_DIRECT ./prog], [0], [], []) AT_CLEANUP +AT_SETUP([decimal constant with multiple programs]) +AT_KEYWORDS([fundamental EXTERNAL INITIAL]) + +# see bug #923, generated modules init/clear unused decimal constants + +AT_DATA([prog.cob], [ + IDENTIFICATION DIVISION. + PROGRAM-ID. prog. + DATA DIVISION. + WORKING-STORAGE SECTION. + *> to ensure we don't optimize that away: EXTERNAL + 01 X PIC 9(2) EXTERNAL. + PROCEDURE DIVISION. + CALL "prog2" + IF X NOT NUMERIC + MOVE ZERO TO X. + IF X + 42 = 0 + DISPLAY "BAD". + STOP RUN. + END PROGRAM prog. + + PROGRAM-ID. prog2 INITIAL. + PROCEDURE DIVISION. + EXIT PROGRAM. + END PROGRAM prog2. +]) + +AT_CHECK([$COMPILE prog.cob]) +AT_CHECK([$COBCRUN_DIRECT ./prog], [0], [], []) + +AT_CLEANUP + + AT_SETUP([debugging lines (not active)]) AT_KEYWORDS([fundamental]) @@ -6240,25 +6272,35 @@ AT_DATA([caller.cob], [ DATA DIVISION. WORKING-STORAGE SECTION. - 77 INT IS TYPEDEF BINARY-LONG. + 01 INT IS TYPEDEF BINARY-LONG. + 88 INT-ZERO VALUE 0. + 88 INT-ONE VALUE 1. 77 EXT-INT IS TYPEDEF BINARY-LONG EXTERNAL. *> should this be possible? *>77 INT-VAL IS TYPEDEF USAGE INT VALUE 12. 77 INT-VAL IS TYPEDEF BINARY-LONG VALUE 12. - 77 SOMEVAR USAGE INT VALUE 10. + 01 SOMEVAR USAGE INT VALUE 10. + 01 SOMEVAR2 USAGE INT VALUE 11. 77 SOMEVAL USAGE INT-VAL. 77 SOMEEXT USAGE EXT-INT. PROCEDURE DIVISION. IF SOMEVAR <> 10 - DISPLAY "SOMEVAR (INT) wrong: " SOMEVAR - END-IF + DISPLAY "SOMEVAR (INT) wrong: " SOMEVAR. IF SOMEVAL <> 12 - DISPLAY "SOMEVAR (INT-VAL) wrong: " SOMEVAL - END-IF + DISPLAY "SOMEVAL (INT-VAL) wrong: " SOMEVAL. + SET INT-ZERO OF SOMEVAR TO TRUE + SET INT-ONE OF SOMEVAR2 TO TRUE + IF SOMEVAR <> 0 + DISPLAY "SOMEVAR (INT) by SET wrong: " SOMEVAR. + IF SOMEVAR2 <> 1 + DISPLAY "SOMEVAR2 (INT) by SET wrong: " SOMEVAR2. + IF INT-ONE OF SOMEVAR + OR NOT INT-ONE OF SOMEVAR2 + DISPLAY "CHECK BY condition-nam wrong". MOVE 42 TO SOMEEXT CALL "callee" - . + GOBACK. ]) AT_DATA([callee.cob], [ diff --git a/tests/testsuite.src/run_manual_screen.at b/tests/testsuite.src/run_manual_screen.at index ce6db0cb2..4b1b69400 100644 --- a/tests/testsuite.src/run_manual_screen.at +++ b/tests/testsuite.src/run_manual_screen.at @@ -3478,3 +3478,35 @@ MANUAL_CHECK([$COBCRUN_DIRECT ./prog], [0], [], []) AT_CLEANUP +AT_SETUP([simple ACCEPT field WITH UPDATE]) +AT_KEYWORDS([screen]) + +AT_SKIP_IF([test "$COB_HAS_CURSES" != "yes"]) + +AT_DATA([prog.cob], [ + IDENTIFICATION DIVISION. + PROGRAM-ID. prog. + DATA DIVISION. + WORKING-STORAGE SECTION. + 77 var pic x(11) value 'ignore this'. + 01 success-flag PIC X VALUE 'y'. + 88 success VALUE 'Y', 'y'. + + PROCEDURE DIVISION. + display "Press ENTER if you see an ""y"" " + at 0302 + accept success-flag update. + + IF success AND COB-CRT-STATUS = 0 + GOBACK RETURNING 0 + ELSE + GOBACK RETURNING 1 + END-IF + . +]) + +AT_CHECK([$COMPILE prog.cob], [0], [], []) +MANUAL_CHECK([$COBCRUN_DIRECT ./prog], [0], [], []) + +AT_CLEANUP + diff --git a/tests/testsuite.src/run_misc.at b/tests/testsuite.src/run_misc.at index 1b0a26de6..18b32583d 100644 --- a/tests/testsuite.src/run_misc.at +++ b/tests/testsuite.src/run_misc.at @@ -4013,7 +4013,7 @@ AT_DATA([prog.cob], [ PROGRAM-ID. prog. DATA DIVISION. WORKING-STORAGE SECTION. - 01 MYOCC PIC 9(8) COMP VALUE 0. + 01 MYOCC PIC 9(8) VALUE 0. PROCEDURE DIVISION. ASTART SECTION. A01. @@ -4032,6 +4032,7 @@ AT_DATA([prog.cob], [ END-IF. B99. EXIT. + *> expected without -fperform-osvs: fall through here _SHOULD_ abort with -fsection-exit-check ]) AT_CHECK([$COMPILE -fperform-osvs prog.cob], [0], [], []) @@ -7489,7 +7490,6 @@ AT_CHECK([$COMPILE -std=mf -fno-move-non-numeric-lit-to-numeric-is-zero prog.cob prog.cob:28: warning: numeric value is expected prog.cob:6: note: 'MYFLD' defined here as PIC 9(4) prog.cob:34: warning: numeric value is expected -prog.cob:6: note: 'MYFLD' defined here as PIC 9(4) prog.cob:52: warning: numeric value is expected prog.cob:7: note: 'BIGFLT' defined here as USAGE FLOAT ]) @@ -10795,14 +10795,7 @@ AT_CHECK([diff reference tstdump.sed], [0], [], []) -AT_CHECK([$COMPILE prog.cob sub2.cob], [0], [], []) - -# also checking that a dump file without anything to dump does not do anything -AT_CHECK([COB_STACKTRACE=1 COB_DUMP_FILE=tstdump.dump \ -$COBCRUN_DIRECT ./prog], [1], -[X is 000000001 -X is 000005441 -], +AT_DATA([reference_stderr], [libcob: cpyabrt:4: error: LINKAGE item 'TSPFL-RECORD' (accessed by 'CM-COMPANY') not passed by caller libcob: cpyabrt:4: warning: implicit CLOSE of FLATFILE ('RELFIX') @@ -10820,30 +10813,35 @@ libcob: cpyabrt:4: warning: implicit CLOSE of FLATFILE ('RELFIX') Started by ./prog ]) +AT_CAPTURE_FILE([stderr.txt]) + +AT_CHECK([$COMPILE prog.cob sub2.cob], [0], [], []) + +# also checking that a dump file without anything to dump does not do anything +AT_CHECK([COB_STACKTRACE=1 COB_DUMP_FILE=tstdump.dump \ +$COBCRUN_DIRECT ./prog 2>stderr.txt], [1], +[X is 000000001 +X is 000005441 +], []) + +AT_CHECK([$SED -e 's/Started by .*prog.exe/Started by .\/prog/g' \ +stderr.txt > stderr.sed], [0], [], []) + +AT_CHECK([diff reference_stderr stderr.sed], [0], [], []) + AT_CHECK([$COMPILE -fdump=ALL -fno-dump prog.cob sub2.cob], [0], [], []) # also checking that a dump file without anything to dump does not do anything AT_CHECK([COB_STACKTRACE=1 COB_DUMP_FILE=tstdump.dump \ -$COBCRUN_DIRECT ./prog], [1], +$COBCRUN_DIRECT ./prog 2>stderr.txt], [1], [X is 000000001 X is 000005441 -], -[libcob: cpyabrt:4: error: LINKAGE item 'TSPFL-RECORD' (accessed by 'CM-COMPANY') not passed by caller -libcob: cpyabrt:4: warning: implicit CLOSE of FLATFILE ('RELFIX') +], []) - Last statement of "sub1" was MOVE - MAIN-2 OF MAIN-1 at cpyabrt:4 - MAIN-1 at prog.cob:177 - ENTRY sub1 at prog.cob:159 - Last statement of "sub2" was CALL - DO-CALL OF SubwaY at sub2.cob:48 - ENTRY sub2 at sub2.cob:39 - Last statement of "prog" was CALL - CALL-IT-OMIT at prog.cob:118 - MAIN-100 at prog.cob:85 - ENTRY prog at prog.cob:77 - Started by ./prog -]) +AT_CHECK([$SED -e 's/Started by .*prog.exe/Started by .\/prog/g' \ +stderr.txt > stderr.sed], [0], [], []) + +AT_CHECK([diff reference_stderr stderr.sed], [0], [], []) AT_CHECK([$COMPILE -fdump=FD,LS prog.cob sub2.cob -o prog_fdls], [0], [], []) @@ -10921,7 +10919,8 @@ END OF DUMP - prog # AT_DATA workaround via sed: AT_CHECK([$SED -e 's/_$//' reference_fdls_tmpl > reference], [0], [], []) -AT_CHECK([$SED -e 's/compiled ... .. .... ..:..:../compiled MMM DD YYYY HH:MM:SS/g' \ +AT_CHECK([$SED -e 's/compiled ... .. .... ..:..:../compiled MMM DD YYYY HH:MM:SS/g; + s/Started by .*prog_fdls.exe/Started by .\/prog_fdls/g' \ tstdump_fdls.dump > tstdump.sed], [0], [], []) AT_CHECK([diff reference tstdump.sed], [0], [], []) @@ -10939,7 +10938,8 @@ libcob: cpyabrt:4: warning: implicit CLOSE of FLATFILE ('RELFIX') dump written to tstdump_allfdls.dump ]) -AT_CHECK([$SED -e 's/compiled ... .. .... ..:..:../compiled MMM DD YYYY HH:MM:SS/g' \ +AT_CHECK([$SED -e 's/compiled ... .. .... ..:..:../compiled MMM DD YYYY HH:MM:SS/g; + s/Started by .*prog_allfdls.exe/Started by .\/prog_allfdls/g' \ tstdump_allfdls.dump > tstdump.sed], [0], [], []) AT_CHECK([$SED -e 's/prog_fdls/prog_allfdls/' \ @@ -11272,7 +11272,8 @@ END OF DUMP - prog ]) # AT_DATA workaround via sed: -AT_CHECK([$SED -e 's/compiled ... .. .... ..:..:../compiled MMM DD YYYY HH:MM:SS/g' \ +AT_CHECK([$SED -e 's/compiled ... .. .... ..:..:../compiled MMM DD YYYY HH:MM:SS/g; + s/Started by .*prog.exe/Started by .\/prog/g' \ dumpall.txt > dumpall.sed], [0], [], []) AT_CHECK([test "$COB_HAS_64_BIT_POINTER" = "yes"], [0], [], [], @@ -14362,13 +14363,13 @@ note: TooSmall2 has version 2.0.0 ], []) AT_DATA([testdata.h], [[ - { "TooHigh1", "3.3", 0 }, + { "TooHigh1", "3.4", 0 }, ]]) AT_CHECK([$COMPILE -o high1 prog.c], [0], [], []) AT_CHECK([$COBCRUN_DIRECT ./high1 2>high1.log], [1], [], []) AT_CHECK([$GREP -v "libcob has" high1.log], [0], [libcob: error: version mismatch -note: TooHigh1 has version 3.3.0 +note: TooHigh1 has version 3.4.0 ], []) AT_DATA([testdata.h], [[ @@ -14570,3 +14571,63 @@ TST-DECIMAL IS < ZERO-DECIMAL AT_CLEANUP + + +AT_SETUP([Decimal constants and programs in same source]) +AT_KEYWORDS([runmisc INITIAL CANCEL CALL]) + +# this used to cause a SIGSEGV, see bug #917 + +AT_DATA([prog.cpy], [ + IDENTIFICATION DIVISION. + PROGRAM-ID. :PROG-NAME: :PROG-KIND:. + DATA DIVISION. + WORKING-STORAGE SECTION. + 01 X PIC 9(2) VALUE 42. + 01 Y PIC 9v9 VALUE 0.1. + PROCEDURE DIVISION. + MAIN. + * ensure that cobc cannot optimize the expression away + IF FUNCTION CURRENT-DATE = 0 + ADD 1 TO Y. + IF (X + Y) / 42.1 = 1 + DISPLAY "OK" WITH NO ADVANCING. + EXIT PROGRAM. + END PROGRAM :PROG-NAME:. +]) + +AT_DATA([prog.cob], [ + IDENTIFICATION DIVISION. + PROGRAM-ID. prog. + DATA DIVISION. + WORKING-STORAGE SECTION. + 01 X PIC 9(2) VALUE 0. + 01 Y PIC 9v9 VALUE 0.1. + PROCEDURE DIVISION. + MAIN. + * ensure that cobc cannot optimize the expression away + IF FUNCTION CURRENT-DATE = 0 + ADD 1 TO Y. + CALL "nested_init" + CALL "nonnested_init" + CALL "nested_noninit" + CANCEL "nested_noninit" + CALL "nonnested_noninit" + CANCEL "nonnested_noninit" + IF X + Y + 42.1 <> 0 + DISPLAY "OK" WITH NO ADVANCING. + STOP RUN. + COPY prog REPLACING ==:PROG-NAME:== BY ==nested_init== + ==:PROG-KIND:== BY ==INITIAL==. + COPY prog REPLACING ==:PROG-NAME:== BY ==nested_noninit== + ==:PROG-KIND:== BY ====. + END PROGRAM prog. + COPY prog REPLACING ==:PROG-NAME:== BY ==nonnested_init== + ==:PROG-KIND:== BY ==INITIAL==. + COPY prog REPLACING ==:PROG-NAME:== BY ==nonnested_noninit== + ==:PROG-KIND:== BY ====. +]) + +AT_CHECK([$COMPILE_MODULE prog.cob], [0], [], []) +AT_CHECK([$COBCRUN prog], [0], [OKOKOKOKOK], []) +AT_CLEANUP diff --git a/tests/testsuite.src/syn_copy.at b/tests/testsuite.src/syn_copy.at index 0ac0784b2..ad1550a18 100644 --- a/tests/testsuite.src/syn_copy.at +++ b/tests/testsuite.src/syn_copy.at @@ -1072,3 +1072,50 @@ AT_DATA([prog.cob], [ AT_CHECK([$COMPILE_ONLY prog.cob], [0], [], []) AT_CLEANUP + + +AT_SETUP([Option --copy COPYBOOK]) +AT_KEYWORDS([argument]) + +AT_DATA([copybook1.CPY], [ + REPLACE ==BEGIN PROGRAM== BY ==IDENTIFICATION DIVISION. + PROGRAM-ID.==. +]) +AT_DATA([copybook2.CPY], [ + REPLACE ALSO ==output== BY =="Hello world"==. +]) +AT_DATA([copybook3.CPY], [ + REPLACE ALSOO ==output== BY =="Hello world"==. +]) +AT_DATA([prog.cob], [ + BEGIN PROGRAM prog. + PROCEDURE DIVISION. + DISPLAY output + STOP RUN. +]) + +AT_CHECK([$COMPILE_ONLY prog.cob], [1], [], +[prog.cob:2: error: PROGRAM-ID header missing +prog.cob:2: error: ENVIRONMENT DIVISION header missing +prog.cob:2: error: CONFIGURATION SECTION header missing +prog.cob:2: error: SPECIAL-NAMES header missing +prog.cob:2: error: invalid system-name 'BEGIN' +prog.cob:2: error: syntax error, unexpected PROGRAM, expecting CRT or Identifier +prog.cob:2: error: invalid system-name 'prog' +prog.cob:2: error: syntax error, unexpected ., expecting CRT or Identifier +prog.cob:3: error: syntax error, unexpected PROCEDURE +prog.cob:4: error: PROCEDURE DIVISION header missing +]) + +AT_CHECK([$COMPILE_ONLY --copy copybook1 --copy copybook2 prog.cob], [0], [], []) + +AT_CHECK([$COMPILE_ONLY --copy copybook1 --copy copybook3 prog.cob], [1], [], +[copybook3.CPY:2: error: syntax error, unexpected ==, expecting BY +copybook3.CPY:2: error: PROGRAM-ID header missing +]) + +AT_CHECK([$COMPILE_ONLY --copy copybook1 --copy copybook4 prog.cob], [1], [], +[cobc: error: fatal error: could not find --copy argument copybook4 +]) + +AT_CLEANUP diff --git a/tests/testsuite.src/syn_definition.at b/tests/testsuite.src/syn_definition.at index 19e179962..4e7a2f590 100644 --- a/tests/testsuite.src/syn_definition.at +++ b/tests/testsuite.src/syn_definition.at @@ -1599,7 +1599,7 @@ AT_DATA([prog.cob], [ OCCURS 8 TIMES PIC 1(8) BIT. ]) -AT_CHECK([$COMPILE_ONLY -std=cobol2014 prog.cob], [1], [], +AT_CHECK([$COMPILE_ONLY -std=cobol2014 -fmax-errors=0 prog.cob], [1], [], [prog.cob:9: warning: continuation of COBOL words is archaic in COBOL 2014 prog.cob:11: warning: continuation of COBOL words is archaic in COBOL 2014 prog.cob:12: warning: continuation of COBOL words is archaic in COBOL 2014 @@ -1678,7 +1678,7 @@ prog.cob:93: warning: USAGE BIT is not implemented prog.cob:96: warning: USAGE BIT is not implemented ]) -AT_CHECK([$COMPILE_ONLY prog.cob], [1], [], +AT_CHECK([$COMPILE_ONLY -fmax-errors=0 prog.cob], [1], [], [prog.cob:9: warning: continuation of COBOL words used prog.cob:11: warning: continuation of COBOL words used prog.cob:12: warning: continuation of COBOL words used diff --git a/tests/testsuite.src/syn_file.at b/tests/testsuite.src/syn_file.at index 42af0b05e..24c1f835f 100644 --- a/tests/testsuite.src/syn_file.at +++ b/tests/testsuite.src/syn_file.at @@ -1733,13 +1733,11 @@ prog.cob:13: note: 'f-rec' defined here as PIC 999999 prog.cob:24: error: figurative constants not allowed in FROM clause prog.cob:24: error: literal in FROM clause must be alphanumeric, utf-8, national or boolean prog.cob:25: warning: numeric value is expected -prog.cob:13: note: 'f-rec' defined here as PIC 999999 ]) AT_CHECK([$COMPILE_ONLY -frelax-syntax-checks prog.cob], [0], [], [prog.cob:22: warning: numeric value is expected prog.cob:13: note: 'f-rec' defined here as PIC 999999 prog.cob:25: warning: numeric value is expected -prog.cob:13: note: 'f-rec' defined here as PIC 999999 ]) AT_CHECK([$COMPILE_ONLY -std=mf-strict prog.cob], [0], [], [prog.cob:22: warning: source is non-numeric - substituting zero diff --git a/tests/testsuite.src/syn_misc.at b/tests/testsuite.src/syn_misc.at index f030478b2..8a11f5128 100644 --- a/tests/testsuite.src/syn_misc.at +++ b/tests/testsuite.src/syn_misc.at @@ -929,12 +929,18 @@ AT_DATA([prog.cob], [ ]) AT_CHECK([$COMPILE_ONLY prog.cob], [1], [], -[prog.cob:14: error: REPLACING operands differ in size -prog.cob:15: error: REPLACING operands differ in size -prog.cob:17: error: CONVERTING operands differ in size -prog.cob:18: error: CONVERTING operands differ in size -prog.cob:20: error: CONVERTING operands differ in size -prog.cob:23: error: CONVERTING operands differ in size +[prog.cob:14: error: REPLACING operands incompatible +prog.cob:14: note: operands differ in size +prog.cob:15: error: REPLACING operands incompatible +prog.cob:15: note: operands differ in size +prog.cob:17: error: CONVERTING operands incompatible +prog.cob:17: note: operands differ in size +prog.cob:18: error: CONVERTING operands incompatible +prog.cob:18: note: operands differ in size +prog.cob:20: error: CONVERTING operands incompatible +prog.cob:20: note: operands differ in size +prog.cob:23: error: CONVERTING operands incompatible +prog.cob:23: note: operands differ in size ]) AT_CLEANUP @@ -1538,7 +1544,7 @@ AT_DATA([prog.cob], [ STOP RUN. ]) -AT_CHECK([$COMPILE_ONLY prog.cob], [1], [], +AT_CHECK([$COMPILE_ONLY prog.cob -fmax-errors=0], [1], [], [prog.cob:7: error: invalid system-name 'SW1' prog.cob:8: error: ON/OFF usage requires a SWITCH name prog.cob:9: error: ON/OFF usage requires a SWITCH name @@ -2088,8 +2094,7 @@ prog3.cob:3: error: invalid indicator 'M' at column 7 prog3.cob:4: error: invalid indicator 'N' at column 7 prog3.cob:5: error: invalid indicator 'U' at column 7 prog3.cob:7: error: invalid indicator 'G' at column 7 -prog3.cob:8: error: invalid indicator 'U' at column 7 -prog3.cob:15: error: invalid indicator 'x' at column 7 +prog3.cob: error: too many format errors in file, skip output of further errors prog3.cob:6: error: PROGRAM-ID header missing prog3.cob:6: error: PROCEDURE DIVISION header missing prog3.cob:6: error: syntax error, unexpected DIVISION @@ -4151,7 +4156,8 @@ prog.cob:20: error: 'not-a-num' is not numeric prog.cob:20: error: 3 is not an alphanumeric literal prog.cob:20: error: invalid target for TALLYING prog.cob:21: error: 'not-display' is not USAGE DISPLAY -prog.cob:20: error: REPLACING operands differ in size +prog.cob:20: error: REPLACING operands incompatible +prog.cob:20: note: operands differ in size prog.cob:20: error: invalid target for REPLACING prog.cob:22: error: 'f' is not a field prog.cob:22: error: 3 is not an alphanumeric literal @@ -6254,7 +6260,7 @@ AT_DATA([prog.cob], [ GOBACK. ]) -AT_CHECK([$COMPILE_ONLY prog.cob], [1], [], +AT_CHECK([$COMPILE_ONLY -fmax-errors=0 prog.cob], [1], [], [prog.cob:12: warning: USAGE BIT is not implemented prog.cob:37: warning: USAGE BIT is not implemented prog.cob:49: error: JSON/XML GENERATE receiving item must be alphanumeric or national @@ -8300,7 +8306,7 @@ free.cob:3: error: invalid indicator 'R' at column 7 free.cob:4: error: invalid indicator 'E' at column 7 free.cob:5: error: invalid indicator 'I' at column 7 free.cob:6: error: invalid indicator 'N' at column 7 -free.cob:7: error: invalid indicator 'T' at column 7 +free.cob: error: too many format errors in file, skip output of further errors free.cob:8: error: PROGRAM-ID header missing ]) @@ -8310,7 +8316,7 @@ domfree.cob:3: error: invalid indicator 'R' at column 7 domfree.cob:4: error: invalid indicator 'E' at column 7 domfree.cob:5: error: invalid indicator 'I' at column 7 domfree.cob:6: error: invalid indicator 'N' at column 7 -domfree.cob:7: error: invalid indicator 'T' at column 7 +domfree.cob: error: too many format errors in file, skip output of further errors domfree.cob:8: error: PROGRAM-ID header missing ]) diff --git a/tests/testsuite.src/syn_move.at b/tests/testsuite.src/syn_move.at index c48078891..2331b1233 100644 --- a/tests/testsuite.src/syn_move.at +++ b/tests/testsuite.src/syn_move.at @@ -691,7 +691,6 @@ prog.cob:14: warning: MOVE of figurative constant QUOTE to numeric item is archa prog.cob:15: warning: numeric value is expected prog.cob:6: note: 'MYFLD' defined here as PIC 9(4) prog.cob:17: warning: numeric value is expected -prog.cob:6: note: 'MYFLD' defined here as PIC 9(4) prog.cob:19: error: invalid SET statement prog.cob:20: error: invalid SET statement prog.cob:23: warning: MOVE of figurative constant to numeric item is archaic in COBOL 2002 @@ -709,7 +708,6 @@ prog.cob:14: warning: MOVE of figurative constant QUOTE to numeric item is archa prog.cob:15: warning: numeric value is expected prog.cob:6: note: 'MYFLD' defined here as PIC 9(4) prog.cob:17: warning: numeric value is expected -prog.cob:6: note: 'MYFLD' defined here as PIC 9(4) prog.cob:19: error: invalid SET statement prog.cob:20: error: invalid SET statement prog.cob:23: warning: MOVE of figurative constant to numeric item is archaic in IBM COBOL (lax) @@ -743,7 +741,6 @@ prog.cob:14: warning: MOVE of figurative constant to numeric item is archaic in prog.cob:15: warning: numeric value is expected prog.cob:6: note: 'MYFLD' defined here as PIC 9(4) prog.cob:17: warning: numeric value is expected -prog.cob:6: note: 'MYFLD' defined here as PIC 9(4) prog.cob:19: error: invalid SET statement prog.cob:20: error: invalid SET statement prog.cob:23: warning: MOVE of figurative constant to numeric item is archaic in GnuCOBOL diff --git a/tests/testsuite.src/syn_refmod.at b/tests/testsuite.src/syn_refmod.at index 5f75aab5f..71553d1fd 100644 --- a/tests/testsuite.src/syn_refmod.at +++ b/tests/testsuite.src/syn_refmod.at @@ -145,13 +145,17 @@ AT_DATA([prog.cob], [ ]) AT_CHECK([$COMPILE_ONLY -fdiagnostics-show-option -Wno-constant-numlit-expression prog.cob], [0], [], -[prog.cob:10: warning: offset of 'X' out of bounds: 0 [[-Wignored-error]] -prog.cob:11: warning: length of 'X' out of bounds: 0 [[-Wignored-error]] -prog.cob:12: warning: offset of 'X' out of bounds: 5 [[-Wignored-error]] -prog.cob:13: warning: length of 'X' out of bounds: 5 [[-Wignored-error]] -prog.cob:15: warning: CONVERTING operands differ in size [[-Wignored-error]] +[[prog.cob:10: warning: offset of 'X' out of bounds: 0 [-Wignored-error] +prog.cob:11: warning: length of 'X' out of bounds: 0 [-Wignored-error] +prog.cob:12: warning: offset of 'X' out of bounds: 5 [-Wignored-error] +prog.cob:13: warning: length of 'X' out of bounds: 5 [-Wignored-error] +prog.cob:15: warning: CONVERTING operands incompatible [-Wignored-error] +prog.cob:15: note: operands differ in size +]]) +AT_CHECK([$COMPILE_ONLY -Wno-constant-numlit-expression -fno-constant-folding prog.cob], [1], [], +[prog.cob:15: error: CONVERTING operands incompatible +prog.cob:15: note: operands differ in size ]) -AT_CHECK([$COMPILE_ONLY -Wno-constant-numlit-expression -fno-constant-folding prog.cob], [0], [], []) AT_CLEANUP diff --git a/tests/testsuite.src/syn_screen.at b/tests/testsuite.src/syn_screen.at index bc4153e72..b9aeea88a 100644 --- a/tests/testsuite.src/syn_screen.at +++ b/tests/testsuite.src/syn_screen.at @@ -685,7 +685,7 @@ prog.cob:25: error: cannot have PIC without FROM, TO or USING prog.cob:30: error: VALUE item may not be numeric ]) -AT_CHECK([$COMPILE_ONLY -fscreen-section-rules=mf prog.cob], [1], [], +AT_CHECK([$COMPILE_ONLY -fscreen-section-rules=mf -fmax-errors=0 prog.cob], [1], [], [prog.cob:12: error: 'no-clauses' needs a PIC, COL, LINE, VALUE, BELL or BLANK clause prog.cob:13: error: 'no-required-clauses' needs a PIC, COL, LINE, VALUE, BELL or BLANK clause prog.cob:15: error: cannot specify both PIC and VALUE @@ -730,7 +730,7 @@ prog.cob:30: error: VALUE item may not be numeric prog.cob:36: error: cannot use AUTO, FULL, REQUIRED or SECURE on elementary item without FROM, TO or USING ]) -AT_CHECK([$COMPILE_ONLY -fscreen-section-rules=xopen prog.cob], [1], [], +AT_CHECK([$COMPILE_ONLY -fscreen-section-rules=xopen -fmax-errors=0 prog.cob], [1], [], [prog.cob:12: error: 'no-clauses' needs a PIC, COL, LINE, VALUE, BELL or BLANK clause prog.cob:13: error: 'no-required-clauses' needs a PIC, COL, LINE, VALUE, BELL or BLANK clause prog.cob:15: error: cannot specify both PIC and VALUE diff --git a/tests/testsuite.src/used_binaries.at b/tests/testsuite.src/used_binaries.at index 2c404992d..e0f3c8389 100644 --- a/tests/testsuite.src/used_binaries.at +++ b/tests/testsuite.src/used_binaries.at @@ -148,18 +148,27 @@ AT_DATA([prog2.cob], [ DISPLAY TEST-VAR NO ADVANCING END-DISPLAY STOP RUN. + COPY 'CRUD2.CPY'. ]) AT_CHECK([$COBC -fsyntax-only -fdiagnostics-plain-output -Wall prog2.cob], [1], [], [prog2.cob:7: error: CRUD.CPY: No such file or directory +prog2.cob:15: error: CRUD2.CPY: No such file or directory prog2.cob:6: warning: numeric value is expected [[-Wothers]] ]) -AT_CHECK([$COBC -fsyntax-only -fdiagnostics-plain-output -fmax-errors=0 prog2.cob], [97], [], +AT_CHECK([$COBC -fsyntax-only -fdiagnostics-plain-output -fmax-errors=0 -Wall prog2.cob], [1], [], [prog2.cob:7: error: CRUD.CPY: No such file or directory -cobc: too many errors [[-fmax-errors=0]] +prog2.cob:15: error: CRUD2.CPY: No such file or directory +prog2.cob:6: warning: numeric value is expected [[-Wothers]] +]) -cobc: aborting compile of prog2.cob at line 7 (unknown: unknown) +AT_CHECK([$COBC -fsyntax-only -fdiagnostics-plain-output -fmax-errors=1 prog2.cob], [97], [], +[prog2.cob:7: error: CRUD.CPY: No such file or directory +prog2.cob:15: error: CRUD2.CPY: No such file or directory +cobc: too many errors [[-fmax-errors=1]] + +cobc: aborting compile of prog2.cob at line 15 (unknown: unknown) ]) AT_CHECK([$COBC -fsyntax-only -fdiagnostics-plain-output -Wfatal-errors prog2.cob], [97], [], @@ -400,6 +409,68 @@ AT_CHECK([$COBCRUN_DIRECT ./prog], [0], [OK], []) AT_CLEANUP +AT_SETUP([save-temps in sub-directory]) +AT_KEYWORDS([runmisc]) + +AT_DATA([prog.cob], [ + IDENTIFICATION DIVISION. + PROGRAM-ID. prog. + PROCEDURE DIVISION. + DISPLAY "OK" NO ADVANCING + END-DISPLAY. + EXIT PROGRAM. +]) + +AT_CHECK([mkdir debug]) + +AT_CHECK([$COMPILE -save-temps=debug -o prog.exe prog.cob]) +AT_CHECK([$COBCRUN_DIRECT ./prog.exe], [0], [OK]) +AT_CHECK([test -f debug/prog.$COB_OBJECT_EXT]) +AT_CHECK([test -f debug/prog.c]) +AT_CHECK([test -f debug/prog.s], [1]) +AT_CHECK([test -f debug/prog.i]) +AT_CHECK([test -f debug/prog.c.h]) +AT_CHECK([test -f debug/prog.c.l.h]) + +# Check with -c + +AT_CHECK([test -f prog.$COB_OBJECT_EXT], [1]) +AT_CHECK([$COMPILE -save-temps=debug -c prog.cob]) +AT_CHECK([test -f prog.$COB_OBJECT_EXT]) +AT_CHECK([$COMPILE -save-temps=debug -c -o program.$COB_OBJECT_EXT prog.cob]) +AT_CHECK([test -f program.$COB_OBJECT_EXT]) + +# Check with -S + +AT_CHECK([test -f prog.s], [1]) +AT_CHECK([$COMPILE -save-temps=debug -S prog.cob]) +AT_CHECK([test -f prog.s]) +AT_CHECK([$COMPILE -save-temps=debug -S -o program.s prog.cob]) +AT_CHECK([test -f program.s]) + +# Check with -C + +AT_CHECK([test -f prog.c], [1]) +AT_CHECK([$COMPILE -save-temps=debug -C prog.cob]) +AT_CHECK([test -f prog.c]) +AT_CHECK([test -f prog.c.h]) +AT_CHECK([test -f prog.c.l.h]) +AT_CHECK([$COMPILE -save-temps=debug -C -o program.c prog.cob]) +AT_CHECK([test -f program.c]) +AT_CHECK([test -f program.c.h]) +AT_CHECK([test -f program.c.l.h]) + +# Check with -E + +AT_CHECK([test -f prog.i], [1]) +AT_CHECK([$COMPILE -save-temps=debug -E -o prog.i prog.cob]) +AT_CHECK([test -f prog.i]) +AT_CHECK([$COMPILE -save-temps=debug -E -o program.i prog.cob]) +AT_CHECK([test -f program.i]) + +AT_CLEANUP + + AT_SETUP([C Compiler optimizations]) AT_KEYWORDS([runmisc cobc optimization]) @@ -976,11 +1047,19 @@ AT_CHECK([$COBC -fdiagnostics-plain-output -fdiagnostics-show-caret -Wno-others > <EOF> ]]) +AT_CHECK([$COMPILE -fdiagnostics-absolute-paths -Wall prog.cob 2> compiler.output], [1]) + +AT_CHECK([$SED -e "s|$PWD|HOME|" compiler.output], [0], +[HOME/prog.cob:7: error: CRUD.CPY: No such file or directory +HOME/prog.cob:6: warning: numeric value is expected +HOME/prog.cob:14: warning: ignoring redundant . +]) + AT_CLEANUP AT_SETUP([output dependencies]) -# AT_KEYWORDS([]) +AT_KEYWORDS([make]) AT_DATA([prog.cob], [ IDENTIFICATION DIVISION. @@ -1155,3 +1234,62 @@ AT_CHECK([$GREP 'sub/copy/PROC.cpy' prog.d], [0], ignore, [], [ ]) AT_CLEANUP + + +AT_SETUP([check include header file]) +AT_KEYWORDS([-include]) + +AT_DATA([file.h], [ +extern void f(char *, long ); +]) +AT_DATA([prog.cob], [ + IDENTIFICATION DIVISION. + PROGRAM-ID. prog. + PROCEDURE DIVISION. + CALL "f" USING "Hello". +]) + +# No check, program seems correct + +AT_CHECK([$COBC -m -fstatic-call prog.cob], [0], [], []) + +# We ignore the error output, as it depends on the C compiler in use + +AT_CHECK([$COBC -m --include "$PWD/file.h" -fstatic-call prog.cob], [1], [], [ignore]) +AT_DATA([prog2.cob], [ + IDENTIFICATION DIVISION. + PROGRAM-ID. prog. + DATA DIVISION. + WORKING-STORAGE SECTION. + 01 long USAGE BINARY-C-LONG. + PROCEDURE DIVISION. + CALL "f" USING "Hello" BY VALUE long RETURNING NOTHING. +]) + +AT_CHECK([$COBC -m --include "$PWD/file.h" -fstatic-call prog2.cob], [0], [], []) + +AT_CHECK([$COBC -I . -m --include "file.h" -fstatic-call prog2.cob], [0], [], []) + +# We can use --copy to check a CALL against a prototype. However, this +# feature is not fully supported by GnuCOBOL yet, so we get some +# warnings. For exemple: +# * not putting RETURNING triggers an error +# * putting RETURNING NOTHING is not supported +# * putting RETURNING OMITTED is ok, but triggers a warning (see stderr) + +AT_DATA([f.copy], [ + IDENTIFICATION DIVISION. + PROGRAM-ID. f PROTOTYPE. + DATA DIVISION. + LINKAGE SECTION. + 01 a PIC X(20). + 01 b BINARY-C-LONG. + PROCEDURE DIVISION USING a BY VALUE b RETURNING OMITTED. + END PROGRAM f. +]) + +AT_CHECK([$COMPILE_MODULE -Wno-unfinished --copy "f.copy" -fstatic-call prog2.cob], [0], [], +[prog2.cob:8: warning: unexpected RETURNING item +]) + +AT_CLEANUP