mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-11-24 10:33:22 +03:00
added /sys.kelvin and %kelvin mark
This commit is contained in:
parent
d5ec02c801
commit
87b7f0513e
20
pkg/arvo/mar/kelvin.hoon
Normal file
20
pkg/arvo/mar/kelvin.hoon
Normal file
@ -0,0 +1,20 @@
|
||||
=> |%
|
||||
+$ kelvin [lal=@tas num=@ud]
|
||||
--
|
||||
|_ kel=kelvin
|
||||
++ grow
|
||||
|%
|
||||
++ mime [/text/x-kelvin (as-octs:mimes:html hoon)]
|
||||
++ noun kel
|
||||
++ hoon (crip "{<[lal num]:kel>}\0a")
|
||||
++ txt (to-wain:format hoon)
|
||||
--
|
||||
++ grab
|
||||
|%
|
||||
++ noun kelvin
|
||||
++ mime
|
||||
|= [=mite len=@ud tex=@]
|
||||
!<(kelvin (slap !>(~) (ream tex)))
|
||||
--
|
||||
++ grad %noun
|
||||
--
|
1
pkg/arvo/sys.kelvin
Normal file
1
pkg/arvo/sys.kelvin
Normal file
@ -0,0 +1 @@
|
||||
[%zuse 420]
|
Loading…
Reference in New Issue
Block a user