source: WorldVistAEHR/trunk/r/ZZOTHER/ZJFOO.m@ 1500

Last change on this file since 1500 was 613, checked in by George Lilly, 15 years ago

initial load of WorldVistAEHR

File size: 512 bytes
Line 
1ZJFOO ;ISF/RWF - GTM Routine to JOB an arbitrary entry point ;5/9/2002
2 ;;8.0;KERNEL;**275**;Jul 10, 1995
3 ;To run under VMS,
4 ; mumps ZJFOO.M
5 ; link ZJFOO.OBJ
6 ; In a com file
7 ; $ forfoo="$" + f$parse("user$:[gtmmgr.r]ZJFOO.exe")
8 ; $ forfoo "argument"
9 ;To run under Linux
10 ; mumps ZJFOO.m
11 ; chmod u+x,g+x ZJFOO.o
12 ; In shell script
13 ; $gtm_dist/mumps -run ZJFOO "argument"
14 ;
15 ;Set the interupt
16 S $ETRAP="D ^%ZTER HALT",$ZINTERRUPT="I $$JOBEXAM^ZU($ZPOSITION)"
17 I $L($ZCMDLINE) J @$ZCMDLINE Q
18 Q
Note: See TracBrowser for help on using the repository browser.