Permalink
Browse files

eliminate leading space

  • Loading branch information...
1 parent 4abf3e3 commit 33acf3b5478f14a0cce14ee26c2fcb5d1105d07b @plobsing plobsing committed Jan 4, 2011
Showing with 4 additions and 3 deletions.
  1. +2 −1 src/pmc/pasmserializer.pmc
  2. +2 −2 t/pmc/pasmserializer.t
View
3 src/pmc/pasmserializer.pmc
@@ -146,7 +146,8 @@ Push data item C<v> onto the end of the image being frozen.
INTVAL id;
INTVAL was_seen;
- VTABLE_push_string(INTERP, buf, CONST_STRING(INTERP, " "));
+ if (PARROT_PASMSERIALIZER(SELF)->id)
+ push_sep(INTERP, SELF);
if (PMC_IS_NULL(v)) {
id = 0;
View
4 t/pmc/pasmserializer.t
@@ -25,7 +25,7 @@ pir_output_like(<<'CODE', <<'OUT', 'PASMSerialize(FIA)');
.end
CODE
/
- \s [$]1: FixedIntegerArray \n
+ [$]1: FixedIntegerArray \n
[$]1: \[ \s (?: \d+ \s )+ [$]0 \s \] \n
/mx
OUT
@@ -48,7 +48,7 @@ pir_output_like(<<'CODE', <<'OUT', 'PASMSerialize(RPA)');
.end
CODE
/
- \s [$]1: ResizablePMCArray \n
+ [$]1: ResizablePMCArray \n
(?:
[$]\d+: \[ \s (?: (?: -? \d+ (?: [.] \d+ )? (?: e \d+ )?
| \w+:"(?: [^"] | \\ ")*"

0 comments on commit 33acf3b

Please sign in to comment.