8000 remove sec attributes · DiffSharp/DiffSharp@ceae8ff · GitHub
[go: up one dir, main page]
Skip to content

Commit ceae8ff

Browse files
dsymedsyme
committed
remove sec attributes
1 parent 0a4ff27 commit ceae8ff

File tree

1 file changed

+2
-30
lines changed
< 8000 /div>

1 file changed

+2
-30
lines changed

‎src/DiffSharp/Backend.OpenBLAS.fs

Lines changed: 2 additions & 30 deletions
Original file line numberDiff line numberDiff line change
@@ -65,39 +65,30 @@ module OpenBLAS =
6565
member this.Dispose() = h.Free()
6666

6767
module BLAS =
68-
[<SuppressUnmanagedCodeSecurity>]
6968
[<DllImport("libopenblas", EntryPoint="isamax_")>]
7069
extern int isamax_(int *n, float32 *x, int *incx);
7170

72-
[<SuppressUnmanagedCodeSecurity>]
7371
[<DllImport("libopenblas", EntryPoint="saxpy_")>]
7472
extern void saxpy_(int *n, float32 *a, float32 *x, int *incx, float32 *y, int *incy);
7573

76-
[<SuppressUnmanagedCodeSecurity>]
7774
[<DllImport("libopenblas", EntryPoint="sscal_")>]
7875
extern void sscal_(int *n, float32 *alpha, float32 *x, int *incx)
7976

80-
[<SuppressUnmanagedCodeSecurity>]
8177
[<DllImport("libopenblas", EntryPoint="sdot_")>]
8278
extern float32 sdot_(int *n, float32 *x, int *incx, float32 *y, int *incy);
8379

84-
[<SuppressUnmanagedCodeSecurity>]
8580
[<DllImport("libopenblas", EntryPoint="sger_")>]
8681
extern void sger_(int *m, int *n, float32 *alpha, float32 *x, int *incx, float32 *y, int *incy, float32 *a, int *lda)
8782

88-
[<SuppressUnmanagedCodeSecurity>]
8983
[<DllImport("libopenblas", EntryPoint="sasum_")>]
9084
extern float32 sasum_(int *n, float32 *x, int *incx)
9185

92-
[<SuppressUnmanagedCodeSecurity>]
9386
[<DllImport("libopenblas", EntryPoint="snrm2_")>]
9487
extern float32 snrm2_(int *n, float32 *x, int *incx)
9588

96-
[<SuppressUnmanagedCodeSecurity>]
9789
[<DllImport("libopenblas", EntryPoint="sgemm_")>]
9890
extern void sgemm_(char *transa, char *transb, int *m, int *n, int *k, float32 *alpha, float32 *a, int *lda, float32 *b, int *ldb, float32 *beta, float32 *c, int *ldc);
9991

100-
[<SuppressUnmanagedCodeSecurity>]
10192
[<DllImport("libopenblas", EntryPoint="sgemv_")>]
10293
extern void sgemv_(char *trans, int *m, int *n, float32 *alpha, float32 *a, int *lda, float32 *x, int *incx, float32 *beta, float32 *y, int *incy)
10394

@@ -228,39 +219,30 @@ module OpenBLAS =
228219
use arg_y = new PinnedArray<float32>(y)
229220
sgemv_(&&arg_trans, &&arg_m, &&arg_n, &&arg_alpha, arg_a.Ptr, &&arg_lda, arg_x.Ptr, &&arg_incx, &&arg_beta, arg_y.Ptr, &&arg_incy)
230221

231-
[<SuppressUnmanagedCodeSecurity>]
232222
[<DllImport("libopenblas", EntryPoint="idamax_")>]
233223
extern int idamax_(int *n, float *x, int *incx);
234224

235-
[<SuppressUnmanagedCodeSecurity>]
236225
[<DllImport("libopenblas", EntryPoint="daxpy_")>]
237226
extern void daxpy_(int *n, float *a, float *x, int *incx, float *y, int *incy);
238227

239-
[<SuppressUnmanagedCodeSecurity>]
240228
[<DllImport("libopenblas", EntryPoint="dscal_")>]
241229
extern void dscal_(int *n, float *alpha, float *x, int *incx)
242230

243-
[<SuppressUnmanagedCodeSecurity>]
244231
[<DllImport("libopenblas", EntryPoint="ddot_")>]
245232
extern float ddot_(int *n, float *x, int *incx, float *y, int *incy);
246233

247-
[<SuppressUnmanagedCodeSecurity>]
248234
[<DllImport("libopenblas", EntryPoint="dger_")>]
249235
extern void dger_(int *m, int *n, float *alpha, float *x, int *incx, float *y, int *incy, float *a, int *lda)
250236

251-
[<SuppressUnmanagedCodeSecurity>]
252237
[<DllImport("libopenblas", EntryPoint="dasum_")>]
253238
extern float dasum_(int *n, float *x, int *incx)
254239

255-
[<SuppressUnmanagedCodeSecurity>]
256240
[<DllImport("libopenblas", EntryPoint="dnrm2_")>]
257241
extern float dnrm2_(int *n, float *x, int *incx)
258242

259-
[<SuppressUnmanagedCodeSecurity>]
260243
[<DllImport("libopenblas", EntryPoint="dgemm_")>]
261244
extern void dgemm_(char *transa, char *transb, int *m, int *n, int *k, float *alpha, float *a, int *lda, float *b, int *ldb, float *beta, float *c, int *ldc);
262245

263-
[<SuppressUnmanagedCodeSecurity>]
264246
[<DllImport("libopenblas", EntryPoint="dgemv_")>]
265247
extern void dgemv_(char *trans, int *m, int *n, float *alpha, float *a, int *lda, float *x, int *incx, float *beta, float *y, int *incy)
266248

@@ -392,11 +374,10 @@ module OpenBLAS =
392374
dgemv_(&&arg_trans, &&arg_m, &&arg_n, &&arg_alpha, arg_a.Ptr, &&arg_lda, arg_x.Ptr, &&arg_incx, &&arg_beta, arg_y.Ptr, &&arg_incy)
393375

394376
module BLASExtensions =
395-
[<SuppressUnmanagedCodeSecurity>]
377+
396378
[<DllImport("libopenblas", EntryPoint="cblas_simatcopy")>]
397379
extern void cblas_simatcopy(int ordering, int trans, int rows, int cols, float32 alpha, float32 *a, int lda, int ldb)
398380

399-
[<SuppressUnmanagedCodeSecurity>]
400381
[<DllImport("libopenblas", EntryPoint="cblas_somatcopy")>]
401382
extern void cblas_somatcopy(int ordering, int trans, int rows, int cols, float32 alpha, float32 *a, int lda, float32 *b, int ldb)
402383

@@ -430,11 +411,9 @@ module OpenBLAS =
430411
let arg_ldb = m
431412
cblas_somatcopy(arg_ordering, arg_trans, arg_rows, arg_cols, arg_alpha, arg_a.Ptr, arg_lda, arg_b.Ptr, arg_ldb)
432413

433-
[<SuppressUnmanagedCodeSecurity>]
434414
[<DllImport("libopenblas", EntryPoint="cblas_dimatcopy")>]
435415
extern void cblas_dimatcopy(int ordering, int trans, int rows, int cols, float alpha, float *a, int lda, int ldb)
436416

437-
[<SuppressUnmanagedCodeSecurity>]
438417
[<DllImport("libopenblas", EntryPoint="cblas_domatcopy")>]
439418
extern void cblas_domatcopy(int ordering, int trans, int rows, int cols, float alpha, float *a, int lda, float *b, int ldb)
440419

@@ -469,19 +448,16 @@ module OpenBLAS =
469448
cblas_domatcopy(arg_ordering, arg_trans, arg_rows, arg_cols, arg_alpha, arg_a.Ptr, arg_lda, arg_b.Ptr, arg_ldb)
470449

471450
module LAPACK =
472-
[<SuppressUnmanagedCodeSecurity>]
451+
473452
[<DllImport("libopenblas", EntryPoint="sgesv_")>]
474453
extern void sgesv_(int *n, int *nrhs, float32 *a, int *lda, int *ipiv, float32 *b, int *ldb, int *info)
475454

476-
[<SuppressUnmanagedCodeSecurity>]
477455
[<DllImport("libopenblas", EntryPoint="ssysv_")>]
478456
extern void ssysv_(char *uplo, int *n, int *nrhs, float32 *a, int *lda, int *ipiv, float32 *b, int *ldb, float32 *work, int *lwork, int *info)
479457

480-
[<SuppressUnmanagedCodeSecurity>]
481458
[<DllImport("libopenblas", EntryPoint="sgetrf_")>]
482459
extern void sgetrf_(int *m, int *n, float32 *a, int *lda, int *ipiv, int *info)
483460

484-
[<SuppressUnmanagedCodeSecurity>]
485461
[<DllImport("libopenblas", EntryPoint="sgetri_")>]
486462
extern void sgetri_(int *n, float32 *a, int *lda, int *ipiv, float32 *work, int *lwork, int *info)
487463

@@ -557,19 +533,15 @@ module OpenBLAS =
557533
else
558534
None
559535

560-
[<SuppressUnmanagedCodeSecurity>]
561536
[<DllImport("libopenblas", EntryPoint="dgesv_")>]
562537
extern void dgesv_(int *n, int *nrhs, float *a, int *lda, int *ipiv, float *b, int *ldb, int *info)
563538

564-
[<SuppressUnmanagedCodeSecurity>]
565539
[<DllImport("libopenblas", EntryPoint="dsysv_")>]
566540
extern void dsysv_(char *uplo, int *n, int *nrhs, float *a, int *lda, int *ipiv, float *b, int *ldb, float *work, int *lwork, int *info)
567541

568-
[<SuppressUnmanagedCodeSecurity>]
569542
[<DllImport("libopenblas", EntryPoint="dgetrf_")>]
570543
extern void dgetrf_(int *m, int *n, float *a, int *lda, int *ipiv, int *info)
571544

572-
[<SuppressUnmanagedCodeSecurity>]
573545
[<DllImport("libopenblas", EntryPoint="dgetri_")>]
574546
extern void dgetri_(int *n, float *a, int *lda, int *ipiv, float *work, int *lwork, int *info)
575547

0 commit comments

Comments
 (0)
0