00:00:00 --- log: started retro/11.04.15
07:01:36 --- join: aisa (~aisa@173-10-243-253-Albuquerque.hfc.comcastbusiness.net) joined #retro
07:06:55 <crc> http://sprunge.us/XHPH
07:08:09 <crc> C vm, with no globals
07:27:14 <crc> each VM structure gets its own input stacks, stats, etc.
07:41:13 <crc> I've tested this with multiple vm instances, it seems to work ok
08:29:59 <oPless> yay for no globals :)
14:41:59 --- quit: aisa (Quit: aisa)
15:04:24 --- join: erider (~chatzilla@unaffiliated/erider) joined #retro
15:04:28 <erider> hi
16:32:55 --- quit: erider (Read error: Connection reset by peer)
16:33:34 --- join: erider (~chatzilla@pool-108-3-149-46.bltmmd.fios.verizon.net) joined #retro
16:33:52 --- quit: erider (Changing host)
16:33:53 --- join: erider (~chatzilla@unaffiliated/erider) joined #retro
17:30:55 <crc> hi erider
17:32:12 <crc> I'm still unhappy with .s
17:32:27 <crc> but the new C code with no globals is working nicely
17:58:17 <erider> .s returns the value on the stack right 
17:59:07 <crc> .s displays the values on the stack
18:01:38 <erider> are you using getc() or are you grabbing a stream with fgets
18:02:30 <crc> in the c code, I use getc():
18:02:31 <crc> CELL rxReadConsole(VM *vm) {
18:02:31 <crc>   CELL c;
18:02:31 <crc>   if ((c = getc(vm->input[vm->isp])) == EOF && vm->input[vm->isp] != stdin) {
18:02:31 <crc>     fclose(vm->input[vm->isp--]);
18:02:32 <crc>     c = 0;
18:02:34 <crc>   }
18:02:36 <crc>   if (c == EOF && vm->input[vm->isp] == stdin)
18:02:39 <crc>     exit(0);
18:02:41 <crc>   return c;
18:02:43 <crc> }
18:05:53 <erider> hmm 
18:06:14 <erider> I wonder if I should use fgets
18:11:58 <crc> what are you trying to do?
18:18:24 <erider> write a minimalistic scheme 
18:31:05 <crc> i've not worked on parsing a language like lisp in years
18:35:14 <crc> if it helps, I've got some stuff from years ago (C, and Python) at http://rx-core.org/lisp.tar.bz2
18:36:04 <crc> gcc lisp-listener.c lisp-interpreter.c -o lisp
18:36:12 <crc> that should suffice to build it
18:37:03 <crc> the minimal lisp system is ~200 lines of C code, and there's a parser for a lisp-style language in ~40 lines of python
18:48:50 <erider> crc: cool thanks 
19:01:54 <erider> hey crc can you pass stdin to strstr() 
19:02:23 <crc> no, stdin isn't a string, it's (basically) a file handle
19:02:41 <erider> hmm 
19:02:44 <erider> ok 
19:03:50 <crc> see the prototype for strstr:  char *strstr(const char *haystack, const char *needle);
19:04:09 <crc> and for stdin:  extern FILE *stdin;
19:09:02 <erider> yeah I and trying to find a good way to handle char constant 
19:09:43 <erider> ie #\space 
19:11:08 <erider> crc: remember I am using ungetc and getc to parse 
19:14:00 <crc> I've never used ungetc
19:16:10 <erider> its just away to look ahead at the next char then put it back 
19:16:57 <erider> crc: any suggestions 
19:17:27 <erider> I want to match the pattern space after #\
19:17:58 <erider> currently I have a switch(c) on '#' and '\\' 
19:19:31 <crc> can you pastebin what you have?
19:25:37 <erider> I can't do this without a loop right: case '\\': case 's': case 'p': case 'a': case 'c': case 'e':
19:26:01 <crc> fallthrough?
19:26:54 <erider> hmm so I want it to match against  # \ s p a c e 
19:27:50 <crc> in that order, or match any single one?
19:28:25 <erider> without doing if(c = 's') getc if( c = 'p') etc... 
19:28:52 <erider> yeah I know, I am going to need a loop 
19:28:53 <crc> read a token and do a string comparison
19:29:20 <erider> with strstr ? 
19:29:24 <crc> that would work
19:30:42 <erider> how 
19:31:09 <erider> strstr takes two char [] 
19:31:17 <crc> yup, the haystack and the needle
19:31:32 <crc> strstr(token, "#\\space");
19:31:40 <crc> you need to read a token
19:31:46 <crc> build a string from the input source
19:32:07 <crc> ungetc is problematic here, since you can't reliably push multiple values back onto the input stream
19:32:55 <erider>  while (isalph(c = getc(in)))
19:33:05 <erider> something like that 
19:41:39 <crc> something like: http://sprunge.us/gbbh
19:42:19 <crc> (not the best, since there's no checks for buffer overflows, valid addresses, etc)
19:43:19 <erider> I will take a look in a minute I may have something too
19:43:35 <crc> this will return a token, when stdin is ( ) or a space character (up to, but not including the delimiter character)
19:44:03 <crc> this discards the delimiter; you could use ungetc to push that back to the input stream if necessart
19:44:06 <crc> *necessart
19:44:14 <crc> err, bad typing
19:44:19 <crc> *necessary
20:11:00 <erider> is the l returning the str count?
20:11:19 <crc> yes, sans the terminating zero
20:12:49 <erider> ah ok 
20:22:37 <erider> I am going to see if I can use your example to do what I want it to do 
20:22:40 <erider> thanks 
20:22:45 <crc> np
20:23:22 * crc is heading to bed. 20 hours up, and growing sleepy
20:23:43 <crc> I'll be back tomorrow a little during the morning, and then at some point during the evening
23:59:59 --- log: ended retro/11.04.15