1
0
mirror of https://github.com/DoctorWkt/pdp7-unix.git synced 2026-01-13 15:27:39 +00:00

Add missing dput to .rename

This commit is contained in:
Warren Toomey 2016-03-16 11:24:56 +10:00
parent 937fea0d47
commit 320dd0418f
2 changed files with 4 additions and 0 deletions

View File

@ -178,6 +178,7 @@
dac mode " save for access call
jms access " access OK? (or return error to user)
jms copy; 1:0; d.name; 4 " copy new name into directory entry
jms dput " and write it to disk
jmp okexit
" time system call returns line (mains) frequency ticks

View File

@ -210,6 +210,9 @@ sub print_direntry {
$links = MAXINT - $links + 1;
$uid = -1 if ( $uid == MAXINT );
# Warn about empty filename
$name= "EMPTY FILENAME" if ($name=~ m{/$});
printf( "%4d %s%s%s%s%s %2d %3d %5d %s\n",
$inum, $p1, $p2, $p3, $p4, $p5, $links, $uid, $size, $name );
}