How You may extent the NetRexx Class Rexx (example Rexx Indexed String)

classic Classic list List threaded Threaded
1 message Options
Reply | Threaded
Open this post in threaded view
|

How You may extent the NetRexx Class Rexx (example Rexx Indexed String)

ThSITC
Hello There,

I did find a way, Years ago, with the help of Kermit Kiser, who
unfortunately did die too early (we are missing You all, Kermit), to
EXTEND the class Rexx.

My requirements those times have been, that I wanted to know from the
NetRexx DECLARATION, whether a Variable is a NetRexx Indexed String or not.

Mainly just for Documentation purposes, when printing out the program
later ...

The solution I came up (after Kermit did change a bit in the class Rexx
and the Translator) has been:

/*************************************************************************/
/* IBM Materials Licensed under International Components for Unicode     */
/* Licence version 1.8.1 (ICU Licence) - Property of IBM                 */
/* --------------------------------------------------------------------- */
/* The former Rexx2Nrx Run-Time Package (NetRexx Version)                */
/* of Thomas Schneider, ThSITC, 2011. See www.thsitc.com/Product Rexx2Nrx*/
/* for Details. Note that the method names have been adjusted for Java   */
/* naming conventions since the first Rexx2Nrx release, back in 2001!    */
/* --------------------------------------------------------------------- */
/* Copyright (c) 2000-2010 [hidden email]                   */
/* Copyright (c) 2011-oo RexxLA                                        */
/*************************************************************************/

/* RexxStem: declare Rexx Stams as own class (for documentation)     */
/*                (c) Thomas.Schneider, Sept. 2001                   */
/*********************************************************************/

options binary
package Rexx2Nrx.Rexx2RTP
class RexxStem extends Rexx

method RexxStem(default=Rexx '') public
    super(default)
    return this

Hope this does help a bit ...

Kindly, Thomas.



--
This email has been checked for viruses by AVG.
https://urldefense.proofpoint.com/v2/url?u=https-3A__www.avg.com&d=DwIDaQ&c=jf_iaSHvJObTbx-siA1ZOg&r=_6rXNpPJ1fYV-3bV1za02NiR4PUelvicfHXwtnTXpXE&m=HBMemSfZILLjsnWvnuYLJvzIuQzh0-cQ0yq47KeDhEE&s=E3WKW4jv3StsdOLzBfLvikJr5s7HcMds_bh4cHRSjTU&e= 

_______________________________________________
Ibm-netrexx mailing list
[hidden email]
Online Archive : http://ibm-netrexx.215625.n3.nabble.com/

Thomas Schneider, Vienna, Austria (Europe) :-)

www.thsitc.com
www.db-123.com