Changeset 494 for abuse/trunk/src/lcache.cpp
- Timestamp:
- Apr 17, 2011, 11:56:44 PM (12 years ago)
- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
abuse/trunk/src/lcache.cpp
r493 r494 2 2 * Abuse - dark 2D side-scrolling platform game 3 3 * Copyright (c) 1995 Crack dot Com 4 * Copyright (c) 2005-2011 Sam Hocevar <sam@hocevar.net> 4 5 * 5 6 * This software was released into the Public Domain. As with most public … … 25 26 long t=0; 26 27 void *b=level; 27 for (; b && item_type(b)==L_CONS_CELL;b=CDR(b))28 for (; b && item_type(b)==L_CONS_CELL; b=CDR(b)) 28 29 { 29 30 t+=sizeof(LList); 30 31 } 31 32 if (b) t+=block_size(b); 32 for (b=level; b && item_type(b)==L_CONS_CELL;b=CDR(b))33 for (b=level; b && item_type(b)==L_CONS_CELL; b=CDR(b)) 33 34 t+=block_size(CAR(b)); 34 35 ret=t; … … 82 83 long t=0; 83 84 void *b=level; 84 for (; b && item_type(b)==L_CONS_CELL;b=CDR(b)) t++;85 for (; b && item_type(b)==L_CONS_CELL; b=CDR(b)) t++; 85 86 if (b) 86 87 { … … 90 91 else fp->write_uint32(t); 91 92 92 for (b=level; b && item_type(b)==L_CONS_CELL;b=CDR(b))93 for (b=level; b && item_type(b)==L_CONS_CELL; b=CDR(b)) 93 94 write_level(fp,CAR(b)); 94 95 } … … 133 134 last->cdr = (t < 0) ? (LObject *)load_block(fp) : NULL; 134 135 135 for (last=first,x=0; x<abs(t);x++,last=(LList *)last->cdr)136 for (last=first,x=0; x<abs(t); x++,last=(LList *)last->cdr) 136 137 last->car = (LObject *)load_block(fp); 137 138 return first;
Note: See TracChangeset
for help on using the changeset viewer.