vb frequency, pstruct frequency' = .;

hash-map:array_hash_table:p_string|pchar+int:static:new (frequency', .capacity = src_length), 
{ 
  frequency, frequency' = alloc (T_STRUCT, hash-map:array_hash_table:p_string|pchar+int, AC_WRITE)         
};