Declare Function Ermn ( ) As ZString Ptr

result = Ermn ( )

Возвращает указатель на строку, определяющую модуль, где произошла ошибка.

Возвращает NULL, если источник не компилируется с опцией компилятора -exx.

Функция отчета об ошибке, возвращающая указатель на имя модуля.

'' test.bas
'' компиляция: fbc -exx -lang fblite test.bas

#lang "fblite"

Sub Generate_Error
  On Error Goto Handler
  Error 1000
  Exit Sub
Handler:
  Print "Error Function: "; *Erfn()
  Print "Error Module  : "; *Ermn()
  Resume Next
End Sub

Generate_Error

Вывод:

Error Function: GENERATE_ERROR
Error Module  : test.bas

• Не доступна в диалекте -lang qb , но есть псевдоним __Ermn.
  
  

• Новое в FreeBASIC
  
  

• Erfn
  
• Erl
  
• On...Error