math.matrices.simd: add an inline declaration

db4
Slava Pestov 2009-10-05 05:29:30 -05:00
parent b4e36608da
commit 61e3ba77d8
1 changed files with 1 additions and 1 deletions

View File

@ -135,7 +135,7 @@ TYPED: transpose-matrix4 ( matrix: matrix4 -- matrix: matrix4 )
: scale-matrix4 ( factors -- matrix )
[ float-4{ t t t f } ] dip float-4{ 0.0 0.0 0.0 1.0 } v?
diagonal-matrix4 ;
diagonal-matrix4 ; inline
: ortho-matrix4 ( factors -- matrix )
float-4{ 1.0 1.0 1.0 1.0 } swap v/ scale-matrix4 ; inline