FIX: allow various variants of arrow-like words (fixed CC warning)

Author: Oldes

src/core/l-scan.c

@@ -825,9 +825,9 @@
 {
     REBCNT flags;
     const REBYTE *cp;
+	const REBYTE *np;
     REBINT type;
-	REBYTE *np = NULL;
-
+	
     flags = Prescan(scan_state);
     cp = scan_state->begin;