count single character atoms as characters when generating first argument indices

2020-03-06 21:19:53 -07:00
parent 9852e30b39
commit 6ddfef6383
2 changed files with 10 additions and 1 deletions
--- a/src/prolog/machine/machine_state_impl.rs
+++ b/src/prolog/machine/machine_state_impl.rs
@@ -1806,7 +1806,7 @@ impl MachineState {
                let a1 = self.registers[1].clone();
                let addr = self.store(self.deref(a1));

-                let offset = match addr {
+                let offset = match addr {                    
                    Addr::Con(constant) => match hm.get(&constant) {
                        Some(offset) => *offset,
                        _ => 0,