main.cpp 728 B

12345678910111213141516171819202122232425262728293031323334353637383940414243444546474849505152535455565758596061626364
  1. /* Eigenmath by G. Weigt
  2. The starting point for a symbolic computation is in run.cpp
  3. Input is scanned in scan.cpp
  4. Expression evaluation is done in eval.cpp
  5. Output is formatted in display.cpp
  6. */
  7. #include "defs.h"
  8. #include "console.h"
  9. void
  10. clear_term()
  11. {
  12. }
  13. extern void eval_print(void);
  14. void
  15. eval_display(void)
  16. {
  17. eval_print();
  18. }
  19. void
  20. printstr(char *s)
  21. {
  22. Console_Output((const unsigned char *)s);
  23. }
  24. extern int test_flag;
  25. #define OUTBUFLEN 10000
  26. int out_count;
  27. void
  28. printchar(int c)
  29. {
  30. unsigned char tmp[2];
  31. tmp[0] = (unsigned char)c;
  32. tmp[1] = (unsigned char)'\0';
  33. Console_Output(tmp);
  34. }
  35. void
  36. printchar_nowrap(int c)
  37. {
  38. printchar(c);
  39. }
  40. void
  41. eval_draw(void)
  42. {
  43. push(symbol(NIL));
  44. }
  45. void
  46. eval_sample(void)
  47. {
  48. }