fix callable struct without struct name lookup (#99)

Author: Kristoffer Carlsson

src/utils.jl

@@ -5,7 +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
+        fproto.head == :(::) && return last(fproto.args) == name
         # A metaprogramming-generated function
         fproto.head === :$ && return true   # uncheckable, let's assume all is well
         # Is the check below redundant?

test/runtests.jl

@@ -264,9 +264,14 @@ struct CallOverload
     z
 end
 (f::CallOverload)(arg) = f.z + arg
+struct Functor end
+(::Functor)(x, y) = x+y
 @testset "call syntax" begin
     body, _ = CodeTracking.definition(String, @which CallOverload(1)(1))
     @test body == "(f::CallOverload)(arg) = f.z + arg"
+
+    body, _ = CodeTracking.definition(String, @which Functor()(1,2))
+    @test body == "(::Functor)(x, y) = x+y"
 end
 
 if VERSION >= v"1.6.0"