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

2009-10-15 18:01 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/src/compiler/genc.c
  * harbour/src/compiler/compi18n.c
    * use "w' instead of "wb" in hb_fopen flags. It causes that in some
      systems like DOS or Windows if CRTL supports it then all \n in
      generated files will be automatically translated to native EOLs
      (\r\n).
      This modification should make .pot and .c files generated by
      Harbour compiler more readable for DOS and Windows users.

  * harbour/src/compiler/gencobj.c
    ! fixed wrong hb_fopen() flags 't' is not documented fopen() flag
      so some systems may refuse to open files when it's used.
This commit is contained in:
Przemyslaw Czerpak
2009-10-15 16:01:39 +00:00
parent 3bba486c12
commit 92f0efd1c9
4 changed files with 17 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
harbour/ChangeLog
View File

@@ -17,6 +17,20 @@
past entries belonging to author(s): Viktor Szakats.
*/
2009-10-15 18:01 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/src/compiler/genc.c
* harbour/src/compiler/compi18n.c
* use "w' instead of "wb" in hb_fopen flags. It causes that in some
systems like DOS or Windows if CRTL supports it then all \n in
generated files will be automatically translated to native EOLs
(\r\n).
This modification should make .pot and .c files generated by
Harbour compiler more readable for DOS and Windows users.
* harbour/src/compiler/gencobj.c
! fixed wrong hb_fopen() flags 't' is not documented fopen() flag
so some systems may refuse to open files when it's used.
2009-10-15 17:14 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
* src/common/hbver.c
* src/rtl/fstemp.c

2
harbour/src/compiler/compi18n.c
View File

@@ -327,7 +327,7 @@ BOOL hb_compI18nSave( HB_COMP_DECL, BOOL fFinal )
hb_fsFNameMerge( szFileName, &FileName );
file = hb_fopen( szFileName, "wb" );
file = hb_fopen( szFileName, "w" );
if( ! file )
{

2
harbour/src/compiler/genc.c
View File

@@ -170,7 +170,7 @@ void hb_compGenCCode( HB_COMP_DECL, PHB_FNAME pFileName ) /* generates the
pFileName->szExtension = ".c";
hb_fsFNameMerge( szFileName, pFileName );
yyc = hb_fopen( szFileName, "wb" );
yyc = hb_fopen( szFileName, "w" );
if( ! yyc )
{
hb_compGenError( HB_COMP_PARAM, hb_comp_szErrors, 'E', HB_COMP_ERR_CREATE_OUTPUT, szFileName, NULL );

2
harbour/src/compiler/gencobj.c
View File

@@ -165,7 +165,7 @@ void hb_compGenCObj( HB_COMP_DECL, PHB_FNAME pFileName )
if( pszEnv && *hb_searchpath( pszCfgFileName, pszEnv, pszTemp ) )
{
filecfg = hb_fopen( pszTemp, "rt" );
filecfg = hb_fopen( pszTemp, "r" );
if( ! filecfg )
{
hb_compGenError( HB_COMP_PARAM, hb_comp_szErrors, 'E', HB_COMP_ERR_OPEN_CFG, szFileName, NULL );