Initial data commit

Task/Introspection/REXX/introspection-1.rexx

@@ -0,0 +1,4 @@
+                                /*output from parse version (almost all REXX versions)  */
+                                /*      theREXXinterpreterName level mm Mon yyyy        */
+parse version . level .
+if level<4  then exit

Task/Introspection/REXX/introspection-2.rexx

@@ -0,0 +1,7 @@
+parse version  x  1  whatLang  level  dd  mon  yyyy  .
+if level<4  then do
+                 say
+                 say 'version' level "is too old!"
+                 say x                                  /*this displays everything.*/
+                 exit                                   /*or maybe:   EXIT 13      */
+                 end

Task/Introspection/REXX/introspection-3.rexx

@@ -0,0 +1 @@
+if symbol('bloop')=='VAR' then say 'the "bloop" variable exists.'

Task/Introspection/REXX/introspection-4.rexx

@@ -0,0 +1,2 @@
+if symbol('bloop')=='VAR'  then say 'the "bloop" variable exists.'
+                           else say 'the "bloop" variable doesn''t exist.'

Task/Introspection/REXX/introspection-5.rexx

@@ -0,0 +1,3 @@
+bloop=47
+if symbol('bloop')=='VAR'  then say 'the "bloop" variable exists.'
+                           else say 'the "bloop" variable doesn''t exist.'

Task/Introspection/REXX/introspection-6.rexx

@@ -0,0 +1,2 @@
+bloop=47
+g=abs(bloop)

Task/Introspection/REXX/introspection-7.rexx

@@ -0,0 +1,9 @@
+if testxyz()  then say 'function XYZ not found.'
+              else say 'function XYZ was found.'
+exit
+/*──────────────────────────────────────────────────────────────────────────────────────*/
+testxyz: signal on syntax
+         call XYZ
+         return 0
+/*──────────────────────────────────────────────────────────────────────────────────────*/
+syntax:  return 1