Author: julianalbo
Date: Thu Aug 14 15:37:18 2008
New Revision: 30237
Modified:
trunk/languages/perl6/src/pmc/perl6multisub.pmc
trunk/tools/dev/pbc_to_exe_gen.pl
Log:
fix some codingstd
Modified: trunk/languages/perl6/src/pmc/perl6multisub.pmc
==============================================================================
--- trunk/languages/perl6/src/pmc/perl6multisub.pmc (original)
+++ trunk/languages/perl6/src/pmc/perl6multisub.pmc Thu Aug 14 15:37:18 2008
@@ -256,17 +256,23 @@
VTABLE_inspect_str(interp, candidate, CONST_STRING(interp,
"pos_optional")));
/* Type information. */
- meth = VTABLE_find_method(interp, candidate, CONST_STRING(interp,
"signature"));
- signature = Parrot_run_meth_fromc_args(interp, meth, candidate,
CONST_STRING(interp, "signature"), "P");
- meth = VTABLE_find_method(interp, signature, CONST_STRING(interp,
"params"));
- params = Parrot_run_meth_fromc_args(interp, meth, signature,
CONST_STRING(interp, "params"), "P");
+ meth = VTABLE_find_method(interp, candidate,
+ CONST_STRING(interp, "signature"));
+ signature = Parrot_run_meth_fromc_args(interp, meth, candidate,
+ CONST_STRING(interp, "signature"), "P");
+ meth = VTABLE_find_method(interp, signature,
+ CONST_STRING(interp, "params"));
+ params = Parrot_run_meth_fromc_args(interp, meth, signature,
+ CONST_STRING(interp, "params"), "P");
sig_elems = VTABLE_elements(interp, params);
info->types = mem_allocate_n_zeroed_typed(sig_elems + 1, PMC*);
info->constraints = mem_allocate_n_zeroed_typed(sig_elems + 1, PMC*);
for (j = 0; j < sig_elems; j++) {
PMC *param = VTABLE_get_pmc_keyed_int(interp, params, j);
- PMC *type = VTABLE_get_pmc_keyed_str(interp, param,
CONST_STRING(interp, "type"));
- PMC *constraints = VTABLE_get_pmc_keyed_str(interp, param,
CONST_STRING(interp, "constraints"));
+ PMC *type = VTABLE_get_pmc_keyed_str(interp, param,
+ CONST_STRING(interp, "type"));
+ PMC *constraints = VTABLE_get_pmc_keyed_str(interp, param,
+ CONST_STRING(interp, "constraints"));
info->types[j] = type;
info->constraints[j] = constraints;
}
Modified: trunk/tools/dev/pbc_to_exe_gen.pl
==============================================================================
--- trunk/tools/dev/pbc_to_exe_gen.pl (original)
+++ trunk/tools/dev/pbc_to_exe_gen.pl Thu Aug 14 15:37:18 2008
@@ -440,14 +440,14 @@
check_manifest:
# Check if there is a MSVC app manifest
- .local pmc file
+ .local pmc file
file = new 'File'
.local string manifest_file_name
manifest_file_name = exefile
manifest_file_name .= '.manifest'
.local pmc manifest_exists
manifest_exists = file.'exists'( manifest_file_name )
- unless manifest_exists goto linked
+ unless manifest_exists goto linked
embed_manifest:
# MSVC app manifest exists, embed it
@@ -461,9 +461,9 @@
say embed_manifest
.local int embed_manifest_status
embed_manifest_status = spawnw embed_manifest
- unless embed_manifest_status goto linked
+ unless embed_manifest_status goto linked
die 'manifest embedding failed'
-
+
linked:
print "Linked: "
say exefile
