本文整理汇总了C++中base::lisp类的典型用法代码示例。如果您正苦于以下问题:C++ lisp类的具体用法?C++ lisp怎么用?C++ lisp使用的例子?那么恭喜您, 这里精选的类代码示例或许可以为您提供帮助。
在下文中一共展示了lisp类的14个代码示例,这些例子默认根据受欢迎程度排序。您可以为喜欢或者感觉有用的代码点赞,您的评价将有助于我们的系统推荐出更棒的C++代码示例。
示例1: unbind_playback
// (unbind-playback)
base::cell_t unbind_playback(base::lisp &gl, base::cell_t, base::cells_t &) {
if (pl) {
pl->enabled = false;
return gl.t();
}
return gl.nil();
}
开发者ID:c41x,项目名称:Kiwano,代码行数:8,代码来源:playback.hpp
示例2: ctags_remove
// (ctags-remove (string|id)) -> nil/t
base::cell_t ctags_remove(base::lisp &gl, base::cell_t c, base::cells_t &ret) {
if (base::lisp::validate(c, base::cell::list(1), base::cell::typeString)) {
const auto &key = c + 1;
removeTag(key->s);
return gl.t();
}
gl.signalError("ctags-set: invalid arguments, expected (string int any)");
return gl.nil();
}
开发者ID:Robert-yeh,项目名称:Kiwano,代码行数:10,代码来源:customTags.cpp
示例3: seek
// playback-seek (float)posSeconds
base::cell_t seek(base::lisp &gl, base::cell_t c, base::cells_t &) {
if (base::lisp::validate(c, base::cell::list(1), base::cell::typeFloat)) {
const auto &pos = c + 1;
ts.setPosition((double)pos->f);
return gl.nil();
}
gl.signalError("playback-seek: invalid arguments, expected (float)");
return gl.nil();
}
开发者ID:c41x,项目名称:Kiwano,代码行数:10,代码来源:playback.hpp
示例4: ctags_load
// (ctags-load (string|file-name)) -> nil/t
base::cell_t ctags_load(base::lisp &gl, base::cell_t c, base::cells_t &ret) {
if (base::lisp::validate(c, base::cell::list(1), base::cell::typeString)) {
const auto &fileName = c + 1;
if (loadTags(fileName->s))
return gl.t();
return gl.nil();
}
gl.signalError("ctags-load: invalid arguments, expected (string)");
return gl.nil();
}
开发者ID:Robert-yeh,项目名称:Kiwano,代码行数:11,代码来源:customTags.cpp
示例5: ctags_get
//- LISP API
// (ctags-get (string|id) (int|items-count)) -> any/nil
base::cell_t ctags_get(base::lisp &gl, base::cell_t c, base::cells_t &ret) {
if (base::lisp::validate(c, base::cell::list(2), base::cell::typeString, base::cell::typeInt)) {
const auto &key = c + 1;
const auto &num = c + 2;
ret.push_back(getCustomTag(key->s, num->i));
return ret.end();
}
gl.signalError("ctags-get: invalid arguments, expected (string int)");
return gl.nil();
}
开发者ID:Robert-yeh,项目名称:Kiwano,代码行数:12,代码来源:customTags.cpp
示例6: ctags_set
// (ctags-set (string|id) (int|item-index) any) -> nil/t
base::cell_t ctags_set(base::lisp &gl, base::cell_t c, base::cells_t &ret) {
if (base::lisp::validate(c, base::cell::list(3), base::cell::typeString, base::cell::typeInt /* any */)) {
const auto &key = c + 1;
const auto &num = c + 2;
const auto &value = c + 3;
setCustomTag(key->s, num->i, *value);
return gl.t();
}
gl.signalError("ctags-set: invalid arguments, expected (string int any)");
return gl.nil();
}
开发者ID:Robert-yeh,项目名称:Kiwano,代码行数:12,代码来源:customTags.cpp
示例7: set_file
//- LISP API -
// playback-set-file (string)fileName -> t/nil
base::cell_t set_file(base::lisp &gl, base::cell_t c, base::cells_t &) {
if (base::lisp::validate(c, base::cell::list(1), base::cell::typeString)) {
const auto &fname = c + 1;
// stop current playback
ts.stop();
ts.setSource(nullptr);
frs = nullptr;
AudioFormatReader *r;
// ectract CUE information (if any)
std::regex cue("^(.*):(\\d+):(\\d+)$");
std::smatch result;
std::regex_search(fname->s, result, cue);
if (result.size() == 4) {
// is cue
int32 start = base::fromStr<int32>(result[2].str());
int32 end = base::fromStr<int32>(result[3].str());
int32 duration = end - start;
AudioFormatReader *tr = fm.createReaderFor(File(result[1].str()));
// start, end are in frames (1 frame = 1/75 second) - convert to sample
float samplesInOneSecond = tr->sampleRate; // AudioSubsectionReader will handle channels count
float startSecond = (float)start / 75.0f;
float durationSecond = (float)duration / 75.0f;
float startSample = startSecond * samplesInOneSecond;
float durationSamples = durationSecond * samplesInOneSecond;
// some CUE may have 0 length (play to end)
if (end <= start)
durationSamples = tr->lengthInSamples;
r = new AudioSubsectionReader(tr, (int)startSample, (int)durationSamples, true);
}
else {
// regular file
r = fm.createReaderFor(File(fname->s));
}
if (r) {
frs = new AudioFormatReaderSource(r, true);
ts.setSource(frs, 32768, &thread, r->sampleRate);
return gl.t();
}
gl.signalError(base::strs("file not found or file format not supported: ", fname->s));
return gl.nil();
}
gl.signalError("playback-set-file: invalid arguments, expected (string)");
return gl.nil();
}
开发者ID:c41x,项目名称:Kiwano,代码行数:53,代码来源:playback.hpp
示例8: bind_playback
// (bind-playback (id)callback)
base::cell_t bind_playback(base::lisp &gl, base::cell_t c, base::cells_t &) {
if (pl) {
if (base::lisp::validate(c, base::cell::list(1), base::cell::typeIdentifier)) {
const auto &fx = c + 1;
pl->functionId = fx->s;
pl->enabled = true;
return gl.t();
}
pl->enabled = false;
return gl.nil();
}
gl.signalError("bind-playback: invalid arguments, expected (id)");
return gl.nil();
}
开发者ID:c41x,项目名称:Kiwano,代码行数:15,代码来源:playback.hpp
示例9: gain
// (playback-gain (float|optional)gain) -> t/nil | gain
base::cell_t gain(base::lisp &gl, base::cell_t c, base::cells_t &ret) {
if (pl) {
if (base::lisp::validate(c, base::cell::listRange(1), base::cell::typeFloat)) {
// setter
ts.setGain((c + 1)->f);
return gl.t();
}
else if (base::lisp::validate(c, base::cell::list(0))) {
// getter
ret.push_back(base::cell(ts.getGain()));
return ret.end();
}
gl.signalError("playback-gain: invalid arguments, expected ((optional) float)");
}
return gl.nil();
}
开发者ID:c41x,项目名称:Kiwano,代码行数:17,代码来源:playback.hpp
示例10: set_file
//- LISP API -
// playback-set-file (string)fileName -> t/nil
base::cell_t set_file(base::lisp &gl, base::cell_t c, base::cells_t &) {
if (base::lisp::validate(c, base::cell::list(1), base::cell::typeString)) {
const auto &fname = c + 1;
// stop current playback
ts.stop();
ts.setSource(nullptr);
frs = nullptr;
AudioFormatReader *r;
// ectract CUE information (if any)
std::regex cue("^(.*):(\\d+):(\\d+)$");
std::smatch result;
std::regex_search(fname->s, result, cue);
if (result.size() == 4) {
// is cue
int32 start = base::fromStr<int32>(result[2].str());
int32 end = base::fromStr<int32>(result[3].str());
AudioFormatReader *tr = fm.createReaderFor(File(result[1].str()));
r = new AudioSubsectionReader(tr, start, end - start, true);
}
else {
// regular file
r = fm.createReaderFor(File(fname->s));
}
if (r) {
frs = new AudioFormatReaderSource(r, true);
ts.setSource(frs, 32768, &thread, r->sampleRate);
return gl.t();
}
gl.signalError(base::strs("file not found or file format not supported: ", fname->s));
return gl.nil();
}
gl.signalError("playback-set-file: invalid arguments, expected (string)");
return gl.nil();
}
开发者ID:Robert-yeh,项目名称:Kiwano,代码行数:40,代码来源:playback.hpp
示例11: finished_playing
// playback-finished -> t/nil
base::cell_t finished_playing(base::lisp &gl, base::cell_t, base::cells_t &) {
if (ts.hasStreamFinished())
return gl.t();
return gl.nil();
}
开发者ID:c41x,项目名称:Kiwano,代码行数:6,代码来源:playback.hpp
示例12: is_playing
// playback-is-playing -> t/nil
base::cell_t is_playing(base::lisp &gl, base::cell_t, base::cells_t &) {
if (ts.isPlaying())
return gl.t();
return gl.nil();
}
开发者ID:c41x,项目名称:Kiwano,代码行数:6,代码来源:playback.hpp
示例13: stop
// playback-stop
base::cell_t stop(base::lisp &gl, base::cell_t, base::cells_t &) {
ts.stop();
return gl.nil();
}
开发者ID:c41x,项目名称:Kiwano,代码行数:5,代码来源:playback.hpp
示例14: unload_file
// playback-unload-file
base::cell_t unload_file(base::lisp &gl, base::cell_t, base::cells_t &) {
ts.stop();
ts.setSource(nullptr);
frs = nullptr;
return gl.nil();
}
开发者ID:c41x,项目名称:Kiwano,代码行数:7,代码来源:playback.hpp
注:本文中的base::lisp类示例由纯净天空整理自Github/MSDocs等源码及文档管理平台,相关代码片段筛选自各路编程大神贡献的开源项目,源码版权归原作者所有,传播和使用请参考对应项目的License;未经允许,请勿转载。 |
请发表评论