diff options
author | Adrian Thurston <thurston@complang.org> | 2015-01-18 16:59:32 -0500 |
---|---|---|
committer | Adrian Thurston <thurston@complang.org> | 2015-01-18 16:59:32 -0500 |
commit | 7c402fcd65b36a20c8f7059b551e99212fa4adae (patch) | |
tree | 852717acbe7385d5e981847cdef1d1b4ad943fab /src/tree.h | |
parent | e295b7169e3e234994202322737e0e2a337c9311 (diff) | |
download | colm-7c402fcd65b36a20c8f7059b551e99212fa4adae.tar.gz |
some cleanup in the pointer
Diffstat (limited to 'src/tree.h')
-rw-r--r-- | src/tree.h | 7 |
1 files changed, 3 insertions, 4 deletions
@@ -103,7 +103,7 @@ typedef struct _Pointer long refs; Kid *child; - Kid *value; + colm_value_t value; } Pointer; typedef struct _Str @@ -207,7 +207,7 @@ Kid *treeExtractChild( struct colm_program *prg, Tree *tree ); Kid *reverseKidList( Kid *kid ); Tree *constructInteger( struct colm_program *prg, long i ); -Pointer *colm_construct_pointer( struct colm_program *prg, colm_value_t value ); +Tree *colm_construct_pointer( struct colm_program *prg, colm_value_t value ); Tree *constructTerm( struct colm_program *prg, Word id, Head *tokdata ); Tree *constructTree( struct colm_program *prg, Kid *kid, Tree **bindings, long pat ); @@ -228,8 +228,7 @@ void streamFree( struct colm_program *prg, Stream *s ); Tree *copyTree( struct colm_program *prg, Tree *tree, Kid *oldNextDown, Kid **newNextDown ); -Tree *colm_get_pointer_val( Pointer *ptr ); -Tree *getPtrValSplit( struct colm_program *prg, Pointer *ptr ); +colm_value_t colm_get_pointer_val( Tree *pointer ); Tree *colm_tree_get_field( Tree *tree, Word field ); Tree *getFieldSplit( struct colm_program *prg, Tree *tree, Word field ); Tree *getRhsEl( struct colm_program *prg, Tree *lhs, long position ); |