Click above to get retro games delivered to your door ever month!

 _evalNew()
 Initialize an EVALINFO structure for use
------------------------------------------------------------------------------
 C Prototype

     #include "item.api"
     BOOL _evalNew(
                    EVALINFOP evalInfoP,
                    ITEM itemEval
                  )

 Arguments

     evalInfoP is the structure to initialize.

     itemEval is a character or block Item that is to be evaluated.

 Returns

     TRUE if successful.

 Description

     The _evalNew() function resets an EVALINFO structure for evaluation of a
     code block or routine name.  If itemEval is a character Item, it is
     assumed to be the symbol name of a routine to execute.  Otherwise,
     itemEval is assumed to be a valid code block.

 Examples

     /*
     * USERDO()
     * --------
     */

     CLIPPER userDO( void )
     {
        EVALINFO info;
        USHORT   uiParam;
        ITEM     retP;

        /* Get evaluation expression */

        if ( PCOUNT < 1 )
        {
           _ret();
           return;
        }
        else
        {
           _evalNew( &info, _itemParam( 1 ) );
        }

        /* Get parameters */

        for ( uiParam=2; uiParam <= PCOUNT; uiParam++ )
        {
           _evalPutParam( &info, _itemParam(uiParam) );
        }

        /* Launch evaluation information */

        retP = _evalLaunch( &info );

        /* Release ITEMs associated w/eval info */

        _evalRelease( &info );

        _itemReturn ( retP );
        _itemRelease( retP );

        return;
     }

 Files:  Library is CLIPPER.LIB, header file is Item.api.