Folder.c 585 B

1234567891011121314151617181920212223242526272829
  1. // Get the variables in a folder as a list
  2. #define RETURN_VALUE
  3. #define USE_TI89
  4. #define USE_TI92PLUS
  5. #define USE_V200
  6. #define MIN_AMS 101
  7. #include <args.h>
  8. #include <estack.h>
  9. #include <vat.h>
  10. void _main(void)
  11. {
  12. ESI argptr = top_estack;
  13. SYM_ENTRY *SymPtr = SymFindFirst (GetSymstrArg (argptr), 1);
  14. while (GetArgType (top_estack) != END_TAG) // Clean up arguments
  15. top_estack = next_expression_index (top_estack);
  16. top_estack--;
  17. push_END_TAG ();
  18. while (SymPtr)
  19. {
  20. push_ANSI_string (SymPtr->name);
  21. SymPtr = SymFindNext ();
  22. }
  23. push_LIST_TAG ();
  24. }