anchor.diff:                  (3, 46)); PLUS;
                   LIDENT ("s", (50, 51)); COLON; PATTERN ("res:int", (54, 61)); EQUAL;
                   LIDENT ("e", (65, 66)); PARAM ("1", (67, 68)); ACTION ("res", (71, 74));
  -                SEMICOLON; LIDENT ("e", (78, 79)); PARAM ("i", (80, 81)); COLON;
  +                SEMICOLON dummyRange; LIDENT ("e", (78, 79)); PARAM ("i", (80, 81)); COLON;
                   LIDENT ("n", (84, 85)); EQUAL; UIDENT ("NUMBER", (86, 92));
  -                ACTION ("(value n |> int) + i", (94, 114)); SEMICOLON; EOF]
  +                ACTION ("(value n |> int) + i", (94, 114)); SEMICOLON dummyRange; EOF]
               {
                info = { fileName = ""; }
                head = Some ("\r\nlet value x = (x:>Lexeme<string>).value\r\n", (3, 46))
  
positive.code: include ""test_included.yrd""
  +s:PLUS;"
              [INCLUDE; STRING ("test_included.yrd", (11, 28)); PLUS; LIDENT ("s", (32, 33))
              ; COLON; UIDENT ("PLUS", (34, 38)); SEMICOLON; EOF]
  
  [<TestFixture>]
  type ``Yard frontend preprocessor tests`` () =
  
negative.code: 
  let optionsTest path optionsCorrect =
      let definition = {Main.ParseFile path with info = {fileName =""}}
      let currentOptions = definition.options    
      Assert.AreEqual(currentOptions, optionsCorrect)
          
  let dummyRange = Range (Lexing.Position.Empty,Lexing.Position.Empty)
  
  [<TestFixture>]
  type ``YardFrontend lexer tests`` () = 
      [<Test>]
      member test.``Lexer seq test`` () =
          lexerTest 
              "+s: NUMBER PLUS NUMBER;"
              [PLUS; LIDENT ("s", (1, 2)); COLON; UIDENT ("NUMBER", (4, 10))
              ; UIDENT ("PLUS", (11, 15)); UIDENT ("NUMBER", (16, 22)); SEMICOLON dummyRange; EOF]
  
      [<Test>]
      member test.``Lexer cls test`` () =
          lexerTest 
              "+s: (MINUS|PLUS)*;"
              [PLUS; LIDENT ("s", (1, 2)); COLON; LPAREN (Range (Lexing.Position.Empty,Lexing.Position.Empty)); UIDENT ("MINUS", (5, 10)); BAR
              ; UIDENT ("PLUS", (11, 15)); RPAREN (Range (Lexing.Position.Empty,Lexing.Position.Empty)); STAR; SEMICOLON dummyRange; EOF]
  
      [<Test>]            
      member test.``Include test`` () =
  