package Ġnet . t ass ia . parser Ċ Ċ import Ġnet . t ass ia . parser . grammar s . Test Grammar 1 Ċ import Ġnet . t ass ia . parser . impl . Default Parser Ċ import Ġnet . t ass ia . parser . token . Token Provider Ċ import Ġkotlin . test . Test Ċ import Ġkotlin . test . assertEquals Ċ Ċ class ĠDefault Parser Test 3 Ġ{ ĊĊ ĉ private Ġfun Ġtest ( str : ĠString ) Ġ{ Ċĉ ĉ val Ġparser Ġ= ĠDefault Parser ( Token Provider . NO _ OPERATION ) Ċĉ ĉ val Ġtoken Ġ= Ġparser . parse Full ( str , ĠTest Grammar 1 . ROOT ) Ċĉ ĉ assertEquals ( str , Ġtoken . raw ) Ċ ĉ } ĊĊ ĉ @ Test Ċ ĉ fun Ġtest Success 1 () Ġ= Ġtest (" Hello ĠWorld !") ĊĊ ĉ @ Test Ċ ĉ fun Ġtest Success 2 () Ġ= Ġtest (" Hello ĠStr anger !") ĊĊ ĉ @ Test ( expected Ġ= ĠParseException :: class ) Ċ ĉ fun Ġtest Failure 1 () Ġ= Ġtest (" Hello ĠFriend !") ĊĊ ĉ @ Test ( expected Ġ= ĠParseException :: class ) Ċ ĉ fun Ġtest Failure 2 () Ġ= Ġtest (" Hello ĠWorld ! Ġ") Ċ Ċ } Ċ