Mark Sibly 7 years ago
parent
commit
24b6feff1a
1 changed files with 1 additions and 1 deletions
  1. 1 1
      src/mx2cc/value.monkey2

+ 1 - 1
src/mx2cc/value.monkey2

@@ -300,7 +300,7 @@ Class LiteralValue Extends Value
 			Else If ptype2.IsReal
 			Else If ptype2.IsReal
 				result=Double( value ) ? "true" Else "false"
 				result=Double( value ) ? "true" Else "false"
 			Else If ptype2=Type.StringType
 			Else If ptype2=Type.StringType
-				result=value<>""
+				result=Bool( value ) ? "true" Else "false"
 			Else
 			Else
 				SemantError( "LiteralValue.UpCast()" )
 				SemantError( "LiteralValue.UpCast()" )
 			Endif
 			Endif