core, basis, extra: Remove DOS line endings from files.

[factor.git] / extra / lunar-rescue / lunar-rescue.factor

diff --git a/extra/lunar-rescue/lunar-rescue.factor b/extra/lunar-rescue/lunar-rescue.factor
index 9ec0f77ffd84705f21e5375b683feef768efe3fe..bd62e2a231ce99af64294e1957fb787c7a8d7725 100644 (file)
--- a/extra/lunar-rescue/lunar-rescue.factor
+++ b/extra/lunar-rescue/lunar-rescue.factor
@@ -1,28 +1,28 @@
-! Copyright (C) 2007 Chris Double.\r
-! See http://factorcode.org/license.txt for BSD license.\r
-!\r
-! Lunar Rescue: http://www.mameworld.net/maws/romset/lrescue\r
-!\r
-USING: kernel space-invaders ui ;\r
-IN: lunar-rescue\r
-\r
-TUPLE: lunar-rescue < space-invaders ;\r
-\r
-: <lunar-rescue> ( -- cpu )\r
-    lunar-rescue new cpu-init ;\r
-\r
-CONSTANT: rom-info {\r
-    { 0x0000 "lrescue/lrescue.1" }\r
-    { 0x0800 "lrescue/lrescue.2" }\r
-    { 0x1000 "lrescue/lrescue.3" }\r
-    { 0x1800 "lrescue/lrescue.4" }\r
-    { 0x4000 "lrescue/lrescue.5" }\r
-    { 0x4800 "lrescue/lrescue.6" }\r
-}\r
-\r
-: run-lunar ( -- )\r
-    [\r
-        "Lunar Rescue" <lunar-rescue> rom-info run-rom\r
-    ] with-ui ;\r
-\r
-MAIN: run-lunar\r
+! Copyright (C) 2007 Chris Double.
+! See http://factorcode.org/license.txt for BSD license.
+!
+! Lunar Rescue: http://www.mameworld.net/maws/romset/lrescue
+!
+USING: kernel space-invaders ui ;
+IN: lunar-rescue
+
+TUPLE: lunar-rescue < space-invaders ;
+
+: <lunar-rescue> ( -- cpu )
+    lunar-rescue new cpu-init ;
+
+CONSTANT: rom-info {
+    { 0x0000 "lrescue/lrescue.1" }
+    { 0x0800 "lrescue/lrescue.2" }
+    { 0x1000 "lrescue/lrescue.3" }
+    { 0x1800 "lrescue/lrescue.4" }
+    { 0x4000 "lrescue/lrescue.5" }
+    { 0x4800 "lrescue/lrescue.6" }
+}
+
+: run-lunar ( -- )
+    [
+        "Lunar Rescue" <lunar-rescue> rom-info run-rom
+    ] with-ui ;
+
+MAIN: run-lunar