mirror of
https://github.com/jackfoxy/urQL.git
synced 2024-08-16 23:30:51 +03:00
refactor to 80 character lines
This commit is contained in:
parent
95a14bd6b1
commit
385110e0a8
3215
urql/lib/parse.hoon
3215
urql/lib/parse.hoon
File diff suppressed because it is too large
Load Diff
@ -37,9 +37,9 @@
|
||||
::
|
||||
:: command component types
|
||||
::
|
||||
+$ value-literal-list
|
||||
+$ value-literals
|
||||
$:
|
||||
%value-literal-list
|
||||
%value-literals
|
||||
dime
|
||||
==
|
||||
+$ ordered-column
|
||||
@ -94,7 +94,7 @@
|
||||
+$ ops-and-conjs
|
||||
?(ternary-op binary-op unary-op all-any-op conjunction)
|
||||
+$ predicate-component
|
||||
?(ops-and-conjs qualified-column dime value-literal-list aggregate)
|
||||
?(ops-and-conjs qualified-column dime value-literals aggregate)
|
||||
+$ predicate (tree predicate-component)
|
||||
+$ datum $%(qualified-column dime)
|
||||
+$ datum-or-scalar $@(datum scalar-function)
|
||||
@ -319,6 +319,11 @@
|
||||
+$ matching-action ?(%insert %update %delete)
|
||||
+$ matching-profile
|
||||
$%([%insert (list [@t datum])] [%update (list [@t datum])] %delete)
|
||||
+$ matching-lists
|
||||
$: matched=(list matching)
|
||||
not-target=(list matching)
|
||||
not-source=(list matching)
|
||||
==
|
||||
::
|
||||
:: $truncate-table:
|
||||
+$ truncate-table
|
||||
|
@ -1766,7 +1766,7 @@
|
||||
[[%qualified-column [%qualified-object ~ 'UNKNOWN' 'COLUMN' 'A1'] 'species' ~] ~ ~]
|
||||
++ a2-species
|
||||
[[%qualified-column [%qualified-object ~ 'UNKNOWN' 'COLUMN' 'A2'] 'species' ~] ~ ~]
|
||||
++ value-literal-list [[%value-literal-list %ud '3;2;1'] ~ ~]
|
||||
++ value-literals [[%value-literals %ud '3;2;1'] ~ ~]
|
||||
++ aggregate-count-foobar
|
||||
[%aggregate function='count' source=[%qualified-column qualifier=[%qualified-object ship=~ database='UNKNOWN' namespace='COLUMN-OR-CTE' name='foobar'] column='foobar' alias=~]]
|
||||
++ literal-10 [[%ud 10] ~ ~]
|
||||
@ -1776,9 +1776,9 @@
|
||||
++ foobar-lte-bar [%lte foobar bar]
|
||||
++ foo-eq-1 [%eq foo [[%ud 1] ~ ~]]
|
||||
++ t1-foo-gt-foo2 [%gt t1-foo foo2]
|
||||
++ t2-bar-in-list [%in t2-bar value-literal-list]
|
||||
++ t2-bar-in-list [%in t2-bar value-literals]
|
||||
++ t1-foo2-eq-zod [%eq t1-foo2 [[%p 0] ~ ~]]
|
||||
++ t1-foo3-lt-any-list [%lt t1-foo3 [%any value-literal-list ~]]
|
||||
++ t1-foo3-lt-any-list [%lt t1-foo3 [%any value-literals ~]]
|
||||
::
|
||||
:: re-used predicates with conjunctions
|
||||
++ and-fb-gte-f--fb-lte-b [%and foobar-gte-foo foobar-lte-bar]
|
||||
@ -1962,7 +1962,7 @@
|
||||
" WHERE T1.foo not in (1,2,3) ".
|
||||
" SELECT *"
|
||||
=/ joinpred=(tree predicate-component:ast) [%eq t1-foo t2-bar]
|
||||
=/ pred=(tree predicate-component:ast) [%not [%in t1-foo value-literal-list] ~]
|
||||
=/ pred=(tree predicate-component:ast) [%not [%in t1-foo value-literals] ~]
|
||||
=/ expected
|
||||
[%transform ctes=~ [[%query [~ [%from object=[%table-set object=[%qualified-object ship=~ database='db1' namespace='dbo' name='adoptions'] alias=[~ 'T1']] joins=~[[%joined-object join=%join object=[%table-set object=[%qualified-object ship=~ database='db1' namespace='dbo' name='adoptions'] alias=[~ 'T2']] predicate=`joinpred]]]] scalars=~ `pred group-by=~ having=~ select-all-columns ~] ~ ~]]
|
||||
%+ expect-eq
|
||||
@ -1984,7 +1984,7 @@
|
||||
" WHERE T1.foo in (1,2,3) ".
|
||||
" SELECT *"
|
||||
=/ joinpred=(tree predicate-component:ast) [%eq t1-foo t2-bar]
|
||||
=/ pred=(tree predicate-component:ast) [%in t1-foo value-literal-list]
|
||||
=/ pred=(tree predicate-component:ast) [%in t1-foo value-literals]
|
||||
=/ expected
|
||||
[%transform ctes=~ [[%query [~ [%from object=[%table-set object=[%qualified-object ship=~ database='db1' namespace='dbo' name='adoptions'] alias=[~ 'T1']] joins=~[[%joined-object join=%join object=[%table-set object=[%qualified-object ship=~ database='db1' namespace='dbo' name='adoptions'] alias=[~ 'T2']] predicate=`joinpred]]]] scalars=~ `pred group-by=~ having=~ select-all-columns ~] ~ ~]]
|
||||
%+ expect-eq
|
||||
|
Loading…
Reference in New Issue
Block a user