diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 20632dd7bf..fc5f212d3b 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,30 @@ 2002-12-01 13:30 UTC+0100 Foo Bar */ +2005-10-28 10:23 UTC+0100 Viktor Szakats (viktor.szakats/syenar.hu) + * hrbdll.bc + * hrbdll.vc + * makefile.bc + * makefile.nt + * makefile.vc + * makefile64.nt + * include/hbapicdp.h + * source/codepage/Makefile + * source/codepage/cdphu852.c + * source/lang/Makefile + * source/lang/msg_tpl.c + * source/lang/msghu852.c + + source/codepage/cdpbg866.c + + source/codepage/cdpbgiso.c + + source/codepage/cdpbgwin.c + + source/codepage/uc8859_5.c + + source/lang/msgbg866.c + + source/lang/msgbgiso.c + + source/lang/msgbgwin.c + + Added BG language support. + * HU minor fix. + * Lang template updated. + 2005-10-24 15:09 UTC+0200 Jacek Kubica (kubica/at/wssk.wroc.pl) * harbour/makefile.bc - Remove references to: diff --git a/harbour/hrbdll.bc b/harbour/hrbdll.bc index 64a5e3deec..a76d46fda5 100644 --- a/harbour/hrbdll.bc +++ b/harbour/hrbdll.bc @@ -336,6 +336,9 @@ HARBOUR_DLL_OBJS = \ $(OBJ_DIR)\dbfntx0.obj \ $(OBJ_DIR)\dbfntx1.obj \ \ + $(OBJ_DIR)\msgbg866.obj \ + $(OBJ_DIR)\msgbgiso.obj \ + $(OBJ_DIR)\msgbgwin.obj \ $(OBJ_DIR)\msgca.obj \ $(OBJ_DIR)\msgcs852.obj \ $(OBJ_DIR)\msgcsiso.obj \ @@ -392,6 +395,9 @@ HARBOUR_DLL_OBJS = \ $(OBJ_DIR)\gtwin.obj \ $(OBJ_DIR)\mousewin.obj \ \ + $(OBJ_DIR)\cdpbg866.obj \ + $(OBJ_DIR)\cdpbgiso.obj \ + $(OBJ_DIR)\cdpbgwin.obj \ $(OBJ_DIR)\cdpeldos.obj \ $(OBJ_DIR)\cdpelwin.obj \ $(OBJ_DIR)\cdpesdos.obj \ @@ -426,6 +432,7 @@ HARBOUR_DLL_OBJS = \ $(OBJ_DIR)\uc866.obj \ $(OBJ_DIR)\uc8859_1.obj \ $(OBJ_DIR)\uc8859_2.obj \ + $(OBJ_DIR)\uc8859_5.obj \ $(OBJ_DIR)\uc88591b.obj \ $(OBJ_DIR)\uckoi8.obj \ $(OBJ_DIR)\uckoi8u.obj \ @@ -788,6 +795,9 @@ $(HARBOUR_DLL) : \ echo. $(OBJ_DIR)\dbfntx0.obj + >> hdll.tmp echo. $(OBJ_DIR)\dbfntx1.obj + >> hdll.tmp + echo. $(OBJ_DIR)\msgbg866.obj + >> hdll.tmp + echo. $(OBJ_DIR)\msgbgiso.obj + >> hdll.tmp + echo. $(OBJ_DIR)\msgbgwin.obj + >> hdll.tmp echo. $(OBJ_DIR)\msgca.obj + >> hdll.tmp echo. $(OBJ_DIR)\msgcs852.obj + >> hdll.tmp echo. $(OBJ_DIR)\msgcsiso.obj + >> hdll.tmp @@ -1892,6 +1902,16 @@ $(OBJ_DIR)\xsavescr.obj : $(RTL_DIR)\xsavescr.c $(CC) $(CLIBFLAGS) -o$@ $** + +$(OBJ_DIR)\msgbg866.obj : $(LANG_DIR)\msgbg866.c + $(CC) $(CLIBFLAGS) -o$@ $** + +$(OBJ_DIR)\msgbgiso.obj : $(LANG_DIR)\msgbgiso.c + $(CC) $(CLIBFLAGS) -o$@ $** + +$(OBJ_DIR)\msgbgwin.obj : $(LANG_DIR)\msgbgwin.c + $(CC) $(CLIBFLAGS) -o$@ $** + $(OBJ_DIR)\msgca.obj : $(LANG_DIR)\msgca.c $(CC) $(CLIBFLAGS) -o$@ $** @@ -2173,6 +2193,15 @@ $(OBJ_DIR)\mousewin.obj : $(RTL_DIR)\gtwin\mousewin.c $(CC) $(CLIBFLAGS) -o$@ $** +$(OBJ_DIR)\cdpbg866.obj : $(CODEPAGE_DIR)\cdpbg866.c + $(CC) $(CLIBFLAGS) -o$@ $** + +$(OBJ_DIR)\cdpbgiso.obj : $(CODEPAGE_DIR)\cdpbgiso.c + $(CC) $(CLIBFLAGS) -o$@ $** + +$(OBJ_DIR)\cdpbgwin.obj : $(CODEPAGE_DIR)\cdpbgwin.c + $(CC) $(CLIBFLAGS) -o$@ $** + $(OBJ_DIR)\cdpeldos.obj : $(CODEPAGE_DIR)\cdpeldos.c $(CC) $(CLIBFLAGS) -o$@ $** @@ -2275,6 +2304,9 @@ $(OBJ_DIR)\uc8859_1.obj : $(CODEPAGE_DIR)\uc8859_1.c $(OBJ_DIR)\uc8859_2.obj : $(CODEPAGE_DIR)\uc8859_2.c $(CC) $(CLIBFLAGS) -o$@ $** +$(OBJ_DIR)\uc8859_5.obj : $(CODEPAGE_DIR)\uc8859_5.c + $(CC) $(CLIBFLAGS) -o$@ $** + $(OBJ_DIR)\uc88591b.obj : $(CODEPAGE_DIR)\uc88591b.c $(CC) $(CLIBFLAGS) -o$@ $** diff --git a/harbour/hrbdll.vc b/harbour/hrbdll.vc index 3d187ea092..f8935961a6 100644 --- a/harbour/hrbdll.vc +++ b/harbour/hrbdll.vc @@ -317,6 +317,9 @@ HARBOUR_DLL_OBJS = \ $(OBJ_DIR)\dbfntx1.obj \ $(OBJ_DIR)\dbfcdx1.obj \ $(OBJ_DIR)\dbfcdx0.obj \ + $(OBJ_DIR)\msgbg866.obj \ + $(OBJ_DIR)\msgbgiso.obj \ + $(OBJ_DIR)\msgbgwin.obj \ $(OBJ_DIR)\msgca.obj \ $(OBJ_DIR)\msgcs852.obj \ $(OBJ_DIR)\msgcsiso.obj \ @@ -378,6 +381,9 @@ HARBOUR_DLL_OBJS = \ $(OBJ_DIR)\maindllh.obj \ $(OBJ_DIR)\hvm.obj \ \ + $(OBJ_DIR)\cdpbg866.obj \ + $(OBJ_DIR)\cdpbgiso.obj \ + $(OBJ_DIR)\cdpbgwin.obj \ $(OBJ_DIR)\cdpeldos.obj \ $(OBJ_DIR)\cdpelwin.obj \ $(OBJ_DIR)\cdpesdos.obj \ @@ -412,6 +418,7 @@ HARBOUR_DLL_OBJS = \ $(OBJ_DIR)\uc866.obj \ $(OBJ_DIR)\uc8859_1.obj \ $(OBJ_DIR)\uc8859_2.obj \ + $(OBJ_DIR)\uc8859_5.obj \ $(OBJ_DIR)\uc88591b.obj \ $(OBJ_DIR)\uckoi8.obj \ $(OBJ_DIR)\uckoi8u.obj \ @@ -1521,6 +1528,15 @@ $(OBJ_DIR)\xhelp.obj : $(RTL_DIR)\xhelp.c $(OBJ_DIR)\xsavescr.obj : $(RTL_DIR)\xsavescr.c $(CC) $(CLIBFLAGS) /Fo$@ $** +$(OBJ_DIR)\msgbg852.obj : $(LANG_DIR)\msgbg852.c + $(CC) $(CLIBFLAGS) /Fo$@ $** + +$(OBJ_DIR)\msgbgiso.obj : $(LANG_DIR)\msgbgiso.c + $(CC) $(CLIBFLAGS) /Fo$@ $** + +$(OBJ_DIR)\msgbgwin.obj : $(LANG_DIR)\msgbgwin.c + $(CC) $(CLIBFLAGS) /Fo$@ $** + $(OBJ_DIR)\msgca.obj : $(LANG_DIR)\msgca.c $(CC) $(CLIBFLAGS) /Fo$@ $** @@ -1772,6 +1788,15 @@ $(OBJ_DIR)\gtwin.obj : $(RTL_DIR)\gtwin\gtwin.c $(OBJ_DIR)\mousewin.obj : $(RTL_DIR)\gtwin\mousewin.c $(CC) $(CLIBFLAGS) /Fo$@ $** +$(OBJ_DIR)\cdpbg866.obj : $(CODEPAGE_DIR)\cdpbg866.c + $(CC) $(CLIBFLAGS) -o$@ $** + +$(OBJ_DIR)\cdpbgiso.obj : $(CODEPAGE_DIR)\cdpbgiso.c + $(CC) $(CLIBFLAGS) -o$@ $** + +$(OBJ_DIR)\cdpbgwin.obj : $(CODEPAGE_DIR)\cdpbgwin.c + $(CC) $(CLIBFLAGS) -o$@ $** + $(OBJ_DIR)\cdpeldos.obj : $(CODEPAGE_DIR)\cdpeldos.c $(CC) $(CLIBFLAGS) -o$@ $** @@ -1874,6 +1899,9 @@ $(OBJ_DIR)\uc8859_1.obj : $(CODEPAGE_DIR)\uc8859_1.c $(OBJ_DIR)\uc8859_2.obj : $(CODEPAGE_DIR)\uc8859_2.c $(CC) $(CLIBFLAGS) -o$@ $** +$(OBJ_DIR)\uc8859_5.obj : $(CODEPAGE_DIR)\uc8859_5.c + $(CC) $(CLIBFLAGS) -o$@ $** + $(OBJ_DIR)\uc88591b.obj : $(CODEPAGE_DIR)\uc88591b.c $(CC) $(CLIBFLAGS) -o$@ $** diff --git a/harbour/include/hbapicdp.h b/harbour/include/hbapicdp.h index f560e6c04c..a3ab4ee968 100644 --- a/harbour/include/hbapicdp.h +++ b/harbour/include/hbapicdp.h @@ -140,6 +140,7 @@ extern PHB_CODEPAGE hb_cdp_page; #define CPID_8859_1 "iso8859-1" #define CPID_8859_1B "iso8859-1b" #define CPID_8859_2 "iso8859-2" +#define CPID_8859_5 "iso8859-5" #define CPID_KOI_8 "koi-8" #define CPID_KOI_8U "koi-8u" #define CPID_MAZ "plmaz" @@ -155,6 +156,7 @@ extern PHB_CODEPAGE hb_cdp_page; #define UNITB_8859_1 &hb_uniTbl_8859_1 #define UNITB_8859_1B &hb_uniTbl_8859_1b #define UNITB_8859_2 &hb_uniTbl_8859_2 +#define UNITB_8859_5 &hb_uniTbl_8859_5 #define UNITB_KOI_8 &hb_uniTbl_KOI_8 #define UNITB_KOI_8U &hb_uniTbl_KOI_8U #define UNITB_MAZ &hb_uniTbl_mazovia @@ -172,6 +174,7 @@ extern HB_UNITABLE hb_uniTbl_1257; extern HB_UNITABLE hb_uniTbl_8859_1; extern HB_UNITABLE hb_uniTbl_8859_1b; extern HB_UNITABLE hb_uniTbl_8859_2; +extern HB_UNITABLE hb_uniTbl_8859_5; extern HB_UNITABLE hb_uniTbl_KOI_8; extern HB_UNITABLE hb_uniTbl_KOI_8U; extern HB_UNITABLE hb_uniTbl_mazovia; diff --git a/harbour/makefile.bc b/harbour/makefile.bc index 25125eeb85..05639d7b58 100644 --- a/harbour/makefile.bc +++ b/harbour/makefile.bc @@ -404,6 +404,9 @@ RTL_LIB_OBJS = \ # LANG_LIB_OBJS = \ + $(OBJ_DIR)\msgbg866.obj \ + $(OBJ_DIR)\msgbgiso.obj \ + $(OBJ_DIR)\msgbgwin.obj \ $(OBJ_DIR)\msgca.obj \ $(OBJ_DIR)\msgcs852.obj \ $(OBJ_DIR)\msgcsiso.obj \ @@ -452,6 +455,9 @@ LANG_LIB_OBJS = \ $(OBJ_DIR)\msgzhgb.obj CODEPAGE_LIB_OBJS = \ + $(OBJ_DIR)\cdpbg866.obj \ + $(OBJ_DIR)\cdpbgiso.obj \ + $(OBJ_DIR)\cdpbgwin.obj \ $(OBJ_DIR)\cdpeldos.obj \ $(OBJ_DIR)\cdpelwin.obj \ $(OBJ_DIR)\cdpesdos.obj \ @@ -486,6 +492,7 @@ CODEPAGE_LIB_OBJS = \ $(OBJ_DIR)\uc866.obj \ $(OBJ_DIR)\uc8859_1.obj \ $(OBJ_DIR)\uc8859_2.obj \ + $(OBJ_DIR)\uc8859_5.obj \ $(OBJ_DIR)\uc88591b.obj \ $(OBJ_DIR)\uckoi8.obj \ $(OBJ_DIR)\uckoi8u.obj \ @@ -2175,6 +2182,18 @@ $(OBJ_DIR)\xsavescr.obj : $(RTL_DIR)\xsavescr.c # LANG.LIB dependencies # +$(OBJ_DIR)\msgbg866.obj : $(LANG_DIR)\msgbg866.c + $(CC) $(CLIBFLAGS) -o$@ $** + tlib $(LANG_LIB) $(ARFLAGS) -+$@,, + +$(OBJ_DIR)\msgbgiso.obj : $(LANG_DIR)\msgbgiso.c + $(CC) $(CLIBFLAGS) -o$@ $** + tlib $(LANG_LIB) $(ARFLAGS) -+$@,, + +$(OBJ_DIR)\msgbgwin.obj : $(LANG_DIR)\msgbgwin.c + $(CC) $(CLIBFLAGS) -o$@ $** + tlib $(LANG_LIB) $(ARFLAGS) -+$@,, + $(OBJ_DIR)\msgca.obj : $(LANG_DIR)\msgca.c $(CC) $(CLIBFLAGS) -o$@ $** tlib $(LANG_LIB) $(ARFLAGS) -+$@,, @@ -2362,6 +2381,18 @@ $(OBJ_DIR)\msgzhgb.obj : $(LANG_DIR)\msgzhgb.c # # CODEPAGE.LIB dependencies # +$(OBJ_DIR)\cdpbg866.obj : $(CODEPAGE_DIR)\cdpbg866.c + $(CC) $(CLIBFLAGS) -o$@ $** + tlib $(CODEPAGE_LIB) $(ARFLAGS) -+$@,, + +$(OBJ_DIR)\cdpbgiso.obj : $(CODEPAGE_DIR)\cdpbgiso.c + $(CC) $(CLIBFLAGS) -o$@ $** + tlib $(CODEPAGE_LIB) $(ARFLAGS) -+$@,, + +$(OBJ_DIR)\cdpbgwin.obj : $(CODEPAGE_DIR)\cdpbgwin.c + $(CC) $(CLIBFLAGS) -o$@ $** + tlib $(CODEPAGE_LIB) $(ARFLAGS) -+$@,, + $(OBJ_DIR)\cdpeldos.obj : $(CODEPAGE_DIR)\cdpeldos.c $(CC) $(CLIBFLAGS) -o$@ $** tlib $(CODEPAGE_LIB) $(ARFLAGS) -+$@,, @@ -2498,6 +2529,10 @@ $(OBJ_DIR)\uc8859_2.obj : $(CODEPAGE_DIR)\uc8859_2.c $(CC) $(CLIBFLAGS) -o$@ $** tlib $(CODEPAGE_LIB) $(ARFLAGS) -+$@,, +$(OBJ_DIR)\uc8859_5.obj : $(CODEPAGE_DIR)\uc8859_5.c + $(CC) $(CLIBFLAGS) -o$@ $** + tlib $(CODEPAGE_LIB) $(ARFLAGS) -+$@,, + $(OBJ_DIR)\uc88591b.obj : $(CODEPAGE_DIR)\uc88591b.c $(CC) $(CLIBFLAGS) -o$@ $** tlib $(CODEPAGE_LIB) $(ARFLAGS) -+$@,, diff --git a/harbour/makefile.nt b/harbour/makefile.nt index 4fdc58db9b..8ea2492041 100644 --- a/harbour/makefile.nt +++ b/harbour/makefile.nt @@ -452,6 +452,9 @@ RTL_LIB_OBJS = \ $(CC) $(CLIBFLAGS) -Fo$(OBJ_DIR)\ $< LANG_LIB_OBJS = \ + $(OBJ_DIR)\msgbg866.obj \ + $(OBJ_DIR)\msgbgiso.obj \ + $(OBJ_DIR)\msgbgwin.obj \ $(OBJ_DIR)\msgca.obj \ $(OBJ_DIR)\msgcs852.obj \ $(OBJ_DIR)\msgcsiso.obj \ @@ -507,6 +510,9 @@ LANG_LIB_OBJS = \ $(CC) $(CLIBFLAGS) -Fo$(OBJ_DIR)\ $< CODEPAGE_LIB_OBJS = \ + $(OBJ_DIR)\cdpbg866.obj \ + $(OBJ_DIR)\cdpbgiso.obj \ + $(OBJ_DIR)\cdpbgwin.obj \ $(OBJ_DIR)\cdpeldos.obj \ $(OBJ_DIR)\cdpelwin.obj \ $(OBJ_DIR)\cdpesdos.obj \ @@ -541,6 +547,7 @@ CODEPAGE_LIB_OBJS = \ $(OBJ_DIR)\uc866.obj \ $(OBJ_DIR)\uc8859_1.obj \ $(OBJ_DIR)\uc8859_2.obj \ + $(OBJ_DIR)\uc8859_5.obj \ $(OBJ_DIR)\uc88591b.obj \ $(OBJ_DIR)\uckoi8.obj \ $(OBJ_DIR)\uckoi8u.obj \ diff --git a/harbour/makefile.vc b/harbour/makefile.vc index aa0f784f47..d35493818d 100644 --- a/harbour/makefile.vc +++ b/harbour/makefile.vc @@ -416,6 +416,9 @@ RTL_LIB_OBJS = \ $(CC) $(CLIBFLAGS) -Fo$(OBJ_DIR)\ $< LANG_LIB_OBJS = \ + $(OBJ_DIR)\msgbg866.obj \ + $(OBJ_DIR)\msgbgiso.obj \ + $(OBJ_DIR)\msgbgwin.obj \ $(OBJ_DIR)\msgca.obj \ $(OBJ_DIR)\msgcs852.obj \ $(OBJ_DIR)\msgcsiso.obj \ @@ -471,6 +474,9 @@ LANG_LIB_OBJS = \ $(CC) $(CLIBFLAGS) -Fo$(OBJ_DIR)\ $< CODEPAGE_LIB_OBJS = \ + $(OBJ_DIR)\cdpbg866.obj \ + $(OBJ_DIR)\cdpbgiso.obj \ + $(OBJ_DIR)\cdpbgwin.obj \ $(OBJ_DIR)\cdpeldos.obj \ $(OBJ_DIR)\cdpelwin.obj \ $(OBJ_DIR)\cdpesdos.obj \ @@ -505,6 +511,7 @@ CODEPAGE_LIB_OBJS = \ $(OBJ_DIR)\uc866.obj \ $(OBJ_DIR)\uc8859_1.obj \ $(OBJ_DIR)\uc8859_2.obj \ + $(OBJ_DIR)\uc8859_5.obj \ $(OBJ_DIR)\uc88591b.obj \ $(OBJ_DIR)\uckoi8.obj \ $(OBJ_DIR)\uckoi8u.obj \ diff --git a/harbour/makefile64.nt b/harbour/makefile64.nt index 2fc8369d8a..d95fa087d3 100644 --- a/harbour/makefile64.nt +++ b/harbour/makefile64.nt @@ -452,6 +452,9 @@ RTL_LIB_OBJS = \ $(CC) $(CLIBFLAGS) -Fo$(OBJ_DIR)\ $< LANG_LIB_OBJS = \ + $(OBJ_DIR)\msgbg866.obj \ + $(OBJ_DIR)\msgbgiso.obj \ + $(OBJ_DIR)\msgbgwin.obj \ $(OBJ_DIR)\msgca.obj \ $(OBJ_DIR)\msgcs852.obj \ $(OBJ_DIR)\msgcsiso.obj \ @@ -507,6 +510,9 @@ LANG_LIB_OBJS = \ $(CC) $(CLIBFLAGS) -Fo$(OBJ_DIR)\ $< CODEPAGE_LIB_OBJS = \ + $(OBJ_DIR)\cdpbg866.obj \ + $(OBJ_DIR)\cdpbgiso.obj \ + $(OBJ_DIR)\cdpbgwin.obj \ $(OBJ_DIR)\cdpeldos.obj \ $(OBJ_DIR)\cdpelwin.obj \ $(OBJ_DIR)\cdpesdos.obj \ @@ -541,6 +547,7 @@ CODEPAGE_LIB_OBJS = \ $(OBJ_DIR)\uc866.obj \ $(OBJ_DIR)\uc8859_1.obj \ $(OBJ_DIR)\uc8859_2.obj \ + $(OBJ_DIR)\uc8859_5.obj \ $(OBJ_DIR)\uc88591b.obj \ $(OBJ_DIR)\uckoi8.obj \ $(OBJ_DIR)\uckoi8u.obj \ diff --git a/harbour/source/codepage/Makefile b/harbour/source/codepage/Makefile index 11e4cedb6c..91285abb1d 100644 --- a/harbour/source/codepage/Makefile +++ b/harbour/source/codepage/Makefile @@ -5,6 +5,9 @@ ROOT = ../../ C_SOURCES=\ + cdpbg866.c \ + cdpbgiso.c \ + cdpbgwin.c \ cdpeldos.c \ cdpelwin.c \ cdpesdos.c \ @@ -40,6 +43,7 @@ C_SOURCES=\ uc8859_1.c \ uc88591b.c \ uc8859_2.c \ + uc8859_5.c \ uckoi8.c \ uckoi8u.c \ ucmaz.c \ diff --git a/harbour/source/codepage/cdpbg866.c b/harbour/source/codepage/cdpbg866.c new file mode 100644 index 0000000000..2df0cea06e --- /dev/null +++ b/harbour/source/codepage/cdpbg866.c @@ -0,0 +1,105 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * National Collation Support Module (BG866) + * + * Copyright 1999-2005 Viktor Szakats + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ + +/* Language name: Bulgarian */ +/* ISO language code (2 chars): BG */ +/* Codepage: CP-866 */ + +#include +#include "hbapi.h" +#include "hbapicdp.h" + +#define NUMBER_OF_CHARACTERS 30 /* The number of single characters in the + alphabet, two-as-one aren't considered + here, accented - are considered. */ +#define IS_LATIN 0 /* Should be 1, if the national alphabet + is based on Latin */ +#define ACCENTED_EQUAL 0 /* Should be 1, if accented character + has the same weight as appropriate + unaccented. */ +#define ACCENTED_INTERLEAVED 0 /* Should be 1, if accented characters + sort after their unaccented counterparts + only if the unaccented versions of all + characters being compared are the same + ( interleaving ) */ + +/* If ACCENTED_EQUAL or ACCENTED_INTERLEAVED is 1, you need to mark the + accented characters with the symbol '~' before each of them, for example: + a~ + If there is two-character sequence, which is considered as one, it should + be marked with '.' before and after it, for example: + ... h.ch.i ... + + The Upper case string and the Lower case string should be absolutely the + same excepting the characters case, of course. + */ + +static HB_CODEPAGE s_codepage = { "BG866", + CPID_866, UNITB_866, NUMBER_OF_CHARACTERS, + "", + "", + IS_LATIN, ACCENTED_EQUAL, ACCENTED_INTERLEAVED, 0, 0, NULL, NULL, NULL, NULL, 0, NULL }; + +HB_CODEPAGE_INIT( BG866 ); + +#if defined(HB_PRAGMA_STARTUP) + #pragma startup hb_codepage_Init_BG866 +#elif defined(HB_MSC_STARTUP) + #if _MSC_VER >= 1010 + #pragma data_seg( ".CRT$XIY" ) + #pragma comment( linker, "/Merge:.CRT=.data" ) + #else + #pragma data_seg( "XIY" ) + #endif + static HB_$INITSYM hb_vm_auto_hb_codepage_Init_BG866 = hb_codepage_Init_BG866; + #pragma data_seg() +#endif diff --git a/harbour/source/codepage/cdpbgiso.c b/harbour/source/codepage/cdpbgiso.c new file mode 100644 index 0000000000..e9feedd767 --- /dev/null +++ b/harbour/source/codepage/cdpbgiso.c @@ -0,0 +1,105 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * National Collation Support Module (BGISO) + * + * Copyright 1999-2005 Viktor Szakats + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ + +/* Language name: Bulgarian */ +/* ISO language code (2 chars): BG */ +/* Codepage: ISO-8859-5 */ + +#include +#include "hbapi.h" +#include "hbapicdp.h" + +#define NUMBER_OF_CHARACTERS 30 /* The number of single characters in the + alphabet, two-as-one aren't considered + here, accented - are considered. */ +#define IS_LATIN 0 /* Should be 1, if the national alphabet + is based on Latin */ +#define ACCENTED_EQUAL 0 /* Should be 1, if accented character + has the same weight as appropriate + unaccented. */ +#define ACCENTED_INTERLEAVED 0 /* Should be 1, if accented characters + sort after their unaccented counterparts + only if the unaccented versions of all + characters being compared are the same + ( interleaving ) */ + +/* If ACCENTED_EQUAL or ACCENTED_INTERLEAVED is 1, you need to mark the + accented characters with the symbol '~' before each of them, for example: + a~ + If there is two-character sequence, which is considered as one, it should + be marked with '.' before and after it, for example: + ... h.ch.i ... + + The Upper case string and the Lower case string should be absolutely the + same excepting the characters case, of course. + */ + +static HB_CODEPAGE s_codepage = { "BGISO", + CPID_8859_5, UNITB_8859_5, NUMBER_OF_CHARACTERS, + "", + "", + IS_LATIN, ACCENTED_EQUAL, ACCENTED_INTERLEAVED, 0, 0, NULL, NULL, NULL, NULL, 0, NULL }; + +HB_CODEPAGE_INIT( BGISO ); + +#if defined(HB_PRAGMA_STARTUP) + #pragma startup hb_codepage_Init_BGISO +#elif defined(HB_MSC_STARTUP) + #if _MSC_VER >= 1010 + #pragma data_seg( ".CRT$XIY" ) + #pragma comment( linker, "/Merge:.CRT=.data" ) + #else + #pragma data_seg( "XIY" ) + #endif + static HB_$INITSYM hb_vm_auto_hb_codepage_Init_BGISO = hb_codepage_Init_BGISO; + #pragma data_seg() +#endif diff --git a/harbour/source/codepage/cdpbgwin.c b/harbour/source/codepage/cdpbgwin.c new file mode 100644 index 0000000000..3988193116 --- /dev/null +++ b/harbour/source/codepage/cdpbgwin.c @@ -0,0 +1,105 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * National Collation Support Module (BGWIN) + * + * Copyright 1999-2005 Viktor Szakats + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ + +/* Language name: Bulgarian */ +/* ISO language code (2 chars): BG */ +/* Codepage: Windows-1251 */ + +#include +#include "hbapi.h" +#include "hbapicdp.h" + +#define NUMBER_OF_CHARACTERS 30 /* The number of single characters in the + alphabet, two-as-one aren't considered + here, accented - are considered. */ +#define IS_LATIN 0 /* Should be 1, if the national alphabet + is based on Latin */ +#define ACCENTED_EQUAL 0 /* Should be 1, if accented character + has the same weight as appropriate + unaccented. */ +#define ACCENTED_INTERLEAVED 0 /* Should be 1, if accented characters + sort after their unaccented counterparts + only if the unaccented versions of all + characters being compared are the same + ( interleaving ) */ + +/* If ACCENTED_EQUAL or ACCENTED_INTERLEAVED is 1, you need to mark the + accented characters with the symbol '~' before each of them, for example: + a~ + If there is two-character sequence, which is considered as one, it should + be marked with '.' before and after it, for example: + ... h.ch.i ... + + The Upper case string and the Lower case string should be absolutely the + same excepting the characters case, of course. + */ + +static HB_CODEPAGE s_codepage = { "BGWIN", + CPID_1251, UNITB_1251, NUMBER_OF_CHARACTERS, + "", + "", + IS_LATIN, ACCENTED_EQUAL, ACCENTED_INTERLEAVED, 0, 0, NULL, NULL, NULL, NULL, 0, NULL }; + +HB_CODEPAGE_INIT( BGWIN ); + +#if defined(HB_PRAGMA_STARTUP) + #pragma startup hb_codepage_Init_BGWIN +#elif defined(HB_MSC_STARTUP) + #if _MSC_VER >= 1010 + #pragma data_seg( ".CRT$XIY" ) + #pragma comment( linker, "/Merge:.CRT=.data" ) + #else + #pragma data_seg( "XIY" ) + #endif + static HB_$INITSYM hb_vm_auto_hb_codepage_Init_BGWIN = hb_codepage_Init_BGWIN; + #pragma data_seg() +#endif diff --git a/harbour/source/codepage/cdphu852.c b/harbour/source/codepage/cdphu852.c index 5d537a7d41..63c751cd76 100644 --- a/harbour/source/codepage/cdphu852.c +++ b/harbour/source/codepage/cdphu852.c @@ -52,7 +52,7 @@ /* Language name: Hungarian */ /* ISO language code (2 chars): HU */ -/* Codepage: IBM-852 */ +/* Codepage: 852 */ #include #include "hbapi.h" diff --git a/harbour/source/codepage/uc8859_5.c b/harbour/source/codepage/uc8859_5.c new file mode 100644 index 0000000000..b3014417a9 --- /dev/null +++ b/harbour/source/codepage/uc8859_5.c @@ -0,0 +1,93 @@ +/* + * $Id$ + */ + +/* + * xHarbour Project source code: + * + * + * Copyright 1999-2005 Viktor Szakats + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ + +#include "hbapi.h" +#include "hbapicdp.h" + +#define NUMBER_OF_CHARS 256 + +static USHORT uniCodes[NUMBER_OF_CHARS] = { + 0x0000, 0x0001, 0x0002, 0x0003, 0x0004, 0x0005, 0x0006, 0x0007, + 0x0008, 0x0009, 0x000A, 0x000B, 0x000C, 0x000D, 0x000E, 0x000F, + 0x0010, 0x0011, 0x0012, 0x0013, 0x0014, 0x0015, 0x0016, 0x0017, + 0x0018, 0x0019, 0x001A, 0x001B, 0x001C, 0x001D, 0x001E, 0x001F, + 0x0020, 0x0021, 0x0022, 0x0023, 0x0024, 0x0025, 0x0026, 0x0027, + 0x0028, 0x0029, 0x002A, 0x002B, 0x002C, 0x002D, 0x002E, 0x002F, + 0x0030, 0x0031, 0x0032, 0x0033, 0x0034, 0x0035, 0x0036, 0x0037, + 0x0038, 0x0039, 0x003A, 0x003B, 0x003C, 0x003D, 0x003E, 0x003F, + 0x0040, 0x0041, 0x0042, 0x0043, 0x0044, 0x0045, 0x0046, 0x0047, + 0x0048, 0x0049, 0x004A, 0x004B, 0x004C, 0x004D, 0x004E, 0x004F, + 0x0050, 0x0051, 0x0052, 0x0053, 0x0054, 0x0055, 0x0056, 0x0057, + 0x0058, 0x0059, 0x005A, 0x005B, 0x005C, 0x005D, 0x005E, 0x005F, + 0x0060, 0x0061, 0x0062, 0x0063, 0x0064, 0x0065, 0x0066, 0x0067, + 0x0068, 0x0069, 0x006A, 0x006B, 0x006C, 0x006D, 0x006E, 0x006F, + 0x0070, 0x0071, 0x0072, 0x0073, 0x0074, 0x0075, 0x0076, 0x0077, + 0x0078, 0x0079, 0x007A, 0x007B, 0x007C, 0x007D, 0x007E, 0x007F, + 0x0080, 0x0081, 0x0082, 0x0083, 0x0084, 0x0085, 0x0086, 0x0087, + 0x0088, 0x0089, 0x008A, 0x008B, 0x008C, 0x008D, 0x008E, 0x008F, + 0x0090, 0x0091, 0x0092, 0x0093, 0x0094, 0x0095, 0x0096, 0x0097, + 0x0098, 0x0099, 0x009A, 0x009B, 0x009C, 0x009D, 0x009E, 0x009F, + 0x00A0, 0x0401, 0x0402, 0x0403, 0x0404, 0x0405, 0x0406, 0x0407, + 0x0408, 0x0409, 0x040A, 0x040B, 0x040C, 0x00AD, 0x040E, 0x040F, + 0x0410, 0x0411, 0x0412, 0x0413, 0x0414, 0x0415, 0x0416, 0x0417, + 0x0418, 0x0419, 0x041A, 0x041B, 0x041C, 0x041D, 0x041E, 0x041F, + 0x0420, 0x0421, 0x0422, 0x0423, 0x0424, 0x0425, 0x0426, 0x0427, + 0x0428, 0x0429, 0x042A, 0x042B, 0x042C, 0x042D, 0x042E, 0x042F, + 0x0430, 0x0431, 0x0432, 0x0433, 0x0434, 0x0435, 0x0436, 0x0437, + 0x0438, 0x0439, 0x043A, 0x043B, 0x043C, 0x043D, 0x043E, 0x043F, + 0x0440, 0x0441, 0x0442, 0x0443, 0x0444, 0x0445, 0x0446, 0x0447, + 0x0448, 0x0449, 0x044A, 0x044B, 0x044C, 0x044D, 0x044E, 0x044F, + 0x2116, 0x0451, 0x0452, 0x0453, 0x0454, 0x0455, 0x0456, 0x0457, + 0x0458, 0x0459, 0x045A, 0x045B, 0x045C, 0x00A7, 0x045E, 0x045F, +}; + +HB_UNITABLE hb_uniTbl_8859_5 = { CPID_8859_5, NUMBER_OF_CHARS, FALSE, uniCodes }; diff --git a/harbour/source/lang/Makefile b/harbour/source/lang/Makefile index 10a29d2853..36a7d40e82 100644 --- a/harbour/source/lang/Makefile +++ b/harbour/source/lang/Makefile @@ -5,6 +5,9 @@ ROOT = ../../ C_SOURCES=\ + msgbg866.c \ + msgbgiso.c \ + msgbgwin.c \ msgca.c \ msgcs852.c \ msgcsiso.c \ diff --git a/harbour/source/lang/msg_tpl.c b/harbour/source/lang/msg_tpl.c index 4ca0800ed9..8f98822481 100644 --- a/harbour/source/lang/msg_tpl.c +++ b/harbour/source/lang/msg_tpl.c @@ -6,7 +6,7 @@ * Harbour Project source code: * Language Support Module (Template) * - * Copyright 1999-2001 {list of individual authors and e-mail addresses} + * Copyright 1999-2005 {list of individual authors and e-mail addresses} * www - http://www.harbour-project.org * * This program is free software; you can redistribute it and/or modify @@ -65,7 +65,7 @@ static HB_LANG s_lang = "English", /* Name (in English) */ "English", /* Name (in native language) */ "EN", /* RFC ID */ - "437", /* Codepage */ + "IBM-437", /* Codepage */ "$Revision$ $Date$", /* Version */ /* Month names */ @@ -205,6 +205,16 @@ HB_LANG_ANNOUNCE( TPL ); HB_CALL_ON_STARTUP_BEGIN( hb_lang_Init_TPL ) hb_langRegister( &s_lang ); HB_CALL_ON_STARTUP_END( hb_lang_Init_TPL ) -#if ! defined(__GNUC__) && ! defined(_MSC_VER) + +#if defined(HB_PRAGMA_STARTUP) #pragma startup hb_lang_Init_TPL +#elif defined(HB_MSC_STARTUP) + #if _MSC_VER >= 1010 + #pragma data_seg( ".CRT$XIY" ) + #pragma comment( linker, "/Merge:.CRT=.data" ) + #else + #pragma data_seg( "XIY" ) + #endif + static HB_$INITSYM hb_vm_auto_hb_lang_Init_TPL = hb_lang_Init_TPL; + #pragma data_seg() #endif diff --git a/harbour/source/lang/msgbg866.c b/harbour/source/lang/msgbg866.c new file mode 100644 index 0000000000..ec4c2c457a --- /dev/null +++ b/harbour/source/lang/msgbg866.c @@ -0,0 +1,220 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * Language Support Module (BG866) + * + * Copyright 1999-2005 Viktor Szakats + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ + +/* Language name: Bulgarian */ +/* ISO language code (2 chars): (please look it up in /doc/lang_id.txt) */ +/* Codepage: CP-866 */ + +#include "hbapilng.h" + +static HB_LANG s_lang = +{ + { + /* Identification */ + + "BG866", /* ID */ + "Bulgarian", /* Name (in English) */ + "ꫣ᪨", /* Name (in native language) */ + "BG", /* RFC ID */ + "CP-866", /* Codepage */ + "$Revision$ $Date$", /* Version */ + + /* Month names */ + + "", + "", + "", + "ਫ", + "", + "", + "", + "", + "⥬", + "⮬", + "", + "", + + /* Day names */ + + "", + "", + "୨", + "鸞", + "", + "", + "ꡮ", + + /* CA-Cl*pper compatible natmsg items */ + + " # ᫥  ", + "᪠ ਬ?", + ". No.", + "** . 㬠 **", + "* . 㬠 *", + "*** ***", + "Ins", + " ", + "४⭠ ", + ": ", + " - ", + "Y/N", + " ", + + /* Error description names */ + + " 誠", + "誠 ࠬ", + "誠 ࠭筨 ⮩", + "९ꫢ ਭ", + "᫮ ९ꫢ", + " 㫠", + "᫮ 誠", + "⠪筠 誠", + " ᫮ ", + "", + "", + "⨣ ", + "䨭࠭ 㭪", + "ﬠ ᯮ࠭ ⮤", + "஬ 㢠", + "ᥢ 㢠", + "ﬠ ᯮ࠭ ஬", + " ᨬ ᥢ", + "ᥢ ", + "", + "誠 ꧤ", + "誠 ⢠ﭥ", + "誠 ⢠ﭥ", + "誠 ⥭", + "誠 ", + "誠 ", + "", + "", + "", + "", + " ঠ", + "૥ ࠭祭", + " ।", + "誠 ⨯ ", + "誠 ࠧ ", + "⭠ 㯮ॡ", + "⭠ ࠭", + "᪢ Exclusive", + "᪢ 碠", + " ", + "Append lock ஢", + "ᯥ譮 碠", + "", + "", + "", + "", + " ᨢ", + "᢮ ᨢ", + "ࠧ୮ ᨢ", + " ᨢ", + "᫮", + + /* Internal error names */ + + "ࠢ 誠 %lu: ", + "ᯥ譮 ࠢﭥ 誠", + "ﬠ ERRORBLOCK() 誠", + "४ ४ᨢ 墠 誨", + "RDD ᯥ譮 ०", + " ⨯ ⮤ %s", + "hb_xgrab ", + "hb_xrealloc NULL 㪠⥫", + "hb_xrealloc 㪠⥫", + "hb_xrealloc ", + "hb_xfree 㪠⥫", + "hb_xfree NULL 㪠⥫", + " । 砫 楤: \'%s\'", + "ﬠ 砫 楤", + "ঠ VM opcode", + " ⨪ 砪 %s", + " ᨬ ⨯ self %s", + "Codeblock 砪 %s", + "४⥭ ⨯ ⥪ 砭 %s", + "ࠧ ⥪", + " ࠭ ᥡ %s", + " ᨬ ⥭ memvar %s", + "९ꫢ ", + "hb_xgrab  㫠 ", + "hb_xrealloc  ஬ 㫠 ", + "hb_xalloc  㫠 ", + + /* Texts */ + + "YYYY/MM/DD", + "Y", + "N" + } +}; + +HB_LANG_ANNOUNCE( BG866 ); + +HB_CALL_ON_STARTUP_BEGIN( hb_lang_Init_BG866 ) + hb_langRegister( &s_lang ); +HB_CALL_ON_STARTUP_END( hb_lang_Init_BG866 ) + +#if defined(HB_PRAGMA_STARTUP) + #pragma startup hb_lang_Init_BG866 +#elif defined(HB_MSC_STARTUP) + #if _MSC_VER >= 1010 + #pragma data_seg( ".CRT$XIY" ) + #pragma comment( linker, "/Merge:.CRT=.data" ) + #else + #pragma data_seg( "XIY" ) + #endif + static HB_$INITSYM hb_vm_auto_hb_lang_Init_BG866 = hb_lang_Init_BG866; + #pragma data_seg() +#endif diff --git a/harbour/source/lang/msgbgiso.c b/harbour/source/lang/msgbgiso.c new file mode 100644 index 0000000000..b01cac1976 --- /dev/null +++ b/harbour/source/lang/msgbgiso.c @@ -0,0 +1,220 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * Language Support Module (BGISO) + * + * Copyright 1999-2005 Viktor Szakats + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ + +/* Language name: Bulgarian */ +/* ISO language code (2 chars): BG */ +/* Codepage: ISO-8859-5 */ + +#include "hbapilng.h" + +static HB_LANG s_lang = +{ + { + /* Identification */ + + "BGWIN", /* ID */ + "Bulgarian", /* Name (in English) */ + "", /* Name (in native language) */ + "BG", /* RFC ID */ + "ISO-8859-5", /* Codepage */ + "$Revision$ $Date$", /* Version */ + + /* Month names */ + + "", + "", + "", + "", + "", + "", + "", + "", + "", + "", + "", + "", + + /* Day names */ + + "", + "", + "", + "", + "", + "", + "", + + /* CA-Cl*pper compatible natmsg items */ + + " # ", + " ?", + ". No.", + "** . **", + "* . *", + "*** ***", + "Ins", + " ", + " ", + ": ", + " - ", + "Y/N", + "µ ", + + /* Error description names */ + + " ", + " ", + " ", + " ", + " ", + " ", + " ", + " ", + " ", + "", + "", + " ", + " ", + " ", + " ", + " ", + " ", + " ", + " ", + "", + " ", + " ", + " ", + " ", + " ", + " ", + "", + "", + "", + "", + " ", + " ", + " ", + " ", + " ", + " ", + " ", + " Exclusive", + " ", + " ", + "Append lock ", + " ", + "", + "", + "", + "", + " ", + " ", + " ", + " ", + "", + + /* Internal error names */ + + " %lu: ", + " ", + " ERRORBLOCK() ", + " ", + "RDD ", + " %s", + "hb_xgrab ", + "hb_xrealloc NULL ", + "hb_xrealloc ", + "hb_xrealloc ", + "hb_xfree ", + "hb_xfree NULL ", + " : \'%s\'", + " ", + " VM opcode", + " %s", + " self %s", + "Codeblock %s", + " %s", + " ", + " %s", + " memvar %s", + " ", + "hb_xgrab ", + "hb_xrealloc ", + "hb_xalloc ", + + /* Texts */ + + "YYYY/MM/DD", + "Y", + "N" + } +}; + +HB_LANG_ANNOUNCE( BGISO ); + +HB_CALL_ON_STARTUP_BEGIN( hb_lang_Init_BGISO ) + hb_langRegister( &s_lang ); +HB_CALL_ON_STARTUP_END( hb_lang_Init_BGISO ) + +#if defined(HB_PRAGMA_STARTUP) + #pragma startup hb_lang_Init_BGISO +#elif defined(HB_MSC_STARTUP) + #if _MSC_VER >= 1010 + #pragma data_seg( ".CRT$XIY" ) + #pragma comment( linker, "/Merge:.CRT=.data" ) + #else + #pragma data_seg( "XIY" ) + #endif + static HB_$INITSYM hb_vm_auto_hb_lang_Init_BGISO = hb_lang_Init_BGISO; + #pragma data_seg() +#endif diff --git a/harbour/source/lang/msgbgwin.c b/harbour/source/lang/msgbgwin.c new file mode 100644 index 0000000000..b70bae42fd --- /dev/null +++ b/harbour/source/lang/msgbgwin.c @@ -0,0 +1,220 @@ +/* + * $Id$ + */ + +/* + * Harbour Project source code: + * Language Support Module (BGWIN) + * + * Copyright 1999-2005 Viktor Szakats + * www - http://www.harbour-project.org + * + * This program is free software; you can redistribute it and/or modify + * it under the terms of the GNU General Public License as published by + * the Free Software Foundation; either version 2, or (at your option) + * any later version. + * + * This program is distributed in the hope that it will be useful, + * but WITHOUT ANY WARRANTY; without even the implied warranty of + * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the + * GNU General Public License for more details. + * + * You should have received a copy of the GNU General Public License + * along with this software; see the file COPYING. If not, write to + * the Free Software Foundation, Inc., 59 Temple Place, Suite 330, + * Boston, MA 02111-1307 USA (or visit the web site http://www.gnu.org/). + * + * As a special exception, the Harbour Project gives permission for + * additional uses of the text contained in its release of Harbour. + * + * The exception is that, if you link the Harbour libraries with other + * files to produce an executable, this does not by itself cause the + * resulting executable to be covered by the GNU General Public License. + * Your use of that executable is in no way restricted on account of + * linking the Harbour library code into it. + * + * This exception does not however invalidate any other reasons why + * the executable file might be covered by the GNU General Public License. + * + * This exception applies only to the code released by the Harbour + * Project under the name Harbour. If you copy code from other + * Harbour Project or Free Software Foundation releases into a copy of + * Harbour, as the General Public License permits, the exception does + * not apply to the code that you add in this way. To avoid misleading + * anyone as to the status of such modified files, you must delete + * this exception notice from them. + * + * If you write modifications of your own for Harbour, it is your choice + * whether to permit this exception to apply to your modifications. + * If you do not wish that, delete this exception notice. + * + */ + +/* Language name: Bulgarian */ +/* ISO language code (2 chars): BG */ +/* Codepage: Windows-1251 */ + +#include "hbapilng.h" + +static HB_LANG s_lang = +{ + { + /* Identification */ + + "BGWIN", /* ID */ + "Bulgarian", /* Name (in English) */ + "", /* Name (in native language) */ + "BG", /* RFC ID */ + "Windows-1251", /* Codepage */ + "$Revision$ $Date$", /* Version */ + + /* Month names */ + + "", + "", + "", + "", + "", + "", + "", + "", + "", + "", + "", + "", + + /* Day names */ + + "", + "", + "", + "", + "", + "", + "", + + /* CA-Cl*pper compatible natmsg items */ + + " # ", + " ?", + ". No.", + "** . **", + "* . *", + "*** ***", + "Ins", + " ", + " ", + ": ", + " - ", + "Y/N", + " ", + + /* Error description names */ + + " ", + " ", + " ", + " ", + " ", + " ", + " ", + " ", + " ", + "", + "", + " ", + " ", + " ", + " ", + " ", + " ", + " ", + " ", + "", + " ", + " ", + " ", + " ", + " ", + " ", + "", + "", + "", + "", + " ", + " ", + " ", + " ", + " ", + " ", + " ", + " Exclusive", + " ", + " ", + "Append lock ", + " ", + "", + "", + "", + "", + " ", + " ", + " ", + " ", + "", + + /* Internal error names */ + + " %lu: ", + " ", + " ERRORBLOCK() ", + " ", + "RDD ", + " %s", + "hb_xgrab ", + "hb_xrealloc NULL ", + "hb_xrealloc ", + "hb_xrealloc ", + "hb_xfree ", + "hb_xfree NULL ", + " : \'%s\'", + " ", + " VM opcode", + " %s", + " self %s", + "Codeblock %s", + " %s", + " ", + " %s", + " memvar %s", + " ", + "hb_xgrab ", + "hb_xrealloc ", + "hb_xalloc ", + + /* Texts */ + + "YYYY/MM/DD", + "Y", + "N" + } +}; + +HB_LANG_ANNOUNCE( BGWIN ); + +HB_CALL_ON_STARTUP_BEGIN( hb_lang_Init_BGWIN ) + hb_langRegister( &s_lang ); +HB_CALL_ON_STARTUP_END( hb_lang_Init_BGWIN ) + +#if defined(HB_PRAGMA_STARTUP) + #pragma startup hb_lang_Init_BGWIN +#elif defined(HB_MSC_STARTUP) + #if _MSC_VER >= 1010 + #pragma data_seg( ".CRT$XIY" ) + #pragma comment( linker, "/Merge:.CRT=.data" ) + #else + #pragma data_seg( "XIY" ) + #endif + static HB_$INITSYM hb_vm_auto_hb_lang_Init_BGWIN = hb_lang_Init_BGWIN; + #pragma data_seg() +#endif diff --git a/harbour/source/lang/msghu852.c b/harbour/source/lang/msghu852.c index 253596ee87..cc8dea297e 100644 --- a/harbour/source/lang/msghu852.c +++ b/harbour/source/lang/msghu852.c @@ -52,7 +52,7 @@ /* Language name: Hungarian */ /* ISO language code (2 chars): HU */ -/* Codepage: IBM-852 */ +/* Codepage: 852 */ #include "hbapilng.h" @@ -65,7 +65,7 @@ static HB_LANG s_lang = "Hungarian", /* Name (in English) */ "Magyar", /* Name (in native language) */ "HU", /* RFC ID */ - "IBM-852", /* Codepage */ + "852", /* Codepage */ "$Revision$ $Date$", /* Version */ /* Month names */