dbug: attempt to render lane details

This commit is contained in:
Fang 2020-05-19 22:50:59 +02:00
parent 2671fe71df
commit 239892b26d
No known key found for this signature in database
GPG Key ID: EB035760C1BBA972

View File

@ -470,7 +470,17 @@
|= [direct=? =lane]
%- pairs
:~ 'direct'^b+direct
'lane'^?-(-.lane %& (ship p.lane), %| s+(scot %x p.lane))
::
:- 'lane'
?- -.lane
%& (ship p.lane)
::
%|
?~ l=((soft ,[=@tas =@if =@ud]) (cue p.lane))
s+(scot %x p.lane)
=, u.l
(tape "%{(trip tas)}, {(scow %if if)}, {(scow %ud ud)}")
==
==
::
:- 'qos'