I would turn hex display on in your editor and see if somehow some non-display hex control characters got stuck in your code. Like you inadvertantly layed on the wrong keys. Duf
On Tue, Apr 10, 2012 at 1:10 PM, Steve Comstock <[email protected]>wrote: > I've been working along here, doing some Assembler / LE > experiments and all of a sudden I have the strangest > behavior, so I'm hoping someone here can catch the problem. > > First, here's a section of my source code: > > ----------------------- > > success1 ds 0h > lr 3,15 > call ceemout,(sucess,dest,fc),vl,**mf=(e,plist) > lr 15,3 > bassm 14,15 > > > test2 ds 0h > call ceemout,(spaces,dest,fc),vl,**mf=(e,plist) > xc fc,fc > > call ceemout,(fetchm2,dest,fc),vl,**mf=(e,plist) > ceefetch nameaddr=@dbin,feedback=fc,**search=hfs,mf=(e,realftch) > clc fc,zeros > je success2 > call ceemout,(failure,dest,fc),vl,**mf=(e,plist) > j test3 > > success2 ds 0h > lr 3,15 > call ceemout,(sucess,dest,fc),vl,**mf=(e,plist) > lr 15,3 > bassm 14,15 > > > test3 ds 0h > call ceemout,(spaces,dest,fc),vl,**mf=(e,plist) > xc fc,fc > > > * > * > * Leave the program > * > b exit > * > * > ------------------------ > > Now: here's that same section from the listing: > > 342 success1 ds 0h > 343 lr 3,15 > 344 call ceemout,(sucess,dest,fc),vl,**mf=(e,plist) > 346+ CNOP 0,4 > 347+ B *+8 BRANCH > 348+IHB0029B DC V(CEEMOUT) ENTRY > 353+ LA 1,PLIST LOAD P > 354+ LA 14,SUCESS PICKUP PARAMETER > 355+ LA 15,DEST PICKUP PARAMETER > 356+ LA 0,FC PICKUP PARAMETER > 357+ STM 14,0,0(1) STORE > 358+ OI 8(1),X'80' SET LAST WORD > 359+ L 15,IHB0029B LOAD 1 > 360+ BALR 14,15 BRANCH > 361 lr 15,3 > 362 bassm 14,15 > 365 test2 ds 0h > 367 xc fc,fc > 370 * > 371 * > 372 * Leave the program > 373 * > 374 b exit > 375 * > 376 * > > ----------------------- > > The lines of code after the 'xc fc,fc' are gone! Disappeared! > Vanished! and they pick up again after the 'Leave the program' > comment! > > > I'm truly baffled. Especially since just twenty minutes ago it > Assembled successfully! No change in JCL. No change in Assembler > parms. > > WHAT????? > > > -- > > Kind regards, > > -Steve Comstock > The Trainer's Friend, Inc. > > 303-355-2752 > http://www.trainersfriend.com > > * To get a good Return on your Investment, first make an investment! > + Training your people is an excellent investment > > * Try our tool for calculating your Return On Investment > for training dollars at > > http://www.trainersfriend.com/**ROI/roi.html<http://www.trainersfriend.com/ROI/roi.html> >
