Commit b2468d90 authored by John van Groningen's avatar John van Groningen
Browse files

rename DeltaBId as StdBoolId

parent c3911982
......@@ -3709,10 +3709,10 @@ BEInit (int argc)
gSpecialIdents [BESpecialIdentUndef] = &undef_id;
#endif
DeltaBId = Identifier ("StdBool");
StdBoolId = Identifier ("StdBool");
AndId = NULL;
OrId = NULL;
gSpecialIdents [BESpecialIdentStdBool] = &DeltaBId;
gSpecialIdents [BESpecialIdentStdBool] = &StdBoolId;
gSpecialIdents [BESpecialIdentAnd] = &AndId;
gSpecialIdents [BESpecialIdentOr] = &OrId;
......
......@@ -5,7 +5,7 @@
#define BITTEST(v,n) (((BITVECT) v >> n) & ((BITVECT) 1))
#define TCONS_BIT_NR 31
extern Ident AnnotatedId, ListId, TupleId, ConsId, NilId, ApplyId, SelectId, IfId, FailId, DeltaBId,
extern Ident AnnotatedId, ListId, TupleId, ConsId, NilId, ApplyId, SelectId, IfId, FailId, StdBoolId,
AndId, OrId, StdArrayId, ArrayFunctionIds [], ArrayId, StrictArrayId, UnboxedArrayId, ArrayClassId;
#if STRICT_LISTS
extern Ident StrictListId,UnboxedListId,TailStrictListId,StrictTailStrictListId,UnboxedTailStrictListId;
......
......@@ -2031,7 +2031,7 @@ static Bool NodeInAStrictContext (Node node,StateS demanded_state,int local_scop
if (definition_state_p!=NULL){
#ifdef FASTER_STRICT_AND_OR
if (sdef->sdef_module==DeltaBId->ident_name && node->node_arity==2){
if (sdef->sdef_module==StdBoolId->ident_name && node->node_arity==2){
if (sdef->sdef_ident==AndId){
ArgP arg1,arg2,false_arg;
NodeP false_node;
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment