*/\r
\r
#include "imports.h"\r
-#include "slang_utility.h"\r
-#include "slang_assemble_conditional.h"\r
#include "slang_assemble.h"\r
-#include "slang_execute.h"\r
+#include "slang_compile.h"\r
\r
/*\r
* _slang_assemble_logicaland()\r
GLuint zero_jump, end_jump;\r
\r
/* evaluate left expression */\r
- if (!_slang_assemble_operation_ (A, &op->children[0], slang_ref_forbid))\r
+ if (!_slang_assemble_operation (A, &op->children[0], slang_ref_forbid))\r
return GL_FALSE;\r
\r
/* jump to pushing 0 if not true */\r
return GL_FALSE;\r
\r
/* evaluate right expression */\r
- if (!_slang_assemble_operation_ (A, &op->children[1], slang_ref_forbid))\r
+ if (!_slang_assemble_operation (A, &op->children[1], slang_ref_forbid))\r
return GL_FALSE;\r
\r
/* jump to the end of the expression */\r
GLuint right_jump, end_jump;\r
\r
/* evaluate left expression */\r
- if (!_slang_assemble_operation_ (A, &op->children[0], slang_ref_forbid))\r
+ if (!_slang_assemble_operation (A, &op->children[0], slang_ref_forbid))\r
return GL_FALSE;\r
\r
/* jump to evaluation of right expression if not true */\r
\r
/* evaluate right expression */\r
A->file->code[right_jump].param[0] = A->file->count;\r
- if (!_slang_assemble_operation_ (A, &op->children[1], slang_ref_forbid))\r
+ if (!_slang_assemble_operation (A, &op->children[1], slang_ref_forbid))\r
return GL_FALSE;\r
\r
/* the end of the expression */\r
GLuint cond_jump, end_jump;\r
\r
/* execute condition expression */\r
- if (!_slang_assemble_operation_ (A, &op->children[0], slang_ref_forbid))\r
+ if (!_slang_assemble_operation (A, &op->children[0], slang_ref_forbid))\r
return GL_FALSE;\r
\r
/* jump to false expression if not true */\r
return GL_FALSE;\r
\r
/* execute true expression */\r
- if (!_slang_assemble_operation_ (A, &op->children[1], slang_ref_forbid))\r
+ if (!_slang_assemble_operation (A, &op->children[1], slang_ref_forbid))\r
return GL_FALSE;\r
\r
/* jump to the end of the expression */\r
A->file->code[cond_jump].param[0] = A->file->count;\r
\r
/* execute false expression */\r
- if (!_slang_assemble_operation_ (A, &op->children[2], slang_ref_forbid))\r
+ if (!_slang_assemble_operation (A, &op->children[2], slang_ref_forbid))\r
return GL_FALSE;\r
\r
/* resolve the end of the expression */\r
slang_assembly_flow_control save_flow = A->flow;\r
\r
/* execute initialization statement */\r
- if (!_slang_assemble_operation_ (A, &op->children[0], slang_ref_forbid/*slang_ref_freelance*/))\r
+ if (!_slang_assemble_operation (A, &op->children[0], slang_ref_forbid/*slang_ref_freelance*/))\r
return GL_FALSE;\r
- if (!_slang_cleanup_stack_ (A, &op->children[0]))\r
+ if (!_slang_cleanup_stack (A, &op->children[0]))\r
return GL_FALSE;\r
\r
/* skip the "go to the end of the loop" and loop-increment statements */\r
cont_label = A->file->count;\r
\r
/* execute loop-increment statement */\r
- if (!_slang_assemble_operation_ (A, &op->children[2], slang_ref_forbid/*slang_ref_freelance*/))\r
+ if (!_slang_assemble_operation (A, &op->children[2], slang_ref_forbid/*slang_ref_freelance*/))\r
return GL_FALSE;\r
- if (!_slang_cleanup_stack_ (A, &op->children[2]))\r
+ if (!_slang_cleanup_stack (A, &op->children[2]))\r
return GL_FALSE;\r
\r
/* resolve the condition point */\r
A->file->code[start_jump].param[0] = A->file->count;\r
\r
/* execute condition statement */\r
- if (!_slang_assemble_operation_ (A, &op->children[1], slang_ref_forbid))\r
+ if (!_slang_assemble_operation (A, &op->children[1], slang_ref_forbid))\r
return GL_FALSE;\r
\r
/* jump to the end of the loop if not true */\r
/* execute loop body */\r
A->flow.loop_start = cont_label;\r
A->flow.loop_end = break_label;\r
- if (!_slang_assemble_operation_ (A, &op->children[3], slang_ref_forbid/*slang_ref_freelance*/))\r
+ if (!_slang_assemble_operation (A, &op->children[3], slang_ref_forbid/*slang_ref_freelance*/))\r
return GL_FALSE;\r
- if (!_slang_cleanup_stack_ (A, &op->children[3]))\r
+ if (!_slang_cleanup_stack (A, &op->children[3]))\r
return GL_FALSE;\r
A->flow = save_flow;\r
\r
/* execute loop body */\r
A->flow.loop_start = cont_label;\r
A->flow.loop_end = break_label;\r
- if (!_slang_assemble_operation_ (A, &op->children[0], slang_ref_forbid/*slang_ref_freelance*/))\r
+ if (!_slang_assemble_operation (A, &op->children[0], slang_ref_forbid/*slang_ref_freelance*/))\r
return GL_FALSE;\r
- if (!_slang_cleanup_stack_ (A, &op->children[0]))\r
+ if (!_slang_cleanup_stack (A, &op->children[0]))\r
return GL_FALSE;\r
A->flow = save_flow;\r
\r
A->file->code[cont_jump].param[0] = A->file->count;\r
\r
/* execute condition statement */\r
- if (!_slang_assemble_operation_ (A, &op->children[1], slang_ref_forbid))\r
+ if (!_slang_assemble_operation (A, &op->children[1], slang_ref_forbid))\r
return GL_FALSE;\r
\r
/* jump to the end of the loop if not true */\r
A->file->code[skip_jump].param[0] = A->file->count;\r
\r
/* execute condition statement */\r
- if (!_slang_assemble_operation_ (A, &op->children[0], slang_ref_forbid))\r
+ if (!_slang_assemble_operation (A, &op->children[0], slang_ref_forbid))\r
return GL_FALSE;\r
\r
/* jump to the end of the loop if not true */\r
/* execute loop body */\r
A->flow.loop_start = A->file->code[skip_jump].param[0];\r
A->flow.loop_end = break_label;\r
- if (!_slang_assemble_operation_ (A, &op->children[1], slang_ref_forbid/*slang_ref_freelance*/))\r
+ if (!_slang_assemble_operation (A, &op->children[1], slang_ref_forbid/*slang_ref_freelance*/))\r
return GL_FALSE;\r
- if (!_slang_cleanup_stack_ (A, &op->children[1]))\r
+ if (!_slang_cleanup_stack (A, &op->children[1]))\r
return GL_FALSE;\r
A->flow = save_flow;\r
\r
GLuint cond_jump, else_jump;\r
\r
/* execute condition statement */\r
- if (!_slang_assemble_operation_ (A, &op->children[0], slang_ref_forbid))\r
+ if (!_slang_assemble_operation (A, &op->children[0], slang_ref_forbid))\r
return GL_FALSE;\r
\r
/* jump to false-statement if not true */\r
return GL_FALSE;\r
\r
/* execute true-statement */\r
- if (!_slang_assemble_operation_ (A, &op->children[1], slang_ref_forbid/*slang_ref_freelance*/))\r
+ if (!_slang_assemble_operation (A, &op->children[1], slang_ref_forbid/*slang_ref_freelance*/))\r
return GL_FALSE;\r
- if (!_slang_cleanup_stack_ (A, &op->children[1]))\r
+ if (!_slang_cleanup_stack (A, &op->children[1]))\r
return GL_FALSE;\r
\r
/* skip if-false statement */\r
A->file->code[cond_jump].param[0] = A->file->count;\r
\r
/* execute false-statement */\r
- if (!_slang_assemble_operation_ (A, &op->children[2], slang_ref_forbid/*slang_ref_freelance*/))\r
+ if (!_slang_assemble_operation (A, &op->children[2], slang_ref_forbid/*slang_ref_freelance*/))\r
return GL_FALSE;\r
- if (!_slang_cleanup_stack_ (A, &op->children[2]))\r
+ if (!_slang_cleanup_stack (A, &op->children[2]))\r
return GL_FALSE;\r
\r
/* resolve end of if-false statement */\r