diff --git a/lib/object.gi b/lib/object.gi index c6daaf015c..61f5e36a6b 100644 --- a/lib/object.gi +++ b/lib/object.gi @@ -384,7 +384,13 @@ InstallMethod( PrintObj, true, [ HasName ], SUM_FLAGS, # override anything specific - function ( obj ) Print( Name( obj ) ); end ); + function( obj ) + if ISBOUND_GLOBAL( Name( obj ) ) then + Print( Name( obj ) ); + else + TryNextMethod(); + fi; + end ); ############################################################################# diff --git a/tst/teststandard/simplegrpit.tst b/tst/teststandard/simplegrpit.tst index 9fa1c7de31..9942db199d 100644 --- a/tst/teststandard/simplegrpit.tst +++ b/tst/teststandard/simplegrpit.tst @@ -41,7 +41,7 @@ PSL(2,59) # gap> it := SimpleGroupsIterator(20000,80000:NOPSL2);; -gap> for g in it do Print(g,"\n"); od; +gap> for g in it do View( g ); Print( "\n" ); od; A8 PSL(3,4) PSp(4,3) @@ -50,7 +50,7 @@ PSU(3,4) gap> IsDoneIterator(it); true gap> it:=SimpleGroupsIterator(1053927211015007279,1053927211015007281);; -gap> for g in it do Print(g,"\n"); od; +gap> for g in it do View( g ); Print( "\n" ); od; PSL(3,179) #