From b099760269ecf7920eed99919ff6bdbd341ecf95 Mon Sep 17 00:00:00 2001
From: Tim Chevalier <chevalier@alum.wellesley.edu>
Date: Thu, 25 Aug 2011 22:26:45 -0700
Subject: [PATCH] Remove remaining use of 'pred' and make 'pred' a non-reserved
 word. Huzzah\!

---
 src/comp/syntax/parse/parser.rs | 6 ------
 src/lib/str.rs                  | 4 ++--
 2 files changed, 2 insertions(+), 8 deletions(-)

diff --git a/src/comp/syntax/parse/parser.rs b/src/comp/syntax/parse/parser.rs
index 10b1b01b44f6..8ee2645fe5da 100644
--- a/src/comp/syntax/parse/parser.rs
+++ b/src/comp/syntax/parse/parser.rs
@@ -173,7 +173,6 @@ fn bad_expr_word_table() -> hashmap<str, ()> {
     words.insert("fn", ());
     words.insert("block", ());
     words.insert("lambda", ());
-    words.insert("pred", ()); // FIXME: remove
     words.insert("pure", ());
     words.insert("iter", ());
     words.insert("block", ());
@@ -2135,11 +2134,6 @@ fn parse_item(p: &parser, attrs: &[ast::attribute]) -> option::t<@ast::item> {
         expect_word(p, "fn");
         ret some(parse_item_fn_or_iter(p, ast::pure_fn, ast::proto_fn, attrs,
                                        ast::il_normal));
-    }
-    // FIXME: remove
-    else if eat_word(p, "pred") {
-        ret some(parse_item_fn_or_iter(p, ast::pure_fn, ast::proto_fn, attrs,
-                                       ast::il_normal));
     } else if eat_word(p, "iter") {
         ret some(parse_item_fn_or_iter(p, ast::impure_fn, ast::proto_iter,
                                        attrs, ast::il_normal));
diff --git a/src/lib/str.rs b/src/lib/str.rs
index 98e59f70b4f2..eff9e9bfd28e 100644
--- a/src/lib/str.rs
+++ b/src/lib/str.rs
@@ -156,10 +156,10 @@ fn is_ascii(s: str) -> bool {
 fn alloc(n_bytes: uint) -> str { ret rustrt::str_alloc(n_bytes); }
 
 /// Returns true if the string has length 0
-pred is_empty(s: str) -> bool { for c: u8 in s { ret false; } ret true; }
+pure fn is_empty(s: str) -> bool { for c: u8 in s { ret false; } ret true; }
 
 /// Returns true if the string has length greater than 0
-pred is_not_empty(s: str) -> bool { !is_empty(s) }
+pure fn is_not_empty(s: str) -> bool { !is_empty(s) }
 
 fn is_whitespace(s: str) -> bool {
     let i = 0u;