start reduce, adds WindComp_get_body() function

README.md

@@ -75,6 +75,41 @@ wind> exit
 ```
 At any time in the repl, typing `exit`, will close the program.
 
+#### `-c`:
+
+The `-c` flag allows you to run a string of `Wind` code, like this
+
+```
+$ Wind -c "push 5 -> out -> clr"
+[ ]
+```
+
+#### `-d`:
+
+The `-d` flag allows you to run a string of `Wind` code and also get debug information
+
+```
+$ Wind -d "push 5 6 77 44 -> out -> filter > 10 -> out -> filter < 76 -> out"
+[ 5 6 77 44 ]
+[ 77 44 ]
+[ 44 ]
+_____Wind___Debug_______
+..........State.........
+Has Error: false
+Mode: Command
+Command: null
+..........Data.........
+Load Buffer: -> [ ]
+Active Buffer: -> [ 44 ]
+Inactive Buffer: -> [ 77 44 ]
+________________________
+```
+
+#### `-t`:
+
+The `-t` flag allows for a string of `Wind` code to be run and timed.
+
+
 ## Stage
 
 `Wind` is currently in the alpha development stage, the first release version is still in progress.

include/WindComp.h

@@ -31,6 +31,8 @@ void WindComp_set_len(unsigned length);
 
 // Returns head byte marker of comp buffer.
 unsigned char WindComp_get_head(void);
+// Returns the body portion of the comp buffer.
+unsigned char* WindComp_get_body(void);
 
 void WindComp_clear(void);
 // Writes amount of length bytes from item

include/WindType.h

@@ -29,7 +29,8 @@ typedef enum
         WindCommand_push,
         WindCommand_clr,
         WindCommand_map,
-        WindCommand_filter
+        WindCommand_filter,
+        WindCommand_reduce
 } WindCommand;
 
 const char* WindType_get_str(WindType type);

src/code/WindRun.c

@@ -22,6 +22,9 @@ int WindRun_exec(const char** code)
         case WindCommand_filter:
                 WindExec_filter();
                 break;
+        case WindCommand_reduce:
+                // handle reduce
+                break;
         }
         WindData_load_reset(); // Resets load buf.
         WindState_set_cmd(WindCommand_null);
@@ -318,6 +321,20 @@ int WindRun_command(const char** code)
                         }
                         break;
 
+                case 'r':
+                        // Due to only one command that starts with f, this does not use static trie
+                        if((*code)[1] == 'e' && (*code)[2] == 'd' && (*code)[3] == 'u' && (*code)[4] == 'c' && (*code)[5] == 'e')
+                        {
+                                *code += 6;
+                                WindState_set_cmd(WindCommand_reduce);
+                                goto TRANS_TO_LOAD;
+                        }
+                        else
+                        {
+                                WindState_write_err("Expected command symbol, found 'r%c%c%c'", *code[1], *code[2], *code[3]);
+                                return 0;
+                        }
+                        break;
                 case '\0':
                         goto TRANS_TO_LOAD;
                 default:

src/flow/WindComp.c

@@ -34,6 +34,11 @@ unsigned char WindComp_get_head(void)
         return WindComp_BUF[0];
 }
 
+unsigned char* WindComp_get_body(void)
+{
+        return WindComp_BODY;
+}
+
 void WindComp_clear(void)
 {
         WindComp_ITEM_LEN = 0;

src/flow/WindState.c

@@ -96,5 +96,8 @@ void WindState_print_cmd(void)
         case WindCommand_filter:
                 printf("filter");
                 break;
+        case WindCommand_reduce:
+                printf("reduce");
+                break;
         }
 }