技术控

    今日:162| 主题:49347
收藏本版 (1)
最新软件应用技术尽在掌握

[其他] literate-readme - a readme that is also a literate haskell program!

[复制链接]
数学不好万岁。 发表于 2016-11-28 08:23:06
15 3

立即注册CoLaBug.com会员,免费获得投稿人的专业资料,享用更多功能,玩转个人品牌!

您需要 登录 才可以下载或查看,没有帐号?立即注册

x
!/usr/bin/env stack

  -- stack --install-ghc runghc --package turtle --package markdown-unlit -- "-pgmL markdown-unlit"
  1. {-# LANGUAGE OverloadedStrings #-}
  2. import Turtle
复制代码
Literate README

  The readme that builds itself!
  You can setup and build this project by running this very readme. This is what the travis job does!
  Example:    ./README.lhs --setup --test  
  1. parser :: Parser (Bool, Bool, Bool)
  2. parser = (,,) <$> switch "setup" 's' "Set up the stack environment."
  3.               <*> switch "test"  't' "Build the project and run the tests."
  4.               <*> switch "build" 'b' "Just build, don't run tests."
复制代码
  1. main = void $ do
  2.     (setup, test, build) <- options "Literate README" parser
  3.     let ops = doSetup setup .&&. doBuild build .&&. doTest test
  4.     ops .||. die "Step failed."
  5. nop = shell "true" empty
  6. stackOrNop op True = shell ("stack " <> op) empty
  7. stackOrNop _  _    = nop
复制代码
Setup

  1. -- | Call this with: ./README.lhs --setup
  2. doSetup = stackOrNop "setup"
复制代码
Build

  1. -- | Call this with: ./README.lhs --build
  2. doBuild = stackOrNop "build"
复制代码
Test

  1. -- | Call this with: ./README.lhs --test
  2. doTest = stackOrNop "test"
复制代码
友荐云推荐




上一篇:QA的未来
下一篇:pbxprojHelper--Xcode工程文件助手
酷辣虫提示酷辣虫禁止发表任何与中华人民共和国法律有抵触的内容!所有内容由用户发布,并不代表酷辣虫的观点,酷辣虫无法对用户发布内容真实性提供任何的保证,请自行验证并承担风险与后果。如您有版权、违规等问题,请通过"联系我们"或"违规举报"告知我们处理。

一指囚天 发表于 2016-11-28 09:14:48
看过相关报道,楼下后来二了
回复 支持 反对

使用道具 举报

派代 发表于 2016-11-28 16:30:06
如果你真的爱他,那么你必须容忍他部份的缺点。
回复 支持 反对

使用道具 举报

琛婷威 发表于 2016-11-28 21:00:11
爱情就像两个拉着橡皮筋的人,受伤的总是不愿意放手的那一个!
回复 支持 反对

使用道具 举报

*滑动验证:
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

我要投稿

推荐阅读

扫码访问 @iTTTTT瑞翔 的微博
回页顶回复上一篇下一篇回列表手机版
手机版/CoLaBug.com ( 粤ICP备05003221号 | 文网文[2010]257号 )|网站地图 酷辣虫

© 2001-2016 Comsenz Inc. Design: Dean. DiscuzFans.

返回顶部 返回列表