AU3Check - checking for multiple use #include-once

[mLipok]

Please add to AU3Check new feature which check if in a au3 file was used #include-once directive more then once.

Discusion:
​http://www.autoitscript.com/forum/topic/162787-unknown-function-name-unexpected-error/

[Melba23]

As shown in the thread to which you link, I cannot reproduce the error you claim to have discovered. You provide a reproducer script which shows the problem and I will re-open the ticket.

And in future please wait until you have a valid reproducer before opening a ticket.

M23

[mLipok]

REPRO

[mLipok]

Here is reproducer.

#include <MsgBoxConstants.au3>
Local $sScript = '#include-once' & @CRLF

For $i = 1 To 20
	$sScript &= '#include "' & $i & '.au3"' & @CRLF
Next

For $i = 1 To 20
	FileDelete($i & '.au3')
	FileWrite($i & '.au3', $sScript)
	If $i = 15 Then
		FileWrite($i & '.au3', '#include-once' & @CRLF)
		FileWrite($i & '.au3', 'Func _test()' & @CRLF)
		FileWrite($i & '.au3', @TAB & 'MsgBox(0, "TEST INFO", "")' & @CRLF)
		FileWrite($i & '.au3', 'EndFunc' & @CRLF)
	EndIf
Next
FileDelete('test.au3')
FileWrite('test.au3', $sScript & @CRLF & '_Test()')
ShellExecute('15.au3', '', '', 'edit')
WinWaitActive("[REGEXPTITLE:(?i)(.*15.au3.*SciTE.*)]")
ShellExecute('test.au3', '', '', 'edit')
WinWaitActive("[REGEXPTITLE:(?i)(.*test.au3.*SciTE.*)]")

MsgBox($MB_SYSTEMMODAL, "How To", "Just run test.au3" & @CRLF & "Of course after when you close this MsgBox info.")

.
.

And in future please wait until you have a valid reproducer before opening a ticket.

Ok.