1
0
forked from GitHub/gf-core

introducing multiple inheritance

This commit is contained in:
aarne
2004-09-15 14:36:27 +00:00
parent 7697b222d0
commit a25ee154e7
43 changed files with 208 additions and 73 deletions

View File

@@ -0,0 +1,6 @@
concrete UserCityEng of UserCity = UserEng, CityEng ** open Prelude in
{
lin
QDistance x y = ss (["what is the distance from"] ++ x.s ++ "to" ++ y.s) ;
}