mb_pop_real

status_t mb_pop_real( mb_interpreter_t* s, void** l, real_t* val )

This function pops a REAL parameter from the interpreter.

Example

/////////////////////////////////////////////////////////////////////////////

//

int _core_timer( mb_interpreter_t* s, void** l )

  {

  int   result = MB_FUNC_OK;

  float time;

  mb_assert( s && l );

  mb_check( mb_attempt_func_begin( s, l ) );

  mb_check( mb_pop_real( s, l, &time ) );

  mb_check( mb_attempt_func_end( s, l ) );

  if ( !_start_timer( s, time, FALSE ) )

     {

     _set_current_error( s, SE_RN_TIMER_ERROR );

     _set_error_pos( s, ((_object_t*)((_ls_node_t*)*l)->data)->source_row, ((_object_t*)((_ls_node_t*)*l)->data)->source_row );

     return MB_FUNC_ERR;

     }

  endif

  return result;

  }

endfunc