diff options
Diffstat (limited to 'src/main/stanza/passes.stanza')
| -rw-r--r-- | src/main/stanza/passes.stanza | 10 |
1 files changed, 4 insertions, 6 deletions
diff --git a/src/main/stanza/passes.stanza b/src/main/stanza/passes.stanza index c4d6a58f..c03e2194 100644 --- a/src/main/stanza/passes.stanza +++ b/src/main/stanza/passes.stanza @@ -285,23 +285,21 @@ defmethod map (f: Type -> Type, e: WIndex) : ; Returns a new Circuit where all names have all special characters ; removed, except _. -public defstruct RemoveSpecialChars <: Pass -public defmethod pass (b:RemoveSpecialChars) -> (Circuit -> Circuit) : - remove-special-chars +public defstruct RemoveSpecialChars <: Pass +public defmethod pass (b:RemoveSpecialChars) -> (Circuit -> Circuit) : remove-special-chars public defmethod name (b:RemoveSpecialChars) -> String : "Remove Special Characters" public defmethod short-name (b:RemoveSpecialChars) -> String : "rem-spec-chars" -public defmulti ;------------ Helper Functions ------------- defn get-new-string (n:Char) -> String : switch {n == _} : - '_' : "__" + ;'_' : "__" '~' : "_A" '!' : "_B" '@' : "_C" '#' : "_D" - '$' : "_E" + ;'$' : "_E" '%' : "_F" '^' : "_G" '*' : "_H" |