format directives
dlp_formatter::dlp_formatter() {
format("#item:/1","%s\n");
format("#object:/1","object %s.\npublic.");
format("#declare:/2","%s %s.");
format("#list:/1","[ %s ]");
format("|/2"," %s | %s ");
format("#set:/1"," dlp_set(%s) ");
format("#s,:/2", " %s; %s");
format("#s|:/2", " %s : [ %s ]");
format("()/0","");
format("<</2","dlp_write(%s , %s)");
format(":-/2","%s :-\n%s.");
format(":-/1",":- %s.");
format("<-/2","%s <- %s");
format(":=/2","%s := %s");
format(">/2","%s > %s");
format("</2","%s > %s");
format("!/2","%s <- %s");
format("^/2","%s <- %s");
format("+/1","+%s");
format("-/1","-%s");
format("?/1","?%s");
}
slide: format directives