commit 7da41b3c3d82f207c79062122e2df0e80a71ab44 · kitten.sh/wonka

+1 -1

package.json

···

       77
       77
        
           "@types/jest": "^25.2.3",

     

       78
       78
        
           "@types/zen-observable": "^0.8.0",

     

       79
       79
        
           "babel-plugin-closure-elimination": "^1.3.1",

     

       80
       80
       -
           "bs-platform": "^7.3.2",

     

       80
       80
       +
           "bs-platform": "^8.0.2",

     

       81
       81
        
           "callbag-from-iter": "^1.2.0",

     

       82
       82
        
           "callbag-iterate": "^1.0.0",

     

       83
       83
        
           "callbag-take": "^1.5.0",

+3 -3

src/Wonka_sources.test.ts

···

       119
       119
        
       });

     

       120
       120
        
       

     

       121
       121
        
       describe('fromList', () => {

     

       122
       122
       -
         passesTrampoline(sources.fromList([1, [2]] as any));

     

       123
       123
       -
         passesColdPull(sources.fromList([0] as any));

     

       124
       124
       -
         passesActiveClose(sources.fromList([0] as any));

     

       122
       122
       +
         passesTrampoline(sources.fromList({hd: 1, tl: { hd: 2, tl: 0 } } as any));

     

       123
       123
       +
         passesColdPull(sources.fromList({ hd: 0, tl: 0 } as any));

     

       124
       124
       +
         passesActiveClose(sources.fromList({ hd: 1, tl: 0 } as any));

     

       125
       125
        
       });

     

       126
       126
        
       

     

       127
       127
        
       describe('fromValue', () => {

+10 -11

src/helpers/Wonka_deriving.ts

···

       1
       1
       -
       import { __ as block } from 'bs-platform/lib/es6/block';

     

       2
       1
        
       import { talkbackPlaceholder } from './Wonka_helpers.bs';

     

       3
       2
        
       

     

       4
       3
        
       import {

     
···

       8
       7
        
       

     

       9
       8
        
       type talkbackCb = (tb: talkbackT) => void;

     

       10
       9
        
       

     

       11
       11
       -
       export const pull = (0 as any as talkbackT);

     

       12
       12
       -
       export const close = (1 as any as talkbackT);

     

       10
       10
       +
       export const pull: talkbackT = 0;

     

       11
       11
       +
       export const close: talkbackT = 1;

     

       13
       12
        
       

     

       14
       14
       -
       export const start = <a>(tb: talkbackCb): signalT<a> => block(0, [tb]) as any;

     

       15
       15
       -
       export const push = <a>(x: a): signalT<a> => block(1, [x]) as any;

     

       16
       16
       -
       export const end = <a>(): signalT<a> => 0 as any;

     

       13
       13
       +
       export const start = <a>(tb: talkbackCb): signalT<a> => ({TAG: 0, "_0": tb});

     

       14
       14
       +
       export const push = <a>(x: a): signalT<a> => ({TAG: 1, "_0": x});

     

       15
       15
       +
       export const end = <a>(): signalT<a> => 0;

     

       17
       16
        
       

     

       18
       17
        
       export const isStart = <a>(s: signalT<a>) =>

     

       19
       19
       -
         typeof s !== 'number' && (s as any).tag === 0;

     

       18
       18
       +
         typeof s !== 'number' && s.TAG === 0;

     

       20
       19
        
       export const isPush = <a>(s: signalT<a>) =>

     

       21
       21
       -
         typeof s !== 'number' && (s as any).tag === 1;

     

       20
       20
       +
         typeof s !== 'number' && s.TAG === 1;

     

       22
       21
        
       export const isEnd = <a>(s: signalT<a>) =>

     

       23
       23
       -
         typeof s === 'number' && (s as any) === 0;

     

       22
       22
       +
         typeof s === 'number' && s === 0;

     

       24
       23
        
       

     

       25
       24
        
       export const unboxPush = <a>(s: signalT<a>): a | null =>

     

       26
       26
       -
         isPush(s) ? (s as any)[0] : null;

     

       25
       25
       +
         isPush(s) ? s["_0"] : null;

     

       27
       26
        
       export const unboxStart = <a>(s: signalT<a>): talkbackCb =>

     

       28
       28
       -
         isStart(s) ? (s as any)[0] : (talkbackPlaceholder as any);

     

       27
       27
       +
         isStart(s) ? s["_0"] : (talkbackPlaceholder as any);

+2 -2

src/shims/Js.shim.ts

···

       4
       4
        
       export type talkbackT = 0 | 1;

     

       5
       5
        
       

     

       6
       6
        
       export type signalT<a> =

     

       7
       7
       -
         | ({ tag: 0 } & [(talkback: talkbackT) => void])

     

       8
       8
       -
         | ({ tag: 1 } & [a])

     

       7
       7
       +
         | ({ TAG: 0, _0: (talkback: talkbackT) => void })

     

       8
       8
       +
         | ({ TAG: 1, _0: a })

     

       9
       9
        
         | 0;

     

       10
       10
        
       

     

       11
       11
        
       export interface observableSubscriptionT {

+4 -4

yarn.lock

···

       4309
       4309
        
         dependencies:

     

       4310
       4310
        
           fast-json-stable-stringify "2.x"

     

       4311
       4311
        
       

     

       4312
       4312
       -
       bs-platform@^7.3.2:

     

       4313
       4313
       -
         version "7.3.2"

     

       4314
       4314
       -
         resolved "https://registry.yarnpkg.com/bs-platform/-/bs-platform-7.3.2.tgz#301f5c9b4e8cf5713cb60ca22e145e56e793affe"

     

       4315
       4315
       -
         integrity sha512-seJL5g4anK9la4erv+B2o2sMHQCxDF6OCRl9en3hbaUos/S3JsusQ0sPp4ORsbx5eXfHLYBwPljwKXlgpXtsgQ==

     

       4312
       4312
       +
       bs-platform@^8.0.2:

     

       4313
       4313
       +
         version "8.0.2"

     

       4314
       4314
       +
         resolved "https://registry.yarnpkg.com/bs-platform/-/bs-platform-8.0.2.tgz#8caf775c6c6fcde57ebb12f9efacd346951aeb45"

     

       4315
       4315
       +
         integrity sha512-2vHnyxCd4m5QYG/hxUGsevOqEkpqL+chmjV7I3yz9NT2lEtF6RafpUj30myQqdpDcIIhLja3PCkNq+ZVNSsXQA==

     

       4316
       4316
        
       

     

       4317
       4317
        
       bser@2.1.1:

     

       4318
       4318
        
         version "2.1.1"