From bf800ca01693cff19470ba9cea62deba6854a4dd Mon Sep 17 00:00:00 2001 From: David Declerck Date: Mon, 23 Sep 2024 13:39:02 +0200 Subject: [PATCH] More fixes --- .github/workflows/windows-msvc.yml | 1 + .github/workflows/windows-msys1.yml | 1 + .github/workflows/windows-msys2.yml | 1 + cobc/ChangeLog | 21 +++++++++++---------- cobc/typeck.c | 1 - 5 files changed, 14 insertions(+), 11 deletions(-) diff --git a/.github/workflows/windows-msvc.yml b/.github/workflows/windows-msvc.yml index 134e7f18c..b748e62d6 100644 --- a/.github/workflows/windows-msvc.yml +++ b/.github/workflows/windows-msvc.yml @@ -204,6 +204,7 @@ jobs: - name: Upload testsuite-${{ matrix.arch }}-${{ matrix.target }}.log uses: actions/upload-artifact@v4 + if: failure() with: name: testsuite-${{ matrix.arch }}-${{ matrix.target }}.log path: ${{ env.GITHUB_WORKSPACE }}/tests/testsuite.log diff --git a/.github/workflows/windows-msys1.yml b/.github/workflows/windows-msys1.yml index 661344910..67f3801c6 100644 --- a/.github/workflows/windows-msys1.yml +++ b/.github/workflows/windows-msys1.yml @@ -229,6 +229,7 @@ jobs: - name: Upload testsuite-${{ matrix.target }}.log uses: actions/upload-artifact@v4 + if: failure() with: name: testsuite-${{ matrix.target }}.log path: ${{ env.GITHUB_WORKSPACE }}/_build/tests/testsuite.log diff --git a/.github/workflows/windows-msys2.yml b/.github/workflows/windows-msys2.yml index f2b5c13e9..59ba117b5 100644 --- a/.github/workflows/windows-msys2.yml +++ b/.github/workflows/windows-msys2.yml @@ -102,6 +102,7 @@ jobs: - name: Upload testsuite-${{matrix.sys}}-${{matrix.target}}.log uses: actions/upload-artifact@v4 + if: failure() with: name: testsuite-${{matrix.sys}}-${{matrix.target}}.log path: ${{ env.GITHUB_WORKSPACE }}/_build/tests/testsuite.log diff --git a/cobc/ChangeLog b/cobc/ChangeLog index d8e36b81d..90d80efa4 100644 --- a/cobc/ChangeLog +++ b/cobc/ChangeLog @@ -8,6 +8,10 @@ * typeck.c (cb_emit_move, cb_emit_set_to): do not check for incompatible data if no receiver field is of category numeric or numeric edited +2024-09-23 David Declerck + + * pplex.l (cb_text_list): prevent duplicates + 2024-08-28 David Declerck * tree.c (char_to_precedence_idx, get_char_type_description, valid_char_order): @@ -125,16 +129,13 @@ 2024-03-15 Fabrice Le Fessant - * cobc.c: add new flags to output dependencies following gcc: -M to - output deps only, -MD to output deps while compiling (in .d files), - -MP to output phony targets, -MG to keep missing copybooks, - -MQ to Makefile-quote target - * flags.def: -fcopybook-deps outputs only copybook names instead - of file paths. -fcopybook-deps also forces -E, -foneline-deps, - -MT=copybooks, disables errors on missing copybooks and removes - output on stdout. - * typeck.c (check_argument_conformance): check that param is well defined - to prevent a segfault + * cobc.c, help.c, pplex.l: add new flags to output dependencies following + gcc: -M to output deps only, -MD to output deps while compiling (in + .d files), -MP to output phony targets, -MG to keep missing copybooks, + -MQ to Makefile-quote target ; add -fcopybook-deps to + output only copybook names instead of file paths. -fcopybook-deps + also forces -E, -foneline-deps, -MT=copybooks, disables errors on + missing copybooks and removes output on stdout 2024-02-19 Boris Eng diff --git a/cobc/typeck.c b/cobc/typeck.c index e31387b08..391ebaba5 100644 --- a/cobc/typeck.c +++ b/cobc/typeck.c @@ -3603,7 +3603,6 @@ check_argument_conformance (struct cb_program *program, cb_tree argument_tripple } else { arg_field = NULL; } - if (!CB_FIELD_P(param)) return; param_field = CB_FIELD_PTR(CB_VALUE(param)); /*