github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-05-03 06:39:17 +00:00
Code Issues Releases Wiki Activity

Make the KLFEDR command LISTF map in the directory.

Browse Source 
Or else it will not see the files.
This commit is contained in:
Lars Brinkhoff
2019-06-30 15:06:46 +02:00
parent 997a5fd31d
commit e01ac1d70a
1 changed files with 3 additions and 1 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
src/syseng/klfedr.84
View File

@@ -1494,7 +1494,9 @@ TAPOPN: .CALL [ SETZ
;DIRECTORY LISTER ;DIRECTORY LISTER
LISTF: PUSHJ P,LISTF0 LISTF: PUSHJ P,MAPDIR
.VALUE
PUSHJ P,LISTF0
PUSHJ P,SHDIRE ;MATCHES, PRINT IT PUSHJ P,SHDIRE ;MATCHES, PRINT IT
JRST POPJ1 JRST POPJ1