types and subtypes

 type Hours24 is new Integer range 0 .. 23;
 type Hours is new Integer range 1 .. 12;

Hours24 and Hours are different types.
You can not assignment Hours's var to Hours24 variables.

 type Hours24 is new Integer range 0 .. 23;
 subtype Hours is Hours24 range 1 .. 12;

Hours is subtype of Hours24.
You can assignment those variables, overwise
Can not over the range.

 a : Hours24 := 13;
 b : Hours24 := 15;
 c : Hours := 5;
 a := c; -- OK
 b := a; -- OK
 c := a; -- Error, out of the range
      • -

I had for gotten to set 'umask 022' when I changed a shell.
All directories I made recentlly are allowed group user to write.
'find ./target_dir -type d -exec chmod g-w {} \;' to fix it.
overwise, I had mistook that was I had changged files permission.
Now I think about security policy of them.
I just fixed my cvs repository

chmod 0664
- CVSROOT/history
- CVSROOT/val-tag

That may have other problems.