forked from QB64-Phoenix-Edition/QB64pe
-
Notifications
You must be signed in to change notification settings - Fork 0
_INCLERRORFILE$
Samuel Gomes edited this page Nov 8, 2022
·
1 revision
The _INCLERRORFILE$ function returns the name of the original source code $INCLUDE module that caused the most recent error.
errfile$ = _INCLERRORFILE$
If the last error occurred in the main module, _INCLERRORFILE$ returns an empty string.
- Version 1.1 and up.
ON ERROR GOTO DebugLine
ERROR 250 'simulated error code - an error in the main module leaves _INCLERRORLINE empty (= 0)
'$INCLUDE:'haserror.bi'
END
DebugLine:
PRINT "An error occurred. Please contact support with the following details:
PRINT "ERROR "; ERR; " ON LINE: "; _ERRORLINE
IF _INCLERRORLINE THEN
PRINT " IN MODULE "; _INCLERRORFILE$; " (line"; _INCLERRORLINE; ")"
END IF
RESUME NEXT
An error occurred. Please contact support with the following details:
ERROR 250 ON LINE: 6
An error occurred. Please contact support with the following details:
ERROR 250 ON LINE: 9
IN MODULE haserror.bi ( line 1 )