Advertisement
Guest User

Untitled

a guest
Jun 23rd, 2017
57
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. instance Show Terminal where
  2.     show (LiteralDecimal x) = show x
  3.     show (LiteralInteiro x) = show x
  4.     show (LiteralCaracter x) =  show x
  5.     show (LiteralString x) = show x
  6.     show (LiteralBooleano x) = show x
  7.    
  8. instance Show Tipo where
  9.     show (TipoFloat) = "float"
  10.     show (TipoInt) = "int"
  11.     show (TipoChar) = "char"
  12.     show (TipoString) = "String"
  13.     show (TipoBoolean) = "boolean"
  14.     show (TipoVoid) = "void"
  15.     show (TipoNada) = ""
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement