aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--frontend/syntax.icl9
1 files changed, 6 insertions, 3 deletions
diff --git a/frontend/syntax.icl b/frontend/syntax.icl
index af1f101..4641e74 100644
--- a/frontend/syntax.icl
+++ b/frontend/syntax.icl
@@ -1120,15 +1120,18 @@ where
instance <<< TypeVar
where
- (<<<) file varid = file <<< varid.tv_name <<< '[' <<< ptrToInt varid.tv_info_ptr <<< ']'
+// (<<<) file varid = file <<< varid.tv_name <<< '[' <<< ptrToInt varid.tv_info_ptr <<< ']'
+ (<<<) file varid = file <<< varid.tv_name
instance <<< AttributeVar
where
- (<<<) file {av_name,av_info_ptr} = file <<< av_name <<< '[' <<< ptrToInt av_info_ptr <<< ']'
+// (<<<) file {av_name,av_info_ptr} = file <<< av_name <<< '[' <<< ptrToInt av_info_ptr <<< ']'
+ (<<<) file {av_name,av_info_ptr} = file <<< av_name
instance toString AttributeVar
where
- toString {av_name,av_info_ptr} = toString av_name + "[" + toString (ptrToInt av_info_ptr) + "]"
+// toString {av_name,av_info_ptr} = toString av_name + "[" + toString (ptrToInt av_info_ptr) + "]"
+ toString {av_name,av_info_ptr} = toString av_name
instance <<< AType
where