1 
 2 /*  BEGIN INCLUDE FILE ...   cobol_in_token.incl.pl1                    */
 3 
 4 /*  Last modified August 22, 1974 by AEG                      */
 5 
 6 
 7 declare in_token_ptr ptr;
 8 
 9 declare 1 in_token aligned based(in_token_ptr),
10           2 n fixed bin aligned,
11           2 code fixed bin aligned,
12           2 token_ptr(0 refer(in_token.n)) ptr aligned;
13 
14 
15 /*  END INCLUDE FILE ...   cobol_in_token.incl.pl1                      */
16