# C language startup routine
# special 512 byte area for nil (and possibly other atoms)
# and special block of smallnums.
.long -128,-127,-126,-125,-124,-123,-122,-121
.long -120,-119,-118,-117,-116,-115,-114,-113
.long -112,-111,-110,-109,-108,-107,-106,-105
.long -104,-103,-102,-101,-100,-99,-98,-97
.long -96,-95,-94,-93,-92,-91,-90,-89
.long -88,-87,-86,-85,-84,-83,-82,-81
.long -80,-79,-78,-77,-76,-75,-74,-73
.long -72,-71,-70,-69,-68,-67,-66,-65
.long -64,-63,-62,-61,-60,-59,-58,-57
.long -56,-55,-54,-53,-52,-51,-50,-49
.long -48,-47,-46,-45,-44,-43,-42,-41
.long -40,-39,-38,-37,-36,-35,-34,-33
.long -32,-31,-30,-29,-28,-27,-26,-25
.long -24,-23,-22,-21,-20,-19,-18,-17
.long -16,-15,-14,-13,-12,-11,-10,-9
.long -8,-7,-6,-5,-4,-3,-2,-1
.long 8,9,10,11,12,13,14,15
.long 16,17,18,19,20,21,22,23
.long 24,25,26,27,28,29,30,31
.long 32,33,34,35,36,37,38,39
.long 40,41,42,43,44,45,46,47
.long 48,49,50,51,52,53,54,55
.long 56,57,58,59,60,61,62,63
.long 64,65,66,67,68,69,70,71
.long 72,73,74,75,76,77,78,79
.long 80,81,82,83,84,85,86,87
.long 88,89,90,91,92,93,94,95
.long 96,97,98,99,100,101,102,103
.long 104,105,106,107,108,109,110,111
.long 112,113,114,115,116,117,118,119
.long 120,121,122,123,124,125,126,127
tstl (r0)+ # null args term ?
cmpl r0,*4(sp) # end of 'env' or 'argv' ?
tstl -(r0) # envp's are in list
movl r0,_environ # indir is 0 if no env ; not 0 if env