rishi/scryer-prolog
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fix $VAR-names (#275) and properly print single control chars (#280)

Browse Source
This commit is contained in:
Mark Thom
2020-03-13 02:48:31 -06:00
parent 698b01f85a
commit d3eb31e4c3
1 changed files with 4 additions and 2 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
src/prolog/heap_print.rs
View File

@@ -277,7 +277,7 @@ fn numbervar(n: Integer) -> Var {
let i = n.mod_u(26) as usize; let i = n.mod_u(26) as usize;
let j = n.div_rem_floor(Integer::from(26)); let j = n.div_rem_floor(Integer::from(26));
let j = <(Integer, Integer)>::from(j).1; let j = <(Integer, Integer)>::from(j).0;
if j == 0 { if j == 0 {
CHAR_CODES[i].to_string() CHAR_CODES[i].to_string()
@@ -843,7 +843,9 @@ impl<'a, Outputter: HCValueOutputter> HCPrinter<'a, Outputter> {
Constant::Char(c) => { Constant::Char(c) => {
let mut result = String::new(); let mut result = String::new();
if self.quoted { if c.is_control() {
result = c.to_string();
} else if self.quoted {
result.push('\''); result.push('\'');
result += &char_to_string(c); result += &char_to_string(c);
result.push('\''); result.push('\'');