ibm-netrexx

Next Runtime Please

classic Classic list List threaded Threaded
♦
♦
 2 messages Options
Jason Martin
Reply | Threaded
Open this post in threaded view
♦
♦
|

Next Runtime Please

Jason Martin
<?xml version="1.0" encoding="UTF-8" standalone="no"?>
<package>
  <comment>/* Generated from 'FizzBuzz.nrx' 7 May 2016 01:17:41 [v4.00] */</comment>
  <comment>/* Options: Comments Decimal Format Java Logo Replace Trace2 Verbose3 */</comment>
  <comment>/* Rosettacode Fizzbuzz task */</comment>
  <classDef name="FizzBuzz" public="true">
    <variable name="$01" type="netrexx.lang.Rexx">
      <assign operator="=">
        <call name="netrexx.lang.Rexx" new="new">
          <typeOp operator="(" type="byte">
            <constant intConst="100"/>
          </typeOp>
        </call>
      </assign>
    </variable>
    <variable name="$02" type="netrexx.lang.Rexx">
      <assign operator="=">
        <call name="netrexx.lang.Rexx" new="new">
          <constant intConst="15"/>
        </call>
      </assign>
    </variable>
    <variable name="$03" type="netrexx.lang.Rexx">
      <assign operator="=">
        <call name="netrexx.lang.Rexx" new="new">
          <constant intConst="0"/>
        </call>
      </assign>
    </variable>
    <variable name="$04" type="netrexx.lang.Rexx">
      <assign operator="=">
        <call name="netrexx.lang.Rexx" new="new">
          <constant intConst="5"/>
        </call>
      </assign>
    </variable>
    <variable name="$05" type="netrexx.lang.Rexx">
      <assign operator="=">
        <call name="netrexx.lang.Rexx" new="new">
          <constant intConst="3"/>
        </call>
      </assign>
    </variable>
    <variable name="$0" type="java.lang.String">
      <assign operator="=">
        <constant stringConst="&quot;FizzBuzz.nrx&quot;"/>
      </assign>
    </variable>
    <method name="main" public="true" static="true" type="void">
      <parameterList>
        <parameter array="true" name="$0s" type="java.lang.String"/>
      </parameterList>
      <block>
        <variable name="j" type="netrexx.lang.Rexx">
          <assign operator="=">
            <constant stringConst="null"/>
          </assign>
        </variable>
        <block>
          <variable name="$1" type="int">
            <assign operator="=">
              <call name="$01.OpPlus.toint">
                <constant stringConst="null"/>
              </call>
            </assign>
          </variable>
          <assign operator="=">
            <variable name="j"/>
            <call name="netrexx.lang.Rexx" new="new">
              <typeOp operator="(" type="byte">
                <constant intConst="1"/>
              </typeOp>
            </call>
          </assign>
          <nodeLabel name="j">
            <loop code="for">
              <binaryOp operator="&gt;">
                <variable name="$1"/>
                <constant intConst="0"/>
              </binaryOp>
              <assign operator="=">
                <variable name="$1"/>
                <unaryOp operator="--" postOp="true"/>
              </assign>
              <assign operator="=">
                <variable name="j"/>
                <call name="j.OpAdd">
                  <constant stringConst="null"/>
                  <call name="netrexx.lang.Rexx" new="new">
                    <constant intConst="1"/>
                  </call>
                </call>
              </assign>
              <block>
                <block>
                  <if>
                    <comment>/*select*/</comment>
                    <call name="j.OpRem.OpEqS">
                      <constant stringConst="null"/>
                      <variable name="$02"/>
                    </call>
                    <call name="netrexx.lang.RexxIO.Say">
                      <constant stringConst="&quot;FizzBuzz&quot;"/>
                    </call>
                    <if>
                      <call name="j.OpRem.OpEqS">
                        <constant stringConst="null"/>
                        <variable name="$04"/>
                      </call>
                      <call name="netrexx.lang.RexxIO.Say">
                        <constant stringConst="&quot;Buzz&quot;"/>
                      </call>
                      <if>
                        <call name="j.OpRem.OpEqS">
                          <constant stringConst="null"/>
                          <variable name="$05"/>
                        </call>
                        <call name="netrexx.lang.RexxIO.Say">
                          <constant stringConst="&quot;Fizz&quot;"/>
                        </call>
                        <block>
                          <call name="netrexx.lang.RexxIO.Say">
                            <call name="j.right">
                              <call name="netrexx.lang.Rexx" new="new">
                                <typeOp operator="(" type="byte">
                                  <constant intConst="4"/>
                                </typeOp>
                              </call>
                            </call>
                          </call>
                        </block>
                      </if>
                    </if>
                  </if>
                </block>
              </block>
            </loop>
          </nodeLabel>
        </block>
        <return indentifier="&lt;EOF&gt;">
          <comment>/*j*/</comment>
        </return>
      </block>
    </method>
    <method constructor="true" name="FizzBuzz" private="true">
      <parameterList/>
      <return indentifier="&lt;EOF&gt;"/>
    </method>
  </classDef>
</package>


_______________________________________________
Ibm-netrexx mailing list
[hidden email]
Online Archive : http://ibm-netrexx.215625.n3.nabble.com/
Kermit Kiser
Reply | Threaded
Open this post in threaded view
♦
♦
|

Re: Next Runtime Please

Kermit Kiser
+1

On May 6, 2016 10:29:53 PM PDT, Jason Martin <[hidden email]> wrote:
<?xml version="1.0" encoding="UTF-8" standalone="no"?>
<package>
  <comment>/* Generated from 'FizzBuzz.nrx' 7 May 2016 01:17:41 [v4.00] */</comment>
  <comment>/* Options: Comments Decimal Format Java Logo Replace Trace2 Verbose3 */</comment>
  <comment>/* Rosettacode Fizzbuzz task */</comment>
  <classDef name="FizzBuzz" public="true">
    <variable name="$01" type="netrexx.lang.Rexx">
      <assign operator="=">
        <call name="netrexx.lang.Rexx" new="new">
          <typeOp operator="(" type="byte">
            <constant intConst="100"/>
          </typeOp>
        </call>
      </assign>
    </variable>
    <variable name="$02" type="netrexx.lang.Rexx">
      <assign operator="=">
        <call name="netrexx.lang.Rexx" new="new">
          <constant intConst="15"/>
        </call>
      </assign>
    </variable>
    <variable name="$03" type="netrexx.lang.Rexx">
      <assign operator="=">
        <call name="netrexx.lang.Rexx" new="new">
          <constant intConst="0"/>
        </call>
      </assign>
    </variable>
    <variable name="$04" type="netrexx.lang.Rexx">
      <assign operator="=">
        <call name="netrexx.lang.Rexx" new="new">
          <constant intConst="5"/>
        </call>
      </assign>
    </variable>
    <variable name="$05" type="netrexx.lang.Rexx">
      <assign operator="=">
        <call name="netrexx.lang.Rexx" new="new">
          <constant intConst="3"/>
        </call>
      </assign>
    </variable>
    <variable name="$0" type="java.lang.String">
      <assign operator="=">
        <constant stringConst="&quot;FizzBuzz.nrx&quot;"/>
      </assign>
    </variable>
    <method name="main" public="true" static="true" type="void">
      <parameterList>
        <parameter array="true" name="$0s" type="java.lang.String"/>
      </parameterList>
      <block>
        <variable name="j" type="netrexx.lang.Rexx">
          <assign operator="=">
            <constant stringConst="null"/>
          </assign>
        </variable>
        <block>
          <variable name="$1" type="int">
            <assign operator="=">
              <call name="$01.OpPlus.toint">
                <constant stringConst="null"/>
              </call>
            </assign>
          </variable>
          <assign operator="=">
            <variable name="j"/>
            <call name="netrexx.lang.Rexx" new="new">
              <typeOp operator="(" type="byte">
                <constant intConst="1"/>
              </typeOp>
            </call>
          </assign>
          <nodeLabel name="j">
            <loop code="for">
           !   <binaryOp operator="&gt;">
                <variable name="$1"/>
                <constant intConst="0"/>
              </binaryOp>
              <assign operator="=">
                <variable name="$1"/>
                <unaryOp operator="--" postOp="true"/>
              </assign>
              <assign operator="=">
                <variable name="j"/>
                <call name="j.OpAdd">
                  <constant stringConst="null"/>
                  <call name="netrexx.lang.Rexx" new="new">
                    <constant intConst="1"/>
                  </call>
                </call>
              </assign>
              <block>
                <block>
                  <if>
                    <comment>/*select*/</comment>
                    <call name="j.OpRem.OpEqS">
                      <constant stringConst="null"/>
                      <variable name="$02"/>
                    </call>
                    <call name="netrexx.lang.RexxIO.Say">
                      <constant stringConst="&quot;FizzBuzz&quot;"/>
                    </call>
      �! �             <if>
                      <call name="j.OpRem.OpEqS">
                        <constant stringConst="null"/>
                        <variable name="$04"/>
                      </call>
                      <call name="netrexx.lang.RexxIO.Say">
                        <constant stringConst="&quot;Buzz&quot;"/>
                      </call>
                      <if>
                        <call name="j.OpRem.OpEqS">
                          <constant stringConst="null"/>
                          <variable name="$05"/>
                        </call>
                        <call name="netrexx.lang.RexxIO.Say">
                          <constant stringConst="&quot;Fizz&quot;"/>
                        </call>
                        <block>
                          <call name="netrexx.lang.RexxIO.Say">
                            <call name="j.right">
                              <call name="netrexx.lang.Rexx" new="new">
                                <typeOp operator="(" type="byte">
                                  <constant intConst="4"/>
                                </typeOp>
            �! �                 </call>
                            </call>
                          </call>
                        </block>
                      </if>
                    </if>
                  </if>
                </block>
              </block>
            </loop>
          </nodeLabel>
        </block>
        <return indentifier="&lt;EOF&gt;">
          <comment>/*j*/</comment>
        </return>
      </block>
    </method>
    <method constructor="true" name="FizzBuzz" private="true">
      <parameterList/>
      <return indentifier="&lt;EOF&gt;"/>
    </method>
  </classDef>
</package>


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


--
Sent from my Android device with K-9 Mail.
_______________________________________________
Ibm-netrexx mailing list
[hidden email]
Online Archive : http://ibm-netrexx.215625.n3.nabble.com/
Free forum by Nabble Edit this page