Merge branch 'next/groups'

This commit is contained in:
Hunter Miller 2022-07-06 11:38:24 -05:00
commit c8a5824576
2 changed files with 28134 additions and 11101 deletions

File diff suppressed because it is too large Load Diff

View File

@ -679,20 +679,19 @@
=/ update-log =/ update-log
(~(get by update-logs) [ship term]) (~(get by update-logs) [ship term])
:- ~ :- ~ :- %noun :- ~ :- ~ :- %noun
!>
?+ t.t.t.t.path (on-peek:def path) ?+ t.t.t.t.path (on-peek:def path)
~ ~
^- update-log:store !> ^- update-log:store
?~(update-log *update-log:store u.update-log) ?~(update-log *update-log:store u.update-log)
:: ::
[%latest ~] [%latest ~]
^- (unit time) !> ^- (unit time)
%+ biff update-log %+ biff update-log
|= =update-log:store |= =update-log:store
(bind (pry:orm-log:store update-log) head) (bind (pry:orm-log:store update-log) head)
:: ::
[%subset @ @ ~] [%subset @ @ ~]
^- update-log:store !> ^- update-log:store
?~ update-log *update-log:store ?~ update-log *update-log:store
=* start i.t.t.t.t.t.path =* start i.t.t.t.t.t.path
=* end i.t.t.t.t.t.t.path =* end i.t.t.t.t.t.t.path