From f19db29647b1efa85df9e0615305350704ff1cbe Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?V=C3=ADtor=20Santos=20Costa?= <vitor@ubuntu.(none)>
Date: Wed, 17 Dec 2008 14:46:39 +0000
Subject: [PATCH] support split on blank spaces (tab and spaces).

---
 library/lineutils.yap | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/library/lineutils.yap b/library/lineutils.yap
index cb4f64f82..c31ca2c49 100644
--- a/library/lineutils.yap
+++ b/library/lineutils.yap
@@ -3,6 +3,7 @@
 	   search_for/3,
 	   scan_natural/3,
 	   scan_integer/3,
+	   split/2,
 	   split/3,
 	   glue/3,
 	   copy_line/2,
@@ -44,6 +45,9 @@ scan_natural(N0,N) -->
 	get_natural(N1,N).
 scan_natural(N,N) --> [].
 
+split(String, Strings) :-
+	split_at_blank(" 	", Strings, String, []).
+
 split(String, SplitCodes, Strings) :-
 	split_at_blank(SplitCodes, Strings, String, []).