#NEWLINE# def Proc1( PtrParIn ) : #NEWLINE# #INDENT# NextRecord = PtrGlb . copy ( ) #NEWLINE# PtrParIn . PtrComp = NextRecord #NEWLINE# PtrParIn . IntComp = 5 #NEWLINE# NextRecord . IntComp = PtrParIn . IntComp #NEWLINE# NextRecord . PtrComp = PtrParIn . PtrComp #NEWLINE# NextRecord . PtrComp = Proc3 ( NextRecord . PtrComp ) #NEWLINE# if ( NextRecord . Discr == Ident1 ) : #NEWLINE# #INDENT# NextRecord . IntComp = 6 #NEWLINE# NextRecord . EnumComp = Proc6 ( PtrParIn . EnumComp ) #NEWLINE# NextRecord . PtrComp = PtrGlb . PtrComp #NEWLINE# NextRecord . IntComp = Proc7 ( NextRecord . IntComp , 10 ) #NEWLINE# #UNINDENT# else : #NEWLINE# #INDENT# PtrParIn = NextRecord . copy ( ) #NEWLINE# #UNINDENT# NextRecord . PtrComp = None #NEWLINE# return PtrParIn