SWAPDIFF [ICL George 3]

This page is read only. You can view the source, but not change it. Ask your administrator if you think this is wrong.

{{htmlmetatags>metatag-description:(ICL George 3 and George 4 GIN macro: SWAPDIFF)}}
====== SWAPDIFF ======
(GIN Macro)

**Defined in:** [[george:source:LLSMACROS|LLSMACROS]]

**Used in:** 

<code - SWAPDIFF.mac.txt>
 963G ...#MAC  SWAPDIFF  
 963H ...[   
 963J ...[     RESRORE TIME MACRO TO SPECIFY MINIMUM DIFFERENCE IN CORE PRIORITY 
 963K ...[     CAUSING A PROGRAM TO BE SWAPPED OUT IMMEDIATELY   
 963L ...[     %A - NUMBER BETWEEN 1 & 63.DEFAULT IS 10  
 963M ...[   
 963N ...#SKI  KTAB>ISWAPDIFF-ISWAPDIFF  
 963P ...#MEN  CONSTANT  
 963Q ...#SKI  KTAB>ISWAPDIFF-ISWAPDIFF  
 963R ...#SKI
 963S ...#MEN  CHTABLE   
 963T ...#TRA  ISWAPDIFF 
 963W ...#STR  %A
 963X ...#SKI
 963Y ...               +10                 [DEFAULT IS 10 AS NO %A  
 963^ ...#STR  %A
 9642 ...(   
 9643 ...#SKI  %A*(%A<64$64) 
 9644 ...               +%A  
 9645 ...#SKI  %A*(%A<64$64) 
 9646 ...#SKI
 9647 ...! PARAMETER OUT OF RANGE
 9648 ...)   
 9649 ...#END
 964= ...#NOR
</code>