Haskell-Things/ImplicitCAD
1
1
Fork 0
mirror of https://github.com/Haskell-Things/ImplicitCAD.git synced 2024-11-04 01:26:48 +03:00
Code Issues Projects Releases Wiki Activity

fix parser-bench.

Browse Source
This commit is contained in:
Julia Longtin 2020-01-11 00:52:18 +00:00
parent 5164ce6cef
commit 43f843214f
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
programs/parser-bench.hs
View File

@ -78,7 +78,7 @@ parExpr :: Int -> String
parExpr n = concat ["(a+" <> show i <> "+" | i <- [0..n]] <> "0)" <> concat ["+" <> show i <> ")" | i <- [1..n]]
genList :: Int -> String
genList n = concat ["[1:1:" <> show i <> "] <> " | i <- [1..n]] <> "0"
genList n = concat ["[1:1:" <> show i <> "] ++ " | i <- [1..n]] <> "0"
stringList :: Int -> String
stringList n = "[" <> concat ["\"" <> show i <> "\", " | i <- [1..n]] <> " \"something\"]"