← Back to branch summary

~ubuntu-branches/ubuntu/quantal/texmacs/quantal

« back to all changes in this revision

Viewing changes to src/Guile/Scheme/object.cpp

  • Committer: Bazaar Package Importer
  • Author(s): Atsuhito KOHDA
  • Date: 2010-04-23 07:09:40 UTC
  • mfrom: (4.1.8 squeeze)
  • Revision ID: james.westby@ubuntu.com-20100423070940-72mjdmdepfgrvo8f
Tags: 1:1.0.7.4-2
Re-upload, former upload failed with wrong diff.gz perhaps.

Show diffs side-by-side

added added

removed removed

Lines of Context:
src/Guile/Scheme/object.cpp
52
52
* Routines on objects
53
53
******************************************************************************/
54
54
 
55
 
ostream&
56
 
operator << (ostream& out, object obj) {
 
55
tm_ostream&
 
56
operator << (tm_ostream& out, object obj) {
57
57
  out.flush ();
58
58
  if (out == cout) call ("write", obj);
59
59
  else if (out == cerr) call ("write-err", obj);
270
270
public:
271
271
  object_command_rep (object obj2): obj (obj2) {}
272
272
  void apply () { (void) call_scheme (obj->lookup ()); }
273
 
  ostream& print (ostream& out) { return out << obj; }
 
273
  tm_ostream& print (tm_ostream& out) { return out << obj; }
274
274
};
275
275
 
276
276
command
282
282
  object obj;
283
283
public:
284
284
  object_promise_widget_rep (object obj2): obj (obj2) {}
285
 
  ostream& print (ostream& out) { return out << obj; }
 
285
  tm_ostream& print (tm_ostream& out) { return out << obj; }
286
286
  widget eval () {
287
287
    SCM result= call_scheme (obj->lookup ());
288
288
    if (scm_is_widget (result)) return scm_to_widget (result);