aboutsummaryrefslogtreecommitdiff
path: root/tests/basic.spec.ts
blob: eeeb121434ba05faab367201bfb5bc8598fc7a16 (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
import { left, right } from 'fp-ts/Either'
import {
  many0,
  digit,
  integer,
  whitespace,
  suffixed,
  prefixed,
  whitespaces0,
  delimited,
  symbol,
} from '../src/parser'

describe('Foobar', () => {
  it('should do shit', () => {
    expect(integer('12901')).toEqual(right([12901, '']))
    expect(integer('12901asas')).toEqual(right([12901, 'asas']))
    expect(whitespace(' ')).toEqual(right([' ', '']))
    expect(whitespace('\n')).toEqual(right(['\n', '']))
    expect(whitespace('a')).toEqual(left(['unable to match', 'a']))

    expect(delimited(whitespaces0, integer, whitespaces0)(' 20 ')).toEqual(
      right([20, ''])
    )
    expect(delimited(whitespaces0, integer, whitespaces0)(' 2 0 ')).toEqual(
      right([2, '0 '])
    )
  })
})