diff --git a/src/precord.c b/src/precord.c index a32203a212..15afac4b81 100644 --- a/src/precord.c +++ b/src/precord.c @@ -356,7 +356,7 @@ Obj ElmPRec ( return GET_ELM_PREC( rec, i ); else { ErrorReturnVoid( - "Record: '.%g' must have an assigned value", + "Record Element: '.%g' must have an assigned value", (Int)NAME_RNAM(rnam), 0L, "you can 'return;' after assigning a value" ); return ELM_REC( rec, rnam ); @@ -424,7 +424,7 @@ void AssPRec ( // Accept T_PREC and T_COMOBJ, reject T_PREC+IMMUTABLE if (TNUM_OBJ(rec) == T_PREC+IMMUTABLE) { ErrorReturnVoid( - "Records Assignment: must be a mutable record", + "Record Assignment: must be a mutable record", 0L, 0L, "you can 'return;' and ignore the assignment" ); } diff --git a/src/records.c b/src/records.c index dd9f90bc62..bb5dd61c10 100644 --- a/src/records.c +++ b/src/records.c @@ -414,7 +414,7 @@ Int IsbRecError ( UInt rnam ) { rec = ErrorReturnObj( - "IsBound: must be a record (not a %s)", + "Record IsBound: must be a record (not a %s)", (Int)TNAM_OBJ(rec), 0L, "you can replace via 'return ;'" ); return ISB_REC( rec, rnam ); @@ -509,7 +509,7 @@ void UnbRecError ( UInt rnam ) { rec = ErrorReturnObj( - "Unbind: must be a record (not a %s)", + "Record Unbind: must be a record (not a %s)", (Int)TNAM_OBJ(rec), 0L, "you can replace via 'return ;'" ); UNB_REC( rec, rnam ); diff --git a/tst/testinstall/function.tst b/tst/testinstall/function.tst index 8be2e83cb7..3d45d0b231 100644 --- a/tst/testinstall/function.tst +++ b/tst/testinstall/function.tst @@ -91,7 +91,7 @@ gap> Info(InfoWarning, 1000, f()); gap> r.(f()); Error, Function call: must return a value gap> r.(g()); -Error, Record: '.2' must have an assigned value +Error, Record Element: '.2' must have an assigned value gap> (function() end)(); gap> (function() return 2; end)(); 2 diff --git a/tst/testinstall/recordname.tst b/tst/testinstall/recordname.tst index 9de95cff74..2a83884e0f 100644 --- a/tst/testinstall/recordname.tst +++ b/tst/testinstall/recordname.tst @@ -10,9 +10,9 @@ rec( x := 2 ) gap> Unbind(x.x); Error, Record Unbind: must be a mutable record gap> x.y := 2; -Error, Records Assignment: must be a mutable record +Error, Record Assignment: must be a mutable record gap> x.x := 2; -Error, Records Assignment: must be a mutable record +Error, Record Assignment: must be a mutable record gap> r := rec(x := 2, y := 3); rec( x := 2, y := 3 ) gap> r.x;