This is how to set these:

svn propset svn:eol-style native filename
svn commit filename


On Fri, Nov 26, 2021 at 2:24 PM Rick McGuire <object.r...@gmail.com> wrote:

> That's not the way to do this. The proper way to set the linends is via an
> SVN property that causes them to be checked out with native linends.
>
> Rick
>
> ---------- Forwarded message ---------
> From: orexx--- via Oorexx-svn <oorexx-...@lists.sourceforge.net>
> Date: Fri, Nov 26, 2021 at 1:16 PM
> Subject: [Oorexx-svn] SF.net SVN: oorexx-code-0:[12319]
> main/trunk/samples/api/c++/external
> To: <oorexx-...@lists.sourceforge.net>
> Cc: <or...@users.sf.net>
>
>
> Revision: 12319
>           http://sourceforge.net/p/oorexx/code-0/12319
> Author:   orexx
> Date:     2021-11-26 18:16:12 +0000 (Fri, 26 Nov 2021)
> Log Message:
> -----------
> 20211126 Change line-ends to Unix style.
>
> Modified Paths:
> --------------
>     main/trunk/samples/api/c++/external/useExternalMethods.rex
>     main/trunk/samples/api/c++/external/useExternalMethodsRoutines.rex
>     main/trunk/samples/api/c++/external/useExternalRoutines.rex
>     main/trunk/samples/api/c++/external/useExternalRoutines2.rex
>
> Modified: main/trunk/samples/api/c++/external/useExternalMethods.rex
> ===================================================================
> --- main/trunk/samples/api/c++/external/useExternalMethods.rex  2021-11-26
> 12:43:46 UTC (rev 12318)
> +++ main/trunk/samples/api/c++/external/useExternalMethods.rex  2021-11-26
> 18:16:12 UTC (rev 12319)
> @@ -1,77 +1,77 @@
>
> -/*----------------------------------------------------------------------------*/
> -/*
>     */
> -/* Copyright (c) 2021 Rexx Language Association. All rights reserved.
>      */
> -/*
>     */
> -/* This program and the accompanying materials are made available under
>      */
> -/* the terms of the Common Public License v1.0 which accompanies this
>      */
> -/* distribution. A copy is also available at the following address:
>      */
> -/* https://www.oorexx.org/license.html
>       */
> -/*
>     */
> -/* Redistribution and use in source and binary forms, with or
>      */
> -/* without modification, are permitted provided that the following
>     */
> -/* conditions are met:
>     */
> -/*
>     */
> -/* Redistributions of source code must retain the above copyright
>      */
> -/* notice, this list of conditions and the following disclaimer.
>     */
> -/* Redistributions in binary form must reproduce the above copyright
>     */
> -/* notice, this list of conditions and the following disclaimer in
>     */
> -/* the documentation and/or other materials provided with the
> distribution.   */
> -/*
>     */
> -/* Neither the name of Rexx Language Association nor the names
>     */
> -/* of its contributors may be used to endorse or promote products
>      */
> -/* derived from this software without specific prior written permission.
>     */
> -/*
>     */
> -/* THIS SOFTWARE IS PROVIDED BY THE COPYright HOLDERS AND CONTRIBUTORS
>     */
> -/* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
>     */
> -/* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
>     */
> -/* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
> COPYright   */
> -/* OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
>     */
> -/* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
> LIMITED   */
> -/* TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
>     */
> -/* OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
> THEORY     */
> -/* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
> (INCLUDING    */
> -/* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
>      */
> -/* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
>      */
> -/*
>     */
>
> -/*----------------------------------------------------------------------------*/
> -
> -o=.test~new          -- create object
> -o~hello
> -say "---"
> -say "o~NoArgMethodReturn123()    :" pp(o~NoArgMethodReturn123)
> -say
> -say "invoking a method that returns nothing:"
> -o~NoArgMethodVoid
> -say
> -say "o~OneArgMethodReturnArg(1)  :" pp(o~OneArgMethodReturnArg(1))
> -say "o~OneArgMethodReturnArg( )  :" pp(o~OneArgMethodReturnArg( ))
> -say
> -say "invoking another method that returns nothing:"
> -o~OneArgMethodVoid(2)
> -say
> -say "o~TwoIntArgAdder(4, 5)       :" pp(o~TwoIntArgAdder(4, 5))
> -say "o~TwoDoubleArgAdder(6  , 8  ):" pp(o~TwoDoubleArgAdder(6  , 8  ))
> -say "o~TwoDoubleArgAdder(6.7, 8.9):" pp(o~TwoDoubleArgAdder(6.7, 8.9))
> -say "---"
> -say "invoking a method that natively will send 'hello' to its object:"
> -o~OneArgInvokeOrxMethod(-123)
> -say "---"
> -
> -say "Invoking an external method with wrong arguments:"
> -say "o~TwoIntArgAdder(9.8, 7.6)   :" pp(o~TwoIntArgAdder(9.8, 7.6))
> -
> -
> -::routine pp   -- return string value enclosed in square brackets
> -  return "["arg(1)"]"
> -
> -::class test            -- define class and native methods for it
> -::method NoArgMethodReturn123  external "LIBRARY external_methods
> NoArgMethodReturn123 "
> -::method NoArgMethodVoid       external "LIBRARY external_methods
> NoArgMethodVoid      "
> -::method OneArgMethodReturnArg external "LIBRARY external_methods
> OneArgMethodReturnArg"
> -::method OneArgMethodVoid      external "LIBRARY external_methods
> OneArgMethodVoid     "
> -::method TwoIntArgAdder        external "LIBRARY external_methods
> TwoIntArgAdder       "
> -::method TwoDoubleArgAdder     external "LIBRARY external_methods
> TwoDoubleArgAdder    "
> -::method OneArgInvokeOrxMethod external "LIBRARY external_methods
> OneArgInvokeOrxMethod"
> -
> -::method hello
> -  say "hello from" pp(self) "self~identityHash:" pp(self~identityHash)
>
> +/*----------------------------------------------------------------------------*/
> +/*
>     */
> +/* Copyright (c) 2021 Rexx Language Association. All rights reserved.
>      */
> +/*
>     */
> +/* This program and the accompanying materials are made available under
>      */
> +/* the terms of the Common Public License v1.0 which accompanies this
>      */
> +/* distribution. A copy is also available at the following address:
>      */
> +/* https://www.oorexx.org/license.html
>       */
> +/*
>     */
> +/* Redistribution and use in source and binary forms, with or
>      */
> +/* without modification, are permitted provided that the following
>     */
> +/* conditions are met:
>     */
> +/*
>     */
> +/* Redistributions of source code must retain the above copyright
>      */
> +/* notice, this list of conditions and the following disclaimer.
>     */
> +/* Redistributions in binary form must reproduce the above copyright
>     */
> +/* notice, this list of conditions and the following disclaimer in
>     */
> +/* the documentation and/or other materials provided with the
> distribution.   */
> +/*
>     */
> +/* Neither the name of Rexx Language Association nor the names
>     */
> +/* of its contributors may be used to endorse or promote products
>      */
> +/* derived from this software without specific prior written permission.
>     */
> +/*
>     */
> +/* THIS SOFTWARE IS PROVIDED BY THE COPYright HOLDERS AND CONTRIBUTORS
>     */
> +/* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
>     */
> +/* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
>     */
> +/* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
> COPYright   */
> +/* OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
>     */
> +/* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
> LIMITED   */
> +/* TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
>     */
> +/* OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
> THEORY     */
> +/* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
> (INCLUDING    */
> +/* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
>      */
> +/* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
>      */
> +/*
>     */
>
> +/*----------------------------------------------------------------------------*/
> +
> +o=.test~new          -- create object
> +o~hello
> +say "---"
> +say "o~NoArgMethodReturn123()    :" pp(o~NoArgMethodReturn123)
> +say
> +say "invoking a method that returns nothing:"
> +o~NoArgMethodVoid
> +say
> +say "o~OneArgMethodReturnArg(1)  :" pp(o~OneArgMethodReturnArg(1))
> +say "o~OneArgMethodReturnArg( )  :" pp(o~OneArgMethodReturnArg( ))
> +say
> +say "invoking another method that returns nothing:"
> +o~OneArgMethodVoid(2)
> +say
> +say "o~TwoIntArgAdder(4, 5)       :" pp(o~TwoIntArgAdder(4, 5))
> +say "o~TwoDoubleArgAdder(6  , 8  ):" pp(o~TwoDoubleArgAdder(6  , 8  ))
> +say "o~TwoDoubleArgAdder(6.7, 8.9):" pp(o~TwoDoubleArgAdder(6.7, 8.9))
> +say "---"
> +say "invoking a method that natively will send 'hello' to its object:"
> +o~OneArgInvokeOrxMethod(-123)
> +say "---"
> +
> +say "Invoking an external method with wrong arguments:"
> +say "o~TwoIntArgAdder(9.8, 7.6)   :" pp(o~TwoIntArgAdder(9.8, 7.6))
> +
> +
> +::routine pp   -- return string value enclosed in square brackets
> +  return "["arg(1)"]"
> +
> +::class test            -- define class and native methods for it
> +::method NoArgMethodReturn123  external "LIBRARY external_methods
> NoArgMethodReturn123 "
> +::method NoArgMethodVoid       external "LIBRARY external_methods
> NoArgMethodVoid      "
> +::method OneArgMethodReturnArg external "LIBRARY external_methods
> OneArgMethodReturnArg"
> +::method OneArgMethodVoid      external "LIBRARY external_methods
> OneArgMethodVoid     "
> +::method TwoIntArgAdder        external "LIBRARY external_methods
> TwoIntArgAdder       "
> +::method TwoDoubleArgAdder     external "LIBRARY external_methods
> TwoDoubleArgAdder    "
> +::method OneArgInvokeOrxMethod external "LIBRARY external_methods
> OneArgInvokeOrxMethod"
> +
> +::method hello
> +  say "hello from" pp(self) "self~identityHash:" pp(self~identityHash)
>
> Modified:
> main/trunk/samples/api/c++/external/useExternalMethodsRoutines.rex
> ===================================================================
> --- main/trunk/samples/api/c++/external/useExternalMethodsRoutines.rex
> 2021-11-26 12:43:46 UTC (rev 12318)
> +++ main/trunk/samples/api/c++/external/useExternalMethodsRoutines.rex
> 2021-11-26 18:16:12 UTC (rev 12319)
> @@ -1,47 +1,47 @@
>
> -/*----------------------------------------------------------------------------*/
> -/*
>     */
> -/* Copyright (c) 2021 Rexx Language Association. All rights reserved.
>      */
> -/*
>     */
> -/* This program and the accompanying materials are made available under
>      */
> -/* the terms of the Common Public License v1.0 which accompanies this
>      */
> -/* distribution. A copy is also available at the following address:
>      */
> -/* https://www.oorexx.org/license.html
>       */
> -/*
>     */
> -/* Redistribution and use in source and binary forms, with or
>      */
> -/* without modification, are permitted provided that the following
>     */
> -/* conditions are met:
>     */
> -/*
>     */
> -/* Redistributions of source code must retain the above copyright
>      */
> -/* notice, this list of conditions and the following disclaimer.
>     */
> -/* Redistributions in binary form must reproduce the above copyright
>     */
> -/* notice, this list of conditions and the following disclaimer in
>     */
> -/* the documentation and/or other materials provided with the
> distribution.   */
> -/*
>     */
> -/* Neither the name of Rexx Language Association nor the names
>     */
> -/* of its contributors may be used to endorse or promote products
>      */
> -/* derived from this software without specific prior written permission.
>     */
> -/*
>     */
> -/* THIS SOFTWARE IS PROVIDED BY THE COPYright HOLDERS AND CONTRIBUTORS
>     */
> -/* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
>     */
> -/* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
>     */
> -/* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
> COPYright   */
> -/* OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
>     */
> -/* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
> LIMITED   */
> -/* TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
>     */
> -/* OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
> THEORY     */
> -/* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
> (INCLUDING    */
> -/* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
>      */
> -/* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
>      */
> -/*
>     */
>
> -/*----------------------------------------------------------------------------*/
> -
> -say "NoArgRoutineReturn123():" NoArgRoutineReturn123()
> -
> -o=.test~new          -- create object
> -say "o~NoArgMethodReturn123 :" o~NoArgMethodReturn123
> -
> -::routine NoArgRoutineReturn123 external "library
> external_methods_routines NoArgRoutineReturn123"
> -
> -::class test            -- define class and native methods for it
> -::method NoArgMethodReturn123   external "LIBRARY
> external_methods_routines NoArgMethodReturn123 "
> -
>
> +/*----------------------------------------------------------------------------*/
> +/*
>     */
> +/* Copyright (c) 2021 Rexx Language Association. All rights reserved.
>      */
> +/*
>     */
> +/* This program and the accompanying materials are made available under
>      */
> +/* the terms of the Common Public License v1.0 which accompanies this
>      */
> +/* distribution. A copy is also available at the following address:
>      */
> +/* https://www.oorexx.org/license.html
>       */
> +/*
>     */
> +/* Redistribution and use in source and binary forms, with or
>      */
> +/* without modification, are permitted provided that the following
>     */
> +/* conditions are met:
>     */
> +/*
>     */
> +/* Redistributions of source code must retain the above copyright
>      */
> +/* notice, this list of conditions and the following disclaimer.
>     */
> +/* Redistributions in binary form must reproduce the above copyright
>     */
> +/* notice, this list of conditions and the following disclaimer in
>     */
> +/* the documentation and/or other materials provided with the
> distribution.   */
> +/*
>     */
> +/* Neither the name of Rexx Language Association nor the names
>     */
> +/* of its contributors may be used to endorse or promote products
>      */
> +/* derived from this software without specific prior written permission.
>     */
> +/*
>     */
> +/* THIS SOFTWARE IS PROVIDED BY THE COPYright HOLDERS AND CONTRIBUTORS
>     */
> +/* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
>     */
> +/* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
>     */
> +/* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
> COPYright   */
> +/* OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
>     */
> +/* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
> LIMITED   */
> +/* TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
>     */
> +/* OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
> THEORY     */
> +/* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
> (INCLUDING    */
> +/* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
>      */
> +/* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
>      */
> +/*
>     */
>
> +/*----------------------------------------------------------------------------*/
> +
> +say "NoArgRoutineReturn123():" NoArgRoutineReturn123()
> +
> +o=.test~new          -- create object
> +say "o~NoArgMethodReturn123 :" o~NoArgMethodReturn123
> +
> +::routine NoArgRoutineReturn123 external "library
> external_methods_routines NoArgRoutineReturn123"
> +
> +::class test            -- define class and native methods for it
> +::method NoArgMethodReturn123   external "LIBRARY
> external_methods_routines NoArgMethodReturn123 "
> +
>
> Modified: main/trunk/samples/api/c++/external/useExternalRoutines.rex
> ===================================================================
> --- main/trunk/samples/api/c++/external/useExternalRoutines.rex 2021-11-26
> 12:43:46 UTC (rev 12318)
> +++ main/trunk/samples/api/c++/external/useExternalRoutines.rex 2021-11-26
> 18:16:12 UTC (rev 12319)
> @@ -1,64 +1,64 @@
>
> -/*----------------------------------------------------------------------------*/
> -/*
>     */
> -/* Copyright (c) 2021 Rexx Language Association. All rights reserved.
>      */
> -/*
>     */
> -/* This program and the accompanying materials are made available under
>      */
> -/* the terms of the Common Public License v1.0 which accompanies this
>      */
> -/* distribution. A copy is also available at the following address:
>      */
> -/* https://www.oorexx.org/license.html
>       */
> -/*
>     */
> -/* Redistribution and use in source and binary forms, with or
>      */
> -/* without modification, are permitted provided that the following
>     */
> -/* conditions are met:
>     */
> -/*
>     */
> -/* Redistributions of source code must retain the above copyright
>      */
> -/* notice, this list of conditions and the following disclaimer.
>     */
> -/* Redistributions in binary form must reproduce the above copyright
>     */
> -/* notice, this list of conditions and the following disclaimer in
>     */
> -/* the documentation and/or other materials provided with the
> distribution.   */
> -/*
>     */
> -/* Neither the name of Rexx Language Association nor the names
>     */
> -/* of its contributors may be used to endorse or promote products
>      */
> -/* derived from this software without specific prior written permission.
>     */
> -/*
>     */
> -/* THIS SOFTWARE IS PROVIDED BY THE COPYright HOLDERS AND CONTRIBUTORS
>     */
> -/* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
>     */
> -/* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
>     */
> -/* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
> COPYright   */
> -/* OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
>     */
> -/* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
> LIMITED   */
> -/* TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
>     */
> -/* OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
> THEORY     */
> -/* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
> (INCLUDING    */
> -/* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
>      */
> -/* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
>      */
> -/*
>     */
>
> -/*----------------------------------------------------------------------------*/
> -
> -say "NoArgRoutineReturn123()    :" pp(NoArgRoutineReturn123())
> -say
> -say "calling a routine that returns nothing:"
> -call NoArgRoutineVoid
> -say
> -say "OneArgRoutineReturnArg(1)  :" pp(OneArgRoutineReturnArg(1))
> -say "OneArgRoutineReturnArg( )  :" pp(OneArgRoutineReturnArg())
> -say
> -say "calling another routine that returns nothing:"
> -call OneArgRoutineVoid 2
> -say
> -say "TwoIntArgAdder(4, 5)       :" pp(TwoIntArgAdder(4, 5))
> -say "TwoDoubleArgAdder(6  , 8  ):" pp(TwoDoubleArgAdder(6  , 8  ))
> -say "TwoDoubleArgAdder(6.7, 8.9):" pp(TwoDoubleArgAdder(6.7, 8.9))
> -say "---"
> -
> -say "Invoking an external routine with wrong arguments:"
> -say "TwoIntArgAdder(9.8, 7.6)   :" pp(TwoIntArgAdder(9.8, 7.6))
> -
> -::routine pp   -- return string value enclosed in square brackets
> -  return "["arg(1)"]"
> -
> -::routine NoArgRoutineReturn123  external "library external_routines
> NoArgRoutineReturn123"
> -::routine NoArgRoutineVoid       external "library external_routines
> NoArgRoutineVoid"
> -::routine OneArgRoutineReturnArg external "library external_routines
> OneArgRoutineReturnArg"
> -::routine OneArgRoutineVoid      external "library external_routines
> OneArgRoutineVoid"
> -::routine TwoDoubleArgAdder      external "library external_routines
> TwoDoubleArgAdder"
>
> +/*----------------------------------------------------------------------------*/
> +/*
>     */
> +/* Copyright (c) 2021 Rexx Language Association. All rights reserved.
>      */
> +/*
>     */
> +/* This program and the accompanying materials are made available under
>      */
> +/* the terms of the Common Public License v1.0 which accompanies this
>      */
> +/* distribution. A copy is also available at the following address:
>      */
> +/* https://www.oorexx.org/license.html
>       */
> +/*
>     */
> +/* Redistribution and use in source and binary forms, with or
>      */
> +/* without modification, are permitted provided that the following
>     */
> +/* conditions are met:
>     */
> +/*
>     */
> +/* Redistributions of source code must retain the above copyright
>      */
> +/* notice, this list of conditions and the following disclaimer.
>     */
> +/* Redistributions in binary form must reproduce the above copyright
>     */
> +/* notice, this list of conditions and the following disclaimer in
>     */
> +/* the documentation and/or other materials provided with the
> distribution.   */
> +/*
>     */
> +/* Neither the name of Rexx Language Association nor the names
>     */
> +/* of its contributors may be used to endorse or promote products
>      */
> +/* derived from this software without specific prior written permission.
>     */
> +/*
>     */
> +/* THIS SOFTWARE IS PROVIDED BY THE COPYright HOLDERS AND CONTRIBUTORS
>     */
> +/* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
>     */
> +/* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
>     */
> +/* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
> COPYright   */
> +/* OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
>     */
> +/* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
> LIMITED   */
> +/* TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
>     */
> +/* OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
> THEORY     */
> +/* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
> (INCLUDING    */
> +/* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
>      */
> +/* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
>      */
> +/*
>     */
>
> +/*----------------------------------------------------------------------------*/
> +
> +say "NoArgRoutineReturn123()    :" pp(NoArgRoutineReturn123())
> +say
> +say "calling a routine that returns nothing:"
> +call NoArgRoutineVoid
> +say
> +say "OneArgRoutineReturnArg(1)  :" pp(OneArgRoutineReturnArg(1))
> +say "OneArgRoutineReturnArg( )  :" pp(OneArgRoutineReturnArg())
> +say
> +say "calling another routine that returns nothing:"
> +call OneArgRoutineVoid 2
> +say
> +say "TwoIntArgAdder(4, 5)       :" pp(TwoIntArgAdder(4, 5))
> +say "TwoDoubleArgAdder(6  , 8  ):" pp(TwoDoubleArgAdder(6  , 8  ))
> +say "TwoDoubleArgAdder(6.7, 8.9):" pp(TwoDoubleArgAdder(6.7, 8.9))
> +say "---"
> +
> +say "Invoking an external routine with wrong arguments:"
> +say "TwoIntArgAdder(9.8, 7.6)   :" pp(TwoIntArgAdder(9.8, 7.6))
> +
> +::routine pp   -- return string value enclosed in square brackets
> +  return "["arg(1)"]"
> +
> +::routine NoArgRoutineReturn123  external "library external_routines
> NoArgRoutineReturn123"
> +::routine NoArgRoutineVoid       external "library external_routines
> NoArgRoutineVoid"
> +::routine OneArgRoutineReturnArg external "library external_routines
> OneArgRoutineReturnArg"
> +::routine OneArgRoutineVoid      external "library external_routines
> OneArgRoutineVoid"
> +::routine TwoDoubleArgAdder      external "library external_routines
> TwoDoubleArgAdder"
>
> Modified: main/trunk/samples/api/c++/external/useExternalRoutines2.rex
> ===================================================================
> --- main/trunk/samples/api/c++/external/useExternalRoutines2.rex
> 2021-11-26 12:43:46 UTC (rev 12318)
> +++ main/trunk/samples/api/c++/external/useExternalRoutines2.rex
> 2021-11-26 18:16:12 UTC (rev 12319)
> @@ -1,60 +1,60 @@
>
> -/*----------------------------------------------------------------------------*/
> -/*
>     */
> -/* Copyright (c) 2021 Rexx Language Association. All rights reserved.
>      */
> -/*
>     */
> -/* This program and the accompanying materials are made available under
>      */
> -/* the terms of the Common Public License v1.0 which accompanies this
>      */
> -/* distribution. A copy is also available at the following address:
>      */
> -/* https://www.oorexx.org/license.html
>       */
> -/*
>     */
> -/* Redistribution and use in source and binary forms, with or
>      */
> -/* without modification, are permitted provided that the following
>     */
> -/* conditions are met:
>     */
> -/*
>     */
> -/* Redistributions of source code must retain the above copyright
>      */
> -/* notice, this list of conditions and the following disclaimer.
>     */
> -/* Redistributions in binary form must reproduce the above copyright
>     */
> -/* notice, this list of conditions and the following disclaimer in
>     */
> -/* the documentation and/or other materials provided with the
> distribution.   */
> -/*
>     */
> -/* Neither the name of Rexx Language Association nor the names
>     */
> -/* of its contributors may be used to endorse or promote products
>      */
> -/* derived from this software without specific prior written permission.
>     */
> -/*
>     */
> -/* THIS SOFTWARE IS PROVIDED BY THE COPYright HOLDERS AND CONTRIBUTORS
>     */
> -/* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
>     */
> -/* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
>     */
> -/* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
> COPYright   */
> -/* OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
>     */
> -/* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
> LIMITED   */
> -/* TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
>     */
> -/* OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
> THEORY     */
> -/* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
> (INCLUDING    */
> -/* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
>      */
> -/* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
>      */
> -/*
>     */
>
> -/*----------------------------------------------------------------------------*/
> -
> -say "NoArgRoutineReturn123()    :" pp(NoArgRoutineReturn123())
> -say
> -say "calling a routine that returns nothing:"
> -call NoArgRoutineVoid
> -say
> -say "OneArgRoutineReturnArg(1)  :" pp(OneArgRoutineReturnArg(1))
> -say "OneArgRoutineReturnArg( )  :" pp(OneArgRoutineReturnArg())
> -say
> -say "calling another routine that returns nothing:"
> -call OneArgRoutineVoid 2
> -say
> -say "TwoIntArgAdder(4, 5)       :" pp(TwoIntArgAdder(4, 5))
> -say "TwoDoubleArgAdder(6  , 8  ):" pp(TwoDoubleArgAdder(6  , 8  ))
> -say "TwoDoubleArgAdder(6.7, 8.9):" pp(TwoDoubleArgAdder(6.7, 8.9))
> -say "---"
> -
> -say "Invoking an external routine with wrong arguments:"
> -say "TwoIntArgAdder(9.8, 7.6)   :" pp(TwoIntArgAdder(9.8, 7.6))
> -
> -::requires "external_routines" library
> -
> -::routine pp   -- return string value enclosed in square brackets
> -  return "["arg(1)"]"
>
> +/*----------------------------------------------------------------------------*/
> +/*
>     */
> +/* Copyright (c) 2021 Rexx Language Association. All rights reserved.
>      */
> +/*
>     */
> +/* This program and the accompanying materials are made available under
>      */
> +/* the terms of the Common Public License v1.0 which accompanies this
>      */
> +/* distribution. A copy is also available at the following address:
>      */
> +/* https://www.oorexx.org/license.html
>       */
> +/*
>     */
> +/* Redistribution and use in source and binary forms, with or
>      */
> +/* without modification, are permitted provided that the following
>     */
> +/* conditions are met:
>     */
> +/*
>     */
> +/* Redistributions of source code must retain the above copyright
>      */
> +/* notice, this list of conditions and the following disclaimer.
>     */
> +/* Redistributions in binary form must reproduce the above copyright
>     */
> +/* notice, this list of conditions and the following disclaimer in
>     */
> +/* the documentation and/or other materials provided with the
> distribution.   */
> +/*
>     */
> +/* Neither the name of Rexx Language Association nor the names
>     */
> +/* of its contributors may be used to endorse or promote products
>      */
> +/* derived from this software without specific prior written permission.
>     */
> +/*
>     */
> +/* THIS SOFTWARE IS PROVIDED BY THE COPYright HOLDERS AND CONTRIBUTORS
>     */
> +/* "AS IS" AND ANY EXPRESS OR IMPLIED WARRANTIES, INCLUDING, BUT NOT
>     */
> +/* LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS
>     */
> +/* FOR A PARTICULAR PURPOSE ARE DISCLAIMED. IN NO EVENT SHALL THE
> COPYright   */
> +/* OWNER OR CONTRIBUTORS BE LIABLE FOR ANY DIRECT, INDIRECT, INCIDENTAL,
>     */
> +/* SPECIAL, EXEMPLARY, OR CONSEQUENTIAL DAMAGES (INCLUDING, BUT NOT
> LIMITED   */
> +/* TO, PROCUREMENT OF SUBSTITUTE GOODS OR SERVICES; LOSS OF USE, DATA,
>     */
> +/* OR PROFITS; OR BUSINESS INTERRUPTION) HOWEVER CAUSED AND ON ANY
> THEORY     */
> +/* OF LIABILITY, WHETHER IN CONTRACT, STRICT LIABILITY, OR TORT
> (INCLUDING    */
> +/* NEGLIGENCE OR OTHERWISE) ARISING IN ANY WAY OUT OF THE USE OF THIS
>      */
> +/* SOFTWARE, EVEN IF ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
>      */
> +/*
>     */
>
> +/*----------------------------------------------------------------------------*/
> +
> +say "NoArgRoutineReturn123()    :" pp(NoArgRoutineReturn123())
> +say
> +say "calling a routine that returns nothing:"
> +call NoArgRoutineVoid
> +say
> +say "OneArgRoutineReturnArg(1)  :" pp(OneArgRoutineReturnArg(1))
> +say "OneArgRoutineReturnArg( )  :" pp(OneArgRoutineReturnArg())
> +say
> +say "calling another routine that returns nothing:"
> +call OneArgRoutineVoid 2
> +say
> +say "TwoIntArgAdder(4, 5)       :" pp(TwoIntArgAdder(4, 5))
> +say "TwoDoubleArgAdder(6  , 8  ):" pp(TwoDoubleArgAdder(6  , 8  ))
> +say "TwoDoubleArgAdder(6.7, 8.9):" pp(TwoDoubleArgAdder(6.7, 8.9))
> +say "---"
> +
> +say "Invoking an external routine with wrong arguments:"
> +say "TwoIntArgAdder(9.8, 7.6)   :" pp(TwoIntArgAdder(9.8, 7.6))
> +
> +::requires "external_routines" library
> +
> +::routine pp   -- return string value enclosed in square brackets
> +  return "["arg(1)"]"
>
>
>
> _______________________________________________
> Oorexx-svn mailing list
> oorexx-...@lists.sourceforge.net
> https://lists.sourceforge.net/lists/listinfo/oorexx-svn
>
_______________________________________________
Oorexx-devel mailing list
Oorexx-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oorexx-devel

Reply via email to