Re: relative includes in r7rs library definitions

[Seth Alves <alves@hungry.com>]

[-- Attachment #1: Type: text/plain, Size: 1053 bytes --]

I see... the shell script is mangling the arguments together.  This 
patch (attached) makes it work for me.

     -seth


On 11/25/2014 12:39 PM, Per Bothner wrote:
>
>
> On 11/25/2014 07:12 AM, Seth Alves wrote:
>> with [ -Dkawa.include.path='|:.' ] , I get a crash.
>>
>> ./test-kawa.scm:12:32: unexpected exception while compiling: 
>> java.lang.IllegalArgumentException: Illegal character in path at 
>> index 37: ./scheme/base.sld-Dkawa.include.path=|
>> java.lang.IllegalArgumentException: Illegal character in path at 
>> index 37: ./scheme/base.sld-Dkawa.include.path=|
>>      at java.net.URI.create(URI.java:859)
>
> I'm not seeing anything like that.  Looks like Kawa is getting invoked 
> with the second
> -D option being pasted onto the first.  I'd verify this by printing 
> out the
> args (one to a line) in the top of the main method in kawa/repl.scm.
>
>> The output I'm hoping for is
>>
>> this is the first one
>> this is the second one
>
> Works for me:
>
> $ ./test-kawa.scm
> this is the first one
> this is the second one
>
>
>


[-- Attachment #2: kawa-sh-patch --]
[-- Type: text/plain, Size: 822 bytes --]

Index: bin/kawa.sh.in
===================================================================
--- bin/kawa.sh.in	(revision 8173)
+++ bin/kawa.sh.in	(working copy)
@@ -29,7 +29,7 @@
         for arg in "$@"; do
             case "$arg" in
                 -D* | -J*)
-                    jvm_args+="$arg"
+                    jvm_args+=" $arg"
                     shift
                 ;;
                 *) break
@@ -36,7 +36,7 @@
                 ;;
             esac
         done
-        exec ${JAVA-"java"} -Dkawa.command.line="${command_line}" "${jvm_args[@]}" kawa.repl ${no_console} "$@"
+        exec ${JAVA-"java"} -Dkawa.command.line="${command_line}" ${jvm_args[@]} kawa.repl ${no_console} "$@"
         ;;
     *)
         exec ${JAVA-"java"} -Dkawa.command.line="${command_line}" kawa.repl ${no_console} "$@"