use "of" in place of "swap at".

extra/gml/types/types.factor

@@ -26,7 +26,7 @@ INSTANCE: proc sequence
 GENERIC# (gml-get) 1 ( collection key -- elt )
 
 M: sequence (gml-get) swap wrap nth ;
-M: hashtable (gml-get) swap at ;
+M: hashtable (gml-get) of ;
 
 GENERIC# (gml-put) 2 ( collection key elt -- )
 

extra/yaml/yaml.factor

@@ -199,7 +199,7 @@ M: byte-array (deref-aliases) nip ;
 
 M: string (deref-aliases) nip ;
 
-M: yaml-alias (deref-aliases) anchor>> swap at ;
+M: yaml-alias (deref-aliases) anchor>> of ;
 
 M: sequence (deref-aliases)
     [ (deref-aliases) ] with map! ;

unmaintained/peg-lexer/peg-lexer.factor

@@ -16,7 +16,7 @@ CONSULT: assoc-protocol lex-hash hash>> ;
     ] ;
       
 : store-pos ( v a -- )
-    input swap at prepare-pos
+    input of prepare-pos
     lexer get [ (>>line) ] keep (>>column) ;
 
 M: lex-hash set-at
@@ -53,7 +53,7 @@ M: lex-hash at*
     
 SYNTAX: ON-BNF:
     scan-new-word reset-tokenizer ";ON-BNF" parse-multiline-string parse-ebnf
-    main swap at create-bnf ;
+    main of create-bnf ;
 
 ! Tokenizer like standard factor lexer
 EBNF: factor