FIX: invalid ENHEX edge result

related to: metaeducation/rebol-issues#1986
Oldes · Jun 6, 2019 · 76c87a9 · 76c87a9
1 parent 1bc566f
commit 76c87a9
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/src/core/n-strings.c b/src/core/n-strings.c
@@ -676,7 +676,7 @@ static struct digest {
 			REBUNI c = up[0];
 			up++;
 
-			if (c > 0x80) {// all non-ASCII characters *must* be percent encoded
+			if (c >= 0x80) {// all non-ASCII characters *must* be percent encoded
 				encoded_size = Encode_UTF8_Char(encoded, c);
 				goto char_needs_encoding;
 			} else {

diff --git a/src/tests/units/series-test.r3 b/src/tests/units/series-test.r3
@@ -261,6 +261,7 @@ Rebol [
 	--assert "%22%25-.%3C%3E%5C%1F%60%7B%7C%7D~" = enhex {"%-.<>\^_`{|}~}
 	; --assert %%C5%A1ik  = enhex %šik ;<-- this does not work yet!
 	--assert "šik" = to-string dehex enhex to-binary "šik"
+	--assert "%C2%80" = enhex to-string #{80}
 
 
 ===end-group===