From 5ac2dcb0a55ef5d8e52cd68897b075bbfcca5748 Mon Sep 17 00:00:00 2001 From: Antonio Linares Date: Fri, 27 Jun 2003 10:09:12 +0000 Subject: [PATCH] .NET IL implementation for HB_P_PUSHBYTE --- harbour/source/compiler/gencli.c | 14 +++++++++----- 1 file changed, 9 insertions(+), 5 deletions(-) diff --git a/harbour/source/compiler/gencli.c b/harbour/source/compiler/gencli.c index 3cab8a0a71..b4a6d8d09c 100644 --- a/harbour/source/compiler/gencli.c +++ b/harbour/source/compiler/gencli.c @@ -1348,11 +1348,15 @@ static HB_GENC_FUNC( hb_p_pushfield ) static HB_GENC_FUNC( hb_p_pushbyte ) { - fprintf( cargo->yyc, "\tHB_P_PUSHBYTE, %i,", - pFunc->pCode[ lPCodePos + 1 ] ); - if( cargo->bVerbose ) fprintf( cargo->yyc, "\t/* %i */", - pFunc->pCode[ lPCodePos + 1 ] ); - fprintf( cargo->yyc, "\n" ); + fprintf( cargo->yyc, " ldc.i4.s %i\n", pFunc->pCode[ lPCodePos + 1 ] ); + fprintf( cargo->yyc, " box [mscorlib]System.Int32\n" ); + + // fprintf( cargo->yyc, "\tHB_P_PUSHBYTE, %i,", + // pFunc->pCode[ lPCodePos + 1 ] ); + // if( cargo->bVerbose ) fprintf( cargo->yyc, "\t/* %i */", + // pFunc->pCode[ lPCodePos + 1 ] ); + // fprintf( cargo->yyc, "\n" ); + return 2; }