steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

math.blas: update string c-types

db4
Joe Groff 2010-02-21 16:49:58 -08:00
parent ed18b911c8
commit 92e1ca8b61
2 changed files with 8 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
basis/math/blas/matrices/matrices.factor
View File

@ -305,10 +305,10 @@ M: MATRIX pprint-delims
: define-complex-blas-matrix ( TYPE T -- ) : define-complex-blas-matrix ( TYPE T -- )
"U" "C" (define-blas-matrix) ; "U" "C" (define-blas-matrix) ;
"float" "S" define-real-blas-matrix float "S" define-real-blas-matrix
"double" "D" define-real-blas-matrix double "D" define-real-blas-matrix
"complex-float" "C" define-complex-blas-matrix complex-float "C" define-complex-blas-matrix
"complex-double" "Z" define-complex-blas-matrix complex-double "Z" define-complex-blas-matrix
>> >>

8
basis/math/blas/vectors/vectors.factor
View File

@ -238,10 +238,10 @@ M: VECTOR Vasum
[ drop (define-blas-vector) ] [ drop (define-blas-vector) ]
[ (define-complex-blas-vector) ] 3bi ; [ (define-complex-blas-vector) ] 3bi ;
"float" "S" define-real-blas-vector float "S" define-real-blas-vector
"double" "D" define-real-blas-vector double "D" define-real-blas-vector
"complex-float" "C" "S" define-complex-blas-vector complex-float "C" "S" define-complex-blas-vector
"complex-double" "Z" "D" define-complex-blas-vector complex-double "Z" "D" define-complex-blas-vector
>> >>