Re: [Oorexx-devel] patches to 2017; trunk breaks BSF4Rexx

[Rick M. <obj...@gm...>]

Rene,

I don't think this is the correct change to make.  What compile error were
you getting?  I made the change to unsigned int in the using function to ge=
t
rid of the earlier error.  I don't think changing the type signature of the
function is the correct thing to do, unless this happens to be an error
caused by 64-bit compilation.

If you can, set a break point at the beginning of
RexxActivity::raiseException() and post a stack trace.  This will give me
some clue as to what's triggering that error.

Rick

On Jan 2, 2008 3:12 PM, Ren=E9 Jansen <rvj...@xs...> wrote:

> I had to apply the following changes to 2017 to have trunk build again.
>
> Index: kernel/platform/unix/RexxQueues.cpp
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
> --- kernel/platform/unix/RexxQueues.cpp (revision 2012)
> +++ kernel/platform/unix/RexxQueues.cpp (working copy)
> @@ -61,7 +61,7 @@
>  RexxMethod0(REXXOBJECT, rexx_query_queue)
>  {
>     REXXOBJECT queue_name;              /* current queue
> name                */
> -   unsigned int count =3D 0;             /* count of
> lines                    */
> +   size_t count =3D 0;             /* count of lines
> */
>     APIRET rc;                          /* queue query return
> code           */
>
>                                         /* get the queue
> name                */
>
> Index: api/rexx.h
> =3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D
> --- api/rexx.h  (revision 2012)
> +++ api/rexx.h  (working copy)
> @@ -179,7 +179,7 @@
>           const char *,                         /* Name of
> DLL                */
>           const char *,                         /* Name of procedure
> in DLL   */
>           const char *,                         /* User
> area                  */
> -         unsigned int);                        /* Drop
> authority.            */
> +         size_t);                        /* Drop
> authority.            */
>  typedef APIRET (APIENTRY *PFNREXXREGISTERSUBCOMDLL)(const char *,
> const char *, const char *,
>                                                      char *, unsigned
> int);
>  #define REXXREGISTERSUBCOMDLL  RexxRegisterSubcomDll
> @@ -589,8 +589,8 @@
>
>  APIRET APIENTRY RexxQueryQueue (
>          const char *,                          /* Name of queue to
> query      */
> -        unsigned int *);                       /* Place to put
> element count  */
> -typedef APIRET (APIENTRY *PFNREXXQUERYQUEUE)(const char *, unsigned
> int *);
> +        size_t*);                       /* Place to put element
> count  */
> +typedef APIRET (APIENTRY *PFNREXXQUERYQUEUE)(const char *, size_t *);
>
>
>  /***    RexxAddQueue - Add an entry to an External Data Queue */
> @@ -598,7 +598,7 @@
>  APIRET APIENTRY RexxAddQueue (
>          const char *,                          /* Name of queue to
> add to     */
>          PCONSTRXSTRING,                        /* Data string to
> add          */
> -        unsigned int);                         /* Queue type (FIFO|
> LIFO)      */
> +        size_t);                         /* Queue type (FIFO|
> LIFO)      */
>  typedef APIRET (APIENTRY *PFNREXXADDQUEUE)(const char *,
> PCONSTRXSTRING, unsigned int);
>
>
> The interpreter runs, it does break BSF4Rexx again however, with
>
> REX0049E: Error 49:  Interpretation error
>
> Exception of type 'org.apache.bsf.BSFException' thrown while invoking
> Rexx:
>
>
> Ren=E9.
> -------------------------------------------------------------------------
> This SF.net email is sponsored by: Microsoft
> Defy all challenges. Microsoft(R) Visual Studio 2005.
> http://clk.atdmt.com/MRT/go/vse0120000070mrt/direct/01/
> _______________________________________________
> Oorexx-devel mailing list
> Oor...@li...
> https://lists.sourceforge.net/lists/listinfo/oorexx-devel
>