diff --git a/harbour/include/hbcomp.h b/harbour/include/hbcomp.h index a75b529606..2caccc1f77 100644 --- a/harbour/include/hbcomp.h +++ b/harbour/include/hbcomp.h @@ -6,7 +6,7 @@ * Harbour Project source code: * Header file for the Harbour Compiler * - * Copyright 1999 Antonio Linares + * Copyright 1999 Antonio Linares * www - http://www.harbour-project.org * * This program is free software; you can redistribute it and/or modify @@ -77,6 +77,7 @@ extern "C" { typedef enum { LANG_C, /* C language (by default) */ + LANG_CLI, /* .NET IL language */ LANG_OBJ32, /* DOS/Windows 32 bits */ LANG_JAVA, /* Java */ LANG_PORT_OBJ, /* Portable objects */ diff --git a/harbour/source/compiler/cmdcheck.c b/harbour/source/compiler/cmdcheck.c index a484796eb8..f3feb52834 100644 --- a/harbour/source/compiler/cmdcheck.c +++ b/harbour/source/compiler/cmdcheck.c @@ -580,6 +580,10 @@ void hb_compChkEnvironVar( char * szSwitch ) hb_comp_iLanguage = LANG_PORT_OBJ; break; + case 'i': + case 'I': + hb_comp_iLanguage = LANG_CLI; + break; case 'o': case 'O': diff --git a/harbour/source/compiler/harbour.c b/harbour/source/compiler/harbour.c index a243e5c5f5..46849a6ab5 100644 --- a/harbour/source/compiler/harbour.c +++ b/harbour/source/compiler/harbour.c @@ -6,7 +6,7 @@ * Harbour Project source code: * Compiler main file * - * Copyright 1999 Antonio Linares + * Copyright 1999 Antonio Linares * www - http://www.harbour-project.org * * This program is free software; you can redistribute it and/or modify @@ -3832,6 +3832,10 @@ static void hb_compGenOutput( int iLanguage ) hb_compGenCCode( hb_comp_pFileName ); break; + case LANG_CLI: + hb_compGenILCode( hb_comp_pFileName ); + break; + case LANG_OBJ32: hb_compGenObj32( hb_comp_pFileName ); break; diff --git a/harbour/source/compiler/hbusage.c b/harbour/source/compiler/hbusage.c index ddbf3766a9..c7ca7a3d34 100644 --- a/harbour/source/compiler/hbusage.c +++ b/harbour/source/compiler/hbusage.c @@ -72,6 +72,7 @@ void hb_compPrintUsage( char * szSelf ) "\n %cgw output type: Windows/DOS OBJ32 (.obj)", "\n %cgh output type: Harbour Portable Object (.hrb)", "\n %cgj output type: Java source (.java)", + "\n %cgi output type: .NET platform (.il)", "\n %ci #include file search path", "\n %ck compilation mode (type -k? for more data)", "\n %cl suppress line number information", @@ -142,7 +143,7 @@ void hb_compPrintCredits( void ) "April White \n" "Alejandro de Garate \n" "Alexander S. Kresin \n" - "Antonio Linares \n" + "Antonio Linares \n" "Bil Simser \n" "Brian Hays \n" "Bruno Cantero \n"