Annotation of 43BSD/contrib/icon/src/lib/gener.icn, revision 1.1.1.1

1.1       root        1: #      GENER(2)
                      2: #
                      3: #      Generators
                      4: #
                      5: #      Ralph E. Griswold
                      6: #
                      7: #      Last modified 7/27/83
                      8: #
                      9: 
                     10: procedure star(s)
                     11:    suspend "" | (star(s) || !s)
                     12: end
                     13: 
                     14: procedure octal()
                     15:    suspend (0 to 3) || (0 to 7) || (0 to 7)
                     16: end
                     17: 
                     18: procedure hex()
                     19:    suspend !"0123456789abcdef" || !"0123456789abcdef"
                     20: end
                     21: 
                     22: procedure label(s,i)
                     23:    suspend s || i
                     24:    suspend s || (i +:= |1)
                     25: end

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.