Repair dict "named" generation
This commit is contained in:
parent
bdd699ae9f
commit
7d06c7dce0
|
@ -308,7 +308,7 @@ function parsePattern(name: symbol, body0: Array<Input>): Pattern {
|
||||||
M.NamedSimplePattern.named,
|
M.NamedSimplePattern.named,
|
||||||
M.NamedSimplePattern.anonymous,
|
M.NamedSimplePattern.anonymous,
|
||||||
walkSimple,
|
walkSimple,
|
||||||
k)(vp)
|
strip(k))(vp)
|
||||||
])));
|
])));
|
||||||
} else {
|
} else {
|
||||||
complain();
|
complain();
|
||||||
|
|
|
@ -1,5 +1,5 @@
|
||||||
´³schema·³version‘³definitions·³Ref´³rec´³lit³ref„´³tupleµ´³named³module´³refµ„³
|
´³schema·³version‘³definitions·³Ref´³rec´³lit³ref„´³tupleµ´³named³module´³refµ„³
|
||||||
ModulePath„„´³named³name´³atom³Symbol„„„„„³Bundle´³rec´³lit³bundle„´³tupleµ´³named³modules´³refµ„³Modules„„„„„³Schema´³rec´³lit³schema„´³tupleµ´³dict·³version´³refµ„³Version„³definitions´³refµ„³Definitions„³embeddedType´³refµ„³EmbeddedTypeName„„„„„„³Modules´³dictof´³refµ„³
|
ModulePath„„´³named³name´³atom³Symbol„„„„„³Bundle´³rec´³lit³bundle„´³tupleµ´³named³modules´³refµ„³Modules„„„„„³Schema´³rec´³lit³schema„´³tupleµ´³dict·³version´³named³version´³refµ„³Version„„³definitions´³named³definitions´³refµ„³Definitions„„³embeddedType´³named³embeddedType´³refµ„³EmbeddedTypeName„„„„„„„³Modules´³dictof´³refµ„³
|
||||||
ModulePath„´³refµ„³Schema„„³Pattern´³orµµ±
SimplePattern´³refµ„³
SimplePattern„„µ±CompoundPattern´³refµ„³CompoundPattern„„„„³Version´³lit‘„³AtomKind´³orµµ±Boolean´³lit³Boolean„„µ±Float´³lit³Float„„µ±Double´³lit³Double„„µ±
SignedInteger´³lit³
SignedInteger„„µ±String´³lit³String„„µ±
|
ModulePath„´³refµ„³Schema„„³Pattern´³orµµ±
SimplePattern´³refµ„³
SimplePattern„„µ±CompoundPattern´³refµ„³CompoundPattern„„„„³Version´³lit‘„³AtomKind´³orµµ±Boolean´³lit³Boolean„„µ±Float´³lit³Float„„µ±Double´³lit³Double„„µ±
SignedInteger´³lit³
SignedInteger„„µ±String´³lit³String„„µ±
|
||||||
ByteString´³lit³
|
ByteString´³lit³
|
||||||
ByteString„„µ±Symbol´³lit³Symbol„„„„³
|
ByteString„„µ±Symbol´³lit³Symbol„„„„³
|
||||||
|
|
Loading…
Reference in New Issue