add peek_char/{1,2}, peek_byte/{1,2}, peek_code/{1,2}

2020-05-06 01:05:03 -06:00
parent fe05082ddc
commit b8c50eb0fe
9 changed files with 527 additions and 11 deletions
--- a/src/prolog/machine/machine_indices.rs
+++ b/src/prolog/machine/machine_indices.rs
@@ -447,7 +447,7 @@ impl HeapCellValue {
                HeapCellValue::Stream(stream.clone())
            }
            &HeapCellValue::TcpListener(_) => {
-                HeapCellValue::Atom(clause_name!("$socket_server"), None)
+                HeapCellValue::Atom(clause_name!("$tcp_listener"), None)
            }
        }
    }