Greetings ooRexx'ers,

CV Bruce wrote:
It kind of seems like the days when people checked the assembler created by the 
compiler to make sure the compiler was “doing it right”.



Those were the days.

Or former MS developer Dave Plumber writing Windows GUI code in Assembly here:

Hello, Assembly! Retrocoding the World's Smallest Windows App in x86 ASM
https://www.youtube.com/watch?v=b0zxIfJJLAY


Also this was an impressive video....

Comparing C to machine language
https://www.youtube.com/watch?v=yOyaJXpAYZQ



I do not suspect any AI tool will "think" of the wizardry of MFC and Mr. Parse 
(aka Chip) at RexxLA  Symposiums back in the early 2000's....

#!/usr/local/bin/rexx
trace a

delimtag    = '  '
instr       = '        This is a   line break!     Another         line        
break also!         '
linebreak   = X2C('0A')

.output~LineOut(instr)
/* Strip instr to set initial value of AP we will be processing */
AP = instr~strip()
.output~LineOut(AP)
OUTline = ''
/* Optimizing thanks to MFC & MrParse */
do forever
  parse var AP BP (delimtag) AP
  /* Strip the Left side of the value in AP */
  AP = AP~strip('L')
  /* Check to see if we are at the end of the line */
  if AP = '' then leave
  /* Basically this is a final else, attach it to the output */
  OUTline = OUTline || BP || linebreak
  .output~LineOut(OUTline)
end /* do forever */

OUTline = OUTline || BP

.output~LineOut(OUTline)

exit 0



I have used that format of parse line many times since then.... and always I 
leave behind:
/* Optimizing thanks to MFC & MrParse */
in the code just before the parse call.

I am thankful,

--
Michael Lueck
Lueck Data Systems
http://www.lueckdatasystems.com/


_______________________________________________
Oorexx-devel mailing list
Oorexx-devel@lists.sourceforge.net
https://lists.sourceforge.net/lists/listinfo/oorexx-devel

Reply via email to