Go to the source code of this file.
 | 
| #define  | L1(t)   L2(t, 0) | 
|   | 
| #define  | L2(t1,  t2)   ((t1 << 16) | (t2)) | 
|   | 
| #define  | DECODE_L2(a,  t1,  t2)   t1 = (a) >> 16; t2 = (a) & ((1 << 16) - 1) | 
|   | 
| #define  | Add_Arg(ptr,  type,  val)   (*((type *) (ptr)) = (val) , (ptr)++) | 
|   | 
| #define  | Get_Arg(ptr,  type,  val)   ((val) = *((type *) (ptr)) , (ptr)++) | 
|   | 
 | 
| enum   | ArgTyp {  
  IDENTIFIER = 256, 
INTEGER, 
FLOAT, 
MEM, 
 
  X_REG, 
Y_REG, 
FL_ARRAY, 
FD_ARRAY, 
 
  STRING, 
ATOM = 256, 
INTEGER, 
FLOAT, 
 
  X_Y, 
F_N, 
MP_N, 
LABEL, 
 
  ANY, 
LIST_INST
 
 } | 
|   | 
      
        
          | #define Add_Arg | 
          ( | 
            | 
          ptr,  | 
        
        
           | 
           | 
            | 
          type,  | 
        
        
           | 
           | 
            | 
          val  | 
        
        
           | 
          ) | 
           |    (*((type *) (ptr)) = (val) , (ptr)++) | 
        
      
 
 
      
        
          | #define DECODE_L2 | 
          ( | 
            | 
          a,  | 
        
        
           | 
           | 
            | 
          t1,  | 
        
        
           | 
           | 
            | 
          t2  | 
        
        
           | 
          ) | 
           |    t1 = (a) >> 16; t2 = (a) & ((1 << 16) - 1) | 
        
      
 
 
      
        
          | #define Get_Arg | 
          ( | 
            | 
          ptr,  | 
        
        
           | 
           | 
            | 
          type,  | 
        
        
           | 
           | 
            | 
          val  | 
        
        
           | 
          ) | 
           |    ((val) = *((type *) (ptr)) , (ptr)++) | 
        
      
 
 
      
        
          | #define L2 | 
          ( | 
            | 
          t1,  | 
        
        
           | 
           | 
            | 
          t2  | 
        
        
           | 
          ) | 
           |    ((t1 << 16) | (t2)) | 
        
      
 
 
| Enumerator | 
|---|
| IDENTIFIER  | 
 | 
| INTEGER  | 
 | 
| FLOAT  | 
 | 
| MEM  | 
 | 
| X_REG  | 
 | 
| Y_REG  | 
 | 
| FL_ARRAY  | 
 | 
| FD_ARRAY  | 
 | 
| STRING  | 
 | 
| ATOM  | 
 | 
| INTEGER  | 
 | 
| FLOAT  | 
 | 
| X_Y  | 
 | 
| F_N  | 
 | 
| MP_N  | 
 | 
| LABEL  | 
 | 
| ANY  | 
 | 
| LIST_INST  | 
 | 
 
 
      
        
          | int Parse_Wam_File  | 
          ( | 
          char *  | 
          file_name_in,  | 
        
        
           | 
           | 
          int  | 
          comment  | 
        
        
           | 
          ) | 
           |  | 
        
      
 
 
      
        
          | void Syntax_Error  | 
          ( | 
          char *  | 
          s | ) | 
           |