From 000f4524ea299d0e730c0b71c9584bb6ea1f41fd Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?V=C3=ADtor=20Santos=20Costa=20II?= <vsc@dcc.fc.up.pt>
Date: Fri, 26 Mar 2010 16:16:05 +0000
Subject: [PATCH] fix bad bracket

---
 C/stdpreds.c | 16 ++++++++--------
 1 file changed, 8 insertions(+), 8 deletions(-)

diff --git a/C/stdpreds.c b/C/stdpreds.c
index e85c3010e..5366134a8 100755
--- a/C/stdpreds.c
+++ b/C/stdpreds.c
@@ -1242,14 +1242,14 @@ p_atom_chars(void)
 	  Yap_Error(TYPE_ERROR_CHARACTER,Head,"atom_chars/2");
 	  return(FALSE);		
 	}
-      }
-      t = TailOfTerm(t);
-      if (IsVarTerm(t)) {
-	Yap_Error(INSTANTIATION_ERROR,t,"atom_chars/2");
-	return(FALSE);
-      } else if (!IsPairTerm(t) && t != TermNil) {
-	Yap_Error(TYPE_ERROR_LIST, t, "atom_chars/2");
-	return(FALSE);
+	t = TailOfTerm(t);
+	if (IsVarTerm(t)) {
+	  Yap_Error(INSTANTIATION_ERROR,t,"atom_chars/2");
+	  return(FALSE);
+	} else if (!IsPairTerm(t) && t != TermNil) {
+	  Yap_Error(TYPE_ERROR_LIST, t, "atom_chars/2");
+	  return(FALSE);
+	}
       }
     }
     if (ws) {