diff --git a/harbour/ChangeLog b/harbour/ChangeLog index f02045e00c..58814964a7 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -1,3 +1,9 @@ +20000417-15:27 GMT+3 Chen Kedem + * source/lang/msghe862.c + * source/lang/msghewin.c + * update Hebrew language support to the new API + ! PLEASE update source/lang/Makefile ! + 20000417-11:05 GMT+1 Ryszard Glab *include/hbsetup.h diff --git a/harbour/source/lang/msghe862.c b/harbour/source/lang/msghe862.c index b0fba2d2de..50cdb833cd 100644 --- a/harbour/source/lang/msghe862.c +++ b/harbour/source/lang/msghe862.c @@ -2,91 +2,189 @@ * $Id$ */ -/* Language Support Module */ +/* + * Harbour Project source code: + * Language Support Module (HE862) + * + * Copyright 2000 Chen Kedem + * 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 of the License, or + * (at your option) any later version, with one exception: + * + * The exception is that if you link the Harbour Runtime Library (HRL) + * and/or the Harbour Virtual Machine (HVM) 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 HRL + * and/or HVM code into it. + * + * 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 program; if not, write to the Free Software + * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA (or visit + * their web site at http://www.gnu.org/). + * + */ /* Language name: Hebrew - Dos */ /* ISO language code (2 chars): HE */ /* Codepage: 862 */ -#include "hbdefs.h" +#include "hbapilng.h" -char *hb_dateMonthsName[ 12 ] = +static HB_LANG s_lang = { - "˜€…‰", - "˜€…˜”", - "•˜Ž", - "Œ‰˜”€", - "‰€Ž", - "‰…‰", - "‰Œ…‰", - "ˆ‘…‚…€", - "˜Žˆ”‘", - "˜…ˆ—…€", - "˜Ž…", - "˜Ž–ƒ" + { + /* Identification */ + + "HE862", /* ID */ + "Hebrew", /* Name (in English) */ + "š‰˜’", /* Name (in native language) */ + "HE", /* RFC ID */ + "862", /* Codepage */ + "$Revision$ $Date$", /* Version */ + + /* Month names */ + + "˜€…‰", + "˜€…˜”", + "•˜Ž", + "Œ‰˜”€", + "‰€Ž", + "‰…‰", + "‰Œ…‰", + "ˆ‘…‚…€", + "˜Žˆ”‘", + "˜…ˆ—…€", + "˜Ž…", + "˜Ž–ƒ", + + /* Day names */ + + "…™€˜", + "‰™", + "‰™‰Œ™", + "‰’‰˜", + "‰™‰Ž‡", + "‰™‰™", + "š™", + + /* CA-Cl*pper compatible natmsg items */ + + "‰…š ‰–— š…Ž…™˜ \'‘Ž …˜‡€ …‹ƒ’ Œƒ…‚", + "? š…”‘… š…€Ž‚…ƒ Š…–˜ €„", + "\'‘Ž ƒ…Ž’", + "** ‰‰‰ …‹‰‘ **", + "* „™‰Ž …‹‰‘ *", + "*** ‹\"„‘ ***", + "Ins", + " ", + "‰…‚™ Š‰˜€š", + "˜š…Ž …‡š: ", + " - ", + "Y/N", + "INVALID EXPRESSION", + + /* Error description names */ + + "„’…ƒ‰ €Œ „€‰‚™", + "Argument error", + "Bound error", + "String overflow", + "Numeric overflow", + "‘”€ „—…Œ‡", + "Numeric error", + "˜‰‡š š€‰‚™", + "Operation too complex", + "", + "", + "…˜‹† —‰”‘Ž ‰€", + "š˜ƒ‚…Ž €Œ „‰–—…”", + "No exported method", + "‰‰— €Œ „š™Ž", + "Alias does not exist", + "No exported variable", + "Illegal characters in alias", + "Alias already in use", + "", + "•…— š˜‰–‰ Ž† „€‰‚™", + "„‡‰š” Ž† „€‰‚™", + "„˜‰‚‘ Ž† „€‰‚™", + "„€‰˜— Ž† „€‰‚™", + "„‰š‹ Ž† „€‰‚™", + "„‘”ƒ„ š€‰‚™", + "", + "", + "", + "", + "š‹Žš „‰€ š€† „Œ…’”", + "Limit exceeded", + "‰—š €Œ …€ ™…™Ž ‘—‰€", + "Data type error", + "Data width error", + "Workarea not in use", + "Workarea not indexed", + "Exclusive required", + "„Œ‰’ „™…˜ƒ", + "„˜…‘€ „‰š‹ šŒ…’”", + "Append lock failed", + "„Œ™‹ „Œ‰’ šŒ…’”", + "", + "", + "", + "", + "‰˜ˆŽ˜” Œ™ ‰…‚™ ˜”‘Ž", + "Š˜’ŽŒ „™‰‚", + "array assign", + "Š˜’Ž €Œ", + "conditional", + + /* Internal error names */ + + "Unrecoverable error %lu: ", + "Error recovery failure", + "No ERRORBLOCK() for error", + "Too many recursive error handler calls", + "RDD invalid or failed to load", + "Invalid method type from %s", + "hb_xgrab can't allocate memory", + "hb_xrealloc called with a NULL pointer", + "hb_xrealloc called with an invalid pointer", + "hb_xrealloc can't reallocate memory", + "hb_xfree called with an invalid pointer", + "hb_xfree called with a NULL pointer", + "Can\'t locate the starting procedure: \'%s\'", + "No starting procedure", + "Unsupported VM opcode", + "Symbol item expected from %s", + "Invalid symbol type for self from %s", + "Codeblock expected from %s", + "Incorrect item type on the stack trying to pop from %s", + "Stack underflow", + "An item was going to be copied to itself from %s", + "Invalid symbol item passed as memvar %s", + + /* Texts */ + + "DD-MM-YYYY", + "Y", + "N" + } }; -char *hb_dateDaysName[ 7 ] = -{ - "…™€˜", - "‰™", - "‰™‰Œ™", - "‰’‰˜", - "‰™‰Ž‡", - "‰™‰™", - "š™" -}; +HB_LANG_ANNOUNCE( HE862 ); + +HB_CALL_ON_STARTUP_BEGIN( hb_lang_Init_HE862 ) + hb_langRegister( &s_lang ); +HB_CALL_ON_STARTUP_END( hb_lang_Init_HE862 ) +#if ! defined(__GNUC__) && ! defined(_MSC_VER) + #pragma startup hb_lang_Init_HE862 +#endif -char *hb_errorsGeneric[] = -{ - "„’…ƒ‰ €Œ „€‰‚™", - "Argument error", - "Bound error", - "String overflow", - "Numeric overflow", - "‘”€ „—…Œ‡", - "Numeric error", - "˜‰‡š š€‰‚™", - "Operation too complex", - "", - "", - "…˜‹† —‰”‘Ž ‰€", - "š˜ƒ‚…Ž €Œ „‰–—…”", - "No exported method", - "‰‰— €Œ „š™Ž", - "Alias does not exist", - "No exported variable", - "Illegal characters in alias", - "Alias already in use", - "", - "•…— š˜‰–‰ Ž† „€‰‚™", - "„‡‰š” Ž† „€‰‚™", - "„˜‰‚‘ Ž† „€‰‚™", - "„€‰˜— Ž† „€‰‚™", - "„‰š‹ Ž† „€‰‚™", - "„‘”ƒ„ š€‰‚™", - "", - "", - "", - "", - "š‹Žš „‰€ š€† „Œ…’”", - "Limit exceeded", - "‰—š €Œ …€ ™…™Ž ‘—‰€", - "Data type error", - "Data width error", - "Workarea not in use", - "Workarea not indexed", - "Exclusive required", - "„Œ‰’ „™…˜ƒ", - "„˜…‘€ „‰š‹ šŒ…’”", - "Append lock failed", - "„Œ™‹ „Œ‰’ šŒ…’”", - "", - "", - "", - "‰˜ˆŽ˜” Œ™ ‰…‚™ ˜”‘Ž", - "Š˜’ŽŒ „™‰‚", - "array assign", - "Š˜’Ž €Œ", - "conditional" -}; diff --git a/harbour/source/lang/msghewin.c b/harbour/source/lang/msghewin.c index 35a29b8722..08962d327b 100644 --- a/harbour/source/lang/msghewin.c +++ b/harbour/source/lang/msghewin.c @@ -2,91 +2,189 @@ * $Id$ */ -/* Language Support Module */ +/* + * Harbour Project source code: + * Language Support Module (HEWIN) + * + * Copyright 2000 Chen Kedem + * 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 of the License, or + * (at your option) any later version, with one exception: + * + * The exception is that if you link the Harbour Runtime Library (HRL) + * and/or the Harbour Virtual Machine (HVM) 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 HRL + * and/or HVM code into it. + * + * 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 program; if not, write to the Free Software + * Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA (or visit + * their web site at http://www.gnu.org/). + * + */ /* Language name: Hebrew - Windows */ /* ISO language code (2 chars): HE */ /* Codepage: 1255 */ -#include "hbdefs.h" +#include "hbapilng.h" -char *hb_dateMonthsName[ 12 ] = +static HB_LANG s_lang = { - "éðåàø", - "ôáøåàø", - "îøõ", - "àôøéì", - "îàé", - "éåðé", - "éåìé", - "àåâåñè", - "ñôèîáø", - "àå÷èåáø", - "ðåáîáø", - "ãöîáø" + { + /* Identification */ + + "HEWIN", /* ID */ + "Hebrew", /* Name (in English) */ + "òáøéú", /* Name (in native language) */ + "HE", /* RFC ID */ + "1255", /* Codepage */ + "$Revision$ $Date$", /* Version */ + + /* Month names */ + + "éðåàø", + "ôáøåàø", + "îøõ", + "àôøéì", + "îàé", + "éåðé", + "éåìé", + "àåâåñè", + "ñôèîáø", + "àå÷èåáø", + "ðåáîáø", + "ãöîáø", + + /* Day names */ + + "øàùåï", + "ùðé", + "ùìéùé", + "øáéòé", + "çîéùé", + "ùéùé", + "ùáú", + + /* CA-Cl*pper compatible natmsg items */ + + "âåãì òãëåï àçøåï îñ\' øùåîåú ÷áöé ðúåðéí", + "äàí áøöåðê ãåâîàåú ðåñôåú ?", + "òîåã îñ\'", + "** ñéëåí áéðééí **", + "* ñéëåí îéùðä *", + "*** ñä\"ë ***", + "Ins", + " ", + "úàøéê ùâåé", + " :úçåí îåúø", + " - ", + "ë/ì", + "INVALID EXPRESSION", + + /* Error description names */ + + "ùâéàä ìà éãåòä", + "Argument error", + "Bound error", + "String overflow", + "Numeric overflow", + "çìå÷ä áàôñ", + "Numeric error", + "ùâéàú úçáéø", + "Operation too complex", + "", + "", + "àéï îñôé÷ æëøåï", + "ôåð÷öéä ìà îåâãøú", + "No exported method", + "îùúðä ìà ÷ééí", + "Alias does not exist", + "No exported variable", + "Illegal characters in alias", + "Alias already in use", + "", + "ùâéàä áæîï éöéøú ÷åáõ", + "ùâéàä áæîï ôúéçä", + "ùâéàä áæîï ñâéøä", + "ùâéàä áæîï ÷øéàä", + "ùâéàä áæîï ëúéáä", + "ùâéàú äãôñä", + "", + "", + "", + "", + "ôòåìä æàú àéðä ðúîëú", + "Limit exceeded", + "àéð÷ñ îùåáù àå ìà ú÷éï", + "Data type error", + "Data width error", + "Workarea not in use", + "Workarea not indexed", + "Exclusive required", + "ãøåùä ðòéìä", + "ôòåìú ëúéáä àñåøä", + "Append lock failed", + "ôòåìú ðòéìä ðëùìä", + "", + "", + "", + "", + "îñôø ùâåé ùì ôøîèøéí", + "âéùä ìîòøê", + "array assign", + "ìà îòøê", + "conditional", + + /* Internal error names */ + + "Unrecoverable error %lu: ", + "Error recovery failure", + "No ERRORBLOCK() for error", + "Too many recursive error handler calls", + "RDD invalid or failed to load", + "Invalid method type from %s", + "hb_xgrab can't allocate memory", + "hb_xrealloc called with a NULL pointer", + "hb_xrealloc called with an invalid pointer", + "hb_xrealloc can't reallocate memory", + "hb_xfree called with an invalid pointer", + "hb_xfree called with a NULL pointer", + "Can\'t locate the starting procedure: \'%s\'", + "No starting procedure", + "Unsupported VM opcode", + "Symbol item expected from %s", + "Invalid symbol type for self from %s", + "Codeblock expected from %s", + "Incorrect item type on the stack trying to pop from %s", + "Stack underflow", + "An item was going to be copied to itself from %s", + "Invalid symbol item passed as memvar %s", + + /* Texts */ + + "DD-MM-YYYY", + "ë", + "ì" + } }; -char *hb_dateDaysName[ 7 ] = -{ - "øàùåï", - "ùðé", - "ùìéùé", - "øáéòé", - "çîéùé", - "ùéùé", - "ùáú" -}; +HB_LANG_ANNOUNCE( HEWIN ); + +HB_CALL_ON_STARTUP_BEGIN( hb_lang_Init_HEWIN ) + hb_langRegister( &s_lang ); +HB_CALL_ON_STARTUP_END( hb_lang_Init_HEWIN ) +#if ! defined(__GNUC__) && ! defined(_MSC_VER) + #pragma startup hb_lang_Init_HEWIN +#endif -char *hb_errorsGeneric[] = -{ - "ùâéàä ìà éãåòä", - "Argument error", - "Bound error", - "String overflow", - "Numeric overflow", - "çìå÷ä áàôñ", - "Numeric error", - "ùâéàú úçáéø", - "Operation too complex", - "", - "", - "àéï îñôé÷ æëøåï", - "ôåð÷öéä ìà îåâãøú", - "No exported method", - "îùúðä ìà ÷ééí", - "Alias does not exist", - "No exported variable", - "Illegal characters in alias", - "Alias already in use", - "", - "ùâéàä áæîï éöéøú ÷åáõ", - "ùâéàä áæîï ôúéçä", - "ùâéàä áæîï ñâéøä", - "ùâéàä áæîï ÷øéàä", - "ùâéàä áæîï ëúéáä", - "ùâéàú äãôñä", - "", - "", - "", - "", - "ôòåìä æàú àéðä ðúîëú", - "Limit exceeded", - "àéð÷ñ îùåáù àå ìà ú÷éï", - "Data type error", - "Data width error", - "Workarea not in use", - "Workarea not indexed", - "Exclusive required", - "ãøåùä ðòéìä", - "ôòåìú ëúéáä àñåøä", - "Append lock failed", - "ôòåìú ðòéìä ðëùìä", - "", - "", - "", - "îñôø ùâåé ùì ôøîèøéí", - "âéùä ìîòøê", - "array assign", - "ìà îòøê", - "conditional" -};