Added untested this warnings without any filters in Addon.

magic-lang · Mar 29, 2016 · 430cd5d · 430cd5d
1 parent 99a0605
commit 430cd5d
Showing 1 changed file with 11 additions and 3 deletions.
diff --git a/source/rock/middle/Addon.ooc b/source/rock/middle/Addon.ooc
@@ -1,4 +1,5 @@
 import structs/[ArrayList, HashMap, MultiMap]
+import ../frontend/BuildParams
 import Node, Type, TypeDecl, FunctionDecl, FunctionCall, Visitor, VariableAccess, PropertyDecl, ClassDecl, CoverDecl
 import tinker/[Trail, Resolver, Response, Errors]
 
@@ -155,9 +156,16 @@ Addon: class extends Node {
             }
 
             if (call suggest(fDecl, res, trail)) {
-                if (fDecl hasThis() && !call getExpr()) {
-                    // add `this` if needed.
-                    call setExpr(VariableAccess new("this", call token))
+                if (!call getExpr()) {
+                    if (fDecl hasThis()) {
+                        // add `this` if needed.
+                        call setExpr(VariableAccess new("this", call token))
+                    }
+                    // Not yet tested
+                    if (res params explicitThis) {
+                        name := fDecl hasThis() ? "this" : "This"
+                        call token printMessage("Implicit " + name + " detected for call to " + fDecl name + "!")
+                    }
                 }
             }
         )