(defun
    (expand-mlisp-word
	(insert-string (get-tty-command ": expand-mlisp-word "))
	(novalue))

    (expand-mlisp-variable
	(insert-string (get-tty-variable ": expand-mlisp-variable "))
	(novalue))
)