Permalink
Browse files

Make 'make installcheck' pass

  • Loading branch information...
1 parent 801ddfd commit 5830d43eef3ac7acd8c3592ad514b9539a0679fe @leto committed Aug 19, 2010
Showing with 12 additions and 3 deletions.
  1. +9 −1 expected/test.out
  2. +3 −2 plparrot.c
View
@@ -1,5 +1,11 @@
\unset ECHO
-1..31
+psql:plparrot.sql:18: NOTICE: language "plparrot" does not exist, skipping
+psql:plparrot.sql:22: NOTICE: language "plparrotu" does not exist, skipping
+psql:plparrot.sql:26: NOTICE: language "plpir" does not exist, skipping
+psql:plparrot.sql:30: NOTICE: language "plpiru" does not exist, skipping
+psql:plparrot.sql:33: NOTICE: language "plperl6" does not exist, skipping
+psql:plparrot.sql:36: NOTICE: language "plperl6u" does not exist, skipping
+1..33
ok 1 - we can .include PIR libraries included with Parrot
ok 2 - we can load_bytecode PBC libraries included with Parrot
ok 3 - FileHandle.open is mocked in PL/PIR
@@ -31,3 +37,5 @@ ok 28 - We can pass a timestamptz in
ok 29 - We can return a timestamptz
ok 30 - We can pass a time in
ok 31 - We can return a time
+ok 32 - PL/Parrot should be trusted
+ok 33 - PL/PIR should be trusted
View
@@ -44,7 +44,7 @@ PG_MODULE_MAGIC;
#define TextDatum2String(X) (pstrdup(DatumGetCString(DirectFunctionCall1(textout, (X)))))
#endif
-#define DEBUG_MODE 1
+#define DEBUG_MODE 0
/**********************************************************************
* The information we cache about loaded procedures
@@ -583,6 +583,7 @@ plparrot_make_sausage(Parrot_Interp interp, Parrot_PMC pmc, FunctionCallInfo fci
}
void debug(char *msg) {
- if (DEBUG_MODE)
+ if (DEBUG_MODE) {
elog(NOTICE, msg);
+ }
}

0 comments on commit 5830d43

Please sign in to comment.