Alternative if you don't have wmctrl installed (not default in Ubuntu for example):

  ;; Fullscreen
  (defun switch-full-screen ()
    (interactive)
    (x-send-client-message nil 0 nil "_NET_WM_STATE" 32
                           '(2 "_NET_WM_STATE_FULLSCREEN" 0)))