Skip to content

Instantly share code, notes, and snippets.

@fracek
Last active Aug 29, 2015
Embed
What would you like to do?
define method initialize(opts :: <git-repository-init-options*>,
#key version = 1,
flags = #f,
mode = #f,
working-directory = #f,
description = #f,
...
origin-url = #f)
if (version)
git-repository-init-options$version(opts) := version;
end;
...
if (working-directory)
git-repository-init-options$workdir-path(opts) := working-directory;
end;
...
end;
define git-options <git-repository-init-options*>
version = 1,
flags,
mode,
workdir-path => working-directory,
description,
template-path,
initial-head,
origin-url
end git-options;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment