Correct the spelling of "nil".

This commit is contained in:
Bill Currie 2011-01-14 12:07:40 +09:00
parent fb8b3d1211
commit c38ea0b1bc
29 changed files with 87 additions and 87 deletions

View file

@ -221,7 +221,7 @@ integer (integer key, integer unicode, integer down) load_keyevent =
case QFM_BUTTON1:
if (loadable[load_cursor]) {
S_LocalSound ("misc/menu2.wav");
Menu_SelectMenu (NIL);
Menu_SelectMenu (nil);
Cbuf_AddText (sprintf ("load s%i.sav\n", load_cursor));
}
return 1;
@ -246,7 +246,7 @@ integer (integer key, integer unicode, integer down) save_keyevent =
return 1;
case QFK_RETURN:
case QFM_BUTTON1:
Menu_SelectMenu (NIL);
Menu_SelectMenu (nil);
Cbuf_AddText (sprintf ("save s%i.sav\n", save_cursor));
return 1;
}
@ -300,7 +300,7 @@ integer (integer key, integer unicode, integer down) quit_keyevent =
return 1;
}
if (key == 'n') {
Menu_SelectMenu (NIL);
Menu_SelectMenu (nil);
return 1;
}
return 0;
@ -329,7 +329,7 @@ void () quit_menu =
integer (string text, integer key) sp_start =
{
Menu_SelectMenu (NIL);
Menu_SelectMenu (nil);
Cbuf_AddText ("disconnect\n");
Cbuf_AddText ("maxplayers 1\n");
Cbuf_AddText ("coop 0\n");
@ -443,7 +443,7 @@ integer (integer key, integer unicode, integer down) lanconfig_keyevent =
break;
case QFK_RETURN:
if (input_active) {
input_active = NIL;
input_active = nil;
} else {
if (lanConfig_cursor == 0) {
input_active = lanConfig_port_il;

View file

@ -186,7 +186,7 @@ get_hash_keys =
}
if (binding.keys) {
str_free (binding.keys);
binding.keys = NIL;
binding.keys = nil;
}
if (desc1) {
binding.keys = str_new ();

View file

@ -430,7 +430,7 @@ KEYEV_player_options =
Cvar_SetString (teamname_cvar,
[player_config_tname_il text]);
}
player_config_iactive = NIL;
player_config_iactive = nil;
} else {
if (player_config_cursor == 0) {
player_config_iactive = player_config_plname_il;
@ -560,7 +560,7 @@ MENU_player_options =
[player_config_tname_il setWidth:7];
[player_options addView:player_config_tname_il];
player_config_iactive = NIL;
player_config_iactive = nil;
rect = makeRect (192, PLAYER_CONF_Y_PAD + 37, 24, 24);
topcolor_view = [[CvarColorView alloc] initWithBounds:rect :[[CvarColor alloc] initWithCvar:"topcolor"]];
@ -626,7 +626,7 @@ KEYEV_network_options =
Cvar_SetString ("rate",
[network_config_rate_il text]);
}
network_config_iactive = NIL;
network_config_iactive = nil;
} else {
if (network_config_cursor == 0) {
network_config_iactive = network_config_rate_il;

View file

@ -50,7 +50,7 @@ class_from_plist (PLDictionary []pldict)
class = obj_lookup_class (classname);
if (!class) {
dprint ("could not find " + classname + "\n");
ret.pointer_val = NIL;
ret.pointer_val = nil;
return ret;
}
obj = [class alloc];
@ -140,7 +140,7 @@ string_from_plist (PLString []plstring)
if (str_mid (str, 0, 1) == "[")
return rect_from_plist (plstring);
ret.string_val = NIL;
ret.string_val = nil;
return ret;
}
@ -155,7 +155,7 @@ object_from_plist (PLItem []plist)
case QFArray:
return array_from_plist ((PLArray []) plist);
case QFBinary:
ret.pointer_val = NIL;
ret.pointer_val = nil;
return ret;
case QFString:
return string_from_plist ((PLString []) plist);
@ -171,7 +171,7 @@ read_plist (string fname)
file = QFS_OpenFile (fname);
if (!file) {
dprint ("could not load menu.plist\n");
return NIL;
return nil;
}
plist = [PLItem fromFile:file];
Qclose (file);

View file

@ -24,10 +24,10 @@ integer deathmatch;
local integer i;
self = [super init];
head = NIL;
head = nil;
for (i = 0; i < MAX_BODIES; i++) {
local GameEntity[] ent = NIL;
local GameEntity[] ent = nil;
ent = [[GameEntity alloc] init];
bodies[i] = ent.ent;
}

View file

@ -12,7 +12,7 @@
ypos = yabs = y;
xlen = w;
ylen = h;
parent = NIL;
parent = nil;
return self;
}

View file

@ -69,7 +69,7 @@
- (id) initWithCapacity: (unsigned)cap
{
if (!(self = [super init]))
return NIL;
return nil;
count = 0;
if ((capacity = cap) < 1)
@ -93,7 +93,7 @@
local unsigned max = [array count];
if (!(self = [self initWithCapacity: max]))
return NIL;
return nil;
for (i = 0; i < max; i++) {
_objs[i] = [[array objectAtIndex: i] retain];
@ -111,7 +111,7 @@
local unsigned max = [array count];
if (!(self = [self initWithCapacity: max]))
return NIL;
return nil;
for (i = 0; i < max; i++) {
if (copy)
@ -127,7 +127,7 @@
local integer i;
if (!(self = [self initWithCapacity: @args.count + 1]))
return NIL;
return nil;
[self addObject: firstObj];
for (i = 0; i < @args.count; i++) {
@ -141,7 +141,7 @@
local integer i;
if (!(self = [self initWithCapacity: cnt]))
return NIL;
return nil;
for (i = 0; i < cnt; i++) {
[self addObject: (id) objs[i]];
@ -323,7 +323,7 @@
cause something else to happen).
*/
tmp = _objs[--count];
_objs[i] = NIL;
_objs[i] = nil;
[tmp release];
}
#else
@ -338,7 +338,7 @@
local id tmp;
tmp = _objs[--count];
_objs[count] = NIL;
_objs[count] = nil;
[tmp release];
}

View file

@ -11,7 +11,7 @@
- (id) init
{
if (!(self = [super init]))
return NIL;
return nil;
if (!poolStack)
poolStack = [[Array alloc] initWithCapacity: 1];

View file

@ -71,7 +71,7 @@ function PR_FindFunction (string func) = #0;
classname = PL_String (PL_ObjectForKey (dict, "classname"));
if (classname == "worldspawn")
ent = NIL;
ent = nil;
else
ent = spawn ();
if ((class = obj_lookup_class (classname))) {

View file

@ -12,14 +12,14 @@ typedef struct list_bucket_s list_bucket_t;
- (id) init
{
count = 0;
head = NIL;
head = nil;
tail = &head;
return self;
}
- (void) dealloc
{
local list_bucket_t [] e, t = NIL; //FIXME t uninitialized
local list_bucket_t [] e, t = nil; //FIXME t uninitialized
for (e = head; e; e = t) {
t = e.next;
@ -33,7 +33,7 @@ typedef struct list_bucket_s list_bucket_t;
{
local list_bucket_t [] e;
if (index < 0 || index >= count)
return NIL;
return nil;
for (e = head; e && index; index--)
e = e.next;
return e.obj;
@ -42,7 +42,7 @@ typedef struct list_bucket_s list_bucket_t;
-(id) head
{
if (!head)
return NIL;
return nil;
return head.obj;
}
@ -50,7 +50,7 @@ typedef struct list_bucket_s list_bucket_t;
{
local list_bucket_t [] e = (list_bucket_t []) tail;
if (!e)
return NIL;
return nil;
return e.obj;
}
@ -70,7 +70,7 @@ typedef struct list_bucket_s list_bucket_t;
{
local list_bucket_t [] e = obj_malloc (@sizeof (list_bucket_t));
e.obj = item;
e.next = NIL;
e.next = nil;
e.prev = tail;
tail[0] = e;
tail = &e.next;
@ -91,7 +91,7 @@ typedef struct list_bucket_s list_bucket_t;
return item;
}
}
return NIL;
return nil;
}
- (id) removeItemAtHead
@ -100,7 +100,7 @@ typedef struct list_bucket_s list_bucket_t;
local id obj;
if (!count)
return NIL;
return nil;
e = head;
obj = e.obj;
e.prev[0] = e.next;
@ -119,7 +119,7 @@ typedef struct list_bucket_s list_bucket_t;
local id obj;
if (!count)
return NIL;
return nil;
e = (list_bucket_t []) tail;
obj = e.obj;
e.prev[0] = e.next;

View file

@ -41,10 +41,10 @@
- (id) initWithObject: (id)anObject
{
if (!(self = [super init]))
return NIL;
return nil;
data = [anObject retain];
nextNode = NIL;
nextNode = nil;
}
- (void) dealloc

View file

@ -118,12 +118,12 @@ BOOL (id object) object_is_meta_class = #0;
+ (BOOL) instancesRespondToSelector: (SEL)aSelector
{
return class_get_instance_method (self, aSelector) != NIL;
return class_get_instance_method (self, aSelector) != nil;
}
+ (BOOL) respondsToSelector: (SEL)aSelector
{
return (class_get_class_method (self, aSelector) != NIL);
return (class_get_class_method (self, aSelector) != nil);
}
/*
@ -133,7 +133,7 @@ BOOL (id object) object_is_meta_class = #0;
+ (IMP) instanceMethodForSelector: (SEL)aSelector
{
if (!aSelector)
return NIL;
return nil;
return method_get_imp (class_get_instance_method (self, aSelector));
}
@ -203,7 +203,7 @@ BOOL (id object) object_is_meta_class = #0;
- (BOOL) respondsToSelector: (SEL)aSelector
{
return (class_get_instance_method ([self class], aSelector) != NIL);
return (class_get_instance_method ([self class], aSelector) != nil);
}
- (BOOL) conformsToProtocol: (Protocol [])aProtocol
@ -221,7 +221,7 @@ BOOL (id object) object_is_meta_class = #0;
local Class myClass = [self class];
if (!aSelector)
return NIL;
return nil;
return method_get_imp (object_is_instance (self)
? class_get_instance_method (myClass, aSelector)

View file

@ -24,11 +24,11 @@
+ itemClass:(plitem_t) item
{
local string classname = NIL;
local string classname = nil;
local id class;
if (!PL_TEST (item))
return NIL;
return nil;
switch (PL_Type (item)) {
case QFDictionary:
classname = "PLDictionary";
@ -43,7 +43,7 @@
classname = "PLString";
break;
default:
return NIL;
return nil;
}
class = obj_lookup_class (classname);
return [[class alloc] initWithItem: item];

View file

@ -55,7 +55,7 @@ struct obj_method_description_list {
return result;
}
}
return NIL;
return nil;
}
- (struct obj_method_description []) descriptionForClassMethod: (SEL)aSel
@ -78,7 +78,7 @@ struct obj_method_description_list {
return result;
}
}
return NIL;
return nil;
}
@end

View file

@ -51,10 +51,10 @@
- (id) pop
{
local id data;
local id oldTop = NIL;
local id oldTop = nil;
if (!top)
return NIL;
return nil;
oldTop = top;
top = [top nextNode];

View file

@ -43,7 +43,7 @@
{
local integer index;
local Instruction []inst;
literals = [Frame newWithSize: [constants count] link: NIL];
literals = [Frame newWithSize: [constants count] link: nil];
code = obj_malloc (@sizeof(instruction_t) * [instructions count]);
lineinfo = obj_malloc(@sizeof(lineinfo_t) * [instructions count]);
for (index = 0; index < [constants count]; index++) {
@ -59,7 +59,7 @@
size = [instructions count];
[instructions release];
[constants release];
instructions = constants = NIL;
instructions = constants = nil;
}
- (instruction_t []) code
@ -83,12 +83,12 @@
if (instructions) {
temp = instructions;
instructions = NIL;
instructions = nil;
[temp release];
}
if (constants) {
temp = constants;
constants = NIL;
constants = nil;
[temp release];
}

View file

@ -41,7 +41,7 @@ Symbol []beginSym;
sexpr = xp;
scope = sc;
code = [CompiledCode new];
err = NIL;
err = nil;
return self;
}

View file

@ -40,9 +40,9 @@ BOOL isList (SchemeObject []ls)
cdr = d;
if (!car) {
print("Cons: WARNING: NIL car\n");
print("Cons: WARNING: nil car\n");
} else if (!cdr) {
print("cons: WARNING: NIL cdr\n");
print("cons: WARNING: nil cdr\n");
}
return [super init];
@ -77,16 +77,16 @@ BOOL isList (SchemeObject []ls)
- (string) printForm
{
local string acc = "";
local id cur, next = NIL;
local id cur, next = nil;
for (cur = self; cur; cur = next) {
next = [cur cdr];
acc = acc + [[cur car] printForm];
if (next == [Nil nil]) {
next = NIL;
next = nil;
} else if (next && ![next isKindOfClass: [Cons class]]) {
acc = acc + " . " + [next printForm];
next = NIL;
next = nil;
} else if (next) {
acc = acc + " ";
}

View file

@ -9,7 +9,7 @@
+ (id) type: (string) t message: (string) m
{
return [[self alloc] initWithType: t message: m by: NIL];
return [[self alloc] initWithType: t message: m by: nil];
}
- (id) initWithType: (string) t message: (string) m by: (SchemeObject []) o

View file

@ -4,12 +4,12 @@
@implementation Instruction
+ (id) opcode: (opcode_e) oc
{
return [[self alloc] initWithOpcode: oc operand: 0 label: NIL];
return [[self alloc] initWithOpcode: oc operand: 0 label: nil];
}
+ (id) opcode: (opcode_e) oc operand: (integer) op
{
return [[self alloc] initWithOpcode: oc operand: op label: NIL];
return [[self alloc] initWithOpcode: oc operand: op label: nil];
}
+ (id) opcode: (opcode_e) oc label: (Instruction []) l

View file

@ -112,7 +112,7 @@ BOOL issymbol (string x)
by: self];
}
case "":
return NIL;
return nil;
default:
for (len = 1; issymbol(str_mid(source, len, len+1)); len++);
sym = [Symbol forString: str_mid (source, 0, len)];

View file

@ -23,16 +23,16 @@ void GlobalFree (void []ele, void []data)
- (id) init
{
self = [super init];
state.program = NIL;
state.program = nil;
state.pc = 0;
value = NIL;
state.cont = NIL;
state.env = NIL;
state.literals = NIL;
state.proc = NIL;
value = nil;
state.cont = nil;
state.env = nil;
state.literals = nil;
state.proc = nil;
state.stack = [Nil nil];
state.lineinfo = NIL;
globals = Hash_NewTable(1024, GlobalGetKey, GlobalFree, NIL);
state.lineinfo = nil;
globals = Hash_NewTable(1024, GlobalGetKey, GlobalFree, nil);
all_globals = [Nil nil];
return self;
}

View file

@ -74,7 +74,7 @@
}
if (!token) {
return NIL;
return nil;
}
if (token == [Symbol leftParen]) {

View file

@ -20,7 +20,7 @@ integer checkpoint;
+ (void) initialize
{
maybe_garbage = not_garbage = not_garbage_end = wait_list = roots = NIL;
maybe_garbage = not_garbage = not_garbage_end = wait_list = roots = nil;
markstate = true;
gc_state = GC_IDLE;
checkpoint = 0;
@ -29,7 +29,7 @@ integer checkpoint;
- (id) initDummy
{
self = [super init];
prev = next = NIL;
prev = next = nil;
marked = markstate;
root = false;
return self;
@ -88,9 +88,9 @@ integer checkpoint;
if (wait_list) {
wait_list.prev = not_garbage_end;
}
wait_list = NIL;
not_garbage_end = NIL;
not_garbage = NIL;
wait_list = nil;
not_garbage_end = nil;
not_garbage = nil;
markstate = !markstate;
gc_state = GC_IDLE;
}
@ -134,7 +134,7 @@ integer checkpoint;
dprintf("GC: Not during collect: %i\n", (integer) self);
}
prev = NIL;
prev = nil;
root = false;
checkpoint++;
return self;
@ -157,7 +157,7 @@ integer checkpoint;
not_garbage.prev = self;
}
next = not_garbage;
prev = NIL;
prev = nil;
not_garbage = self;
}
}
@ -183,7 +183,7 @@ integer checkpoint;
roots.prev = self;
}
next = roots;
prev = NIL;
prev = nil;
roots = self;
root = true;
}

View file

@ -74,7 +74,7 @@
if (names) {
[names release];
}
names = NIL;
names = nil;
[super dealloc];
}

View file

@ -30,7 +30,7 @@ Symbol []symbol (string str)
@implementation Symbol
+ (void) initialize
{
symbols = Hash_NewTable (1024, SymbolGetKey, SymbolFree, NIL);
symbols = Hash_NewTable (1024, SymbolGetKey, SymbolFree, nil);
lparen = [Symbol forString: "("];
rparen = [Symbol forString: ")"];
quote = [Symbol forString: "'"];

View file

@ -226,7 +226,7 @@ SchemeObject []bi_apply (SchemeObject []args, Machine []m)
by: m];
}
prev = NIL;
prev = nil;
for (cur = args; [(Cons[]) cur cdr] != [Nil nil]; cur = [(Cons[]) cur cdr]) {
prev = cur;
@ -238,7 +238,7 @@ SchemeObject []bi_apply (SchemeObject []args, Machine []m)
[m stack: [(Cons[]) args cdr]];
[(Procedure[]) [(Cons[]) args car] invokeOnMachine: m];
return NIL;
return nil;
}
SchemeObject []bi_callcc (SchemeObject []args, Machine []m)
@ -261,7 +261,7 @@ SchemeObject []bi_callcc (SchemeObject []args, Machine []m)
[Nil nil])];
}
[(Procedure[]) [(Cons[]) args car] invokeOnMachine: m];
return NIL;
return nil;
}
SchemeObject []bi_eq (SchemeObject []args, Machine []m)

View file

@ -53,14 +53,14 @@ integer main (integer argc, string []argv)
comp = [Compiler newWithLambda: cons ([Symbol forString: "lambda"],
cons ([Nil nil],
cons(stuff, [Nil nil])))
scope: NIL];
scope: nil];
code = (CompiledCode) [comp compile];
if ([code isError]) {
printf(">> %s: %i\n", [code source], [code line]);
printf(">> Error (%s): %s\n", [code type], [code message]);
return -1;
}
lm = [Lambda newWithCode: code environment: NIL];
lm = [Lambda newWithCode: code environment: nil];
[lm invokeOnMachine: vm];
res = [vm run];
if ([res isError]) {

View file

@ -299,7 +299,7 @@ static keyword_t keywords[] = {
{"switch", SWITCH, 0, 0, PROG_ID_VERSION},
{"case", CASE, 0, 0, PROG_ID_VERSION},
{"default", DEFAULT, 0, 0, PROG_ID_VERSION},
{"NIL", NIL, 0, 0, PROG_ID_VERSION},
{"nil", NIL, 0, 0, PROG_ID_VERSION},
{"struct", STRUCT, 0, 0, PROG_VERSION},
{"union", UNION, 0, 0, PROG_VERSION},
{"enum", ENUM, 0, 0, PROG_ID_VERSION},