Sophie

Sophie

distrib > Fedora > 15 > i386 > by-pkgid > 7ebd25ac536d248d499a3ce2acda963a > files > 2362

Macaulay2-1.3.1-8.fc15.i686.rpm

-- -*- M2-comint -*- {* hash: -832437980 *}

i1 : code Thing#{Standard,Print}

o1 = /builddir/build/BUILD/Macaulay2-1.3.1-r10737/Macaulay2/m2/robust.m2:130:28-146:19: --source code:
     Thing#{Standard,Print} = x -> (
          oprompt := concatenate(interpreterDepth:"o", toString lineNumber, " = ");
          save := printWidth;
          if printWidth != 0 then printWidth = printWidth - #oprompt;
          z := robustNet x;
          wrapper := lookup(symbol Wrap,class x);
          if wrapper =!= null then (
               fun := () -> z = wrapper z;
               try timelimit(printingTimeLimit, fun)
               else (
                    alarm 0;
                    global debugError <- fun;
                    stderr << "--error or time limit reached in applying Wrap method to output; type 'debugError()' to see it" << endl << endl);
               );
          << endl << oprompt << z << endl;
          printWidth = save;
          )

i2 :