From d8fc0ea8bfdda4ae347f7c0e561c5496793d10d1 Mon Sep 17 00:00:00 2001
From: Vitor Santos Costa <vsc@dcc.fc.up.pt>
Date: Wed, 5 May 2010 00:12:25 +0100
Subject: [PATCH] fix obj detection.

---
 pl/consult.yap | 5 +----
 1 file changed, 1 insertion(+), 4 deletions(-)

diff --git a/pl/consult.yap b/pl/consult.yap
index e62e9bbd7..37bebd812 100644
--- a/pl/consult.yap
+++ b/pl/consult.yap
@@ -861,10 +861,7 @@ absolute_file_name(File,Opts,TrueFileName) :-
 '$type_extension'(source,'.yap').
 '$type_extension'(source,'.pl').
 '$type_extension'(source,'').
-'$type_extension'(executable,'.so').
-'$type_extension'(executable,'.dylib').
-'$type_extension'(executable,'.dll').
-'$type_extension'(executable,'').
+'$type_extension'(executable,Suffix) :- '$obj_suffix'(String), atom_codes(Suffix, String).
 '$type_extension'(qlf,'.qlf').
 '$type_extension'(qlf,'').
 '$type_extension'(directory,'').