Fix inconsistent line endings. Thanks Aleksej.
[pforth] / fth / floats.fth
index 9196575..02d1625 100644 (file)
@@ -406,10 +406,10 @@ false fp-require-e !   \ violate ANSI !!
                        c-addr c@ [char] E =\r
                        c-addr c@ [char] e =  OR\r
                        IF\r
                        c-addr c@ [char] E =\r
                        c-addr c@ [char] e =  OR\r
                        IF\r
-                               1 +-> c-addr   -1 +-> u'   \ skip E char
-                               u' 0>
+                               1 +-> c-addr   -1 +-> u'   \ skip E char\r
+                               u' 0>\r
                                IF\r
                                IF\r
-                               c-addr c@ [char] + = \ ignore + on exponent
+                               c-addr c@ [char] + = \ ignore + on exponent\r
                                IF\r
                         1 +-> c-addr   -1 +-> u'   \ skip char\r
                     THEN\r
                                IF\r
                         1 +-> c-addr   -1 +-> u'   \ skip char\r
                     THEN\r
@@ -418,9 +418,9 @@ false fp-require-e !   \ violate ANSI !!
                                    IF\r
                                           nshift + -> nshift\r
                                           true -> flag\r
                                    IF\r
                                           nshift + -> nshift\r
                                           true -> flag\r
-                                   THEN
-                               ELSE
-                                   true -> flag   \ allow "1E"
+                                   THEN\r
+                               ELSE\r
+                                   true -> flag   \ allow "1E"\r
                                THEN\r
                        THEN\r
                ELSE\r
                                THEN\r
                        THEN\r
                ELSE\r