void MmaSink::put(const Variable& x) { #ifdef DEBUG_MMASINK GBStream << "sink:variable " << this << x.cstring() << '\n'; #endif MLPutFunction(d_mlink,"ToExpression",1L); MLPutString(d_mlink,x.cstring()); #ifdef DEBUG_MMASINK checkforerror(); #endif ++d_count; };
void NCASink::put(const Variable& x) { d_ofs << x.cstring(); };