Merge remote-tracking branch 'origin/lf/signed-js-parser' into philip/tomb

This commit is contained in:
Philip Monk 2022-05-14 20:53:35 -07:00
commit 265ff532e7
2 changed files with 19 additions and 0 deletions

View File

@ -3495,6 +3495,14 @@
|= jon=json |= jon=json
?> ?=([%n *] jon) ?> ?=([%n *] jon)
(rash p.jon dem) (rash p.jon dem)
:: :: ++ns:dejs:format
++ ns :: number as signed
|= jon=json
^- @s
?> ?=([%n *] jon)
%+ rash p.jon
%+ cook new:si
;~(plug ;~(pose (cold %| (jest '-')) (easy %&)) dem)
:: :: ++no:dejs:format :: :: ++no:dejs:format
++ no :: number as cord ++ no :: number as cord
|=(jon=json ?>(?=([%n *] jon) p.jon)) |=(jon=json ?>(?=([%n *] jon) p.jon))

View File

@ -131,6 +131,7 @@
++ nul `json`~ ++ nul `json`~
++ tru `json`[%b &] ++ tru `json`[%b &]
++ num `json`[%n ~.12] ++ num `json`[%n ~.12]
++ neg `json`[%n '-3']
++ str `json`[%s 'hey'] ++ str `json`[%s 'hey']
++ frond `json`(frond:enjs 'foo' num) ++ frond `json`(frond:enjs 'foo' num)
++ obj `json`(pairs:enjs ~[['foo' num] ['bar' str]]) ++ obj `json`(pairs:enjs ~[['foo' num] ['bar' str]])
@ -228,6 +229,16 @@
!> (ni num:ex) !> (ni num:ex)
%- expect-fail %- expect-fail
|. (ni tru:ex) |. (ni tru:ex)
:: as @s
::
%+ expect-eq
!> -3
!> (ns neg:ex)
%+ expect-eq
!> --12
!> (ns num:ex)
%- expect-fail
|. (ns tru:ex)
:: as cord :: as cord
:: ::
%+ expect-eq %+ expect-eq