shared<Shader> Shader::create(std::string vertContents, std::string fragContents)
{
shared<Shader> rtn(new Shader(vertContents, fragContents));
return rtn;
}
void *SafeRecurseCG( func_sr rtn, void *arg )
/**********************************************/
{
return( rtn( arg ) );
}
void TestStateMachine03::stateFunc15(const LCreal)
{
std::cout << "rtn()";
rtn();
}
XMLObject FIATQuadratureAdapter::toXML() const
{
XMLObject rtn("FIATQuadrature");
rtn.addAttribute("order", Teuchos::toString(order()));
return rtn;
}
IntVectSet coarsen(const IntVectSet& ivs, int iref)
{
IntVectSet rtn(ivs);
rtn.coarsen(iref);
return rtn;
}
void TestStateMachine01::anyStateFunc(const LCreal)
{
switch (getState()) {
case INIT_STATE : {
std::cout << "next()";
next();
break;
}
case 1 : {
std::cout << "next()";
next();
break;
}
case 2 : {
std::cout << "goTo(4)";
goTo(4);
break;
}
case 3 : {
std::cout << "Should NOT be here!";
break;
}
case 4 : {
if (getMode() != RTN_STATE) {
std::cout << "call(CALL_01)";
call(CALL_01);
}
else {
std::cout << "Returned from call(); next()";
next();
}
break;
}
case 5 : {
std::cout << "goTo(99)";
goTo(99);
break;
}
case 11 : {
std::cout << "next()";
next();
break;
}
case 12 : {
std::cout << "next()";
next();
break;
}
case 13 : {
if (getMode() != RTN_STATE) {
std::cout << "call(CALL_02,arg=13)";
Basic::Number* arg = new Basic::Integer(13);
call(CALL_02, arg);
arg->unref();
}
else {
std::cout << "Returned from call; ";
const Basic::Boolean* arg = dynamic_cast<const Basic::Boolean*>( getArgument() );
if (arg != nullptr) {
std::cout << "arg(" << arg->getBoolean() << "); ";
}
std::cout << "next()";
next();
}
break;
}
case 14 : {
std::cout << "next()";
next();
break;
}
case 15 : {
std::cout << "rtn()";
rtn();
break;
}
case 21 : {
const Basic::Number* arg = dynamic_cast<const Basic::Number*>( getArgument() );
if (arg != nullptr) {
std::cout << "arg(" << arg->getReal() << "); ";
}
std::cout << "next()";
next();
break;
}
case 22 : {
std::cout << "next()";
next();
break;
}
case 23 : {
std::cout << "rtn(arg=true)";
Basic::Boolean* arg = new Basic::Boolean(true);
rtn(arg);
arg->unref();
break;
}
case 99 : {
if (getMode() == NEW_STATE) {
std::cout << "Finished;";
}
break;
}
};
}
IntVectSet grow(const IntVectSet& ivs, int igrow)
{
IntVectSet rtn(ivs);
rtn.grow(igrow);
return rtn;
}
IntVectSet refine(const IntVectSet& ivs, int iref)
{
IntVectSet rtn(ivs);
rtn.refine(iref);
return rtn;
}
static InternedString mangleName(InternedString id, llvm::StringRef private_name,
InternedStringPool& interned_strings) {
InternedString rtn(id);
mangleNameInPlace(rtn, private_name, interned_strings);
return rtn;
}
static bool PartIntersect( reg_tree *part,
reg_tree *whole,
hw_reg_set (*rtn)( hw_reg_set ) )
/****************************************************************/
{
bool change;
int i;
int j;
hw_reg_set *src;
hw_reg_set *dst;
hw_reg_set curr;
hw_reg_set tmp;
change = false;
if( whole->idx != RL_NUMBER_OF_SETS ) {
if( part->idx == RL_NUMBER_OF_SETS ) {
/* build a register for part consisting of the Hi/Lo parts of whole*/
part->regs = AllocRegSet();
part->idx = RL_;
src = whole->regs;
dst = part->regs;
for( i = REG_COUNT; i > 0; --i ) {
*dst++ = rtn( *src++ );
}
}
/* check that all Hi/Lo parts of whole are contained in part*/
src = whole->regs;
for( i = REG_COUNT; i > 0; --i ) {
if( !HW_CEqual( *src, HW_EMPTY ) ) {
curr = rtn( *src );
if( !HW_CEqual( curr, HW_EMPTY ) ) {
dst = part->regs;
for( j = REG_COUNT; j > 0; --j ) {
if( HW_Equal( *dst, curr ) ) {
break;
}
++dst;
}
if( j == 0 ) {
HW_CAsgn( *src, HW_EMPTY );
change = true;
}
} else {
HW_CAsgn( *src, HW_EMPTY );
change = true;
}
}
++src;
}
/* check that each reg in part is a Hi/Lo part in whole*/
src = part->regs;
for( i = REG_COUNT; i > 0; --i ) {
curr = *src;
if( !HW_CEqual( curr, HW_EMPTY ) ) {
dst = whole->regs;
for( j = REG_COUNT; j > 0; --j ) {
if( !HW_CEqual( *dst, HW_EMPTY ) ) {
tmp = rtn( *dst );
if( HW_Equal( curr, tmp ) ) {
break;
}
}
++dst;
}
if( j == 0 ) {
HW_CAsgn( *src, HW_EMPTY );
change = true;
}
}
++src;
}
}
return( change );
}
#/* <?php echo "Hello PHP *".'/'."#\n"; exit(); ?>*/
#ifdef __cplusplus // \
'echo' "Hello shell" ; exit ; import sys
#include <iostream>
#define p(hello, lang) std::cout << hello << " " << lang << "++" << std::endl;
#else
#include <stdio.h>
#define p(hello, lang) printf(hello " " lang "\n");
#endif // \
dummy, LANG, rtn = ('''
int main () //''', 'Python{}'.format(sys.version_info.major), lambda n:n)
#define LANG "C" // \
def p(a, b): print(' '.join((a, b)))
{
p("Hello", LANG)
#define rtn(n) return n; //\
,
rtn(0)
}
inline int sgn(const db& x){rtn (x>+eps)-(x<-eps);}
static void DoWndDump( a_window *wnd, WRITERTN *rtn, handle file )
{
int row;
int piece;
wnd_line_piece line;
int indent_per_char;
int chars_written;
int indent_pos;
char *font;
gui_ord gadget_len;
char *p;
char buff[TXT_LEN];
// int len;
int i;
font = WndGetFontInfo( wnd );
gadget_len = MaxGadgetLength;
MaxGadgetLength = ( strlen( WndGadgetArray[0].chars ) + 1 ) * WndAvgCharX( wnd );
WndSetSysFont( wnd, TRUE );
indent_per_char = WndAvgCharX( wnd );
// len = WndGetTitle( wnd, buff, TXT_LEN );
WndGetTitle( wnd, buff, TXT_LEN );
p = TxtBuff;
for( i = 0; i < 7; ++i ) {
*p++ = '=';
}
*p++ = '|';
*p++ = ' ';
p = StrCopy( buff, p );
*p++ = ' ';
*p++ = '|';
for( i = 0; i < 7; ++i ) {
*p++ = '=';
}
*p = '\0';
rtn( file, TxtBuff );
for( row = -WndTitleSize( wnd );; ++row ) {
p = buff;
chars_written = 0;
for( piece = 0; ; ++piece ) {
if( !WndGetLineAbs( wnd, row, piece, &line ) )
break;
indent_pos = line.indent / indent_per_char;
while( indent_pos > chars_written ) {
p = StrCopy( " ", p );
++chars_written;
}
if( line.bitmap ) {
line.text = WndGadgetArray[(int)line.text[0]].chars;
line.length = strlen( line.text );
}
p = StrCopy( line.text, p );
chars_written += line.length;
}
if( piece == 0 )
break;
rtn( file, buff );
}
MaxGadgetLength = gadget_len;
if( font != NULL )
WndSetFontInfo( wnd, font );
GUIMemFree( font );
}
