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
