1
0
forked from GitHub/gf-core

Karin C's example

This commit is contained in:
aarne
2004-09-16 14:47:18 +00:00
parent 7769d0fb00
commit ecc132dccf
55 changed files with 2212 additions and 4 deletions

View File

@@ -0,0 +1,36 @@
-- File name User/specific.Abs.gf
abstract specUser = specific, genUser ** {
cat
AnswerReq ;
AnswerListReq ;
Request ;
fun
--- Answers in request list
vcr_add_rec_job_args4 : AnswerReq -> AnswerReq -> AnswerReq -> AnswerReq -> Action ;
vcr_add_rec_job_args3 : AnswerReq -> AnswerReq -> AnswerReq -> Action ;
vcr_add_rec_job_args2 : AnswerReq -> AnswerReq -> Action ;
vcr_add_rec_job_args1 : AnswerReq -> Action ;
---- vcr_add_rec_job_no_args : Action ; -- spela in! moved to specific
fun
--- Possible answers in request list
startTimeToStoreReq : StartTime -> AnswerReq ;
endTimeToStoreReq : EndTime -> AnswerReq ;
channelToStoreReq : ChToStore -> AnswerReq ;
weekdayToStoreReq : WdToStore -> AnswerReq ;
--- AnswerList
answerListReq4 : AnswerReq -> AnswerReq -> AnswerReq -> AnswerReq -> AnswerListReq ;
answerListReq3 : AnswerReq -> AnswerReq -> AnswerReq -> AnswerListReq ;
answerListReq2 : AnswerReq -> AnswerReq -> AnswerListReq ;
answerListReq : AnswerListReq -> DMove;
answerReq : AnswerReq -> Answer ;
--requestChannelsDMove : Request -> DMove;
requestChannels : Action ;
}