Compile fixes

AlexeyAB

2018-02-08 cd8a3dcb4ca42f22ad8f46a95e00977c92be6bbd

 src/cuda.c

@@ -96,6 +96,7 @@
    int i = cuda_get_device();
    if(!init[i]) {
        cublasCreate(&handle[i]);
      cublasStatus_t status = cublasSetStream(handle[i], get_cuda_stream());
        init[i] = 1;
    }
    return handle[i];