luke
/
ngspice
mirror of https://git.code.sf.net/p/ngspice/ngspice
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

drop cast of NULL to non-ansi function pointer

This commit is contained in:
rlar 2010-06-26 19:58:42 +00:00
parent be57f10b3b
commit 5e35b809ec
2 changed files with 177 additions and 173 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
ChangeLog
View File

@ -1,3 +1,7 @@
2010-06-26 Robert Larice
* src/frontend/commands.c:
NULL needs no cast
2010-06-26 Robert Larice
* src/include/inpptree.h,
* src/spicelib/parser/ifeval.c,

346
src/frontend/commands.c
View File

@ -86,7 +86,7 @@ struct comm spcp_coms[] = {
"vector ... [ shape ] : change the dimensions of a vector." } ,
{ "define", com_define, FALSE, FALSE, TRUE,
{ 010000, 040000, 040000, 040000 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[[func (args)] stuff] : Define a user-definable function." } ,
{ "set", com_set, FALSE, FALSE, TRUE,
{ 020000, 020000, 020000, 020000 }, E_DEFHMASK, 0, LOTS,
@ -101,21 +101,21 @@ struct comm spcp_coms[] = {
"[option] [option = value] ... : Set a simulator option." } ,
{ "savesnap", com_savesnap, FALSE, FALSE, TRUE,
{ 1, 040000, 040000, 040000 }, E_DEFHMASK, 1, 1,
(void (*)()) NULL,
NULL,
"file : Save a snapshot." } ,
{ "loadsnap", com_loadsnap, FALSE, FALSE, TRUE,
{ 1, 040000, 040000, 040000 }, E_DEFHMASK, 2, 2,
(void (*)()) NULL,
NULL,
"file : Load a snapshot." } ,
#endif
{ "alias", com_alias, FALSE, FALSE, FALSE,
{ 02, 04, 04, 04 }, E_ADVANCED, 0, LOTS,
(void (*)()) NULL,
NULL,
"[[word] alias] : Define an alias." } ,
{ "deftype", com_dftype, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 3, LOTS,
(void (*)()) NULL,
NULL,
"spec name pat ... : Redefine vector and plot types.\n" } ,
#ifdef TCL_MODULE
{ "bltplot", com_bltplot, FALSE, FALSE, TRUE,
@ -138,55 +138,55 @@ struct comm spcp_coms[] = {
": Display vector status." } ,
{ "destroy", com_destroy, FALSE, FALSE, FALSE,
{ 0400, 0400, 0400, 0400 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[plotname] ... : Throw away all the data in the plot." } ,
{ "setplot", com_splot, FALSE, FALSE, TRUE,
{ 0400, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[plotname] : Change the current working plot." } ,
{ "setcirc", com_scirc, FALSE, TRUE, FALSE,
{ 04, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[circuit name] : Change the current circuit." } ,
{ "setscale", com_setscale, FALSE, FALSE, FALSE,
{ 040000, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[vecname] : Change default scale of current working plot." } ,
{ "transpose", com_transpose, FALSE, FALSE, FALSE,
{ 040000, 040000, 040000, 040000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"varname ... : Perform matrix transposition on multi-D vectors." } ,
{ "xgraph", com_xgraph, FALSE, FALSE, TRUE,
{ 1, 041000, 041000, 041000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"file plotargs : Send plot to Xgraph-11." } ,
{ "gnuplot", com_gnuplot, FALSE, FALSE, TRUE,
{ 1, 041000, 041000, 041000 }, E_DEFHMASK, 2, LOTS,
(void (*)()) NULL,
NULL,
"file plotargs : Send plot to gnuplot." } ,
{ "wrdata", com_write_simple, FALSE, FALSE, TRUE,
{ 1, 041000, 041000, 041000 }, E_DEFHMASK, 2, LOTS,
(void (*)()) NULL,
NULL,
"file plotargs : Send plot data to file." } ,
{ "hardcopy", com_hardcopy, FALSE, FALSE, TRUE,
{ 1, 041000, 041000, 041000 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"file plotargs : Produce hardcopy plots." } ,
{ "asciiplot", com_asciiplot, FALSE, FALSE, TRUE,
{ 041000, 041000, 041000, 041000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"plotargs : Produce ascii plots." } ,
{ "write", com_write, FALSE, FALSE, TRUE,
{ 1, 040000, 040000, 040000 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"file expr ... : Write data to a file." } ,
{ "compose", com_compose, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 2, LOTS,
(void (*)()) NULL,
NULL,
"var parm=val ... : Compose a vector." } ,
{ "unlet", com_unlet, FALSE, FALSE, FALSE,
{ 040000, 040000, 040000, 040000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"varname ... : Undefine vectors." } ,
{ "print", com_print, FALSE, FALSE, TRUE,
{ 040000, 040000, 040000, 040000 }, E_BEGINNING, 1, LOTS,
@ -196,18 +196,18 @@ struct comm spcp_coms[] = {
/* gtri - begin - wbk - add event print command */
{ "eprint", EVTprint, FALSE, FALSE, TRUE,
{ 040000, 040000, 040000, 040000 }, E_BEGINNING, 1, LOTS,
(void (*)()) NULL,
NULL,
"node node ... : Print event values." } ,
/* gtri - end - wbk - add event print command */
{ "codemodel", com_codemodel, FALSE, FALSE, TRUE,
{ 040000, 040000, 040000, 040000 }, E_BEGINNING, 1, LOTS,
(void (*)()) NULL,
NULL,
"library library ... : Loads the opus librarys." } ,
#endif
#ifdef DEVLIB
{ "use", com_use, FALSE, FALSE, TRUE,
{ 040000, 040000, 040000, 040000 }, E_BEGINNING, 1, LOTS,
(void (*)()) NULL,
NULL,
"library library ... : Loads the device librarys." } ,
#endif
{ "load", com_load, FALSE, FALSE, TRUE,
@ -216,295 +216,295 @@ struct comm spcp_coms[] = {
"file ... : Load in data." } ,
{ "cross", com_cross, FALSE, FALSE, TRUE,
{ 040000, 0, 040000, 040000 }, E_DEFHMASK, 2, LOTS,
(void (*)()) NULL,
NULL,
"vecname number [ vector ... ] : Make a vector in a strange way." } ,
{ "undefine", com_undefine, FALSE, FALSE, FALSE,
{ 010000, 010000, 010000, 010000 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[func ...] : Undefine a user-definable function." } ,
{ "op", com_op, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.op line args] : Determine the operating point of the circuit." } ,
{ "tf", com_tf, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.tran line args] : Do a transient analysis." } ,
{ "tran", com_tran, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.tran line args] : Do a transient analysis." } ,
{ "ac", com_ac, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.ac line args] : Do an ac analysis." } ,
{ "dc", com_dc, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.dc line args] : Do a dc analysis." } ,
{ "pz", com_pz, FALSE, TRUE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.pz line args] : Do a pole / zero analysis." } ,
{ "sens", com_sens, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.sens line args] : Do a sensitivity analysis." } ,
{ "disto", com_disto, FALSE, TRUE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.disto line args] : Do an distortion analysis." } ,
{ "noise", com_noise, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.noise line args] : Do a noise analysis." } ,
{ "listing", com_listing, FALSE, TRUE, TRUE,
{ 0100, 0100, 0100, 0100 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[logical] [physical] [deck] : Print the current circuit." } ,
{ "edit", com_edit, FALSE, TRUE, TRUE,
{ 1, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[filename] : Edit a spice deck and then load it in." } ,
{ "dump", com_dump, FALSE, TRUE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Print a dump of the current circuit." } ,
{ "fft", com_fft, FALSE, FALSE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"vector ... : Create a frequency domain plot with FFT." } ,
{ "fourier", com_fourier, FALSE, FALSE, TRUE,
{ 0, 040000, 040000, 040000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"fund_freq vector ... : Do a fourier analysis of some data." } ,
{ "spec", com_spec, FALSE, FALSE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 4, LOTS,
(void (*)()) NULL,
NULL,
"start_freq stop_freq step_freq vector ... : Create a frequency domain plot." } ,
{ "meas", com_meas, FALSE, FALSE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"various ... : User defined signal evaluation." } ,
{ "show", com_show, FALSE, TRUE, FALSE,
{ 040, 040, 040, 040 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"devices ... : parameters ... : Print out device summary." } ,
{ "showmod", com_showmod, FALSE, TRUE, FALSE,
{ 040, 040, 040, 040 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"models ... : parameters ... : Print out model summary." } ,
{ "sysinfo", com_sysinfo, FALSE, TRUE, FALSE,
{ 040, 040, 040, 040 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"Print out system info summary." } ,
{ "alter", com_alter, FALSE, TRUE, FALSE,
{ 040, 040, 040, 040 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"devspecs : parmname value : Alter device parameters." } ,
{ "altermod", com_altermod, FALSE, TRUE, FALSE,
{ 040, 040, 040, 040 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"devspecs : parmname value : Alter model parameters." } ,
{ "resume", com_resume, FALSE, TRUE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Continue after a stop." } ,
{ "state", com_state, FALSE, TRUE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"(unimplemented) : Print the state of the circuit." },
{ "stop", com_stop, FALSE, TRUE, FALSE,
{ 04200, 04200, 04200, 04200 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[stop args] : Set a breakpoint." } ,
{ "trace", com_trce, FALSE, TRUE, FALSE,
{ 0200, 0200, 0200, 0200 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[all] [node ...] : Trace a node." } ,
{ "save", com_save, FALSE, TRUE, FALSE,
{ 0200, 0200, 0200, 0200 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[all] [node ...] : Save a spice output." } ,
{ "iplot", com_iplot, FALSE, TRUE, TRUE,
{ 0200, 0200, 0200, 0200 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[all] [node ...] : Incrementally plot a node." } ,
{ "status", com_sttus, FALSE, TRUE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Print the current breakpoints and traces." } ,
{ "delete", com_delete, FALSE, TRUE, FALSE,
{ 020, 020, 020, 020 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[all] [break number ...] : Delete breakpoints and traces." } ,
{ "step", com_step, FALSE, TRUE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[number] : Iterate number times, or one." } ,
{ "reset", com_rset, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Terminate a simulation after a breakpoint (formerly 'end')." } ,
{ "run", com_run, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[rawfile] : Run the simulation as specified in the input file." } ,
{ "aspice", com_aspice, FALSE, FALSE, FALSE,
{ 1, 1, 1, 1 }, E_DEFHMASK, 1, 2,
(void (*)()) NULL,
NULL,
"file [outfile] : Run a spice job asynchronously." } ,
{ "jobs", com_jobs, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Report on asynchronous spice jobs." } ,
{ "rspice", com_rspice, FALSE, FALSE, FALSE,
{ 1, 1, 1, 1 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[input file] : Run a spice job remotely." } ,
{ "bug", com_bug, FALSE, FALSE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Report a %s bug." } ,
{ "where", com_where, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Print last non-converging node or device" } ,
{ "newhelp", com_ahelp, FALSE, FALSE, TRUE,
{ 010, 010, 010, 010 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[command name] ... : help." },
{ "tutorial", com_ghelp, FALSE, FALSE, TRUE,
{ 023010, 023010, 023010, 023010 }, E_BEGINNING, 0, LOTS,
(void (*)()) NULL,
NULL,
"[subject] ... : Hierarchical documentation browser." } ,
{ "help", com_ghelp, FALSE, FALSE, TRUE,
{ 023010, 023010, 023010, 023010 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[subject] ... : Hierarchical documentation browser." } ,
{ "oldhelp", com_help, FALSE, FALSE, TRUE,
{ 010, 010, 010, 010 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[command name] ... : Print help." } ,
/* to remove circuits loaded */
{ "removecirc", com_removecirc, FALSE, TRUE, FALSE,
{ 04, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[circuit name] : Remove the current circuit from memory." } ,
{ "quit", com_quit, FALSE, FALSE, TRUE,
{ 0, 0, 0, 0 }, E_BEGINNING, 0, 1,
(void (*)()) NULL,
NULL,
": Quit %s." } ,
{ "source", com_source, FALSE, FALSE, TRUE,
{ 1, 1, 1, 1 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"file : Source a %s file." } ,
{ "shift", com_shift, FALSE, FALSE, FALSE,
{ 020000, 0, 0, 0 }, E_DEFHMASK, 0, 2,
(void (*)()) NULL,
NULL,
"[var] [number] : Shift argv or the named list var to the left." } ,
{ "unset", com_unset, FALSE, FALSE, FALSE,
{ 020000, 020000, 020000, 020000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"varname ... : Unset a variable." } ,
{ "unalias", com_unalias, FALSE, FALSE, FALSE,
{ 02, 02, 02, 02 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"word ... : Undefine an alias." } ,
{ "history", com_history, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 2,
(void (*)()) NULL,
NULL,
"[-r] [number] : Print command history." } ,
{ "echo", com_echo, FALSE, FALSE, FALSE,
{ 1, 1, 1, 1 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[stuff ...] : Print stuff." } ,
{ "shell", com_shell, FALSE, FALSE, TRUE,
{ 1, 1, 1, 1 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[args] : Fork a shell, or execute the command." } ,
{ "rusage", com_rusage, FALSE, FALSE, FALSE,
{ 02000, 02000, 02000, 02000 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[resource ...] : Print current resource usage." } ,
{ "cd", com_chdir, FALSE, FALSE, FALSE,
{ 1, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[directory] : Change working directory." } ,
{ "version", com_version, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[number] : Print the version number." } ,
{ "diff", com_diff, FALSE, FALSE, FALSE,
{ 0400, 0400, 040000, 040000 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"plotname plotname [vec ...] : 'diff' two plots." } ,
{ "rehash", com_rehash, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Rebuild the unix command database." } ,
{ "while", NULL, FALSE, FALSE, FALSE,
{ 040000, 040000, 040000, 040000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"condition : Execute while the condition is TRUE." } ,
{ "repeat", NULL, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0}, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[number] : Repeat number times, or forever." } ,
{ "dowhile", NULL, FALSE, FALSE, FALSE,
{ 040000, 040000, 040000, 040000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"condition : Execute while the condition is TRUE." } ,
{ "foreach", NULL, FALSE, FALSE, FALSE,
{ 0, 040000, 040000, 040000 }, E_DEFHMASK, 2, LOTS,
(void (*)()) NULL,
NULL,
"variable value ... : Do once for each value." } ,
{ "if", NULL, FALSE, FALSE, FALSE,
{ 040000, 040000, 040000, 040000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"condition : Execute if the condition is TRUE." } ,
{ "else", NULL, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Goes with if." } ,
{ "end", NULL, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": End a block." } ,
{ "break", NULL, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Break out of a block." } ,
{ "continue", NULL, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Continue a loop." } ,
{ "label", NULL, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 1, 1,
(void (*)()) NULL,
NULL,
"word : Create someplace to go to." } ,
{ "goto", NULL, FALSE, FALSE, FALSE,
{ 0100000, 0, 0, 0 }, E_DEFHMASK, 1, 1,
(void (*)()) NULL,
NULL,
"word : Go to a label." } ,
{ "cdump", com_cdump, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Dump the current control structures." } ,
{ "settype", com_stype, FALSE, FALSE, FALSE,
{ 0200000, 040000, 040000, 040000 }, E_DEFHMASK, 2, LOTS,
(void (*)()) NULL,
NULL,
"type vec ... : Change the type of a vector." } ,
{ "strcmp", com_strcmp, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 3, 3,
(void (*)()) NULL,
NULL,
"varname s1 s2 : Set $varname to strcmp(s1, s2)." } ,
{ "linearize", com_linearize, FALSE, TRUE, FALSE,
{ 040000, 040000, 040000, 040000 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
" [ vec ... ] : Convert plot into one with linear scale." } ,
{ 0, NULL, FALSE, FALSE, FALSE, { 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
NULL }
};
@ -521,7 +521,7 @@ struct comm nutcp_coms[] = {
"vector ... [ shape ] : change the dimensions of a vector." } ,
{ "define", com_define, FALSE, FALSE, TRUE,
{ 010000, 040000, 040000, 040000 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[[func (args)] stuff] : Define a user-definable function." } ,
{ "set", com_set, FALSE, FALSE, TRUE,
{ 020000, 020000, 020000, 020000 }, E_DEFHMASK, 0, LOTS,
@ -538,11 +538,11 @@ struct comm nutcp_coms[] = {
{ "alias", com_alias, FALSE, FALSE, FALSE,
{ 02, 04, 04, 04 }, E_ADVANCED, 0, LOTS,
(void (*)()) NULL,
NULL,
"[[word] alias] : Define an alias." } ,
{ "deftype", com_dftype, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 3, LOTS,
(void (*)()) NULL,
NULL,
"spec name pat ... : Redefine vector and plot types.\n" } ,
{ "plot", com_plot, FALSE, FALSE, TRUE,
{ 041000, 041000, 041000, 041000 }, E_BEGINNING | E_HASPLOTS, 1, LOTS,
@ -554,55 +554,55 @@ struct comm nutcp_coms[] = {
": Display vector status." } ,
{ "destroy", com_destroy, FALSE, FALSE, FALSE,
{ 0400, 0400, 0400, 0400 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[plotname] ... : Throw away all the data in the plot." } ,
{ "setplot", com_splot, FALSE, FALSE, TRUE,
{ 0400, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[plotname] : Change the current working plot." } ,
{ "setcirc", com_scirc, FALSE, TRUE, FALSE,
{ 04, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[circuit name] : Change the current circuit." } ,
{ "setscale", com_setscale, FALSE, FALSE, FALSE,
{ 040000, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[vecname] : Change default scale of current working plot." } ,
{ "transpose", com_transpose, FALSE, FALSE, FALSE,
{ 040000, 040000, 040000, 040000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"varname ... : Perform matrix transposition on multi-D vectors." } ,
{ "xgraph", com_xgraph, FALSE, FALSE, TRUE,
{ 1, 041000, 041000, 041000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"file plotargs : Send plot to Xgraph-11." } ,
{ "gnuplot", com_gnuplot, FALSE, FALSE, TRUE,
{ 1, 041000, 041000, 041000 }, E_DEFHMASK, 2, LOTS,
(void (*)()) NULL,
NULL,
"file plotargs : Send plot to gnuplot." } ,
{ "wrdata", com_write_simple, FALSE, FALSE, TRUE,
{ 1, 041000, 041000, 041000 }, E_DEFHMASK, 2, LOTS,
(void (*)()) NULL,
NULL,
"file plotargs : Send plot data to file." } ,
{ "hardcopy", com_hardcopy, FALSE, FALSE, TRUE,
{ 1, 041000, 041000, 041000 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"file plotargs : Produce hardcopy plots." } ,
{ "asciiplot", com_asciiplot, FALSE, FALSE, TRUE,
{ 041000, 041000, 041000, 041000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"plotargs : Produce ascii plots." } ,
{ "write", com_write, FALSE, FALSE, TRUE,
{ 1, 040000, 040000, 040000 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"file expr ... : Write data to a file." } ,
{ "compose", com_compose, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 2, LOTS,
(void (*)()) NULL,
NULL,
"var parm=val ... : Compose a vector." } ,
{ "unlet", com_unlet, FALSE, FALSE, FALSE,
{ 040000, 040000, 040000, 040000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"varname ... : Undefine vectors." } ,
{ "print", com_print, FALSE, FALSE, TRUE,
{ 040000, 040000, 040000, 040000 }, E_BEGINNING, 1, LOTS,
@ -614,256 +614,256 @@ struct comm nutcp_coms[] = {
"file ... : Load in data." } ,
{ "cross", com_cross, FALSE, FALSE, TRUE,
{ 040000, 0, 040000, 040000 }, E_DEFHMASK, 2, LOTS,
(void (*)()) NULL,
NULL,
"vecname number [ vector ... ] : Make a vector in a strange way." } ,
{ "undefine", com_undefine, FALSE, FALSE, FALSE,
{ 010000, 010000, 010000, 010000 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[func ...] : Undefine a user-definable function." } ,
{ "op", NULL, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.op line args] : Determine the operating point of the circuit." } ,
{ "tran", NULL, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.tran line args] : Do a transient analysis." } ,
{ "ac", NULL, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.ac line args] : Do an ac analysis." } ,
{ "dc", NULL, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.dc line args] : Do a dc analysis." } ,
{ "pz", NULL, FALSE, TRUE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.pz line args] : Do a pole / zero analysis." } ,
{ "sens", NULL, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.ac line args] : Do a sensitivity analysis." } ,
{ "disto", NULL, FALSE, TRUE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.disto line args] : Do an distortion analysis." } ,
{ "noise", NULL, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[.noise line args] : Do a noise analysis." } ,
{ "listing", NULL, FALSE, TRUE, TRUE,
{ 0100, 0100, 0100, 0100 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[logical] [physical] [deck] : Print the current circuit." } ,
{ "edit", NULL, FALSE, TRUE, TRUE,
{ 1, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[filename] : Edit a spice deck and then load it in." } ,
{ "dump", NULL, FALSE, TRUE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Print a dump of the current circuit." } ,
{ "fourier", com_fourier, FALSE, FALSE, TRUE,
{ 0, 040000, 040000, 040000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"fund_freq vector ... : Do a fourier analysis of some data." } ,
{ "show", NULL, FALSE, TRUE, FALSE,
{ 040, 040, 040, 040 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"devspecs ... : parmspecs ... : Print out device parameters." } ,
{ "alter", NULL, FALSE, TRUE, FALSE,
{ 040, 040, 040, 040 }, E_DEFHMASK, 3, LOTS,
(void (*)()) NULL,
NULL,
"devspecs : parmname value : Alter device parameters." } ,
{ "altermod", NULL, FALSE, TRUE, FALSE,
{ 040, 040, 040, 040 }, E_DEFHMASK, 3, LOTS,
(void (*)()) NULL,
NULL,
"devspecs : parmname value : Alter model parameters." } ,
{ "resume", NULL, FALSE, TRUE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Continue after a stop." } ,
{ "state", NULL, FALSE, TRUE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"(unimplemented) : Print the state of the circuit." },
{ "stop", NULL, FALSE, TRUE, FALSE,
{ 04200, 04200, 04200, 04200 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[stop args] : Set a breakpoint." } ,
{ "trace", NULL, FALSE, TRUE, FALSE,
{ 0200, 0200, 0200, 0200 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[all] [node ...] : Trace a node." } ,
{ "save", NULL, FALSE, TRUE, FALSE,
{ 0200, 0200, 0200, 0200 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[all] [node ...] : Save a spice output." } ,
{ "iplot", NULL, FALSE, TRUE, TRUE,
{ 0200, 0200, 0200, 0200 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[all] [node ...] : Incrementally plot a node." } ,
{ "status", NULL, FALSE, TRUE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Print the current breakpoints and traces." } ,
{ "delete", NULL, FALSE, TRUE, FALSE,
{ 020, 020, 020, 020 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[all] [break number ...] : Delete breakpoints and traces." } ,
{ "step", NULL, FALSE, TRUE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[number] : Iterate number times, or one." } ,
{ "reset", NULL, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Terminate a simulation after a breakpoint (formerly 'end')." } ,
{ "run", NULL, FALSE, TRUE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[rawfile] : Run the simulation as specified in the input file." } ,
{ "bug", com_bug, FALSE, FALSE, TRUE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Report a %s bug." } ,
{ "newhelp", com_ahelp, FALSE, FALSE, TRUE,
{ 010, 010, 010, 010 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[command name] ... : help." },
{ "tutorial", com_ghelp, FALSE, FALSE, TRUE,
{ 023010, 023010, 023010, 023010 }, E_BEGINNING, 0, LOTS,
(void (*)()) NULL,
NULL,
"[subject] ... : Hierarchical documentation browser." } ,
{ "help", com_ghelp, FALSE, FALSE, TRUE,
{ 023010, 023010, 023010, 023010 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[subject] ... : Hierarchical documentation browser." } ,
{ "oldhelp", com_help, FALSE, FALSE, TRUE,
{ 010, 010, 010, 010 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[command name] ... : Print help." } ,
{ "quit", com_quit, FALSE, FALSE, TRUE,
{ 0, 0, 0, 0 }, E_BEGINNING, 0, 1,
(void (*)()) NULL,
NULL,
": Quit %s." } ,
/* to remove circuits loaded */
{ "removecirc", com_removecirc, FALSE, TRUE, FALSE,
{ 04, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[circuit name] : Remove the current circuit from memory." } ,
{ "source", nutcom_source, FALSE, FALSE, TRUE,
{ 1, 1, 1, 1 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"file : Source a %s file." } ,
{ "shift", com_shift, FALSE, FALSE, FALSE,
{ 020000, 0, 0, 0 }, E_DEFHMASK, 0, 2,
(void (*)()) NULL,
NULL,
"[var] [number] : Shift argv or the named list var to the left." } ,
{ "unset", com_unset, FALSE, FALSE, FALSE,
{ 020000, 020000, 020000, 020000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"varname ... : Unset a variable." } ,
{ "unalias", com_unalias, FALSE, FALSE, FALSE,
{ 02, 02, 02, 02 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"word ... : Undefine an alias." } ,
{ "history", com_history, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 2,
(void (*)()) NULL,
NULL,
"[-r] [number] : Print command history." } ,
{ "echo", com_echo, FALSE, FALSE, FALSE,
{ 1, 1, 1, 1 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[stuff ...] : Print stuff." } ,
{ "shell", com_shell, FALSE, FALSE, TRUE,
{ 1, 1, 1, 1 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[args] : Fork a shell, or execute the command." } ,
{ "rusage", com_rusage, FALSE, FALSE, FALSE,
{ 02000, 02000, 02000, 02000 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[resource ...] : Print current resource usage." } ,
{ "cd", com_chdir, FALSE, FALSE, FALSE,
{ 1, 0, 0, 0 }, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[directory] : Change working directory." } ,
{ "version", com_version, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"[number] : Print the version number." } ,
{ "diff", com_diff, FALSE, FALSE, FALSE,
{ 0400, 0400, 040000, 040000 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
"plotname plotname [vec ...] : 'diff' two plots." } ,
{ "rehash", com_rehash, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Rebuild the unix command database." } ,
{ "while", NULL, FALSE, FALSE, FALSE,
{ 040000, 040000, 040000, 040000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"condition : Execute while the condition is TRUE." } ,
{ "repeat", NULL, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0}, E_DEFHMASK, 0, 1,
(void (*)()) NULL,
NULL,
"[number] : Repeat number times, or forever." } ,
{ "dowhile", NULL, FALSE, FALSE, FALSE,
{ 040000, 040000, 040000, 040000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"condition : Execute while the condition is TRUE." } ,
{ "foreach", NULL, FALSE, FALSE, FALSE,
{ 0, 040000, 040000, 040000 }, E_DEFHMASK, 2, LOTS,
(void (*)()) NULL,
NULL,
"variable value ... : Do once for each value." } ,
{ "if", NULL, FALSE, FALSE, FALSE,
{ 040000, 040000, 040000, 040000 }, E_DEFHMASK, 1, LOTS,
(void (*)()) NULL,
NULL,
"condition : Execute if the condition is TRUE." } ,
{ "else", NULL, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Goes with if." } ,
{ "end", NULL, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": End a block." } ,
{ "break", NULL, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Break out of a block." } ,
{ "continue", NULL, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Continue a loop." } ,
{ "label", NULL, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 1, 1,
(void (*)()) NULL,
NULL,
"word : Create someplace to go to." } ,
{ "goto", NULL, FALSE, FALSE, FALSE,
{ 0100000, 0, 0, 0 }, E_DEFHMASK, 1, 1,
(void (*)()) NULL,
NULL,
"word : Go to a label." } ,
{ "cdump", com_cdump, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 0, 0,
(void (*)()) NULL,
NULL,
": Dump the current control structures." } ,
{ "settype", com_stype, FALSE, FALSE, FALSE,
{ 0200000, 040000, 040000, 040000 }, E_DEFHMASK, 2, LOTS,
(void (*)()) NULL,
NULL,
"type vec ... : Change the type of a vector." } ,
{ "strcmp", com_strcmp, FALSE, FALSE, FALSE,
{ 0, 0, 0, 0 }, E_DEFHMASK, 3, 3,
(void (*)()) NULL,
NULL,
"varname s1 s2 : Set $varname to strcmp(s1, s2)." } ,
{ "linearize", NULL, FALSE, TRUE, FALSE,
{ 040000, 040000, 040000, 040000 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
" [ vec ... ] : Convert plot into one with linear scale." } ,
{ 0, NULL, FALSE, FALSE, FALSE, { 0, 0, 0, 0 }, E_DEFHMASK, 0, LOTS,
(void (*)()) NULL,
NULL,
NULL }
} ;