Fix #524: wrong string entrypoint decl in C++

.github/workflows/haskell-ci.yml

@@ -8,9 +8,9 @@
 #
 # For more information, see https://github.com/haskell-CI/haskell-ci
 #
-# version: 0.19.20250917
+# version: 0.19.20260128
 #
-# REGENDATA ("0.19.20250917",["github","cabal.project"])
+# REGENDATA ("0.19.20260128",["github","cabal.project"])
 #
 name: Haskell-CI
 on:
@@ -190,7 +190,7 @@ jobs:
           chmod a+x $HOME/.cabal/bin/cabal-plan
           cabal-plan --version
       - name: checkout
-        uses: actions/checkout@v5
+        uses: actions/checkout@v6
         with:
           path: source
       - name: initial cabal.project for sdist
@@ -236,7 +236,7 @@ jobs:
           $CABAL v2-build $ARG_COMPILER $ARG_TESTS $ARG_BENCH --dry-run all
           cabal-plan
       - name: restore cache
-        uses: actions/cache/restore@v4
+        uses: actions/cache/restore@v5
         with:
           key: ${{ runner.os }}-${{ matrix.compiler }}-${{ github.sha }}
           path: ~/.cabal/store
@@ -279,7 +279,7 @@ jobs:
           $CABAL v2-build $ARG_COMPILER --disable-tests --disable-benchmarks all
       - name: save cache
         if: always()
-        uses: actions/cache/save@v4
+        uses: actions/cache/save@v5
         with:
           key: ${{ runner.os }}-${{ matrix.compiler }}-${{ github.sha }}
           path: ~/.cabal/store

.github/workflows/stack.yml

@@ -39,7 +39,7 @@ jobs:
         shell: bash
 
     steps:
-      - uses: actions/checkout@v5
+      - uses: actions/checkout@v6
 
       - name: Setup Haskell
         uses: haskell-actions/setup@v2
@@ -80,7 +80,7 @@ jobs:
         # From now on, use env.{GHC|CABAL}_VER rather than matrix.{ghc|cabal}-ver!
 
       - name: Cache dependencies
-        uses: actions/cache@v4
+        uses: actions/cache@v5
         env:
           key: ${{ runner.os }}-stack-${{ env.STACK_VER }}-ghc-${{ env.GHC_VER }}
           ## Just stack.yaml is actually not correct, better would be stack.yaml.lock,

source/src/BNFC/Backend/C/CFtoBisonC.hs

@@ -214,7 +214,10 @@ parseMethod mode cf cat = unlines $ concat
   , body False
   , [ ""
     , unwords [ "/* Entrypoint: parse", dat, "from string. */" ]
-    , dat ++ " ps" ++ parser ++ "(const char *str)"
+    , dat ++ " p" ++ (if cParser mode then "s" else "") ++ parser ++ "(const char *str)"
+        -- Andreas, 2026-01-26, issue #524
+        -- In C++, functions can be overloaded, but not in C.
+        -- So we need to give a different name to the string parser than to the file parser.
     ]
   , body True
   ]

source/src/BNFC/Backend/CPP/NoSTL.hs

@@ -17,6 +17,7 @@ import BNFC.Backend.C.CFtoFlexC  ( cf2flex, ParserMode(..) )
 import BNFC.Backend.CPP.Common   ( commentWithEmacsModeHint )
 import BNFC.Backend.CPP.Makefile
 import BNFC.Backend.CPP.NoSTL.CFtoCPPAbs
+import BNFC.Backend.CPP.STL      ( mkEntryFuncs )
 import BNFC.Backend.CPP.STL.CFtoCVisitSkelSTL
 import BNFC.Backend.CPP.PrettyPrinter
 import qualified BNFC.Backend.Common.Makefile as Makefile
@@ -135,10 +136,8 @@ mkHeaderFile eps = unlines $ concat
     , "#include \"Absyn.H\""
     , ""
     ]
-  , map mkFunc eps
+  , concatMap mkEntryFuncs eps
   , [ ""
     , "#endif"
     ]
   ]
-  where
-  mkFunc s = identCat (normCat s) ++ "*" +++ "p" ++ identCat s ++ "(FILE *inp);"

source/src/BNFC/Backend/CPP/STL.hs

@@ -7,7 +7,7 @@
 
 -}
 
-module BNFC.Backend.CPP.STL (makeCppStl,) where
+module BNFC.Backend.CPP.STL (makeCppStl, mkEntryFuncs) where
 
 import Data.Foldable (toList)
 
@@ -176,15 +176,17 @@ mkHeaderFile inPackage eps = unlines $ concat
     , ""
     , nsStart inPackage
     ]
-  , concatMap mkFuncs eps
+  , concatMap mkEntryFuncs eps
   , [ nsEnd inPackage
     , ""
     , "#endif"
     ]
   ]
   where
   hdef = nsDefine inPackage "PARSER_HEADER_FILE"
-  mkFuncs s =
+
+mkEntryFuncs :: Cat -> [String]
+mkEntryFuncs s =
     [ identCat (normCat s) ++ "*" +++ "p" ++ identCat s ++ "(FILE *inp);"
     , identCat (normCat s) ++ "*" +++ "p" ++ identCat s ++ "(const char *str);"
     ]

source/stack-9.10.yaml

@@ -1 +1 @@
-resolver: lts-24.15
+resolver: lts-24.28

stack-9.10.yaml

@@ -1,4 +1,4 @@
-resolver: lts-24.15
+resolver: lts-24.28
 compiler: ghc-9.10.3
 compiler-check: newer-minor