Hello
Here is the latest Caml Weekly News, for the week of 21 to 28 December, 2004.
Archive: http://caml.inria.fr/archives/200412/msg00289.html
Continuing last week's thread, Christophe Troestler said:> > BTW, there is another binding of FastCGI for OCaml. It uses the > > C-Library, works under windows and could be used with threads. > > In fact, it is only tested on windows. A binary version is included > > in OCaml-Mingw-Maxi. If somebody really need it, I could release the > > source. > > Please do so. I would be interested in having a look to it. > What licence are you going to put it under? > You can download a first version under http://sourceforge.net/project/showfiles.php?group_id=100546 The License is LGPL. I added a modified version of ocamlcgi which is also released under LGPL. It is tested under windows, but should work on unix, too.
Archive: http://caml.inria.fr/archives/200412/msg00027.html
Jacques Garrigue:After a bit more testing, it seems that the problem with gtkglarea2 is not directly related to gtk, but rather to Xorg 6.7. That is, after upgrading to Xorg 6.8.1, the problem was solved. So I have no plans to switch to gtkglext anymore, as this doesn't seem so much worthwhile. Of course, if somebody is ready to do the job and provide a compatibility layer... Note that the situation with gtkglarea2 is strange, as there is no problem whatsoever with gtkglarea1, and the former is supposed to be just an adaptation of the latter.
Archive: http://caml.inria.fr/archives/200412/msg00195.html
Continuing last week's thread, Nate Nystrom said:Jacques Garrigue wrote: > Jørgen Hermanrud Fjeld wrote: > > > I just read about the work by Nystrom, Chong and Myers on nested > > inheritance, specifically the article "Scalable Extensibility via > > Nested Inheritance". > > > > The article does demonstrate fascinating, to me, use of inheritance, > > and I wonder if it is possible to do something similar and > > object-oriented in OCaml. > > > > To do something similar would, according to my understanding, require > > both inner classes and super-class polymorphism. > > In understand inner classes as implicitly polymorphic with respect > > to the enclosing class, > > and polymorphism on the super class as the practical ability to extend > > the type hierarchy upwards. > > > > Do you know of any work that relate nested inheritance to OCaml, or > > that > > address the similar issuesof inner classes and super-class > > polymorphism? > > Answer 1: there are no inner classes in ocaml. Another alternative is to use nested inheritance with modules. This likely requires that module inheritance be added to the language, although there may be other approaches that fit in better with the ocaml module system. In fact, we expect that in Jx (our extension of Java with nested inheritance) package inheritance will be the main use of nested inheritance. > Answer 2: there are plenty of other ways to obtain similar effects. > > I don't know exactly what fascinated you in the paper, so it is hard > to answer precisely, but there are already a few techniques in ocaml to > solve the problems they describe. > (Of course they wouldn't cite them, as ocaml doesn't look like a > relevant language to them.) I admit I was unaware of polymorphic variants. I certainly would have cited ocaml had I been aware of them. > > Their compiler example seems to be a variant of the expression > problem. The expression problem is an instance of what we call scalable extensibility. > There are several solutions to the expression problem in ocaml, using > either polymorphic variants > http://wwwfun.kurims.kyoto-u.ac.jp/~garrigue/papers/fose2000.html I don't see how polymorphic variants solve the expression problem. As I understand them, if I were to implement a compiler using polymorphic variants, I would create a variant for each term in the language, then write functions that match against those variants to implement the compiler passes. However, if I want to add a new term to the language, I would have to add a new variant, then write new functions for each of the compiler passes to handle the new variant, delegating to the old functions for the old variants. Thus if I have n passes implemented as functions, I have to write O(n) code to add a new term. Please correct me if I'm wrong on this. Zenger and Odersky's ICFP'00 paper on extensible algebraic datatypes with defaults addresses this particular problem. Furthermore, to allow extension, recursion is left open for the functions implementing the compiler passes and then closed in order to invoke the function on a particular type. Thus, when a new variant is added, a small amount of code for each open recursive function needs to be written to close the recursion with the new type. > or objects > http://pauillac.inria.fr/~remy/work/expr/ > > On the more general question of virtual types, Didier Rémy and Jérôme > Vouillon gave a detailed "refutation". > http://pauillac.inria.fr/~remy/work/virtual/ This paper shows that you can use parametric polymorphism to solve the same problems virtual types were designed to address. The problem to look out for with this approach is that you may end up parameterizing a class on a large number of related classes, e.g., parameterizing a compiler pass class on every AST node class (in our Java compiler, there are 40-50 such classes). This paper argues that, in practice, you won't have too many parameters because you only need to parameterize on types on which there is actually a constraint. I think this does not work with our compiler problem. Using the traditional visitor pattern, you will have to parameterize the visitor class on every AST node class. > So you can see if you can do all what you need with the above methods. > If you find some unexpected limitation, please let us now.John Skaller replied:
> Using the traditional visitor pattern, > you will have to parameterize the visitor class on every AST node class. Given a term for expressions, and a map_expr function which is a functional visitor, I can write: let rec cfold x = match map_expr cfold x with | `Add (`Int a, `Int b) -> `Int (a + b) | other -> other The fact that this formulation admits any number of extra variants without change is a problem! I could add a new term `Sub for subtraction and forget to add the code to fold subtraction of constants. In fact I have done just that, it took several hours to find the bug.Jacques Garrigue also replied:
Thank you for your answer. I'm happy to see you're interested in the functional view. > > Answer 1: there are no inner classes in ocaml. > > Another alternative is to use nested inheritance with modules. This > likely requires that module inheritance be added to the language, > although there may be other approaches that fit in better with the ocaml > module system. In fact, we expect that in Jx (our extension of Java > with nested inheritance) package inheritance will be the main use of > nested inheritance. I'm not sure of what you mean by nested inheritance with modules. But it wouldn't solve the problem in caml, as modules do not contain implicit recursion: added definitions will not change the behaviour of previous ones. This is actually an advantage for reasoning about the code: scope is static and ordered. But this makes inheritance of limited practical use. (You have already flat inheritance with include.) > > Answer 2: there are plenty of other ways to obtain similar effects. > > > > I don't know exactly what fascinated you in the paper, so it is hard > > to answer precisely, but there are already a few techniques in ocaml to > > solve the problems they describe. > > (Of course they wouldn't cite them, as ocaml doesn't look like a > > relevant language to them.) > > I admit I was unaware of polymorphic variants. I certainly would > have cited ocaml had I been aware of them. I hope I didn't offend you. It was just a generic remark about the limited interest functional approaches enjoy in the object-oriented community, even when they solve the same problem. > > Their compiler example seems to be a variant of the expression > > problem. > > The expression problem is an instance of what we call scalable > extensibility. Indeed. > > There are several solutions to the expression problem in ocaml, using > > either polymorphic variants > > http://wwwfun.kurims.kyoto-u.ac.jp/~garrigue/papers/fose2000.html > > I don't see how polymorphic variants solve the expression problem. > As I understand them, if I were to implement a compiler using > polymorphic variants, I would create a variant for each term > in the language, then write functions that match against those > variants to implement the compiler passes. > > However, if I want to add a new term to the language, I would > have to add a new variant, then write new functions for each of > the compiler passes to handle the new variant, delegating to the > old functions for the old variants. Thus if I have n passes > implemented as functions, I have to write O(n) code to add a > new term. Please correct me if I'm wrong on this. > Zenger and Odersky's ICFP'00 paper on extensible algebraic > datatypes with defaults addresses this particular problem. > > Furthermore, to allow extension, recursion is left open for > the functions implementing the compiler passes and then closed > in order to invoke the function on a particular type. Thus, when a new > variant is added, a small amount of code for each open recursive > function needs to be written to close the recursion with the new type. You're right about the paper. But this doesn't mean this does not solve the expression problem. The expression problem is about the possibility of extension both by adding new constructors and new operations. It is well known that there are two types of solution for it: data-centered (or object-oriented) and operation-centered (or functional decomposition). By definition, the functional approach is operation-centered. It means that adding a new constructor costs more than in the data-centered approach, but adding a new operation costs less. The cost of both is irrelevent to whether a solution is valid or not, but if you want to compare you must consider the two kinds of extensions. By the way, if you just add a new construct in the language, it may be better to simply go around modifying existing code, rather than writing new delegation code, but this wouldn't solve the expression problem. Actually, I thought at first that this approach was too cumbersome to be practical. But some people use it, and are satisfied with it. And note that closing the recursion is in practice very light: you just have to apply the pattern. Another point, which John Skaller has just made, is that you can perfectly define functions with default behaviours. I do it all the time. The basic idea is to use a structural map or iter function, which allows you to only code the non-standard cases. This is dangerous, because your new constructors may actually require a different handling. But the point here is that you can choose whether you allow a default or not, and only have defaults when it is reasonable to have them. So I would say that the functional approach gives greater flexibility in your assumptions about future extensions. > > or objects > > http://pauillac.inria.fr/~remy/work/expr/ > > > > On the more general question of virtual types, Didier Rémy and Jérôme > > Vouillon gave a detailed "refutation". > > http://pauillac.inria.fr/~remy/work/virtual/ > > This paper shows that you can use parametric polymorphism to solve the > same problems virtual types were designed to address. The problem to > look out for with this approach is that you may end up parameterizing a > class on a large number of related classes, e.g., parameterizing > a compiler pass class on every AST node class (in our Java compiler, > there are 40-50 such classes). This paper argues that, in practice, you > won't have too many parameters because you only need to parameterize on > types on which there is actually a constraint. I think this does not > work with our compiler problem. Using the traditional visitor pattern, > you will have to parameterize the visitor class on every AST node class. You should realize that you are not parameterizing with classes, but with types. In practice you have only few types (or categories) of nodes in an AST. In a functional language it would be 3: expressions, patterns and types, with the previous not appearing inside the latter. So it is reasonable to keep this kind of parameterization.Jacques Garrigue added:
A small complement to my previous post. > Furthermore, to allow extension, recursion is left open for > the functions implementing the compiler passes and then closed > in order to invoke the function on a particular type. Thus, when a new > variant is added, a small amount of code for each open recursive > function needs to be written to close the recursion with the new type. This kind of practical problems could be easily solved by syntactic sugar. Yet, you can see a direct approach (without sugar) in this code sample http://wwwfun.kurims.kyoto-u.ac.jp/~garrigue/papers/mixin2.ml.txt The idea is to use classes like modules with inheritance and recursion (using lazyness to get a fixpoint). So we get closer to your approach. (I've cleaned-up a little, but this code has been at this URL for years.) Another more general remark, which might seem somehow contradictory, is that functional programs do not have the same notion of modularity. In particular, as the typing helps a lot, this is not seen as a problem to directly modify existing code (which modular extension prohibits). So one writes code with the possibility of future modifications in mind, making it more robust by avoiding ad-hoc defaults. When you have no default, the type checker can track changes to types, and force you to modify relevant code.
Here is a quick trick to help you read this CWN if you are viewing it using vim (version 6 or greater).
:set foldmethod=expr
:set foldexpr=getline(v:lnum)=~'^=\\{78}$'?'<1':1
zM
If you know of a better way, please let me know.
If you happen to miss a CWN, you can send me a message and I'll mail it to you, or go take a look at the archive or the RSS feed of the archives.
If you also wish to receive it every week by mail, you may subscribe online.