| Last change
 on this file since 1194 was             628, checked in by George Lilly, 16 years ago | 
        
          | 
initial load of FOIAVistA 6/30/08 version
 | 
        
          | File size:
            508 bytes | 
      
      
| Line |  | 
|---|
| 1 | ZFOO ;ISF/RWF - GTM Routine to invoke an arbitrary entry point ;5/9/2002 | 
|---|
| 2 | ;;8.0;KERNEL;**275**;Jul 10, 1995 | 
|---|
| 3 | ;To run under VMS, | 
|---|
| 4 | ;  mumps ZFOO.M | 
|---|
| 5 | ;  link ZFOO.OBJ | 
|---|
| 6 | ;  In a com file | 
|---|
| 7 | ;  $ forfoo="$" + f$parse("user$:[gtmmgr.r]ZFOO.exe") | 
|---|
| 8 | ;  $ forfoo "argument" | 
|---|
| 9 | ;To run under Linux | 
|---|
| 10 | ;  mumps ZFOO.m | 
|---|
| 11 | ;  chmod u+x,g+x ZFOO.o | 
|---|
| 12 | ;  In shell script | 
|---|
| 13 | ;  $gtm_dist/mumps -run ZFOO "argument" | 
|---|
| 14 | ; | 
|---|
| 15 | ;Set the interupt | 
|---|
| 16 | S $ETRAP="D ^%ZTER HALT",$ZINTERRUPT="I $$JOBEXAM^ZU($ZPOSITION)" | 
|---|
| 17 | I $L($ZCMDLINE) D @$ZCMDLINE Q | 
|---|
| 18 | Q | 
|---|
       
      
  Note:
 See   
TracBrowser
 for help on using the repository browser.