Skip to content
Open
Show file tree
Hide file tree
Changes from all commits
Commits
File filter

Filter by extension

Filter by extension

Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
18 changes: 9 additions & 9 deletions crates/jockt/hoon/tests/lib/class-ops.hoon
Original file line number Diff line number Diff line change
Expand Up @@ -6,16 +6,16 @@
|%
++ text
'compose\0a class Point(x:@ y:@) {\0a add(p:(x:@ y:@)) -> Point {\0a (x + p.x\0a y + p.y)\0a }\0a }\0a;\0a\0alet point_1 = Point(14 104);\0apoint_1 = point_1.add(28 38);\0a(point_1.x() point_1.y())\0a\0a/*\0a!=\0a=> mini=mini\0a=>\0a ^= door\0a |_ [x=@ y=@]\0a ++ add\0a |= p=[x=@ y=@]\0a [(add:mini x x.p) (add:mini y y.p)]\0a --\0a=/ point_1\0a ~(. door [14 104])\0a=. point_1 ~(. door (add:point_1 [28 38]))\0a[+12 +13]:point_1\0a\0a!=\0a=> mini=mini\0a=>\0a ^= door\0a |_ [x=@ y=@]\0a ++ add\0a |= p=[x=@ y=@]\0a [(add:mini x x.p) (add:mini y y.p)]\0a --\0a~(. door [14 104])\0a*/\0a'
++ test-tokenize
%+ expect-eq:test
!> ~[[%keyword %compose] [%keyword %class] [%type 'Point'] [%punctuator %'(('] [%name %x] [%punctuator %':'] [%punctuator %'@'] [%name %y] [%punctuator %':'] [%punctuator %'@'] [%punctuator %')'] [%punctuator %'{'] [%name %add] [%punctuator %'(('] [%name %p] [%punctuator %':'] [%punctuator %'('] [%name %x] [%punctuator %':'] [%punctuator %'@'] [%name %y] [%punctuator %':'] [%punctuator %'@'] [%punctuator %')'] [%punctuator %')'] [%punctuator %'-'] [%punctuator %'>'] [%type 'Point'] [%punctuator %'{'] [%punctuator %'('] [%name %x] [%punctuator %'+'] [%name %p] [%punctuator %'.'] [%name %x] [%name %y] [%punctuator %'+'] [%name %p] [%punctuator %'.'] [%name %y] [%punctuator %')'] [%punctuator %'}'] [%punctuator %'}'] [%punctuator %';'] [%keyword %let] [%name %point_1] [%punctuator %'='] [%type 'Point'] [%punctuator %'(('] [%literal [[%number p=14] q=%.n]] [%literal [[%number p=104] q=%.n]] [%punctuator %')'] [%punctuator %';'] [%name %point_1] [%punctuator %'='] [%name %point_1] [%punctuator %'.'] [%name %add] [%punctuator %'(('] [%literal [[%number p=28] q=%.n]] [%literal [[%number p=38] q=%.n]] [%punctuator %')'] [%punctuator %';'] [%punctuator %'('] [%name %point_1] [%punctuator %'.'] [%name %x] [%punctuator %'(('] [%punctuator %')'] [%name %point_1] [%punctuator %'.'] [%name %y] [%punctuator %'(('] [%punctuator %')'] [%punctuator %')']]
!> (rash text parse-tokens:jock)
++ test-tokenize
%+ expect-eq:test
!> ~[[%keyword %compose] [%keyword %class] [%type 'Point'] [%punctuator %'(('] [%name %x] [%punctuator %':'] [%punctuator %'@'] [%name %y] [%punctuator %':'] [%punctuator %'@'] [%punctuator %')'] [%punctuator %'{'] [%name %add] [%punctuator %'(('] [%name %p] [%punctuator %':'] [%punctuator %'('] [%name %x] [%punctuator %':'] [%punctuator %'@'] [%name %y] [%punctuator %':'] [%punctuator %'@'] [%punctuator %')'] [%punctuator %')'] [%punctuator %'-'] [%punctuator %'>'] [%type 'Point'] [%punctuator %'{'] [%punctuator %'('] [%name %x] [%punctuator %'+'] [%name %p] [%punctuator %'.'] [%name %x] [%name %y] [%punctuator %'+'] [%name %p] [%punctuator %'.'] [%name %y] [%punctuator %')'] [%punctuator %'}'] [%punctuator %'}'] [%punctuator %';'] [%keyword %let] [%name %point-1] [%punctuator %'='] [%type 'Point'] [%punctuator %'(('] [%literal [[%number p=14] q=%.n]] [%literal [[%number p=104] q=%.n]] [%punctuator %')'] [%punctuator %';'] [%name %point-1] [%punctuator %'='] [%name %point-1] [%punctuator %'.'] [%name %add] [%punctuator %'(('] [%literal [[%number p=28] q=%.n]] [%literal [[%number p=38] q=%.n]] [%punctuator %')'] [%punctuator %';'] [%punctuator %'('] [%name %point-1] [%punctuator %'.'] [%name %x] [%punctuator %'(('] [%punctuator %')'] [%name %point-1] [%punctuator %'.'] [%name %y] [%punctuator %'(('] [%punctuator %')'] [%punctuator %')']]
!> (rash text parse-tokens:jock)
::
++ test-jeam
%+ expect-eq:test
!> ^- jock:jock
[%compose p=[%class state=[p=[%state p=[[p=[p=[%atom p=%number q=%.n] name='x'] q=[p=[%atom p=%number q=%.n] name='y']] name='']] name='Point'] arms=[n=[p=%add q=[%method type=[p=[%core p=[%.y p=[inp=[~ [[p=[p=[%atom p=%number q=%.n] name='x'] q=[p=[%atom p=%number q=%.n] name='y']] name='p']] out=[p=[%limb p=~[[%type p='Point']]] name='Point']]] q=~] name='add'] body=[%lambda p=[arg=[inp=[~ [[p=[p=[%atom p=%number q=%.n] name='x'] q=[p=[%atom p=%number q=%.n] name='y']] name='p']] out=[p=[%limb p=~[[%type p='Point']]] name='Point']] body=[p=[%operator op=%'+' a=[%limb p=~[[%name p=%x]]] b=[~ [%limb p=~[[%name p=%p] [%name p=%x]]]]] q=[%operator op=%'+' a=[%limb p=~[[%name p=%y]]] b=[~ [%limb p=~[[%name p=%p] [%name p=%y]]]]]] context=~]]]] l=~ r=~]] q=[%let type=[p=[%none p=~] name='point_1'] val=[%call func=[%limb p=~[[%type p='Point']]] arg=[~ [p=[%atom p=[[%number p=14] q=%.n]] q=[%atom p=[[%number p=104] q=%.n]]]]] next=[%edit limb=~[[%name p=%point_1]] val=[%call func=[%limb p=~[[%name p=%point_1] [%name p=%add]]] arg=[~ [p=[%atom p=[[%number p=28] q=%.n]] q=[%atom p=[[%number p=38] q=%.n]]]]] next=[p=[%call func=[%limb p=~[[%name p=%point_1] [%name p=%x]]] arg=~] q=[%call func=[%limb p=~[[%name p=%point_1] [%name p=%y]]] arg=~]]]]]
!> (jeam:jock text)
++ test-jeam
%+ expect-eq:test
!> ^- jock:jock
[%compose p=[%class state=[p=[%state p=[[p=[p=[%atom p=%number q=%.n] name='x'] q=[p=[%atom p=%number q=%.n] name='y']] name='']] name='Point'] arms=[n=[p=%add q=[%method type=[p=[%core p=[%.y p=[inp=[~ [[p=[p=[%atom p=%number q=%.n] name='x'] q=[p=[%atom p=%number q=%.n] name='y']] name='p']] out=[p=[%limb p=~[[%type p='Point']]] name='Point']]] q=~] name='add'] body=[%lambda p=[arg=[inp=[~ [[p=[p=[%atom p=%number q=%.n] name='x'] q=[p=[%atom p=%number q=%.n] name='y']] name='p']] out=[p=[%limb p=~[[%type p='Point']]] name='Point']] body=[p=[%operator op=%'+' a=[%limb p=~[[%name p=%x]]] b=[~ [%limb p=~[[%name p=%p] [%name p=%x]]]]] q=[%operator op=%'+' a=[%limb p=~[[%name p=%y]]] b=[~ [%limb p=~[[%name p=%p] [%name p=%y]]]]]] context=~]]]] l=~ r=~]] q=[%let type=[p=[%none p=~] name='point_1'] val=[%call func=[%limb p=~[[%type p='Point']]] arg=[~ [p=[%atom p=[[%number p=14] q=%.n]] q=[%atom p=[[%number p=104] q=%.n]]]]] next=[%edit limb=~[[%name p=%point-1]] val=[%call func=[%limb p=~[[%name p=%point-1] [%name p=%add]]] arg=[~ [p=[%atom p=[[%number p=28] q=%.n]] q=[%atom p=[[%number p=38] q=%.n]]]]] next=[p=[%call func=[%limb p=~[[%name p=%point-1] [%name p=%x]]] arg=~] q=[%call func=[%limb p=~[[%name p=%point-1] [%name p=%y]]] arg=~]]]]]
!> (jeam:jock text)
::
++ test-mint
%+ expect-eq:test
Expand Down
18 changes: 9 additions & 9 deletions crates/jockt/hoon/tests/lib/class-state.hoon
Original file line number Diff line number Diff line change
Expand Up @@ -6,16 +6,16 @@
|%
++ text
'compose\0a class Point(x:@ y:@) {\0a inc(q:@) -> @ {\0a +(q)\0a }\0a }\0a;\0a\0alet point_1 = Point(70 80);\0alet point_2 = Point(90 100);\0a((point_2.x() point_2.y()) (point_1.x() point_1.y()))\0a\0a/*\0a!=\0a=> mini=mini\0a=>\0a ^= door\0a |_ [x=@ y=@]\0a ++ add\0a |= p=[x=@ y=@]\0a [(add:mini x x.p) (add:mini y y.p)]\0a ++ inc\0a |= q=@\0a +(q)\0a --\0a=/ point_1\0a ~(. door [70 80])\0a=/ point_2\0a ~(. door [90 100])\0a[[+13 +12]:point_2 [+13 +12]:point_1]\0a*/\0a'
++ test-tokenize
%+ expect-eq:test
!> ~[[%keyword %compose] [%keyword %class] [%type 'Point'] [%punctuator %'(('] [%name %x] [%punctuator %':'] [%punctuator %'@'] [%name %y] [%punctuator %':'] [%punctuator %'@'] [%punctuator %')'] [%punctuator %'{'] [%name %inc] [%punctuator %'(('] [%name %q] [%punctuator %':'] [%punctuator %'@'] [%punctuator %')'] [%punctuator %'-'] [%punctuator %'>'] [%punctuator %'@'] [%punctuator %'{'] [%punctuator %'+'] [%punctuator %'('] [%name %q] [%punctuator %')'] [%punctuator %'}'] [%punctuator %'}'] [%punctuator %';'] [%keyword %let] [%name %point_1] [%punctuator %'='] [%type 'Point'] [%punctuator %'(('] [%literal [[%number p=70] q=%.n]] [%literal [[%number p=80] q=%.n]] [%punctuator %')'] [%punctuator %';'] [%keyword %let] [%name %point_2] [%punctuator %'='] [%type 'Point'] [%punctuator %'(('] [%literal [[%number p=90] q=%.n]] [%literal [[%number p=100] q=%.n]] [%punctuator %')'] [%punctuator %';'] [%punctuator %'('] [%punctuator %'('] [%name %point_2] [%punctuator %'.'] [%name %x] [%punctuator %'(('] [%punctuator %')'] [%name %point_2] [%punctuator %'.'] [%name %y] [%punctuator %'(('] [%punctuator %')'] [%punctuator %')'] [%punctuator %'('] [%name %point_1] [%punctuator %'.'] [%name %x] [%punctuator %'(('] [%punctuator %')'] [%name %point_1] [%punctuator %'.'] [%name %y] [%punctuator %'(('] [%punctuator %')'] [%punctuator %')'] [%punctuator %')']]
!> (rash text parse-tokens:jock)
++ test-tokenize
%+ expect-eq:test
!> ~[[%keyword %compose] [%keyword %class] [%type 'Point'] [%punctuator %'(('] [%name %x] [%punctuator %':'] [%punctuator %'@'] [%name %y] [%punctuator %':'] [%punctuator %'@'] [%punctuator %')'] [%punctuator %'{'] [%name %inc] [%punctuator %'(('] [%name %q] [%punctuator %':'] [%punctuator %'@'] [%punctuator %')'] [%punctuator %'-'] [%punctuator %'>'] [%punctuator %'@'] [%punctuator %'{'] [%punctuator %'+'] [%punctuator %'('] [%name %q] [%punctuator %')'] [%punctuator %'}'] [%punctuator %'}'] [%punctuator %';'] [%keyword %let] [%name %point-1] [%punctuator %'='] [%type 'Point'] [%punctuator %'(('] [%literal [[%number p=70] q=%.n]] [%literal [[%number p=80] q=%.n]] [%punctuator %')'] [%punctuator %';'] [%keyword %let] [%name %point-2] [%punctuator %'='] [%type 'Point'] [%punctuator %'(('] [%literal [[%number p=90] q=%.n]] [%literal [[%number p=100] q=%.n]] [%punctuator %')'] [%punctuator %';'] [%punctuator %'('] [%punctuator %'('] [%name %point-2] [%punctuator %'.'] [%name %x] [%punctuator %'(('] [%punctuator %')'] [%name %point-2] [%punctuator %'.'] [%name %y] [%punctuator %'(('] [%punctuator %')'] [%punctuator %')'] [%punctuator %'('] [%name %point-1] [%punctuator %'.'] [%name %x] [%punctuator %'(('] [%punctuator %')'] [%name %point-1] [%punctuator %'.'] [%name %y] [%punctuator %'(('] [%punctuator %')'] [%punctuator %')'] [%punctuator %')']]
!> (rash text parse-tokens:jock)
::
++ test-jeam
%+ expect-eq:test
!> ^- jock:jock
[%compose p=[%class state=[p=[%state p=[[p=[p=[%atom p=%number q=%.n] name='x'] q=[p=[%atom p=%number q=%.n] name='y']] name='']] name='Point'] arms=[n=[p=%inc q=[%method type=[p=[%core p=[%.y p=[inp=[~ [p=[%atom p=%number q=%.n] name='q']] out=[p=[%atom p=%number q=%.n] name='']]] q=~] name='inc'] body=[%lambda p=[arg=[inp=[~ [p=[%atom p=%number q=%.n] name='q']] out=[p=[%atom p=%number q=%.n] name='']] body=[%increment val=[%limb p=~[[%name p=%q]]]] context=~]]]] l=~ r=~]] q=[%let type=[p=[%none p=~] name='point_1'] val=[%call func=[%limb p=~[[%type p='Point']]] arg=[~ [p=[%atom p=[[%number p=70] q=%.n]] q=[%atom p=[[%number p=80] q=%.n]]]]] next=[%let type=[p=[%none p=~] name='point_2'] val=[%call func=[%limb p=~[[%type p='Point']]] arg=[~ [p=[%atom p=[[%number p=90] q=%.n]] q=[%atom p=[[%number p=100] q=%.n]]]]] next=[p=[p=[%call func=[%limb p=~[[%name p=%point_2] [%name p=%x]]] arg=~] q=[%call func=[%limb p=~[[%name p=%point_2] [%name p=%y]]] arg=~]] q=[p=[%call func=[%limb p=~[[%name p=%point_1] [%name p=%x]]] arg=~] q=[%call func=[%limb p=~[[%name p=%point_1] [%name p=%y]]] arg=~]]]]]]
!> (jeam:jock text)
++ test-jeam
%+ expect-eq:test
!> ^- jock:jock
[%compose p=[%class state=[p=[%state p=[[p=[p=[%atom p=%number q=%.n] name='x'] q=[p=[%atom p=%number q=%.n] name='y']] name='']] name='Point'] arms=[n=[p=%inc q=[%method type=[p=[%core p=[%.y p=[inp=[~ [p=[%atom p=%number q=%.n] name='q']] out=[p=[%atom p=%number q=%.n] name='']]] q=~] name='inc'] body=[%lambda p=[arg=[inp=[~ [p=[%atom p=%number q=%.n] name='q']] out=[p=[%atom p=%number q=%.n] name='']] body=[%increment val=[%limb p=~[[%name p=%q]]]] context=~]]]] l=~ r=~]] q=[%let type=[p=[%none p=~] name='point_1'] val=[%call func=[%limb p=~[[%type p='Point']]] arg=[~ [p=[%atom p=[[%number p=70] q=%.n]] q=[%atom p=[[%number p=80] q=%.n]]]]] next=[%let type=[p=[%none p=~] name='point_2'] val=[%call func=[%limb p=~[[%type p='Point']]] arg=[~ [p=[%atom p=[[%number p=90] q=%.n]] q=[%atom p=[[%number p=100] q=%.n]]]]] next=[p=[p=[%call func=[%limb p=~[[%name p=%point-2] [%name p=%x]]] arg=~] q=[%call func=[%limb p=~[[%name p=%point-2] [%name p=%y]]] arg=~]] q=[p=[%call func=[%limb p=~[[%name p=%point-1] [%name p=%x]]] arg=~] q=[%call func=[%limb p=~[[%name p=%point-1] [%name p=%y]]] arg=~]]]]]]
!> (jeam:jock text)
::
++ test-mint
%+ expect-eq:test
Expand Down
10 changes: 5 additions & 5 deletions crates/jockt/hoon/tests/lib/hoon-alias.hoon

Large diffs are not rendered by default.

10 changes: 5 additions & 5 deletions crates/jockt/hoon/tests/lib/hoon-arithmetic.hoon

Large diffs are not rendered by default.

Loading