added Question.AdvIAdv and correcponding entry of mkIAdv in API

This commit is contained in:
aarne committed 2010-04-29 05:55:59 +00:00
1 parent 97c2575f0f
commit dc58a51c4f
12 files changed
+32 -4

No files matched your search

+2
View File
@@ -67,6 +67,8 @@ concrete QuestionUrd of Question = CatUrd ** open ResUrd, Prelude in {
n = num.n
} ;
AdvIAdv i a = {s = i.s ++ a.s} ;
CompIAdv a = a ;
CompIP p = ss (p.s ! Dir) ;