Binyamin I am using the code you showed me way back When However your sample has 3 nops Main has one
My code was executed from a clist invoked at breakpoint I.E not the main clist Mike seemed to indicate that a breakpoint in workarea wouldn’t work Regardless the idea at the dummy breakpoint was to restore the programs R14 and invoke that breakpoint again without any subcommands so that go will go to the next breakpoint than type go Thanks > On Oct 14, 2024, at 12:38 PM, Binyamin Dissen > <[email protected]> wrote: > > getmain 32 > > STORAGE AT 2A9F40 > TEST > 2a9f40.=x'070007000700' > TEST > l 2a9f40. > > 002A9F40. 07000700 > TEST > at 2a9f42. > > TEST > go 2a9f40. > > AT 2A9F42. > TEST > > > On Mon, 14 Oct 2024 10:05:55 -0400 Mike Shaw <[email protected]> wrote: > > :>Joe, > :> > :>TEST knows where it set breakpoints. > :> > :> AFAIK you can't fake it out by moving code and branching to an area that > :>is not within any program extent and trying to breakpoint there. > :> > :>Mike Shaw > :>MVS/QuickRef Support > :>Chicago-Soft, Ltd. > :> > :> > :>On Sun, Oct 13, 2024, 9:43?PM Joseph Reichman < > :>[email protected]> wrote: > :> > :>> Hi > :>> > :>> I am having all sorts of problems with the TEST Call subcommand > :>> specifically restoring the USER program R14 value > :>> > :>> The Documentation says the return value whether you use RESUME "which > :>> specifies upon completion of execution, the called program returns control > :>> to the address of the last breakpoint before the CALL". > :>> > :>> In this case r14 points to address of where the breakpoint is > :>> > :>> Or you can explicitly set where you want to return by coding RETURN and > :>> having R14 point to where you want to return > :>> > :>> The problem is in either case one has to set the USER programs R14 back > :>> > :>> What I wanted to do is return to the breakpoint which had the call only > :>> this > :>> time without calling the user program > :>> > :>> Now it seems to me the only way to get this done is by > :>> > :>> > :>> First Save the address of where the breakpoint is upon entry > :>> > :>> Then have R14 point to a DUMMY breakpoint by that I mean you have a > :>> workarea > :>> obtained with TEST subcommand GETMAIN (passed as a parm) to the user prog > :>> have some area 2 bytes with a nop > :>> > :>> X'0700' and in the called program branch back to it so for example > :>> > :>> use the following TEST subcommand > :>> Assume the original R14 was saved in workarea+4 > :>> > :>> AT WORKAREA+30 (COPY WORKAREA+4 R14 LENGTH(4); AT WORKAREA+40? ; GO > :>> WORKAREA+40?) > :>> > :>> > :>> > :>> This code would > :>> > :>> First seem to go to dummy breakpoint > :>> Second retore the user program value of R14 Third set a breakpoint at the > :>> original breakpoint (without a call) Fourth go to the breakpoint > :>> > :>> However I keep on getting a S0C4 > :>> > :>> > :>> The following is snippets of the user program > :>> > :>> > :>> USERPROG CSECT > :>> USING R3,USERPROG > :>> LR R3,R15 > :>> ST R14,RETURN > :>> > :>> MVC DUMMYBREAK,=X'0700' > :>> > :>> LA R14,DUMMYBREAK > :>> BR R14 > :>> > :>> > :>> > :>> > :>> WORKAREA DSECT > :>> > :>> > :>> 0030 DUMMYBREAK DS XL2 > :>> 0040 RETRUN DS A > :>> > :>> ---------------------------------------------------------------------- > :>> > :>> > :>> ---------------------------------------------------------------------- > :>> For IBM-MAIN subscribe / signoff / archive access instructions, > :>> send email to [email protected] with the message: INFO IBM-MAIN > :>> > :> > :>---------------------------------------------------------------------- > :>For IBM-MAIN subscribe / signoff / archive access instructions, > :>send email to [email protected] with the message: INFO IBM-MAIN > > -- > Binyamin Dissen <[email protected]> > http://www.dissensoftware.com > > Director, Dissen Software, Bar & Grill - Israel > > ---------------------------------------------------------------------- > For IBM-MAIN subscribe / signoff / archive access instructions, > send email to [email protected] with the message: INFO IBM-MAIN ---------------------------------------------------------------------- For IBM-MAIN subscribe / signoff / archive access instructions, send email to [email protected] with the message: INFO IBM-MAIN
