diff --git a/mute-interpreter/src/env/standard.rs b/mute-interpreter/src/env/standard.rs index eb833cd..a6a9757 100644 --- a/mute-interpreter/src/env/standard.rs +++ b/mute-interpreter/src/env/standard.rs @@ -19,6 +19,13 @@ pub(super) fn standard() -> HashMap { (macro* (name args body) ~(define (,name (fn* ,args ,body))) ) }, ), + ( + "swap", + inline! { + (macro* (a b) ~(define (,a ,b) (,b ,a))) + }, + ), + // Quoting ( "quote", inline! {