Edit detail for SandBox Aldor Generator revision 2 of 2
| 1 2 | ||
|
Editor: 127.0.0.1
Time: 2007/11/11 11:32:05 GMT-8 |
||
| Note: transferred from axiom-developer | ||
Aldor has generators:
- http://www.aldor.org/docs/HTML/chap9.html
- In fact, this form of using generators is so common, that
if the expression E in
for v in E.does not belong to a generator type, then an implicit call is made to an appropriate generator function. This is equivalent to writingfor v in generator E.
The Aldor/Axiom interface provides such a generator for the Axiom Vector type. Let's try it.
More space? I am not sure why but it seems that I must increase GCL memory allocation to make this work.
axiom
)lisp (si::allocate-contiguous-pages 1500 t)
Value = T
axiom
)lisp (si::allocate 'sfun 50 t)
Value = T
aldor
#include "axiom"
myList(v:Vector Integer):List Integer == [ i for i in v ];
aldor
Compiling FriCAS source code from file
/var/zope2/var/LatexWiki/4218486668628728926-25px002.as using
AXIOM-XL compiler and options
-O -Fasy -Fao -Flsp -laxiom -Mno-ALDOR_W_WillObsolete -DAxiom -Y $AXIOM/algebra -I $AXIOM/algebra
Use the system command )set compiler args to change these
options.
#1 (Warning) Could not use archive file `libaxiom.al'.
#2 (Warning) Could not use archive file `libaxiom.al'.
"/usr/local/aldor/linux/1.1.0/include/axiom.as", line 4:
import from AxiomLib;
............^
[L4 C13] #3 (Error) No meaning for identifier `AxiomLib'.
"/usr/local/aldor/linux/1.1.0/include/axiom.as", line 15:
import { true: %, false: % } from Boolean;
..................................^
[L15 C35] #4 (Error) No meaning for identifier `Boolean'.
"/usr/local/aldor/linux/1.1.0/include/axiom.as", line 17:
string: Literal -> %;
........................^.......^
[L17 C25] #5 (Error) No meaning for identifier `Literal'.
[L17 C33] #6 (Error) There are no suitable meanings for the operator `->'.
"/usr/local/aldor/linux/1.1.0/include/axiom.as", line 18:
} from String;
.......^
[L18 C8] #8 (Error) No meaning for identifier `String'.
"/var/zope2/var/LatexWiki/4218486668628728926-25px002.as", line 3:
myList(v:Vector Integer):List Integer == [ i for i in v ];
.........^......^........^....^
[L3 C10] #9 (Error) There are no suitable meanings for the operator `Vector'.
[L3 C17] #10 (Error) No meaning for identifier `Integer'.
[L3 C26] #11 (Error) There are no suitable meanings for the operator `List'.
[L3 C31] #12 (Error) No meaning for identifier `Integer'.
[L3 C31] #13 (Fatal Error) Too many errors (use `-M emax=n' or `-M no-emax' to change the limit).
The )library system command was not called after compilation.axiom
V:Vector Integer:=[1,2,3]
 | (1) |
Type: Vector(Integer)
axiom
myList(V)
There are no library operations named myList Use HyperDoc Browse or issue )what op myList to learn if there is any operation containing " myList " in its name.
Cannot find a definition or applicable library operation named myList with argument type(s) Vector(Integer)
Perhaps you should use "@" to indicate the required return type, or "$" to specify which version of the function you need.
Space left?
axiom
)lisp (room)
1559/1559 90.9% CONS BIGNUM RATIO COMPLEX STRUCTURE 70/200 91.5% FIXNUM SHORT-FLOAT LONG-FLOAT CHARACTER RANDOM-STATE READTABLE SPICE 539/768 99.9% 1 SYMBOL STREAM PATHNAME CCLOSURE CLOSURE 1/8 34.8% PACKAGE 11/400 92.0% ARRAY HASH-TABLE VECTOR BIT-VECTOR 52/100 99.3% CFUN CFDATA 200/276 99.6% 1 SFUN STRING GFUN VFUN AFUN
2218/2799 1 contiguous (463 blocks) 1603 hole 1000 8.2% relocatable
2432 pages for cells 7253 total pages 241738 pages available 13153 pages in heap but not gc'd + pages needed for gc marking 262144 maximum pages Value = NIL
Re: aldor stream oddities --Bill Page, Thu, 09 Aug 2007 10:53:09 -0500 reply
On Aug 9, 2007 10:07 AM Franz Lehner wrote:
Hello,
is there a way to get hold of generate$Stream using the aldor compiler?
I spent quite some time until figuring out that generate is probably
a keyword in aldor (I could not check as the aldor site seems to be down)
and this causes strange error messages.
The following two snippets do not work, note that the second leads to a
segfault:
=================================================
#include "axiom"
teststream: with {
zerostream:()->Stream Integer;
} == add {
zerostream():Stream Integer == {
import from Integer;
generate((x:Integer):Integer +-> 0@Integer,0@Integer);
}
}
=================================================
aldor -Fasy -Fao -Flsp -laxiom -DAxiom -Y/home/lehner/usr/local/lib/wh-sandbox_s1/target/x86_64-unknown-linux/algebra test1.as "test1.as", line 8:
generate((x:Integer):Integer +-> 0@Integer,0@Integer);
.........................^
[L8 C26] #1 (Error) Have determined 1 possible types for the expression.
Meaning 1: (x: Integer) -> Integer, Integer
The context requires an expression of type Stream(Integer).
make: *** [test.ao] Fehler 1
=========================================================
#include "axiom"
teststream: with {
zerostream:()->Stream Integer;
} == add {
zerostream():Stream Integer == {
import from Integer;
generate(():Integer +-> 0@Integer);
}
}
=========================================================
aldor -Fasy -Fao -Flsp -laxiom -DAxiom -Y/home/lehner/usr/local/lib/wh-sandbox_s1/target/x86_64-unknown-linux/algebra est2.as
Program fault (segmentation violation).#3 (Error) Program fault
(segmentation violation).
"test2.as", line 6: zerostream():Stream Integer == {
.......................................^
[L6 C40] #1 (Error) Have determined 0 possible types for the expression.
Subexpression `import from Integer':
Meaning 1: (0 types)
"test.as", line 9: generate(():Integer +-> 0@Integer);
.........................^
[L9 C26] #2 (Error) Have determined 0 possible types for the expression.
make: *** [test.ao] Fehler 1
Bill Page replied:
Here is one way. The important thing is to escape the keyword
generator by prefix with _.
aldor
#include "axiom"
teststream: with { zerostream:()->Stream Integer; } == add { zerostream():Stream Integer == { import from Integer; _generate((x:Integer):Integer +-> 0@Integer,0@Integer); } }
aldor
Compiling FriCAS source code from file
/var/zope2/var/LatexWiki/5904224867308724363-25px005.as using
AXIOM-XL compiler and options
-O -Fasy -Fao -Flsp -laxiom -Mno-ALDOR_W_WillObsolete -DAxiom -Y $AXIOM/algebra -I $AXIOM/algebra
Use the system command )set compiler args to change these
options.
#1 (Warning) Could not use archive file `libaxiom.al'.
#2 (Warning) Could not use archive file `libaxiom.al'.
"/usr/local/aldor/linux/1.1.0/include/axiom.as", line 4:
import from AxiomLib;
............^
[L4 C13] #3 (Error) No meaning for identifier `AxiomLib'.
"/usr/local/aldor/linux/1.1.0/include/axiom.as", line 15:
import { true: %, false: % } from Boolean;
..................................^
[L15 C35] #4 (Error) No meaning for identifier `Boolean'.
"/usr/local/aldor/linux/1.1.0/include/axiom.as", line 17:
string: Literal -> %;
........................^.......^
[L17 C25] #5 (Error) No meaning for identifier `Literal'.
[L17 C33] #6 (Error) There are no suitable meanings for the operator `->'.
"/usr/local/aldor/linux/1.1.0/include/axiom.as", line 18:
} from String;
.......^
[L18 C8] #8 (Error) No meaning for identifier `String'.
"/var/zope2/var/LatexWiki/5904224867308724363-25px005.as", line 4:
zerostream:()->Stream Integer;
.....................^.^......^
[L4 C22] #11 (Error) There are no suitable meanings for the operator `->'.
[L4 C24] #9 (Error) There are no suitable meanings for the operator `Stream'.
[L4 C31] #10 (Error) No meaning for identifier `Integer'.
[L4 C31] #13 (Fatal Error) Too many errors (use `-M emax=n' or `-M no-emax' to change the limit).
The )library system command was not called after compilation.axiom
zerostream()
There are no library operations named zerostream Use HyperDoc Browse or issue )what op zerostream to learn if there is any operation containing " zerostream " in its name.
Cannot find a no-argument definition or library operation named zerostream .