Merge pull request #1 from haskellcamargo/master

Implemented type conversion from string to int and float

Author: jhartikainen

Conversion.hs

@@ -24,15 +24,15 @@ isTruthy = getBool . castToBool
     where getBool (PHPBool b) = b
 
 castToInt :: PHPValue -> PHPValue
-castToInt (PHPString _) = error "string to int behavior is not implemented"
+castToInt (PHPString a) = PHPInt $ read a :: PHPValue
 castToInt a@(PHPInt _) = a
 castToInt (PHPFloat a) = PHPInt $ floor a
 castToInt (PHPBool a) | a == True  = PHPInt 1
                       | a == False = PHPInt 0
 castToInt PHPNull = PHPInt 0
 
 castToFloat :: PHPValue -> PHPValue
-castToFloat (PHPString _) = error "undefined behavior for string to float"
+castToFloat (PHPString a) = PHPFloat $ read a :: PHPValue
 castToFloat (PHPInt a) = PHPFloat $ fromInteger a
 castToFloat a@(PHPFloat _) = a
 castToFloat PHPNull = PHPFloat 0