From c5795a191ded450987a30302c1d1fa4a265350ff Mon Sep 17 00:00:00 2001
From: Alberto Ruiz <aruiz@um.es>
Date: Wed, 27 May 2015 09:10:22 +0200
Subject: ccompare, cselect, toInt

---
 packages/base/src/C/lapack-aux.c | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'packages/base/src/C')

diff --git a/packages/base/src/C/lapack-aux.c b/packages/base/src/C/lapack-aux.c
index af515ca..77381cc 100644
--- a/packages/base/src/C/lapack-aux.c
+++ b/packages/base/src/C/lapack-aux.c
@@ -1619,6 +1619,13 @@ int chooseI(KIVEC(cond),KIVEC(lt),KIVEC(eq),KIVEC(gt),IVEC(r)) {
     CHOOSE_IMP
 }
 
+int chooseC(KIVEC(cond),KCVEC(lt),KCVEC(eq),KCVEC(gt),CVEC(r)) {
+    CHOOSE_IMP
+}
+
+int chooseQ(KIVEC(cond),KQVEC(lt),KQVEC(eq),KQVEC(gt),QVEC(r)) {
+    CHOOSE_IMP
+}
 
 //////////////////////// extract /////////////////////////////////
 
-- 
cgit v1.2.3