Should the example on page 12 of goo-intro.pdf still work in 0.155
(using ,ast-eval, with goo compiled under cygwin)?
The example is
(dc <point> (<any>))
(dp point-x (<point> => <int>) 0)
(dp point-y (<point> => <int>) 0)
(dv p1 (new <point>))
(dm + (p1|<point> p2|<point> => <point>)
(new <point>
point-x (+ (point-x p1) (point-x p2))
point-y (+ (point-y p1) (point-y p2))))
but for the last expression I get the error
(with minor linebreak and whitespace differences for readability):
ERROR: Method #{Met + ((p1 <point>) (p2 <point>) => <point>)}
incongruent with generic #{Gen + ((<num> <any>) (<num> <any>) => <num>)}.
Type ",restart N" to restart execution:
1. Return to interpreter level 1.
2. Replace #{Gen + ((<num> <any>) (<num> <any>) => <num>)} with an nul
generic congruent with #{Met + ((p1 <point>) (p2 <point>) => <point>)}.
3. Return to interpreter level 0.
4. Exit the top-level interpreter.
--
T. Kurt Bond,
tkb@...
_______________________________________________
Googoogaga mailing list
Googoogaga@...
https://lists.csail.mit.edu/mailman/listinfo/googoogaga
