Revert "Allow comparisons with stream terms"

This reverts commit 076a75d138.
2023-07-12 11:44:45 -06:00
parent 8c33da11ce
commit 44052cb373
2 changed files with 1 additions and 155 deletions
--- a/src/types.rs
+++ b/src/types.rs
@@ -616,18 +616,6 @@ impl HeapCellValue {
                        Some(TermOrderCategory::Compound)
                    }
                }
-		HeapCellValueTag::Cons => {
-		    let ptr = cell_as_untyped_arena_ptr!(self);
-		    match_untyped_arena_ptr!(ptr,
-			(ArenaHeaderTag::Stream, stream) => {
-			    match stream.options().get_alias() {
-                                Some(_) => Some(TermOrderCategory::Atom),
-				None => Some(TermOrderCategory::Compound)
-			    }
-			},
-			_ => None
-		    )
-		}
                _ => {
                    None
                }