diff options
-rw-r--r-- | src/bytecode.h | 2 | ||||
-rw-r--r-- | src/declare.cc | 5 | ||||
-rw-r--r-- | src/tree.h | 15 |
3 files changed, 11 insertions, 11 deletions
diff --git a/src/bytecode.h b/src/bytecode.h index 8753de50..fa628e2c 100644 --- a/src/bytecode.h +++ b/src/bytecode.h @@ -315,14 +315,12 @@ typedef unsigned char uchar; #define IN_SYSTEM 0xe5 - /* Types */ #define TYPE_NIL 0x01 #define TYPE_TREE 0x02 #define TYPE_REF 0x03 #define TYPE_PTR 0x04 #define TYPE_ITER 0x05 -#define TYPE_IGNORE_LIST 0x06 /* Types of Generics. */ #define GEN_LIST 0x10 diff --git a/src/declare.cc b/src/declare.cc index 62e5c3cb..c79961eb 100644 --- a/src/declare.cc +++ b/src/declare.cc @@ -532,12 +532,10 @@ void LangStmt::declare( Compiler *pd ) const { switch ( type ) { case PrintType: - break; case PrintXMLACType: - break; case PrintXMLType: - break; case PrintStreamType: + case PrintAccum: break; case ExprType: break; @@ -582,7 +580,6 @@ void CodeBlock::declare( Compiler *pd ) const stmt->declare( pd ); } - void Compiler::declareFunction( Function *func ) { CodeBlock *block = func->codeBlock; @@ -273,13 +273,15 @@ void refSetValue( struct colm_program *prg, Tree **sp, Ref *ref, Tree *v ); Tree *treeSearch( struct colm_program *prg, Tree *tree, long id ); Location *locSearch( struct colm_program *prg, Tree *tree ); -int matchPattern( Tree **bindings, struct colm_program *prg, long pat, Kid *kid, int checkNext ); +int matchPattern( Tree **bindings, struct colm_program *prg, + long pat, Kid *kid, int checkNext ); Tree *treeIterDerefCur( TreeIter *iter ); /* For making references of attributes. */ Kid *getFieldKid( Tree *tree, Word field ); -Tree *copyRealTree( struct colm_program *prg, Tree *tree, Kid *oldNextDown, Kid **newNextDown ); +Tree *copyRealTree( struct colm_program *prg, Tree *tree, + Kid *oldNextDown, Kid **newNextDown ); void splitIterCur( struct colm_program *prg, Tree ***psp, TreeIter *iter ); Tree *setListMem( List *list, Half field, Tree *value ); @@ -312,16 +314,19 @@ void strCollectAppend( StrCollect *collect, const char *data, long len ); void strCollectClear( StrCollect *collect ); Tree *treeTrim( struct colm_program *prg, Tree **sp, Tree *tree ); -void printTreeCollect( struct colm_program *prg, Tree **sp, StrCollect *collect, Tree *tree, int trim ); +void printTreeCollect( struct colm_program *prg, Tree **sp, + StrCollect *collect, Tree *tree, int trim ); void printTreeFile( struct colm_program *prg, Tree **sp, FILE *out, Tree *tree, int trim ); void printTreeFd( struct colm_program *prg, Tree **sp, int fd, Tree *tree, int trim ); -void printXmlStdout( struct colm_program *prg, Tree **sp, Tree *tree, int commAttr, int trim ); +void printXmlStdout( struct colm_program *prg, Tree **sp, + Tree *tree, int commAttr, int trim ); /* * Iterators. */ -UserIter *uiterCreate( struct colm_program *prg, Tree ***psp, struct _FunctionInfo *fi, long searchId ); +UserIter *uiterCreate( struct colm_program *prg, Tree ***psp, + struct _FunctionInfo *fi, long searchId ); void uiterInit( struct colm_program *prg, Tree **sp, UserIter *uiter, struct _FunctionInfo *fi, int revertOn ); |