diff --git a/frontends/sdl2/frame.lisp b/frontends/sdl2/frame.lisp
new file mode 100644
index 000000000..4a0ccfca3
--- /dev/null
+++ b/frontends/sdl2/frame.lisp
@@ -0,0 +1,16 @@
+(defpackage :lem-sdl2/frame
+  (:use :cl :lem)
+  (:export :maximize-frame
+           :minimize-frame))
+(in-package :lem-sdl2/frame)
+
+(define-command maximize-frame () ()
+  "Maximize the frame."
+  (sdl2:in-main-thread ()
+    (sdl2:maximize-window (lem-sdl2/display::display-window (lem-sdl2/display:current-display)))))
+
+(define-command minimize-frame () ()
+  "Minimize the frame."
+  (sdl2:in-main-thread ()
+    (sdl2:minimize-window (lem-sdl2/display::display-window (lem-sdl2/display:current-display)))))
+  
\ No newline at end of file
diff --git a/frontends/sdl2/lem-sdl2.asd b/frontends/sdl2/lem-sdl2.asd
index 16ddad3e9..ba0264683 100644
--- a/frontends/sdl2/lem-sdl2.asd
+++ b/frontends/sdl2/lem-sdl2.asd
@@ -20,6 +20,7 @@
                (:file "utils")
                (:file "display")
                (:file "view")
+               (:file "frame")
                (:file "main")
                (:file "drawing")
                (:file "graphics")