Comments on return value tuple gets messed up #307

New Issue

2020-06-30T06:45:03+02:00

itsfarseen commented

2020-06-30 06:45:03 +02:00

(Migrated from github.com)

Paste this into: https://hexagoxel.de/brittany/

doFuncDefine
  :: Type1
  -> String
  -> [SpanW (String, Type1)]
  -> Span
  -> [Func]
  -> Either Error ([Func]  -- Funcs Table with this function added in
                  ,[Symbol] -- Local Symbol Table
                  ,[Stmt] -> [Func]  -- Return function
                  )

Outputs:

doFuncDefine
  :: Type1
  -> String
  -> [SpanW (String, Type1)]
  -> Span
  -> [Func]
  -> Either Error ([  -- Funcs Table with this function added in
                    Func], [ -- Local Symbol Table
                            Symbol], [Stmt] -> [Func]  -- Return function
                                                     )

Paste this into: https://hexagoxel.de/brittany/ ```haskell doFuncDefine :: Type1 -> String -> [SpanW (String, Type1)] -> Span -> [Func] -> Either Error ([Func] -- Funcs Table with this function added in ,[Symbol] -- Local Symbol Table ,[Stmt] -> [Func] -- Return function ) ``` Outputs: ```haskell doFuncDefine :: Type1 -> String -> [SpanW (String, Type1)] -> Span -> [Func] -> Either Error ([ -- Funcs Table with this function added in Func], [ -- Local Symbol Table Symbol], [Stmt] -> [Func] -- Return function ) ```

tfausak commented

2020-07-21 14:15:38 +02:00

(Migrated from github.com)

Oof, that's rough. Things get a little better if you avoid the list type, but that's not practical.

# cat issue-307.hs 
doFuncDefine
  :: Type1
  -> String
  -> [SpanW (String, Type1)]
  -> Span
  -> [Func]
  -> Either Error (t Func  -- Funcs Table with this function added in
                  ,t Symbol -- Local Symbol Table
                  ,t Stmt -> t Func  -- Return function
                  )

# brittany issue-307.hs
doFuncDefine
  :: Type1
  -> String
  -> [SpanW (String, Type1)]
  -> Span
  -> [Func]
  -> Either Error (t Func  -- Funcs Table with this function added in
                         , t Symbol -- Local Symbol Table
                                   , t Stmt -> t Func)  -- Return function

Oof, that's rough. Things get a little better if you avoid the list type, but that's not practical. ``` sh # cat issue-307.hs doFuncDefine :: Type1 -> String -> [SpanW (String, Type1)] -> Span -> [Func] -> Either Error (t Func -- Funcs Table with this function added in ,t Symbol -- Local Symbol Table ,t Stmt -> t Func -- Return function ) # brittany issue-307.hs doFuncDefine :: Type1 -> String -> [SpanW (String, Type1)] -> Span -> [Func] -> Either Error (t Func -- Funcs Table with this function added in , t Symbol -- Local Symbol Table , t Stmt -> t Func) -- Return function ```

Sign in to join this conversation.

No Milestone

No project

No Assignees

1 Participants

Notifications

Due Date

The due date is invalid or out of range. Please use the format 'yyyy-mm-dd'.

No due date set.

Dependencies

No dependencies set.

Reference: hexagoxel/brittany#307