• Jump To … +
    data.js dentaku.normal.js env.js evaluator.js fileio.js list.js monad.js monad_transformer.js pair.js parser.js pprinter.js string.js turing.js chap01.spec.js chap02.spec.js chap03.spec.js chap04.spec.js chap05.spec.js chap06.spec.js chap07.spec.js chap08.spec.js data.spec.js dentaku.normal.spec.js evaluator.spec.js interpreter.spec.js list.spec.js monad.spec.js monad_transformer.spec.js pair.spec.js parser.spec.js pprinter.spec.js string.spec.js

  • dentaku.normal.spec.js

  • ¶ 
    "use strict";

var expect = require('expect.js');
var List = require('../lib/list.js');
var Pair = require('../lib/pair.js');
var Data = require('../lib/data.js');
var PP = require('../lib/pprinter.js');
var Parser = require('../lib/parser.js'); 
var Dentaku = require('../lib/dentaku.normal.js');

describe('dentaku.normal', () => {
    it("evaluate", (next) => {
      expect(
        Dentaku.evaluate("123")
      ).to.eql(
        123
      );
      expect(
        Dentaku.evaluate("1 + 2")
      ).to.eql(
        3
      );
      expect(
        Dentaku.evaluate("2 - 1")
      ).to.eql(
        1
      );
      expect(
        Dentaku.evaluate("1.2 * 2")
      ).to.eql(
        2.4
      );
      expect(
        Dentaku.evaluate("3.9 / 3")
      ).to.eql(
        1.3
      );
      next();
    });
  • ¶

    describe(‘parser’, () => { it(“expr”, (next) => { expect( PP.print(Parser.parse(Dentaku.expr())(List.fromString(“123”))) // PP.print(Parser.parse(Dentaku.expr())(List.fromString(“123”))) ).to.eql( ‘[(123,[]),nil]’ ); next(); }); it(“factor”, (next) => { expect( PP.print(Parser.parse(Dentaku.factor())(List.fromString(“123”))) ).to.eql( ‘[(123,[]),nil]’ ); next(); }); it(“term”, (next) => { expect( PP.print(Parser.parse(Dentaku.term())(List.fromString(“1 * 2”))) ).to.eql( ‘[(2,[]),nil]’ ); next(); }); });

    });