Permalink
Browse files

Correct missing length on vector.

  • Loading branch information...
1 parent 8bda38a commit d393b930ec40c09cef806d0f3ded367409c31c6f @marcotmarcot committed Oct 11, 2012
Showing with 1 addition and 1 deletion.
  1. +1 −1 Scilab/Interpreter.hs
View
2 Scilab/Interpreter.hs
@@ -300,7 +300,7 @@ instance NFData Value where
class Enum a => Valuable a where
vec :: V.Vector a -> Value
- vec v = Number (not $ isDouble $ V.head v) (V.map toDouble v) (V.length v)
+ vec v = Number (not $ isDouble $ V.head v) (V.map toDouble v) 1
getVec :: Value -> V.Vector a
getVec = V.map fromDouble . valueVec

0 comments on commit d393b93

Please sign in to comment.