Method code for $string.to_symbol()

[Turn off line numbering]

---

  1: arg str;
  2: 
  3: str = lowercase(strsed(str, "[^a-zA-Z0-9_]+", "", "g"));
  4: return (> tosym(str) <);

---

// Created 27-Mar-1995 as a part of ColdCore, see: @help Credit