From d023b44db3491e6670b60a8921bbaf6e01bc4347 Mon Sep 17 00:00:00 2001 From: IntelliJ User Date: Fri, 23 Aug 2019 16:10:56 +0300 Subject: [PATCH 1/2] close #8 --- src/X86.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/X86.ml b/src/X86.ml index b69c360c0..992f5f852 100644 --- a/src/X86.ml +++ b/src/X86.ml @@ -389,7 +389,7 @@ module M = Map.Make (String) (* Environment implementation *) class env = - let chars = "_abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNJPQRSTUVWXYZ" in + let chars = "_abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ" in let make_assoc l i = List.combine l (List.init (List.length l) (fun x -> x + i)) in let rec assoc x = function [] -> raise Not_found | l :: ls -> try List.assoc x l with Not_found -> assoc x ls in object (self) From e52241d2cef8bc3de8b42ba0e6da944a5190d7c3 Mon Sep 17 00:00:00 2001 From: IntelliJ User Date: Mon, 26 Aug 2019 15:51:12 +0300 Subject: [PATCH 2/2] one more fix to #8 --- runtime/runtime.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/runtime/runtime.c b/runtime/runtime.c index da35cd710..a9e51ad70 100644 --- a/runtime/runtime.c +++ b/runtime/runtime.c @@ -66,7 +66,7 @@ char* de_hash (int n) { static char *chars = (char*) BOX (NULL); static char buf[6] = {0,0,0,0,0,0}; char *p = (char *) BOX (NULL); - chars = "_abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNJPQRSTUVWXYZ"; + chars = "_abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ"; p = &buf[5]; #ifdef DEBUG_PRINT