55 lines
1.3 KiB
C
55 lines
1.3 KiB
C
#include "ngspice/ngspice.h" /* for wl */
|
|
#include "ngspice/ftedefs.h"
|
|
#include "ngspice/devdefs.h" /* solve deps in dev.h*/
|
|
#include "../spicelib/devices/dev.h" /* for load library commands */
|
|
#include "com_dl.h"
|
|
|
|
|
|
#ifdef XSPICE
|
|
void com_codemodel(wordlist *wl)
|
|
{
|
|
if (wl && wl->wl_word)
|
|
#ifdef CM_TRACE
|
|
fprintf(stdout, "Note: loading codemodel %s\n", ww->wl_word);
|
|
#endif
|
|
if (load_opus(wl->wl_word)) {
|
|
fprintf(stderr, "Error: Library %s couldn't be loaded!\n", wl->wl_word);
|
|
ft_spiniterror = TRUE;
|
|
if (ft_stricterror) /* if set in spinit */
|
|
controlled_exit(EXIT_BAD);
|
|
}
|
|
#ifdef CM_TRACE
|
|
else {
|
|
fprintf(stdout, "Codemodel %s is loaded\n", wl->wl_word);
|
|
}
|
|
#endif
|
|
}
|
|
#endif
|
|
|
|
#ifdef OSDI
|
|
void com_osdi(wordlist *wl)
|
|
{
|
|
wordlist *ww;
|
|
for (ww = wl; ww; ww = ww->wl_next)
|
|
if (load_osdi(ww->wl_word)) {
|
|
fprintf(cp_err, "Error: Library %s couldn't be loaded!\n", ww->wl_word);
|
|
ft_spiniterror = TRUE;
|
|
if (ft_stricterror)
|
|
controlled_exit(EXIT_BAD);
|
|
}
|
|
}
|
|
#endif
|
|
|
|
|
|
|
|
|
|
#ifdef DEVLIB
|
|
void com_use(wordlist *wl)
|
|
{
|
|
wordlist *ww;
|
|
for (ww = wl; ww; ww = ww->wl_next)
|
|
if (load_dev(wl->wl_word))
|
|
fprintf(cp_err, "Error: Library %s couldn't be loaded!\n", ww->wl_word);
|
|
}
|
|
#endif
|