apl: ⎕ quad-names end-to-end (+8 tests, 408/408)

Parser: apl-quad-fn-names list; is-fn-tok? + :name clause
in collect-segments-loop now route ⎕FMT through fn pipeline.

Eval-ast: :name branch dispatches ⎕IO/⎕ML/⎕FR/⎕TS to apl-quad-*
niladics; apl-monadic-fn handles ⎕FMT.

⎕← (print) deferred — tokenizer splits ⎕← into name + :assign.

lib/apl/transpile.sx

@@ -39,6 +39,7 @@
       ((= g "⊖") apl-reverse-first)
       ((= g "⍋") apl-grade-up)
       ((= g "⍒") apl-grade-down)
+      ((= g "⎕FMT") apl-quad-fmt)
       (else (error "no monadic fn for glyph")))))
 
 (define
@@ -110,6 +111,10 @@
             (cond
               ((= nm "⍺") (get env "alpha"))
               ((= nm "⍵") (get env "omega"))
+              ((= nm "⎕IO") (apl-quad-io))
+              ((= nm "⎕ML") (apl-quad-ml))
+              ((= nm "⎕FR") (apl-quad-fr))
+              ((= nm "⎕TS") (apl-quad-ts))
               (else (get env nm)))))
         ((= tag :monad)
           (let