### Specify an example text
exampleFile <-
system.file("extdata",
"simple-example.jmd",
package="justifier");
### Show contents
cat(readLines(exampleFile), sep="\n");
### Load it with yum::load_and_simplify()
loadedMinutes <- yum::load_and_simplify(exampleFile);
### Show contents
names(loadedMinutes);
### Show classes
class(loadedMinutes["assertion"]);
### Convert to specification list
res <- to_specList(loadedMinutes["assertion"],
type="assertion",
types="assertions");
### Show classes
class(res);
### Show original and parsed objects
loadedMinutes["assertion"];
res;
Run the code above in your browser using DataLab