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

2009-12-31 03:17 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/include/hbapicdp.h
  * harbour/src/codepage/Makefile
  - harbour/src/codepage/ucyuscii.c
  + harbour/src/codepage/uc646_yu.c
  * harbour/src/codepage/cphr437.c
  * harbour/src/codepage/cpsl437.c
    * renamed internal unicode table name YUSCII->ISO-646-YU
This commit is contained in:
Przemyslaw Czerpak
2009-12-31 02:18:15 +00:00
parent bbd5bcb2e2
commit 8075ce48bf
6 changed files with 19 additions and 10 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
harbour/ChangeLog
View File

@@ -17,6 +17,15 @@
past entries belonging to author(s): Viktor Szakats.
*/
2009-12-31 03:17 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/include/hbapicdp.h
* harbour/src/codepage/Makefile
- harbour/src/codepage/ucyuscii.c
+ harbour/src/codepage/uc646_yu.c
* harbour/src/codepage/cphr437.c
* harbour/src/codepage/cpsl437.c
* renamed internal unicode table name YUSCII->ISO-646-YU
2009-12-30 21:22 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/src/nortl/nortl.c
! added hb_xtraced()

6
harbour/include/hbapicdp.h
View File

@@ -179,7 +179,7 @@ typedef struct _HB_CODEPAGE
#define HB_CPID_ATARIST "atarist"
#define HB_CPID_NEXTSTEP "nextstep"
#define HB_CPID_USASCII "us-ascii"
#define HB_CPID_YUSCII "yuscii"
#define HB_CPID_646YU "iso646-yu"
#define HB_UNITB_437 &hb_uniTbl_437
#define HB_UNITB_737 &hb_uniTbl_737
@@ -244,7 +244,7 @@ typedef struct _HB_CODEPAGE
#define HB_UNITB_ATARIST &hb_uniTbl_ATARIST
#define HB_UNITB_NEXTSTEP &hb_uniTbl_NEXTSTEP
#define HB_UNITB_USASCII &hb_uniTbl_USASCII
#define HB_UNITB_YUSCII &hb_uniTbl_YUSCII
#define HB_UNITB_646YU &hb_uniTbl_646YU
#define HB_UNITB_UNDEF NULL /* ((PHB_UNITABLE) (-1)) */
extern HB_UNITABLE hb_uniTbl_437;
@@ -310,7 +310,7 @@ extern HB_UNITABLE hb_uniTbl_10081;
extern HB_UNITABLE hb_uniTbl_ATARIST;
extern HB_UNITABLE hb_uniTbl_NEXTSTEP;
extern HB_UNITABLE hb_uniTbl_USASCII;
extern HB_UNITABLE hb_uniTbl_YUSCII;
extern HB_UNITABLE hb_uniTbl_646YU;
extern HB_EXPORT PHB_CODEPAGE hb_vmCDP( void );
extern HB_EXPORT void hb_vmSetCDP( PHB_CODEPAGE pCDP );

2
harbour/src/codepage/Makefile
View File

@@ -98,6 +98,7 @@ C_SOURCES := \
uc1256.c \
uc1257.c \
uc1258.c \
uc646_yu.c \
uc737.c \
uc775.c \
uc850.c \
@@ -150,7 +151,6 @@ C_SOURCES := \
ucmacrom.c \
ucmactrk.c \
ucnext.c \
ucyuscii.c \
LIBNAME := hbcpage

4
harbour/src/codepage/cphr437.c
View File

@@ -51,8 +51,8 @@
*/
#define HB_CP_ID HR437
#define HB_CP_INFO "Croatian YUSCII"
#define HB_CP_UNITB HB_UNITB_YUSCII
#define HB_CP_INFO "Croatian ISO-646 (CROSCII)"
#define HB_CP_UNITB HB_UNITB_646YU
#define HB_CP_ACSORT HB_CDP_ACSORT_NONE
#define HB_CP_UPPER "ABC^]D\\EFGHIJKLMNOPQRS[TUVWZ@XY"
#define HB_CP_LOWER "abc~}d|efghijklmnopqrs{tuvwz`xy"

4
harbour/src/codepage/cpsl437.c
View File

@@ -52,8 +52,8 @@
*/
#define HB_CP_ID SL437
#define HB_CP_INFO "Slovenian YUSCII"
#define HB_CP_UNITB HB_UNITB_YUSCII
#define HB_CP_INFO "Slovenian ISO-646 (SLOSCII)"
#define HB_CP_UNITB HB_UNITB_646YU
#define HB_CP_ACSORT HB_CDP_ACSORT_NONE
#define HB_CP_UPPER "ABC^]D\\EFGHIJKLMNOPQRS[TUVWZ@XY"
#define HB_CP_LOWER "abc~}d|efghijklmnopqrs{tuvwz`xy"

4
harbour/src/codepage/ucyuscii.c → harbour/src/codepage/uc646_yu.c
View File

@@ -4,7 +4,7 @@
/*
* Harbour Project source code:
* YUSCII <-> Unicode conversion table
* ISO-646-YU / YUSCII / CROSCII / SLOSCII <-> Unicode conversion table
*
* Copyright 2009 Przemyslaw Czerpak <druzus / at / priv.onet.pl>
* www - http://www.harbour-project.org
@@ -90,4 +90,4 @@ static const HB_WCHAR s_uniCodes[ NUMBER_OF_CHARS ] =
0x00B0, 0x2219, 0x00B7, 0x221A, 0x207F, 0x00B2, 0x25A0, 0x00A0
};
HB_UNITABLE hb_uniTbl_YUSCII = { HB_CPID_YUSCII, s_uniCodes, NULL, 0 };
HB_UNITABLE hb_uniTbl_646YU = { HB_CPID_646YU, s_uniCodes, NULL, 0 };