struct s_vartbl {                               // structure of the variable table
char name[MAXVARLEN];                       // variable's name
   char type;                                  // its type (T_NUM, T_INT or T_STR)
   char level;                                 // its subroutine or function level (used to track local variables)
   unsigned char size;                         // the number of chars to allocate for each element in a string array
   char dummy;
   int __attribute__ ((aligned (4))) dims[MAXDIM];                     // the dimensions. it is an array if the first dimension is NOT zero
   union u_val{
       MMFLOAT f;                              // the value if it is a float
       long long int i;                        // the value if it is an integer
       MMFLOAT *fa;                            // pointer to the allocated memory if it is an array of floats
       long long int *ia;                      // pointer to the allocated memory if it is an array of integers
       char *s;                                // pointer to the allocated memory if it is a string
   }
}

Dim my_map$(map.new%(20))
map.init(my_map$())

map.put(my_map$(), "foo", "bar")
map.put(my_map$(), "wom", "bat")
map.put(my_map$(), "aaa", "bbb")

Print map.size%(my_map$())
Print map.get$(my_map$())
Print map.get$(my_map$())
Print map.get$(my_map$())