bugfix: type converter that converts to bool in 'if' context

1 files changed, 6 insertions, 0 deletions

diff --git a/rod/sigmatch.nim b/rod/sigmatch.nim
index 2192c168a..8144cff0b 100755
--- a/rod/sigmatch.nim
+++ b/rod/sigmatch.nim
@@ -461,6 +461,7 @@ proc userConvMatch(c: PContext, m: var TCandidate, f, a: PType,
     var dest = c.converters[i].typ.sons[0]
     if (typeRel(m.bindings, f, dest) == isEqual) and
         (typeRel(m.bindings, src, a) == isEqual): 
+      markUsed(arg, c.converters[i])
       var s = newSymNode(c.converters[i])
       s.typ = c.converters[i].typ
       s.info = arg.info
@@ -564,6 +565,11 @@ proc IndexTypesMatch*(c: PContext, f, a: PType, arg: PNode): PNode =
   initCandidate(m, f)
   result = paramTypesMatch(c, m, f, a, arg)
 
+proc ConvertTo*(c: PContext, f: PType, n: PNode): PNode = 
+  var m: TCandidate
+  initCandidate(m, f)
+  result = paramTypesMatch(c, m, f, n.typ, n)
+
 proc argtypeMatches*(c: PContext, f, a: PType): bool = 
   var m: TCandidate
   initCandidate(m, f)