summaryrefslogtreecommitdiff
path: root/src/tree.h
diff options
context:
space:
mode:
authorAdrian Thurston <thurston@complang.org>2015-01-18 16:59:32 -0500
committerAdrian Thurston <thurston@complang.org>2015-01-18 16:59:32 -0500
commit7c402fcd65b36a20c8f7059b551e99212fa4adae (patch)
tree852717acbe7385d5e981847cdef1d1b4ad943fab /src/tree.h
parente295b7169e3e234994202322737e0e2a337c9311 (diff)
downloadcolm-7c402fcd65b36a20c8f7059b551e99212fa4adae.tar.gz
some cleanup in the pointer
Diffstat (limited to 'src/tree.h')
-rw-r--r--src/tree.h7
1 files changed, 3 insertions, 4 deletions
diff --git a/src/tree.h b/src/tree.h
index 527e460e..59d0f04f 100644
--- a/src/tree.h
+++ b/src/tree.h
@@ -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 );