192 lines
5.0 KiB
C
192 lines
5.0 KiB
C
/*
|
||
* $Id$
|
||
*/
|
||
|
||
/*
|
||
* Harbour Project source code:
|
||
* Language Support Module (IS850)
|
||
*
|
||
* Copyright 2000 Victor Szakats <info@szelvesz.hu> (English, from msgen.c)
|
||
* Copyright 2000 David G. Holm <dholm@jsd-llc.com> (Icelandic)
|
||
* 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: Icelandic */
|
||
/* ISO language code (2 chars): IS */
|
||
/* Codepage: 850 */
|
||
|
||
#include "hbapilng.h"
|
||
|
||
static HB_LANG s_lang =
|
||
{
|
||
{
|
||
/* Identification */
|
||
|
||
"IS850", /* ID */
|
||
"Icelandic", /* Name (in English) */
|
||
"Öslenska", /* Name (in native language) */
|
||
"IS", /* RFC ID */
|
||
"850", /* Codepage */
|
||
"$Revision$ $Date$", /* Version */
|
||
|
||
/* Month names */
|
||
|
||
"Jan£ar",
|
||
"Febr£ar",
|
||
"Mars",
|
||
"Apr¡ll",
|
||
"Ma¡",
|
||
"Jun¡",
|
||
"Jul¡",
|
||
"µg£st",
|
||
"September",
|
||
"Okt¢ber",
|
||
"N¢vember",
|
||
"Desember",
|
||
|
||
/* Day names */
|
||
|
||
"Sunnudagur",
|
||
"M nudagur",
|
||
"èriÐjudagur",
|
||
"MiÐvikudagur",
|
||
"Fimmtudagur",
|
||
"F”studagur",
|
||
"Laugardagur",
|
||
|
||
/* CA-Cl*pper compatible natmsg items */
|
||
|
||
"Gagnagrunnar Skr artal S¡Ðast Breytt St‘rÐ",
|
||
"Viltu fleyri pr¢fanir?",
|
||
"Blads¡Ða",
|
||
"** Subtotal **",
|
||
"* Subsubtotal *",
|
||
"*** Samtals ***",
|
||
"Ins",
|
||
" ",
|
||
"R”ng dagsetning",
|
||
"Range: ",
|
||
" - ",
|
||
"J/N",
|
||
"àGILD EXPRESSION",
|
||
|
||
/* Error description names */
|
||
|
||
"Unknown error",
|
||
"Argument error",
|
||
"Bound error",
|
||
"String overflow",
|
||
"Numeric overflow",
|
||
"Zero divisor",
|
||
"Numeric error",
|
||
"Syntax error",
|
||
"Operation too complex",
|
||
"",
|
||
"",
|
||
"Memory low",
|
||
"Undefined function",
|
||
"No exported method",
|
||
"Variable does not exist",
|
||
"Alias does not exist",
|
||
"No exported variable",
|
||
"Illegal characters in alias",
|
||
"Alias already in use",
|
||
"",
|
||
"Create error",
|
||
"Open error",
|
||
"Close error",
|
||
"Read error",
|
||
"Write error",
|
||
"Print error",
|
||
"",
|
||
"",
|
||
"",
|
||
"",
|
||
"Operation not supported",
|
||
"Limit exceeded",
|
||
"Corruption detected",
|
||
"Data type error",
|
||
"Data width error",
|
||
"Workarea not in use",
|
||
"Workarea not indexed",
|
||
"Exclusive required",
|
||
"Lock required",
|
||
"Write not allowed",
|
||
"Append lock failed",
|
||
"Lock Failure",
|
||
"",
|
||
"",
|
||
"",
|
||
"",
|
||
"array access",
|
||
"array assign",
|
||
"array dimension",
|
||
"not an array",
|
||
"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 */
|
||
|
||
"YYYY-MM-DD",
|
||
"J",
|
||
"N"
|
||
}
|
||
};
|
||
|
||
HB_LANG_ANNOUNCE( IS850 );
|
||
|
||
HB_CALL_ON_STARTUP_BEGIN( hb_lang_Init_IS850 )
|
||
hb_langRegister( &s_lang );
|
||
HB_CALL_ON_STARTUP_END( hb_lang_Init_IS850 )
|
||
#if ! defined(__GNUC__) && ! defined(_MSC_VER)
|
||
#pragma startup hb_lang_Init_IS850
|
||
#endif
|
||
|