Re: Reversed string macro

2020-10-24 Thread Phil Smith III
Gil wrote: >It's infuriating to make a tiny change and see the entire >remainder of the line flip to UPPER. Will Undo fix that? Long ago and far away (verging on 40 years), I wrote an AUTOCASE mod for XEDIT. When CASE was UPPER, it would examine the line before uppercasing and, if there was a

Re: Reversed string macro

2020-10-24 Thread Paul Gilmartin
On 2020-10-24, at 19:39:43, Tony Thigpen wrote: > > I have a lot of xedit macros, including some post edit reformatters, but I > never thought of that one. But, I don't think I will spend the time on it > since I rather just switch to mixed case for the few times I really, really > need it. >

Re: Reversed string macro

2020-10-24 Thread Tony Thigpen
Gilmartin [0014e0e4a59b-dmarc-requ...@listserv.uga.edu] Sent: Saturday, October 24, 2020 8:15 PM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Reversed string macro On 2020-10-24, at 15:06:32, Tony Thigpen wrote: ... (I normally use "case mixed ignore" in XEDIT.) On 2020-10-24, a

Re: Reversed string macro

2020-10-24 Thread Paul Gilmartin
On 2020-10-24, at 18:35:32, Seymour J Metz wrote: > > It is possible to write XEDIT macros to support mixed case comments with > upper case labels and opcodes. > Hmmm... I could imagine: Treat any token starting in Col. 1 as CASE UPPER. Treat the first token following a blank on a

Re: Reversed string macro

2020-10-24 Thread Tony Thigpen
Correct, I typed it wrong. "case upper ignore" is what I use. (It's been a long week) Tony Thigpen Paul Gilmartin wrote on 10/24/20 8:15 PM: On 2020-10-24, at 15:06:32, Tony Thigpen wrote: ... (I normally use "case mixed ignore" in XEDIT.) On 2020-10-24, at 16:05:59, Tony Thigpen

Re: Reversed string macro

2020-10-24 Thread Seymour J Metz
Gilmartin [0014e0e4a59b-dmarc-requ...@listserv.uga.edu] Sent: Saturday, October 24, 2020 8:15 PM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Reversed string macro On 2020-10-24, at 15:06:32, Tony Thigpen wrote: > > ... (I normally use "case mixed ignore" in XEDIT.) On 2

Re: Reversed string macro

2020-10-24 Thread Paul Gilmartin
On 2020-10-24, at 15:06:32, Tony Thigpen wrote: > > ... (I normally use "case mixed ignore" in XEDIT.) On 2020-10-24, at 16:05:59, Tony Thigpen wrote: > > It is a personal preference of mine to never edit an assembler source with > lower-case turned on. I just do not like mixed case

Re: Reversed string macro

2020-10-24 Thread Mike Hochee
Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On Behalf Of Mike Hochee Sent: Saturday, October 24, 2020 5:55 PM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Reversed string macro Warning! This is a fake (spoofed) message. DO NOT TRUST! You can also do it with two MVHHI instructions

Re: Reversed string macro

2020-10-24 Thread Tony Thigpen
sequential MVI's. Charles -Original Message- From: IBM Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On Behalf Of Tony Thigpen Sent: Saturday, October 24, 2020 2:07 PM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Reversed string macro I kinda like the concept, but a lot

Re: Reversed string macro

2020-10-24 Thread Tony Thigpen
Gil, It is a personal preference of mine to never edit an assembler source with lower-case turned on. I just do not like mixed case assembler source. While Xedit has a lot more flexibility, especially when it comes to locating something in the file, it always respects the SET CASE options

Re: Reversed string macro

2020-10-24 Thread Keven Hall
V.UGA.EDU] >> On Behalf Of Tony Thigpen >> Sent: Saturday, October 24, 2020 2:07 PM >> To: ASSEMBLER-LIST@LISTSERV.UGA.EDU >> Subject: Re: Reversed string macro >> I kinda like the concept, but a lot of literals we use are just 4 >> characters, so it does not scale down easily.

Re: Reversed string macro

2020-10-24 Thread Tony Thigpen
Thigpen Sent: Saturday, October 24, 2020 2:07 PM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Reversed string macro I kinda like the concept, but a lot of literals we use are just 4 characters, so it does not scale down easily.

Re: Reversed string macro

2020-10-24 Thread Mike Hochee
Subject: Re: Reversed string macro Caution! This message was sent from outside your organization. Why not? What's wrong with MVI/MVC for 3? Given that it would involve no storage references beyond the target and i-cache, I wonder if the fastest way to set four bytes, without the string appearing

Re: Reversed string macro

2020-10-24 Thread Charles Mills
Mainframe Assembler List [mailto:ASSEMBLER-LIST@LISTSERV.UGA.EDU] On Behalf Of Tony Thigpen Sent: Saturday, October 24, 2020 2:07 PM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Reversed string macro I kinda like the concept, but a lot of literals we use are just 4 characters, so it does

Re: Reversed string macro

2020-10-24 Thread Paul Gilmartin
On 2020-10-24, at 15:06:32, Tony Thigpen wrote: > > I kinda like the concept, but a lot of literals we use are just 4 characters, > so it does not scale down easily. > ??? "scale"? > One of the other thoughts mentioned was lower-case vs. upper-case. Maybe a > macro that accepts upper-case,

Re: Reversed string macro

2020-10-24 Thread Tony Thigpen
I kinda like the concept, but a lot of literals we use are just 4 characters, so it does not scale down easily. One of the other thoughts mentioned was lower-case vs. upper-case. Maybe a macro that accepts upper-case, but stores it as lower-case, then ORs it with x40 when moving it:

Re: Reversed string macro

2020-10-24 Thread Paul Gilmartin
On 2020-10-24, at 13:48:42, Charles Mills wrote: > > There's another macro exercise. Given MYBLKHDR,'EYECATCH' to generate MVI > MYBLKHDR,C'E'/MVC MYBLKHDR+1(L'MYBLKHDR-1),=C'YECATCH' > > An immediate instructions also "solves" my eyecatcher compare query, > lamenting the lack of "CLCIN." >

Re: Reversed string macro

2020-10-24 Thread Charles Mills
M To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Reversed string macro I do hope no-one is taking this thread too seriously. The use of MVCIN to set a data area eyecatcher is incredibly inefficient. If you really think that there it is important to ensure that data area eyecatchers aren't fou

Re: Reversed string macro

2020-10-24 Thread Jonathan Scott
I do hope no-one is taking this thread too seriously. The use of MVCIN to set a data area eyecatcher is incredibly inefficient. If you really think that there it is important to ensure that data area eyecatchers aren't found in the code which creates them, you can copy the convention used

Re: Reversed string macro

2020-10-24 Thread Tony Thigpen
- From: "Tony Thigpen" To: Sent: Saturday, October 24, 2020 1:55 AM Subject: Re: Reversed string macro Robin, The discussion (which I started) The "discussion" was started by Steve Smith (also confirmed from the below letter). is about using a macro to reverse data

Re: Reversed string macro

2020-10-23 Thread Robin Vowels
- Original Message - From: "Tony Thigpen" To: Sent: Saturday, October 24, 2020 1:55 AM Subject: Re: Reversed string macro Robin, The discussion (which I started) The "discussion" was started by Steve Smith (also confirmed from the below letter). is

Re: Reversed string macro

2020-10-23 Thread Charles Mills
-LIST@LISTSERV.UGA.EDU] On Behalf Of Paul Gilmartin Sent: Friday, October 23, 2020 4:24 PM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Reversed string macro On 2020-10-23, at 16:32:30, Charles Mills wrote: > > Can you code an address expression with a literal? Is MVCIN TARGET,='Foo'+2 (or 2

Re: Reversed string macro

2020-10-23 Thread Paul Gilmartin
On 2020-10-23, at 16:32:30, Charles Mills wrote: > > Can you code an address expression with a literal? Is MVCIN TARGET,='Foo'+2 > (or 2+='Foo', or some equivalent) valid? If so, you could embed your logic in > an executable SETEYE macro that would take SETEYE TARGET,'EYECATCH' and > generate

Re: Reversed string macro

2020-10-23 Thread Keith Moe
: Reversed string macro The purpose, as most know, is to generate the source for an MVCIN instruction, which was recently discussed (maybe on IBM-MAIN?). Turns out, I found a bug in it.  It drops characters when && or '' are in the string.  So replace "       SETA  " with " 

Re: Reversed string macro

2020-10-23 Thread Charles Mills
To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Reversed string macro The purpose, as most know, is to generate the source for an MVCIN instruction, which was recently discussed (maybe on IBM-MAIN?). Turns out, I found a bug in it. It drops characters when && or '' are in the string. So

Re: Reversed string macro

2020-10-23 Thread Tony Thigpen
: IBM Mainframe Assembler List [ASSEMBLER-LIST@LISTSERV.UGA.EDU] on behalf of robi...@dodo.com.au [robi...@dodo.com.au] Sent: Friday, October 23, 2020 12:57 AM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Reversed string macro Have you tried MVCIN ? Em qui, 22 de out de 2020 18:08, Steve Smith

Re: Reversed string macro

2020-10-23 Thread robin51
? From: IBM Mainframe Assembler List [ASSEMBLER-LIST@LISTSERV.UGA.EDU] on behalf of robi...@dodo.com.au [robi...@dodo.com.au] Sent: Friday, October 23, 2020 12:57 AM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Reversed string macro Have you tried MVCIN ? Em qui, 22 de

RES: Reversed string macro

2020-10-23 Thread João Reginato
ok if PoOps is the target -Mensagem original- De: IBM Mainframe Assembler List Em nome de Seymour J Metz Enviada em: sexta-feira, 23 de outubro de 2020 09:04 Para: ASSEMBLER-LIST@LISTSERV.UGA.EDU Assunto: Re: Reversed string macro No. From PoOps: "The second-operand address desig

Re: Reversed string macro

2020-10-23 Thread Steve Smith
t; -- > Shmuel (Seymour J.) Metz > http://mason.gmu.edu/~smetz3 > > > From: IBM Mainframe Assembler List [ASSEMBLER-LIST@LISTSERV.UGA.EDU] on > behalf of robi...@dodo.com.au [robi...@dodo.com.au] > Sent: Friday, October 23, 2020 12:57 AM > To: ASSEMBLER-LIST@LI

Re: Reversed string macro

2020-10-23 Thread Seymour J Metz
From: IBM Mainframe Assembler List [ASSEMBLER-LIST@LISTSERV.UGA.EDU] on behalf of robi...@dodo.com.au [robi...@dodo.com.au] Sent: Friday, October 23, 2020 12:57 AM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Reversed string macro Have you tried MVCIN ? > Em qui, 22 de out de 2

Re: Reversed string macro

2020-10-23 Thread Seymour J Metz
o Reginato [jb.regin...@gmail.com] Sent: Friday, October 23, 2020 12:34 AM To: ASSEMBLER-LIST@LISTSERV.UGA.EDU Subject: Re: Reversed string macro Better could be DCC'' Em qui, 22 de out de 2020 18:08, Steve Smith escreveu: > Submitted for your consideration... > >

Re: Reversed string macro

2020-10-22 Thread robin51
Have you tried MVCIN ? Em qui, 22 de out de 2020 18:08, Steve Smith escreveu: Submitted for your consideration... MACRO #REVSTR SETC DEQUOTE('') SETA DCLEN('') .* SETA .LOOPAIF ( LT 1).DONE SETC ''.''(,1) SETA AGO .LOOP .*

Re: Reversed string macro

2020-10-22 Thread João Reginato
Better could be DCC'' Em qui, 22 de out de 2020 18:08, Steve Smith escreveu: > Submitted for your consideration... > > MACRO >#REVSTR > SETC DEQUOTE('') >SETA DCLEN('') > .* >SETA > .LOOPAIF ( LT 1).DONE > SETC ''.''(,1) >SETA >

Re: Reversed string macro

2020-10-22 Thread zMan
TIL: In a proportional font, an assembler macro looks like modern poetry. On Thu, Oct 22, 2020 at 5:08 PM Steve Smith wrote: > Submitted for your consideration... > > MACRO >#REVSTR > SETC DEQUOTE('') >SETA DCLEN('') > .* >SETA > .LOOPAIF ( LT 1).DONE

Reversed string macro

2020-10-22 Thread Steve Smith
Submitted for your consideration... MACRO #REVSTR SETC DEQUOTE('') SETA DCLEN('') .* SETA .LOOPAIF ( LT 1).DONE SETC ''.''(,1) SETA AGO .LOOP .* .DONEANOP DCC'' EQU *-1, MEND E.G.: 3161 * 3162 #TAG