home *** CD-ROM | disk | FTP | other *** search
/ Source Code 1992 March / Source_Code_CD-ROM_Walnut_Creek_March_1992.iso / msdos / aijournl / ai_oct86.arc / AIAPP2.FIG < prev    next >
Encoding:
Text File  |  1986-07-16  |  384 b   |  15 lines
  1.  
  2.   node_type = (cons_node,func,variable,constant) ;
  3.   node_ptr = ^node ;
  4.   node = RECORD
  5.           CASE tag : node_type OF
  6.            cons_node : (tail_ptr : node_ptr ;
  7.                         head_ptr : node_ptr) ;
  8.            func,
  9.            constant,
  10.            variable  : (string_data : string80) ;
  11.           END ;
  12.  
  13.  
  14. Figure 2 - Record description for a node
  15.