diff options
Diffstat (limited to 'grammars/video/Shared/specificProlog.gf')
| -rw-r--r-- | grammars/video/Shared/specificProlog.gf | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/grammars/video/Shared/specificProlog.gf b/grammars/video/Shared/specificProlog.gf new file mode 100644 index 000000000..8ca76dbed --- /dev/null +++ b/grammars/video/Shared/specificProlog.gf @@ -0,0 +1,22 @@ +-- File name Shared/specific.Prolog.gf + +concrete specificProlog of specific = + generalProlog, weekdayProlog, channelProlog, timeProlog ** + open prologResource in { + +lin +indTime t = {s = t.s} ; +indChannel c = {s = c.s} ; +indWeekday w = {s = w.s} ; + +delete_rec_job = {s = "delete_rec_job"} ; +delAction dact = {s = dact.s }; + + +startTimeToStore st = {s = app "start_time_to_store" st.s } ; +endTimeToStore et = {s = app "stop_time_to_store" et.s } ; +channelToStore ch = {s = app "channel_to_store" ch.s } ; +weekdayToStore wd = {s = app "weekday_to_store" wd.s } ; + +vcr_add_rec_job_no_args = {s = ["add_rec_job"]} ; -- hack!!! +} |