Fixing everything for mandatory stack effects

[factor.git] / extra / smtp / smtp.factor

diff --git a/extra/smtp/smtp.factor b/extra/smtp/smtp.factor
index 8fdc0e07a4cf04cdf61a9a2429accc93c856276a..16a13eafe851dddebd4276a8bdc17511663efa71 100755 (executable)
--- a/extra/smtp/smtp.factor
+++ b/extra/smtp/smtp.factor
@@ -23,7 +23,7 @@ LOG: log-smtp-connection NOTICE ( addrspec -- )
         call
     ] with-client ; inline
 
-: crlf "\r\n" write ;
+: crlf ( -- ) "\r\n" write ;
 
 : command ( string -- ) write crlf flush ;