データを貯めておく所。 ソースの管理をファイルサーバでやっているなら共有フォルダ、SVNでやっているならリポジトリ、Gitもリポジトリ。 SVNのリポジトリとGitのリポジトリが異なる点は、直接の操作対象となるリポジトリが手元にある(Git)か、リモートにある(SVN)か。
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
using System; | |
using System.Collections.Generic; | |
using System.Linq; | |
using System.Text; | |
using System.Reflection; | |
#pragma warning disable 0414 | |
namespace Enumに柔軟な拡張を追加する試み | |
{ |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
nnoremap <Space>gn :<C-u>w<CR>:Git now<CR> | |
nnoremap <Space>gN :<C-u>w<CR>:Git now --all<CR> |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
open Microsoft.FSharp.Compiler.CodeDom | |
open System.Reflection | |
open System.CodeDom.Compiler | |
type EvalResult<'a> = | |
| CompileError of string seq | |
| RuntimeError of exn | |
| Success of 'a | |
let eval args expr = |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
// Microsoft.CSharpを参照に追加すること | |
open System.Reflection | |
open System.Runtime.CompilerServices | |
open Microsoft.FSharp.Reflection | |
open Microsoft.CSharp.RuntimeBinder | |
let convert (inp:obj) : 'res = | |
inp |> unbox |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Option Explicit | |
Private xSource As Variant | |
Private xLbRow As Long | |
Private xUbRow As Long | |
Private xLbCol As Long | |
Private xUbCol As Long | |
Private xIndexes As Variant |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
Public carry As Boolean | |
Function AnsCount(range, trg) | |
Dim res() | |
res = EnumCombi(range, trg) | |
AnsCount = UBound(res) | |
End Function | |
Function NextCells(range, crnt) | |
Dim min |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
#!/bin/sh | |
PREFIX="from now" | |
MESSAGE="[${PREFIX}] `date +\"%Y/%m/%d %T\"`" | |
get_amend() { | |
if [ -z `git log --pretty=oneline -1 | cut -d " " -f 2- | grep "^\[${PREFIX}]"` ] | |
then | |
return 1 | |
fi |
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
open Microsoft.FSharp.Reflection | |
let listType = typedefof<list<_>>.MakeGenericType([| t |]) | |
let cases = FSharpType.GetUnionCases(listType) | |
let nil, cons = cases.[0], cases.[1] | |
let lst = FSharpValue.MakeUnion(nil, [||]) | |
let consR x xs = | |
ref (FSharpValue.MakeUnion(cons, [| x; !xs |])) | |
!(List.foldBack consR xs (ref lst)) |> unbox |
OlderNewer