Patched issue with find procedure (MsgQ Events were reporting wrong procedures)

git-svn-id: https://svn.inf.ethz.ch/svn/lecturers/a2/trunk@6733 8c9fc860-2736-0410-a75d-ab315db34111

source/Generic.Reflection.Mod

@@ -647,7 +647,7 @@ CONST
 		FindString(refs, offset, level, find);
 		start := GetAddress(refs, offset);
 		end := GetAddress(refs, offset);
-		find.found := find.found OR (start <= find.pc) & (find.pc <= end);
+		find.found := find.found OR (start <= find.pc) & (find.pc < end);
 		IF find.found THEN
 			find.pos := pos; 
 			RETURN;