fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2001-12-16 14:20 UTC+0200 Chen Kedem <niki@actcom.co.il>

Browse Source
This commit is contained in:
Chen Kedem
2001-12-16 12:20:48 +00:00
parent 22763b075b
commit 43d3ce3406
5 changed files with 90 additions and 71 deletions
Download Patch File Download Diff File Expand all files Collapse all files

19
harbour/ChangeLog
View File

@@ -8,6 +8,23 @@
2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2001-12-16 14:20 UTC+0200 Chen Kedem <niki@actcom.co.il>
* doc/en/lang.txt
* HB_LANGSELECT() - Sort table according to language
+ HB_LANGSELECT() - Add missing languages: CSWIN, EO, HR852, HRISO
! Wrong comment Romanian --> Spanish
* doc/en/var.txt
* __ISMV() renamed to __MVEXIST()
(to reflect ChangeLog 2001-12-15 23:05 UTC+0100 Viktor Szakats)
* source/lang/msghewin.c
* Comment changed: Code Page 1255 is now Windows-1255
* source/lang/msgko.c
! Comment changed: KR --> KO
2001-12-16 12:07 UTC+0100 Viktor Szakats <viktor.szakats@syenar.hu>
* source/common/hbgete.c
@@ -3110,8 +3127,6 @@ e.vc
*Now Setbuild() return the command line to gcc(Linux and Os/2) insted of an response file
* source/pp/pragma.c
* contrib/dot/pp_harb.ch
* tests/inline_c.prg

114
harbour/doc/en/lang.txt
View File

@@ -21,44 +21,48 @@
* $ONELINER$
* Select a specific nation message module
* $SYNTAX$
* HB_LANGSELECT(<cNewLang>) --> cOldLang
* HB_LANGSELECT( <cNewLang> ) --> cOldLang
* $ARGUMENTS$
* <cNewLang> The ID of the country language module
* The possible values for <cNewLang> is below as is defined in the
* Lang library,sorted by language.
*
* <table>
* <cNewLang> Language Codepage
* EU Basque 850
* CS852 Czech 852
* CSISO Czech ISO-8859-2
* CSKAM Czech KAM
* CA Catalan 850
* EN English 437
* FR French 850
* GL Galician 850
* ID Indonesian 437
* DE German 850
* HE862 Hebrew 862
* HEWIN Hebrew 1255
* HU852 Hungarian 852
* HUCWI Hungarian CWI-2
* HUWIN Hungarian Windows-1
* IS85 Icelandic 850
* IT Italian 437
* KR Korean 949
* PL852 Polish 852
* PLISO Polish ISO-8859-1
* PLMAZ Polish Mozowia
* PT Portuguese 850
* RO Romanian 852
* SRISO Serbian ISO-8859-2
* SR852 Serbian 852
* ES Spanish 850
* RU866 Russian 866
* RUWIN Russian Windows-1251
* ZH_GB Chinese Simplified 936
* ZH_BIG5 Chinese Traditional 950
* Language Codepage <cNewLang>
* Basque 850 EU
* Catalan 850 CA
* Chinese Simplified 936 ZH_GB
* Chinese Traditional 950 ZH_BIG5
* Croatian 852 HR852
* Croatian ISO-8859-2 HRISO
* Czech 852 CS852
* Czech ISO-8859-2 CSISO
* Czech KAM CSKAM
* Czech Windows-1250 CSWIN
* English 437 EN
* Esperanto 850 EO
* French 850 FR
* Galician 850 GL
* German 850 DE
* Hebrew 862 HE862
* Hebrew Windows-1255 HEWIN
* Hungarian 852 HU852
* Hungarian CWI-2 HUCWI
* Hungarian Windows-1 HUWIN
* Icelandic 850 IS85
* Indonesian 437 ID
* Italian 437 IT
* Korean 949 KO
* Polish 852 PL852
* Polish ISO-8859-1 PLISO
* Polish Mozowia PLMAZ
* Portuguese 850 PT
* Romanian 852 RO
* Russian 866 RU866
* Russian Windows-1251 RUWIN
* Serbian 852 SR852
* Serbian ISO-8859-2 SRISO
* Spanish 850 ES
* </table>
* $RETURNS$
* <cOldLang> The old language indentifier
@@ -72,17 +76,16 @@
* REQUEST HB_LANG_RO
* REQUEST HB_LANG_ES
* FUNCTION MAIN()
* HB_LANGSELECT('PT') // Default language is now Portuguese
* ? CDOW(DATE()) //Segunda-feira
* ? 'Old language id selected is ",HB_LANGSELECT() // PT
* HB_LANGSELECT('RO') // Default language is now Romanian
* ? CMONTH(DATE()) // Mai
* HB_LANGSELECT( 'PT' ) // Default language is now Portuguese
* ? CDOW( DATE() ) // Segunda-feira
* ? 'Old language id selected is ", HB_LANGSELECT() // PT
* HB_LANGSELECT( 'RO' ) // Default language is now Romanian
* ? CMONTH( DATE() ) // Mai
* ? 'Old language id selected is ",HB_LANGSELECT() // RO
* HB_LANGSELECT('ES') // Default language is now Romanian
* ? CMONTH(DATE()) // Mayo
* ? CDOW(DATE()) // Lunes
*
* Return nil
* HB_LANGSELECT( 'ES' ) // Default language is now Spanish
* ? CMONTH( DATE() ) // Mayo
* ? CDOW( DATE() ) // Lunes
* RETURN NIL
* $TESTS$
* See tests/langapi.prg
* $STATUS$
@@ -106,29 +109,30 @@
* $ONELINER$
* Return the Name of the Current Language module in USE
* $SYNTAX$
* HB_LANGNAME() --> cLangName
* HB_LANGNAME() --> cLangName
* $ARGUMENTS$
* None.
* $RETURNS$
* <cLangName> Name of the Current language in use
* $DESCRIPTION$
* This function return the current name of the language module in use.
* This function return the current name of the language module in use.
* $EXAMPLES$
* REQUEST HB_LANG_PT
* REQUEST HB_LANG_RO
* REQUEST HB_LANG_ES
* FUNCTION MAIN()
* HB_LANGSELECT('PT') // Default language is now Portuguese
* ? CDOW(DATE()) //Segunda-feira
* ? 'Current language is ",HB_LANGNAME() //Portuguese
* ? 'Old language id selected is ",HB_LANGSELECT() // PT
* HB_LANGSELECT('RO') // Default language is now Romanian
* ? CMONTH(DATE()) // Mai
* ? 'Old language id selected is ",HB_LANGSELECT() // RO
* HB_LANGSELECT('ES') // Default language is now Romanian
* ? 'Current language is ",HB_LANGNAME() //Spanish
* ? CMONTH(DATE()) // Mayo
* ? CDOW(DATE()) // Lunes
* HB_LANGSELECT( 'PT' ) // Default language is now Portuguese
* ? CDOW( DATE() ) //Segunda-feira
* ? 'Current language is ", HB_LANGNAME() // Portuguese
* ? 'Old language id selected is ", HB_LANGSELECT() // PT
* HB_LANGSELECT( 'RO' ) // Default language is now Romanian
* ? CMONTH( DATE() ) // Mai
* ? 'Old language id selected is ",HB_LANGSELECT() // RO
* HB_LANGSELECT( 'ES' ) // Default language is now Spanish
* ? 'Current language is ",HB_LANGNAME() // Spanish
* ? CMONTH( DATE() ) // Mayo
* ? CDOW( DATE() ) // Lunes
* RETURN NIL
* $TESTS$
* See tests/langapi.prg
* $STATUS$

18
harbour/doc/en/var.txt
View File

@@ -16,7 +16,7 @@
* Documentation for: FIELDBLOCK(), FIELDWBLOCK()
*
* Copyright 2001 Chen Kedem <niki@actcom.co.il>
* Documentation for: __ISMV()
* Documentation for: __MVEXIST()
*
* See doc/license.txt for licensing terms.
*
@@ -401,17 +401,17 @@
/* $DOC$
* $FUNCNAME$
* __ISMV()
* __MVEXIST()
* $CATEGORY$
* Variable Management
* $ONELINER$
* Determine if a given name is a PUBLIC or PRIVATE memory variable
* $SYNTAX$
* __ISMV( <cVarName> ) --> <lVariableExist>
* __MVEXIST( <cVarName> ) --> <lVariableExist>
* $ARGUMENTS$
* <cVarName> - string that specifies the name of variable to check
* $RETURNS$
* __ISMV() return TRUE (.T.) if a MEMVAR named <cVarName> exist.
* __MVEXIST() return TRUE (.T.) if a MEMVAR named <cVarName> exist.
* $DESCRIPTION$
* This function determine if a PUBLIC or PRIVATE variable with the
* name <cVarName> exist or not.
@@ -420,11 +420,11 @@
* STATIC TheStatic
* PUBLIC ThePublic
* PRIVATE ThePrivate
* ? __ISMV( "NotExist" ) // .F.
* ? __ISMV( "TheLocal" ) // .F.
* ? __ISMV( "TheStatic" ) // .F.
* ? __ISMV( "ThePublic" ) // .T.
* ? __ISMV( "ThePrivate" ) // .T.
* ? __MVEXIST( "NotExist" ) // .F.
* ? __MVEXIST( "TheLocal" ) // .F.
* ? __MVEXIST( "TheStatic" ) // .F.
* ? __MVEXIST( "ThePublic" ) // .T.
* ? __MVEXIST( "ThePrivate" ) // .T.
* </fixed>
* $STATUS$
* R

2
harbour/source/lang/msghewin.c
View File

@@ -53,7 +53,7 @@
/* Language name: Hebrew - Windows */
/* ISO language code (2 chars): HE */
/* Codepage: 1255 */
/* Codepage: Windows-1255 */
#include "hbapilng.h"

8
harbour/source/lang/msgko.c
View File

@@ -4,7 +4,7 @@
/*
* Harbour Project source code:
* Language Support Module (KR)
* Language Support Module (KO)
*
* Copyright 2000 Kwon, Oh-Jun <ohjun@fivetech.net>
* www - http://www.harbour-project.org
@@ -50,9 +50,9 @@
*
*/
/* Language name: <Your language> */
/* ISO language code (2 chars): (please look it up in /doc/lang_id.txt) */
/* Codepage: <Your codepage> */
/* Language name: Korean */
/* ISO language code (2 chars): KO */
/* Codepage: 949 */
#include "hbapilng.h"