fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity
Files
0164bf58ef73caaa6f3175bfa17ed23a7dcf57db
harbour-core/harbour/source/compiler/hbusage.c
Ron Pinkas 31f151b6ae 2000-06-06 20:10 UTC-0800 Ron Pinkas <Ron@Profit-Master.com> 
* source/compiler/cmdcheck.c
      + Implemented support for -m

    * include/hbcomp.h
      + Added structure _HARBVARS to hold Harbour Session Variables
      + Added structure +AUTOOPEN to hold names of external modules already compiled.

    * source/compiler/harbour.c
      + Moved the parsing/compiling logic into new hb_compCompile()
      + Added:
		static void hb_compAutoOpenAdd( char * szName );
		static BOOL hb_compAutoOpenFind( char * szName );
		static void hb_compSaveVars( PHARBVARS, int );
		static void hb_compRestoreVars( PHARBVARS, int );

    * source/compiler/harbour.l
      + Added:
		void * hb_compGet_YY_CURRENT_BUFFER()
		void hb_compSet_YY_CURRENT_BUFFER( void * pBuffer )
		int hb_compGet_yy_init( void )
		void hb_compSet_yy_init( int i )
		int hb_compGet_yy_start( void )
		void hb_compSet_yy_start( int i )
		int hb_compGet_yy_did_buffer_switch_on_eof( void )
		void hb_compSet_yy_did_buffer_switch_on_eof( int i )

     * source/compiler/harbour.y
       + Added logic to call hb_compCompile() when DO ... or DO ... WITH
       + Added:
		void * hb_compGet_pLoops( void )
		void hb_compSet_pLoops( void * pLoops )
		void * hb_compGet_rtvars( void )
		void hb_compSet_rtvars( void * rtvars )

      *	source/compiler/hbusage.c
	+ Added display of -m compiler switch

Please note:

1. Implementation is practicaly completed, but there is one known issue to be resolved: Once we open and compile
   an external module, the very next prg line in the parent prg is not processed, I would love to get some assistance
   with this - Ryszard, Antonio, Victor, Paul? as I am seriously limited with time over this week.
   It seems I am not saving one of Bison/Flex vars, so my restore of the previous session is not complete :-(

2. Clipper seem to have a bug, on the following code:
   DO WHILE WITH ...
   Clipper will attempt to compile external "WITH.PRG" instead of "WHILE.PRG", can any one advise if I am missing something here...
   In our implementation the above line will attemp to compile "WHILE.PRG"
2000-06-07 03:47:47 +00:00

143 lines
6.1 KiB
C
Raw Blame History

/*
* $Id$
*/
/*
* Harbour Project source code:
* Compile help & info related functions
*
* Copyright 1999 Victor Szakats <info@szelvesz.hu>
* 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/).
*
*/
#include "hbcomp.h"
/*
* Prints available options
*/
void hb_compPrintUsage( char * szSelf )
{
static const char * szOptions [] =
{
"\nOptions: %ca automatic memvar declaration",
"\n %cb debug info",
"\n %cd<id>[=<val>] #define <id>",
"\n %ces[<level>] set exit severity",
"\n %cg<type> output type generated is <type> (see below)",
"\n %cgc[<type>] output type: C source (.c) (default)",
"\n <type>: 0=compact, 1=normal, 2=verbose (default)",
"\n %cgo output type: Windows/DOS OBJ32 (.obj)",
"\n %cgh output type: Harbour Portable Object (.hrb)",
"\n %cgj output type: Java source (.java)",
"\n %ci<path> add #include file search path",
"\n %cj[0|1] Jump optimizer 0=disabled 1=enabled (default)",
"\n %cl suppress line number information",
"\n %cm compile module only",
"\n %cn no implicit starting procedure",
"\n %co<path> object file drive and/or path",
"\n %cp generate pre-processed output (.ppo) file",
"\n %cq quiet",
"\n %cq0 quiet and don't display program header",
/* TODO: "\n %cr[<lib>] request linker to search <lib> (or none)", */
"\n %cs syntax check only",
/* TODO: "\n %ct<path> path for temp file creation", */
"\n %cu[<file>] use command def set in <file> (or none)",
"\n %cv variables are assumed M->",
"\n %cw[<level>] set warning level number (0..3, default 1)",
"\n %cx[<prefix>] set symbol init function name prefix (for .c only)",
#ifdef YYDEBUG
"\n %cy trace lex & yacc activity",
#endif
"\n %cz suppress shortcutting (.and. & .or.)",
/* TODO: "\n @<file> compile list of modules in <file>", */
"\n"
};
int iLine;
printf( "\nSyntax: %s <file[s][.prg]> [options]"
"\n", szSelf );
for( iLine = 0; iLine < ( sizeof( szOptions ) / sizeof( char * ) ); iLine++ )
printf( szOptions[ iLine ], OS_OPT_DELIMITER_LIST[ 0 ] );
}
/*
* Prints credits
*/
void hb_compPrintCredits( void )
{
printf( "\n"
"Credits: The Harbour Team at www.harbour-project.org\n"
"\n"
"April White <awhite@user.rose.com>\n"
"Alejandro de Garate <alex_degarate@hotmail.com>\n"
"Alexander S. Kresin <alex@belacy.belgorod.su>\n"
"Andi Jahja <andij@aonlippo.co.id>\n"
"Antonio Linares <alinares@fivetech.com>\n"
"Bil Simser <bsimser@home.com>\n"
"Brian Hays <bhays@abacuslaw.com>\n"
"Bruno Cantero <bruno@issnet.net>\n"
"Chen Kedem <niki@actcom.co.il>\n"
"Dave Pearson <davep@davep.org>\n"
"David G. Holm <dholm@jsd-llc.com>\n"
"Davor Siklic <siki@msoft.cz>\n"
"Eddie Runia <eddie@runia.com>\n"
"Felipe G. Coury <fcoury@creation.com.br>\n"
"Gonzalo A. Diethelm <gonzalo.diethelm@iname.com>\n"
"Ignacio Ortiz de Zuniga <ignacio@fivetech.com>\n"
"Janica Lubos <janica@fornax.elf.stuba.sk>\n"
"Jose Lalin <dezac@corevia.com>\n"
"Leslee Griffith <les.griffith@vantagesystems.ca>\n"
"Luiz Rafael Culik <culik@sl.conex.net>\n"
"Manuel Ruiz <mrt@joca.es>\n"
"Matteo Baccan <baccan@isanet.it>\n"
"Matthew Hamilton <mhamilton@bunge.com.au>\n"
"Maurilio Longo <maurilio.longo@libero.it>\n"
"Nicolas del Pozo <niko@geroa.com>\n"
"Patrick Mast <harbour@winfakt.com>\n"
"Paul Tucker <ptucker@sympatico.ca>\n"
"Peter Townsend <cephas@tpgi.com.au>\n"
"Phil Barnett <philb@iag.net>\n"
"Ron Pinkas <ron@profit-master.com>\n"
"Ryszard Glab <rglab@imid.med.pl>\n"
"Tim Stone <timstone@mstrlink.com>\n"
"Victor Szakats <info@szelvesz.hu>\n"
"Vladimir Kazimirchik <v_kazimirchik@yahoo.com>\n"
);
}
/*
* Prints logo
*/
void hb_compPrintLogo( void )
{
printf( "Harbour Compiler %d.%d%s (Build %d) (%04d.%02d.%02d)\n",
HB_VER_MAJOR, HB_VER_MINOR, HB_VER_REVISION, HB_VER_BUILD, HB_VER_YEAR, HB_VER_MONTH, HB_VER_DAY );
printf( "Copyright 1999-2000, http://www.harbour-project.org\n" );
}
Reference in New Issue View Git Blame Copy Permalink