From 328abd3524d97517a75a336c01bb70c46942872e Mon Sep 17 00:00:00 2001
From: Toshiki Teramura <toshiki.teramura@gmail.com>
Date: Wed, 31 Aug 2022 15:46:49 +0900
Subject: [PATCH] Add `as_ptr` for primitive enums

---
 lax/src/lib.rs | 17 +++++++++++++++++
 1 file changed, 17 insertions(+)

diff --git a/lax/src/lib.rs b/lax/src/lib.rs
index 41c15237..c04efe60 100644
--- a/lax/src/lib.rs
+++ b/lax/src/lib.rs
@@ -141,6 +141,11 @@ impl UPLO {
             UPLO::Lower => UPLO::Upper,
         }
     }
+
+    /// To use Fortran LAPACK API in lapack-sys crate
+    pub fn as_ptr(&self) -> *const i8 {
+        self as *const UPLO as *const i8
+    }
 }
 
 #[derive(Debug, Clone, Copy)]
@@ -151,6 +156,13 @@ pub enum Transpose {
     Hermite = b'C',
 }
 
+impl Transpose {
+    /// To use Fortran LAPACK API in lapack-sys crate
+    pub fn as_ptr(&self) -> *const i8 {
+        self as *const Transpose as *const i8
+    }
+}
+
 #[derive(Debug, Clone, Copy)]
 #[repr(u8)]
 pub enum NormType {
@@ -167,6 +179,11 @@ impl NormType {
             NormType::Frobenius => NormType::Frobenius,
         }
     }
+
+    /// To use Fortran LAPACK API in lapack-sys crate
+    pub fn as_ptr(&self) -> *const i8 {
+        self as *const NormType as *const i8
+    }
 }
 
 /// Create a vector without initialization