From fdceabe88c191fcee20c9581f6f5e15d0ef11a7b Mon Sep 17 00:00:00 2001
From: Olaf Seibert <rhialto@falu.nl>
Date: Thu, 4 Jun 2015 00:35:31 +0200
Subject: [PATCH] Add .IF P1 and .IF P2 (tests for pass 1 and 2).

---
 assemble.c | 6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/assemble.c b/assemble.c
index 0afa2bb..2708984 100644
--- a/assemble.c
+++ b/assemble.c
@@ -543,7 +543,7 @@ static int assemble(
                                 nr_mlbs++;
                             }
                         } else {
-                            report(stack->top, "Unable to locale macro library \"%s\"\n", name);
+                            report(stack->top, "Unable to locate macro library \"%s\"\n", name);
                         }
                         free(name);
                     }
@@ -797,6 +797,10 @@ static int assemble(
                             }
                             free(thing1);
                             free(thing2);
+                        } else if (strcmp(label, "P1") == 0) {
+                            ok = (pass == 0);
+                        } else if (strcmp(label, "P2") == 0) {
+                            ok = (pass == 1);
                         } else {
                             int             sword;
                             unsigned        uword;