diff options
Diffstat (limited to 'frontend/syntax.icl')
| -rw-r--r-- | frontend/syntax.icl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/frontend/syntax.icl b/frontend/syntax.icl index 5faa466..2efe053 100644 --- a/frontend/syntax.icl +++ b/frontend/syntax.icl @@ -812,6 +812,7 @@ where (<<<) file (LinePos file_name line) = file <<< '[' <<< file_name <<< ',' <<< line <<< ']' (<<<) file _ = file + instance <<< TypeVarInfo where (<<<) file TVI_Empty = file <<< "TVI_Empty" @@ -819,7 +820,7 @@ where (<<<) file (TVI_TypeVar ptr) = file <<< (ptrToInt ptr) (<<<) file (TVI_Forward _) = file <<< "TVI_Forward" (<<<) file (TVI_SignClass _ _ _) = file <<< "TVI_SignClass" - (<<<) file (TVI_Attribute ta) = file <<< "TVI_Attribute " <<< ta + (<<<) file (TVI_AttrAndRefCount ta rc) = file <<< "TVI_AttrAndRefCount " <<< ta <<< " " <<< rc (<<<) file (TVI_CorrespondenceNumber n) = file <<< "TVI_CorrespondenceNumber " <<< n (<<<) file (TVI_AType at) = file <<< "TVI_AType " <<< at (<<<) file TVI_Used = file <<< "TVI_Used" |