# HG changeset patch # User Claus Gittinger # Date 1138052495 -3600 # Node ID e5ba0dc84a53b64cd4caf8c197ee77c523fe62b1 # Parent ad6967cff1b42b5f0f9787935deca1d18659e474 *** empty log message *** diff -r ad6967cff1b4 -r e5ba0dc84a53 Integer.st --- a/Integer.st Mon Jan 23 22:41:11 2006 +0100 +++ b/Integer.st Mon Jan 23 22:41:35 2006 +0100 @@ -907,8 +907,10 @@ ! printStringRoman + "return my roman printString; + almost the same as romanPrintString:" + "funny - although the romans did not have negative numbers - squeak has" - self negative ifTrue:[ ^ '-' , self negated romanPrintString ]. @@ -3498,7 +3500,7 @@ !Integer class methodsFor:'documentation'! version - ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.178 2006-01-23 21:41:11 cg Exp $' + ^ '$Header: /cvs/stx/stx/libbasic/Integer.st,v 1.179 2006-01-23 21:41:35 cg Exp $' ! ! Integer initialize!