From 5d84ce03ca576ddeb7f34376ddd4117c01328f26 Mon Sep 17 00:00:00 2001
From: Vitor Santos Costa <vsc@dcc.fc.up.pt>
Date: Wed, 8 Oct 2014 16:50:33 +0100
Subject: [PATCH] fix configuration to support 6.5.

---
 packages/cuda/configure.in | 7 ++++++-
 packages/cuda/cuda.yap     | 2 +-
 2 files changed, 7 insertions(+), 2 deletions(-)

diff --git a/packages/cuda/configure.in b/packages/cuda/configure.in
index 39ac15aac..c06fa8177 100644
--- a/packages/cuda/configure.in
+++ b/packages/cuda/configure.in
@@ -26,7 +26,12 @@ else
      *darwin*)
        CUDA_LDFLAGS="$LDFLAGS"
     CUDA_CPPFLAGS="-arch=sm_20  -Xcompiler -fPIC -O3 "
-    CUDA_SHLIB_LD="$NVCC  -Xcompiler -dynamiclib  -L../.. -lYap "
+    CUDA_SHLIB_LD="$NVCC  -L../.. -lYap "
+     ;;
+     *linux*)
+       CUDA_LDFLAGS="$LDFLAGS"
+    CUDA_CPPFLAGS="-arch=sm_20  -Xcompiler -fPIC -O3 "
+    CUDA_SHLIB_LD="$NVCC  -Xcompiler -shared  -L../.. -lYap "
      ;;
     **)
        CUDA_LDFLAGS="$LDFLAGS $LIBS"
diff --git a/packages/cuda/cuda.yap b/packages/cuda/cuda.yap
index c079dcf9b..08ee94214 100644
--- a/packages/cuda/cuda.yap
+++ b/packages/cuda/cuda.yap
@@ -40,7 +40,7 @@ count_answers(G, N) :-
 
 cuda_rule((Head :- Body) , IdRules) :-
 	body_to_list( Body, L, [], 1, N),
-	functor(Head, Na, Ar),
+	functor(Head, _Na, Ar),
 	load_rule( N, Ar, [Head|L], IdRules ).