diff options
author | Denis Bitouzé <dbitouze@wanadoo.fr> | 2021-02-25 18:23:07 +0000 |
---|---|---|
committer | Denis Bitouzé <dbitouze@wanadoo.fr> | 2021-02-25 18:23:07 +0000 |
commit | c6101f91d071883b48b1b4b51e5eba0f36d9a78d (patch) | |
tree | 1bf7f5a881d7a4f5c5bf59d0b2821943dd822372 /Build/source/utils/asymptote/runhistory.cc | |
parent | 07ee7222e389b0777456b427a55c22d0e6ffd267 (diff) |
French translation for tlmgr updated
git-svn-id: svn://tug.org/texlive/trunk@57912 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/utils/asymptote/runhistory.cc')
-rw-r--r-- | Build/source/utils/asymptote/runhistory.cc | 324 |
1 files changed, 0 insertions, 324 deletions
diff --git a/Build/source/utils/asymptote/runhistory.cc b/Build/source/utils/asymptote/runhistory.cc deleted file mode 100644 index f6a9cc8cf95..00000000000 --- a/Build/source/utils/asymptote/runhistory.cc +++ /dev/null @@ -1,324 +0,0 @@ -/***** Autogenerated from runhistory.in; changes will be overwritten *****/ - -#line 1 "runtimebase.in" -/***** - * runtimebase.in - * Andy Hammerlindl 2009/07/28 - * - * Common declarations needed for all code-generating .in files. - * - *****/ - - -#line 1 "runhistory.in" -/***** - * runhistory.in - * - * Runtime functions for history operations. - * - *****/ - -#line 1 "runtimebase.in" -#include "stack.h" -#include "types.h" -#include "builtin.h" -#include "entry.h" -#include "errormsg.h" -#include "array.h" -#include "triple.h" -#include "callable.h" -#include "opsymbols.h" - -using vm::stack; -using vm::error; -using vm::array; -using vm::read; -using vm::callable; -using types::formal; -using types::function; -using camp::triple; - -#define PRIMITIVE(name,Name,asyName) using types::prim##Name; -#include <primitives.h> -#undef PRIMITIVE - -typedef double real; - -void unused(void *); - -namespace run { -array *copyArray(array *a); -array *copyArray2(array *a); -array *copyArray3(array *a); - -double *copyTripleArray2Components(array *a, size_t &N, - GCPlacement placement=NoGC); -triple *copyTripleArray2C(array *a, size_t &N, - GCPlacement placement=NoGC); -} - -function *realRealFunction(); - -#define CURRENTPEN processData().currentpen - -#line 12 "runhistory.in" - -#include "array.h" -#include "mathop.h" -#include "builtin.h" - -using namespace camp; -using namespace settings; -using namespace vm; -using namespace run; - -typedef array stringarray; -using types::stringArray; - -namespace camp { -bool allowRender=true; -} - -#if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) -#include <readline/readline.h> -#include <readline/history.h> - -struct historyState { - bool store; - HISTORY_STATE state; -}; - -typedef mem::map<CONST string, historyState> historyMap_t; -historyMap_t historyMap; -static HISTORY_STATE history_save; - -// Store a deep copy of the current readline history in dest. -void store_history(HISTORY_STATE *dest) -{ - HISTORY_STATE *src=history_get_history_state(); - if(src) { - *dest=*src; - for(Int i=0; i < src->length; ++i) - dest->entries[i]=src->entries[i]; - free(src); - } -} - -stringarray* get_history(Int n) -{ - int N=intcast(n); - if(N <= 0) N=history_length; - else N=Min(N,history_length); - array *a=new array((size_t) N); - int offset=history_length-N+1; - for(int i=0; i < N; ++i) { - HIST_ENTRY *last=history_get(offset+i); - string s=last ? last->line : ""; - (*a)[i]=s; - } - return a; -} - -string historyfilename(const string &name) -{ - return historyname+"_"+name; -} - -#endif - -namespace run { - -extern string emptystring; - -#if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) - -#endif - -void cleanup() -{ -#if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) - store_history(&history_save); - int nlines=intcast(getSetting<Int>("historylines")); - for(historyMap_t::iterator h=historyMap.begin(); h != historyMap.end(); - ++h) { - history_set_history_state(&h->second.state); - if(h->second.store) { - stifle_history(nlines); - write_history(historyfilename(h->first).c_str()); - unstifle_history(); - } - } - history_set_history_state(&history_save); -#endif -#ifdef HAVE_LIBGSL - trans::GSLrngFree(); -#endif -} -} - -// Autogenerated routines: - - - -#ifndef NOSYM -#include "runhistory.symbols.h" - -#endif -namespace run { -// Return the last n lines of the history named name. -#line 110 "runhistory.in" -// stringarray* history(string name, Int n=1); -void gen_runhistory0(stack *Stack) -{ - Int n=vm::pop<Int>(Stack,1); - string name=vm::pop<string>(Stack); -#line 111 "runhistory.in" -#if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) - bool newhistory=historyMap.find(name) == historyMap.end(); - - string filename; - - if(newhistory) { - filename=historyfilename(name); - std::ifstream exists(filename.c_str()); - if(!exists) {Stack->push<stringarray*>(new array(0)); return;} - } - - store_history(&history_save); - HISTORY_STATE& history=historyMap[name].state; - history_set_history_state(&history); - - if(newhistory) - read_history(filename.c_str()); - - array *a=get_history(n); - - store_history(&history); - history_set_history_state(&history_save); - - {Stack->push<stringarray*>(a); return;} -#else - unused(&n); - {Stack->push<stringarray*>(new array(0)); return;} -#endif -} - -// Return the last n lines of the interactive history. -#line 143 "runhistory.in" -// stringarray* history(Int n=0); -void gen_runhistory1(stack *Stack) -{ - Int n=vm::pop<Int>(Stack,0); -#line 144 "runhistory.in" -#if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) - {Stack->push<stringarray*>(get_history(n)); return;} -#else - unused(&n); - {Stack->push<stringarray*>(new array(0)); return;} -#endif -} - -// Prompt for a string using prompt, the GNU readline library, and a -// local history named name. -#line 155 "runhistory.in" -// string readline(string prompt=emptystring, string name=emptystring, bool tabcompletion=false); -void gen_runhistory2(stack *Stack) -{ - bool tabcompletion=vm::pop<bool>(Stack,false); - string name=vm::pop<string>(Stack,emptystring); - string prompt=vm::pop<string>(Stack,emptystring); -#line 157 "runhistory.in" - if(!(isatty(STDIN_FILENO) || getSetting<Int>("inpipe") >= 0)) - {Stack->push<string>(emptystring); return;} -#if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) - interact::init_readline(tabcompletion); - - store_history(&history_save); - bool newhistory=historyMap.find(name) == historyMap.end(); - historyState& h=historyMap[name]; - HISTORY_STATE& history=h.state; - history_set_history_state(&history); - - if(newhistory) - read_history(historyfilename(name).c_str()); - - static char *line=NULL; - /* Return the memory to the free pool - if the buffer has already been allocated. */ - if(line) { - free(line); - line=NULL; - } - - /* Get a line from the user. */ - allowRender=false; - line=readline(prompt.c_str()); - allowRender=true; - - if(!line) cout << endl; - - history_set_history_state(&history_save); - - {Stack->push<string>(line ? string(line) : emptystring); return;} -#else - cout << prompt; - string s; - getline(cin,s); - unused(&tabcompletion); // Avoid unused variable warning message. - {Stack->push<string>(s); return;} -#endif -} - -// Save a string in a local history named name. -// If store=true, store the local history in the file historyfilename(name). -#line 201 "runhistory.in" -// void saveline(string name, string value, bool store=true); -void gen_runhistory3(stack *Stack) -{ - bool store=vm::pop<bool>(Stack,true); - string value=vm::pop<string>(Stack); - string name=vm::pop<string>(Stack); -#line 202 "runhistory.in" -#if defined(HAVE_LIBREADLINE) && defined(HAVE_LIBCURSES) - store_history(&history_save); - bool newhistory=historyMap.find(name) == historyMap.end(); - historyState& h=historyMap[name]; - h.store=store; - HISTORY_STATE& history=h.state; - history_set_history_state(&history); - - if(newhistory) - read_history(historyfilename(name).c_str()); - - if(value != "") { - add_history(value.c_str()); - if(store) { - std::ofstream hout(historyfilename(name).c_str(),std::ios::app); - hout << value << endl; - } - } - - store_history(&history); - history_set_history_state(&history_save); -#else - unused(&store); -#endif -} - -} // namespace run - -namespace trans { - -void gen_runhistory_venv(venv &ve) -{ -#line 109 "runhistory.in" - addFunc(ve, run::gen_runhistory0, stringArray(), SYM(history), formal(primString(), SYM(name), false, false), formal(primInt(), SYM(n), true, false)); -#line 142 "runhistory.in" - addFunc(ve, run::gen_runhistory1, stringArray(), SYM(history), formal(primInt(), SYM(n), true, false)); -#line 153 "runhistory.in" - addFunc(ve, run::gen_runhistory2, primString(), SYM(readline), formal(primString(), SYM(prompt), true, false), formal(primString(), SYM(name), true, false), formal(primBoolean(), SYM(tabcompletion), true, false)); -#line 199 "runhistory.in" - addFunc(ve, run::gen_runhistory3, primVoid(), SYM(saveline), formal(primString(), SYM(name), false, false), formal(primString(), SYM(value), false, false), formal(primBoolean(), SYM(store), true, false)); -} - -} // namespace trans |