A test file to experiment with the robust parsing feature of Rascal

TestRecovery.rsc

module TestRecovery

extend lang::pico::\syntax::Main;
import util::IDE;
import ParseTree;
import IO;

public map[Production robust, CharClass lookaheads] robust 
  = (p:[range(10,10),range(59,59)] | /p:prod(label(_,sort("Statement")),_,_) := #Statement)
  + (p:[range(10,10),range(59,59),range(44,44)] | /p:prod(label(_,sort("IdType")),_,_) := #IdType);  
  
public Program picoParse(loc l) = picoParse(readFile(l), l);
 
public Program picoParse(str x, loc l) {
  Program p = parse(#start[Program], robust, x, l).top;
  rprintln(p);
  return p;
}

public void main() {
  registerLanguage("Pico","pico", picoParse);
}