diff --git a/e.red b/e.red
index 343e4ec..06a72bf 100644
--- a/e.red
+++ b/e.red
@@ -1,4 +1 @@
-Red []
-while [1][
-    print "E"
-]
+Red [] forever [prin "e"]