home *** CD-ROM | disk | FTP | other *** search
/ Meeting Pearls 3 / Meeting_Pearls_III.iso / Pearls / tcp / Networking / TCP / Server / tnserv / s / runfakesremacs < prev   
AmigaDOS Script File  |  1993-12-05  |  717b  |  27 lines
  1. .key MDEV,DEVICE,MUNIT,UNIT
  2.  
  3. setenv TERM vt102
  4. failat 40
  5. mount FIFO:
  6. ReqOff
  7. ;assign >NIL: FIFO: exists                    
  8. ;if warn                                      
  9. ;  if exists L:fifo-handler                   
  10. ;    echo "Starting fifo-handler"             
  11. ;    run <NIL: >NIL: L:fifo-handler           
  12. ;  else                                       
  13. ;    echo "Cannot find L:fifo-handler."       
  14. ;    echo "External processes will not work." 
  15. ;  endif                                      
  16. ;endif                                        
  17. ;set stk=`stack`
  18. ;rx "fortytwo=42"
  19. ;set stack `rx "say subword($stk, 5, 1)"`
  20. ;unset stk
  21. ;if not $stack gt 40000 val
  22. ;  stack 40000
  23. ;endif
  24. stack 40000
  25.  
  26. gnuemacs:temacs -nw
  27.