diff options
Diffstat (limited to 'apl9.h')
| -rw-r--r-- | apl9.h | 6 |
1 files changed, 5 insertions, 1 deletions
@@ -22,6 +22,7 @@ typedef enum typedef enum { AtypeInt, + AtypeFloat, AtypeArray, } arrayDataType; @@ -58,6 +59,7 @@ struct Array union { char *rawdata; vlong *intdata; + double *floatdata; Array **arraydata; }; }; @@ -154,11 +156,13 @@ Statement *lexline(Rune *); /* array.c */ Array *mkscalarint(vlong); +Array *mkscalarfloat(double); Array *duparray(Array *); int simplearray(Array *); int simplescalar(Array *); Array *extend(Array *, Array *); int scalarextend(Array *, Array *, Array **, Array **); +int commontype(Array *, Array *, Array **, Array **, int); Array *arrayitem(Array *, int); Array *simplifyarray(Array *); @@ -169,7 +173,6 @@ Datum *eval(Statement *); Symbol *getsym(Symtab *, Rune *); Symtab *newsymtab(void); void freesymtab(Symtab *); -vlong globalIO(void); /* memory.c */ void *emalloc(ulong); @@ -230,3 +233,4 @@ extern Symtab *globalsymtab; /* symbol.c */ extern Symtab *currentsymtab; /* symbol.c */ extern int alloccounts; /* memory.c */ extern QuadnameDef quadnames[]; /* quadnames.c */ +extern int printprecision; /* print.c */
\ No newline at end of file |