From 8aeaaac8ebfc5d443455f44b451fa97fbd3fdc15 Mon Sep 17 00:00:00 2001
From: Viktor Szakats <harbour@syenar.net>
Date: Mon, 10 Nov 2008 02:36:53 +0000
Subject: [PATCH] 2008-11-10 03:35 UTC+0100 Viktor Szakats (harbour.01 syenar
 hu)   * source/vm/fm.c     ! Fixed missing abort() on WinCE. (for Pelles C
 only, but       the fix should work for any WinCE compilers).     ; TOFIX:
 Now the only remaining showstopper for PellesC5 WinCE              support
 is:              ../../math.c(652): error #3120: [asm] Symbol 'inf' is
 undefined.

---
 harbour/ChangeLog      | 8 ++++++++
 harbour/source/vm/fm.c | 2 ++
 2 files changed, 10 insertions(+)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 50d15d4e37..c5e09d06dd 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,14 @@
    2008-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
 */
 
+2008-11-10 03:35 UTC+0100 Viktor Szakats (harbour.01 syenar hu)
+  * source/vm/fm.c
+    ! Fixed missing abort() on WinCE. (for Pelles C only, but 
+      the fix should work for any WinCE compilers).
+    ; TOFIX: Now the only remaining showstopper for PellesC5 WinCE 
+             support is:
+             ../../math.c(652): error #3120: [asm] Symbol 'inf' is undefined.
+
 2008-11-10 03:15 UTC+0100 Viktor Szakats (harbour.01 syenar hu)
   * config/w32/poccce.cf
     ! Added -DHB_NO_WIN_CONSOLE.
diff --git a/harbour/source/vm/fm.c b/harbour/source/vm/fm.c
index 8fdd15fd8c..20c65e662b 100644
--- a/harbour/source/vm/fm.c
+++ b/harbour/source/vm/fm.c
@@ -127,6 +127,8 @@
 #     pragma warn -ngu
 #     pragma warn -prc
 #     pragma warn -rch
+#  elif defined( HB_WINCE ) && defined( __POCC__ )
+#     define ABORT TerminateProcess( GetCurrentProcess(), 0 )
 #  elif defined( _MSC_VER )
 #     define USE_DL_PREFIX
 #  endif