#!/bin/sh
IXBIN=/usr/local/bin/iconx                                                    
IXLCL=`echo $0 | sed 's=[^/]*$=iconx='`

[ -n "$ICONX" ] && exec "$ICONX" $0 ${1+"$@"}
[ -x $IXLCL ] && exec $IXLCL $0 ${1+"$@"}
[ -x $IXBIN ] && exec $IXBIN $0 ${1+"$@"}
exec iconx $0 ${1+"$@"}

[executable Icon binary follows]
      

                    p     (  I9.0.00/32  1H    <B     O    xH    H    DP     I   ,   ,                            .   b   C      T      b   =       N   C      T      b   =       N   C   0   T      M   -   0   M       ^   b   =      N   C   0   T      M   <      M         b   =      N   C      T      b   =       N   C      U   E   S       T      b   =       b      F   U   U   E   S       M         b      N   T      M   
      S       M   #      S       M        b   =      N   5   N   E   b   D                                                                                4   H                          $     ,  b   C   L   E   S       T      M      1  E   M      3     b   =      b      N   C     b   >      b   ,   C   T   T      E   T      3   b   =      E   M      8     b      b   =      N   C   4   T      T      3   b   =      b   =      N   E   S      T      E   T      3   Hb   =      E   M      <     b      b   =      b      b   7   N   C      U   T      E   E   S       M      1  M      >  M      1  M   >   U  M      1  M        M      1  E   M        S      b      M      1  S       b   A      b      b   =      F   5   N   C      U   T      M        E   E   M         M   E     M   E   
  M   G   P  M   D     M         M   D     M   F   "  M   >   i  M         M   E     M   '     M         b   A   
   b      b   =      F   5   N   C       T      S       b   =      N   C   $   T      M      1  b   =      N   C   0   T      M        b   >   =   b   =      N   C   $   T      M      1  b   =      N   C       T      S       b   =      N   C      C      E   b   G   D   N   E   b   D                                                                      $      )   ,     0     D    
 d   ! 	    " 	    $ 	    & 	 $  (  0  (  \  )    *    ,  L  /    2    2    4    4    5    5    5 
 <  6  H  6 
   7    7    7    7    4  X  C  t  :    :    :  d  H  p  H  x  H    W 	   X 	    Y #   Y 	 8  Z 	 `  [ 	   ]    ^  main header write function repl tab upto many s procedure _func(a[]); _func:=proc("proc",0);  proc:=_proc; return _func!a; end procedure _proc(a[]); static p; initial p:=_func("proc",0);  suspend p!a; end proc procedure  (a[]); static p; initial p:=_func(" ",0); suspend p!a; end gftrace.icn divider date # 76 , 1   6 #	File:     ftrace.icn #	Subject:  Procedures for tracing calls to built-in functions #	Author:   Gregg M. Townsend #	Date:      #       These procedures, when linked with an Icon program, cause calls of built-in functions to be traced (along with calls of user procedures) when &trace is nonzero.  This is accomplished by interposing a level of Icon procedures between the user program and the built-in functions.    In the trace output, function arguments are shown as a list.  The very first function call produces two extra trace lines showing a call to "_func".  Calls to "proc" are reported as calls to "_proc".    If the user program overloads any built-in function, linking fails due to an "inconsistent redeclaration". #  Generated under:   