Add setCheckpointDir() to context.R; comment fix.