X-Git-Url: https://git.gag.com/?a=blobdiff_plain;ds=sidebyside;f=coree.c;h=5d160e0fa5a3741c77581774a245f62a525a44a5;hb=58cdc9ad6f93110cc14e9ba88f3f72736e07b111;hp=8acd70811d667963a5f1b50b44bb2bdc30800e06;hpb=ef65b7aa8aa9801818dfe1de1f4a434719cc62e1;p=debian%2Fyforth

diff --git a/coree.c b/coree.c
index 8acd708..5d160e0 100644
--- a/coree.c
+++ b/coree.c
@@ -159,15 +159,16 @@ void _nip() {
 }
 
 void _parse() {
-	register Char delim = (Char) *sp;
+    register Char delim = (Char) *sp;
     register Char *orig = &_input_buffer[_to_in];
     register int i = 0;
     while (_to_in < _in_input_buffer && _input_buffer[_to_in] != delim) {
         _to_in++;
         i++;
     }
-	*sp = (Cell) orig;
+    *sp = (Cell)orig;
     *--sp = i;
+
     if (_to_in < _in_input_buffer) _to_in++;
 }