Hi!
If used in procedur any function of HB_REGEX..()
it work OK, but when return from procedur application GPF.
Sample:
PROCEDURE main
? Test()
RETURN
FUNCTION test()
LOCAL r , aM, t:="SAME TEST TEXT"
r:=HB_REGEXCOMP(".*(TEST).*")
aM:=HB_REGEX(r,t)
IF VALTYPE(aM)=="A"
? "FOUND:",aM[2]
ELSE
? "NOT FOUND"
ENDIF
? hb_Version(),HB_BUILDDATE()
INKEY(0)
RETURN "OK"
***
Dispaly:
FOUND: TEST
Harbour 2.1.0dev (Rev. 14130) Mar 11 2010 12:56:34
and wait for key. I key press aplication GPF and hb_out.log:
Application Internal Error - C:\TEST.EXE
Terminated at: 2010.05.13 14:19:58
Unrecoverable error 6005: Exception error:
Exception Code:C005
Exception Address:004788B3
EAX:006F0748 EBX: ECX: EDX:006E0090
ESI:006F06B8 EDI:00486221 EBP:006CFBEC
CS:EIP:0187:004788B3 SS:ESP:018F:006CFBE8
DS:018F ES:018F FS:4FAF GS:
Flags:00010217
CS:EIP: 89 43 08 89 42 04 8D 51 04 89 14 08 8B 10 8B CA
SS:ESP: 006F06A8 006CFBF8 004787EC 006F074C 006CFC04 00478109 006F074C
006CFC10 0043CA8F 006F074C 006CFC1C 00477CDC 006F0750 006CFC28 00483B37
006F0750
C stack:
EIP: EBP: Frame: OldEBP, RetAddr, Params...
004788B3 006CFBEC 006CFBF8 004787EC 006F074C
004787EC 006CFBF8 006CFC04 00478109 006F074C
00478109 006CFC04 006CFC10 0043CA8F 006F074C
0043CA8F 006CFC10 006CFC1C 00477CDC 006F0750
00477CDC 006CFC1C 006CFC28 00483B37 006F0750
00483B37 006CFC28 006CFC34 0041449F 006F06C4
0041449F 006CFC34 006CFC40 00414EC9 006F06B8
00414EC9 006CFC40 006CFC54 0043C3C8 006F06B8 00492C30 006CFC80
0043C3C8 006CFC54 006CFC60 0042A393 006F06B8
0042A393 006CFC60 006CFC74 00440A38 006EBBAC 00492C30
00440A38 006CFC74 006CFC94 00422891 006CFC80 0001
0010
00422891 006CFC94 006CFD98 0041CA60 0001 0001
00493134 006CFCB8 004787EC 006EF894 006CFCD4
0041CA60 006CFD98 006CFDC0 00401180 00486218 00486184 00422864
0002
00401180 006CFDC0 006CFDDC 0041BD5A 006E 81D729C0
81D729C0
0041BD5A 006CFDDC 006CFE00 00443141 0001 00486114
81D729C0 004A 005A00AC
00443141 006CFE00 006CFE30 0047FD3B 0040 81D729C0
000A 81D728EC 005C
0047FD3B 006CFE30 006CFF78 00486114 BFF8B560
81D728EC 005C 74736554 45584500 81D72800
006CFF78 006CFFF4 BFF8B412 81D82490 0008 81D728EC
Modules:
0x0040 0x0009F000 C:\TEST.EXE
0xBFF5 0x00011000 C:\WINDOWS\SYSTEM\USER32.DLL
0xBFF2 0x00026000 C:\WINDOWS\SYSTEM\GDI32.DLL
0xBFE8 0x0001 C:\WINDOWS\SYSTEM\ADVAPI32.DLL
0xBFF7 0x00074000 C:\WINDOWS\SYSTEM\KERNEL32.DLL
Called from TEST(16) in test.prg
Called from MAIN(2) in test.prg
Application Internal Error - C:\TEST.EXE
Terminated at: 2010.05.13 14:19:59
Unrecoverable error 6005: Exception error:
Exception Code:C005
Exception Address:004788B3
EAX:006F0748 EBX: ECX: EDX:006E0090
ESI:006F06B8 EDI:00486221 EBP:006CFBEC
CS:EIP:0187:004788B3 SS:ESP:018F:006CFBE8
DS:018F ES:018F FS:4FAF GS:
Flags:00010217
CS:EIP: 89 43 08 89 42 04 8D 51 04 89 14 08 8B 10 8B CA
SS:ESP: 006F06A8 006CFBF8 004787EC 006F074C 006CFC04 00478109 006F074C
006CFC10 0043CA8F 006F074C 006CFC1C 00477CDC 006F0750 006CFC28 00483B37
006F0750
C stack:
EIP: EBP: Frame: OldEBP, RetAddr, Params...
004788B3 006CFBEC 006CFBF8 004787EC 006F074C
004787EC 006CFBF8 006CFC04 00478109 006F074C
00478109 006CFC04 006CFC10 0043CA8F 006F074C
0043CA8F 006CFC10 006CFC1C 00477CDC 006F0750
00477CDC 006CFC1C 006CFC28 00483B37 006F0750
00483B37 006CFC28 006CFC34 0041449F 006F06C4
0041449F 006CFC34 006CFC40 00414EC9 006F06B8
00414EC9 006CFC40 006CFC54 0043C3C8 006F06B8 00492C30 006CFC80
0043C3C8 006CFC54 006CFC60 0042A393 006F06B8
0042A393 006CFC60 006CFC74 00440A38 006EBBAC 00492C30
00440A38 006CFC74 006CFC94 00422891 006CFC80 0001
0010
00422891 006CFC94 006CFD98 0041CA60 0001 0001
00493134 006CFCB8 004787EC 006EF894 006CFCD4
0041CA60 006CFD98 006CFDC0 00401180 00486218 00486184 00422864
0002
00401180 006CFDC0 006CFDDC 0041BD5A 006E 81D729C0
81D729C0
0041BD5A 006CFDDC 006CFE00 00443141 0001 00486114
81D729C0 004A 005A00AC
00443141 006CFE00 006CFE30 0047FD3B 0040 81D729C0
000A 81D728EC 005C
0047FD3B 006CFE30 006CFF78 00486114 BFF8B560
81D728EC 005C 74736554 45584500 81D72800