Move EMIT to low core

This allows us to remove one layer of indirection in (wnf). This is
possible now that EMIT is a switch word.

blk/381 → blk/356

@@ -7,3 +7,4 @@ SYSVARS 0x0a + :** NL
 XCURRENT @ _xapply ORG @ 0x06 ( stable ABI uflw ) + !
 : (oflw) LIT" stack overflow" ERR ;
 XCURRENT @ _xapply ORG @ 0x13 ( stable ABI oflw ) + !
+: (wnf) (print) LIT"  word not found" ERR ;

blk/363

@@ -1,5 +1,3 @@
-: (wnf) LIT" (print)" FIND DROP EXECUTE
-    LIT"  word not found" ERR ;
 : (parse)           ( a -- n )
     _pc IF EXIT THEN
     _ph IF EXIT THEN

blk/364

@@ -5,3 +5,7 @@ SYSVARS 0x0c + :** C<*
     ?DUP NOT IF C<* ELSE EXECUTE THEN ;
 : , H@ ! H@ 2+ HERE ! ;
 : C, H@ C! H@ 1+ HERE ! ;
+: ,"
+    BEGIN
+        C< DUP 34 ( ASCII " ) = IF DROP EXIT THEN C,
+    AGAIN ;

blk/382

@@ -1,4 +0,0 @@
-: ,"
-    BEGIN
-        C< DUP 34 ( ASCII " ) = IF DROP EXIT THEN C,
-    AGAIN ;