make string definition work on call overloadable structs (#89)

Author: KristofferC

src/utils.jl

@@ -5,6 +5,7 @@ function checkname(fdef::Expr, name)
     (fdef.head === :where || fdef.head == :(::)) && return checkname(fproto, name)
     fdef.head === :call || return false
     if fproto isa Expr
+        fproto.head == :(::) && return fproto.args[2] == name
         # A metaprogramming-generated function
         fproto.head === :$ && return true   # uncheckable, let's assume all is well
         # Is the check below redundant?

test/runtests.jl

@@ -252,3 +252,12 @@ end
     body, _ = CodeTracking.definition(String, @which Foo.Bar.fit(1, 2))
     @test body == "Foo.Bar.fit(a, b) = a + b"
 end
+
+struct CallOverload
+    z
+end
+(f::CallOverload)(arg) = f.z + arg
+@testset "call syntax" begin
+    body, _ = CodeTracking.definition(String, @which CallOverload(1)(1))
+    @test body == "(f::CallOverload)(arg) = f.z + arg"
+end