vb frequency, pstruct frequency' = .;

hash-map:array_hash_table:pchar+int:static:new (frequency', .capacity = nlog2n (text)), 
{ 
  frequency, frequency' = alloc (&_, &__, T_STRUCT, hash-map:array_hash_table:pchar+int, AC_WRITE)         
};