00:00:00 --- log: started forth/09.10.01 00:00:01 but to open and close a file with gforth you must have a file id that is given to the program from the system. 00:00:21 Hm. 00:00:23 looking at how I did that in my gforth/win32 chess program 5 years ago... 00:02:53 Raystm2, gforth has 2 different way handle about this: file and block. 00:03:41 http://forth.pastebin.ca/1587351 00:04:07 yes, and that paste has the file handleing words I had to use to open and close files. 00:05:44 you have to open the file or create-file if non existant and then that gives you a f-descriptor. then you have to open-file close-file read-line write-file to get any action from the file words in gforth. 00:06:42 you can't read or write the file because you have not set the r/w 00:08:14 open-input and open-output are really both the same words. 00:08:43 close-input/output same. 00:09:37 gforth "fileid" is UNIX "FILE*". 00:09:45 That's for sure. 00:09:57 in that game there is only one line in the entire file, tho pretty long. you may need some MORE file handling words then this if you need to get thru-put. 00:12:23 --- quit: f[x] (Read error: 145 (Connection timed out)) 00:12:31 hi ASau , woke up? 00:12:34 In the chess game that I use those words, I created buffers that I write out and read into when necessary. I do that every piece move, because I use the file for the preservation of data in a catastrophy, because playing chess is so slow I can read and write a file when ever I want. 00:12:57 foxes: I'm already at work. 00:13:17 .... full of energy with ASau 00:13:33 powered by the sun. 00:13:43 Raystm2, saved your code, thank you . 00:13:45 It's almost noon here. 00:13:50 yw. 00:13:59 :) 00:14:27 lets see almost noon, that's a 8-3/4 hour difference so... 00:14:37 east of Italy? 00:14:57 France even? 00:16:19 most bugs are found when people full of energy, and were made when low. 00:16:20 :D 00:16:39 You may be right. :) 00:16:54 Sometimes bugs if you go too fast and find them when you slow down. 00:17:10 somewhere in the middle... happy medium. ;) 00:17:22 nod 00:18:22 Raystm2: I'm in damn Moscow. 00:20:41 Moscow, cool! 00:21:36 Moscow isn't cool, it's frozen today. 00:23:13 getting colder here. 00:23:46 I've never been to Moscow. It's always been a dream to go that far east. 00:24:49 :) 00:24:50 frozen XD 00:25:32 D'oh I don't even know what timezone Im in. I'm in -7 and Moscow is what +3? 00:25:38 too far to me, south china here, near hongkong 00:25:54 Still nice weather. 00:26:22 Temp 33° C / Feel like 36° C 00:27:35 HongKong+8 timezone 00:27:42 yes 00:27:47 cool. 00:28:10 it's tommorow night where you folks are and it's just starting here. shesh 00:28:53 f*ck internet :P 00:30:08 3 minutes 'til eggs 00:30:29 BrainF*** internet 00:31:00 you wrote BrainF*ck of reva? 00:31:01 * Raystm2 once wrote an editor in a forth that was based on a SUBset of BrainF***. 00:31:37 Not me. I've only read about reva, never used it. but I use the RetroForth it is based on all of the time. 00:32:10 I wrote the editor in Glypher a kind of colorForth based on RetroForth, about 3-4 years ago now. 00:32:16 EGGS! :) 00:32:19 brb 00:32:44 from <> 00:35:18 back, 00:35:29 what is from <>? 00:36:01 a point is one trillionth of a millimeter. hmmm 00:36:05 EGGS! from that book. 00:36:24 Oh! cool. 00:36:43 I have the book, I'll have to look that up. It's been some time since I have read it. 00:38:57 That's really a good book 00:39:25 " Reva rocks!" pad place | 'pad' now contains a counted -string 00:39:40 what's it mean? 00:40:16 adrr1 + u ? 00:41:23 adrr1 + n ? 00:41:39 counted-string: addr u 00:42:10 adrr1+n signed offset from addr. u -- unsigned. 00:43:25 ok> pad . 00:43:26 138815815 00:44:55 pad is another word in forth, addr of pad will change when you define new word or something . 00:45:02 why pad count -> addr n (pad count .s -> 138815816 85), where 85 come frome ? 00:45:36 pad puts address on stack. 00:45:48 count takes that address and extracts a number from it. 00:46:07 also 00:46:18 85 is the number of pad can hold( different depends on difference forth ) . 00:46:44 adrr + u is saying something very different then addr u . ( no plus sign) 00:46:58 how count know lenth of pad contents? 00:48:51 * Raystm2 looks up count definition. 00:49:08 looking at 00:50:17 count ( cstr -- a n ) 00:50:26 Converts a counted-string to an address-count pair. 00:51:38 be very careful, there is no proof that pad contains a string unless you put one there so count will work on strings but ALSO on not-strings and it will return an answer. 00:52:45 count c-addr1 -- c-addr 2 u the address much be a character address. 00:52:55 the first character in the string. 00:53:04 --- join: DrunkTomato (n=DEDULO@ext-gw.wellcom.tomsk.ru) joined #forth 00:53:54 I've seen count used purposely on non-string addresses where it was convenient. 00:54:06 it can be , and is, done by programmers. 00:54:15 on purpose. 00:54:27 AND by mistake :) 00:54:35 hm 00:55:38 Raystm2, if i define names with TFIELD : 30 TFIELD names . and how can I define a " FLash" to names? 00:55:49 s" Flash" ? 00:55:54 s" Flash" names? 00:56:54 you are not defining the Flash with names per se. You are using names to create a TextField in the record where the name will go. 00:57:18 rot min cmove update puts it there. 00:57:31 then, how can i puts it there? 00:57:33 puts the FLASH in the name field of the record. 00:59:22 nod, but how? 01:02:12 input_names takes a name and then names goes and gets the address that the name will go into the record, and then ROT will line up the stack so that MIN will make sure that the new name is only 30 characters or less, and then CMOVE will move that into the buffer which is the address that names gave us and then UPDATE will get the buffer ready for the next flush. Flush write to the file. Update writes to the buffer. SO, you can look in th 01:04:12 --- quit: mathrick (Read error: 145 (Connection timed out)) 01:04:19 but it seems, names , drop 2 parameter on the stack. 01:04:22 not one addr. 01:05:11 you CAN put a word after names and before CMOVE that will leave on the stack the address of the buffer where the name will go, the string address, and the count 01:05:27 THEN you can use those to verify that the cmove worked. 01:05:47 * foxes trying 01:07:01 something like : keep3 push push dup pop dup -rot pop dup -rot ; 01:07:48 then call ." Flash" input_names 01:08:00 that should leave you the three things we need. 01:08:34 lol 01:08:35 sorry 01:08:45 http://forth.pastebin.ca/1587423 I tried here, met errors 01:09:05 for push read >r and pop read r> 01:09:19 push and pop are different in gforth. 01:09:22 sorry about that. 01:09:32 nerver mind 01:10:26 wrong order... 01:10:28 please do 01:10:49 s" Flash" names rot min cmove 01:12:26 http://forth.pastebin.ca/1587425 《---tried ， fail 01:13:05 you did not fail. It WORKED ! 01:13:15 ? 01:13:33 it just doesn't have the right "file/block" address in the ADDRESS word. 01:13:36 cmove output :13: Invalid memory address 01:14:27 rec# @ . 1 ok <--- I think , I got the right address 01:14:37 I see that, but cmove is complaining because the word names is referanceing a wrong address. 01:14:38 ya. 01:15:44 rec# is just returning the record number. doesn't have to have anything to do with the address. just the depth of the block/file where the record is kept IN the address, 01:16:06 the block/file/buffer is the address we want. 01:16:47 cmove want's to move the string into the buffer but we don't give it the right address, is what I was trying to say. :) 01:17:38 We have to besure our buffer and our file words are either properly defined or are made to do something else different while testing is going on. 01:17:38 understand now, but where should be the key- problem? 01:18:49 do you still have those file handling word I pasted? 01:18:57 yes 01:19:27 okay then you need something similar... let me paste some idea, okay :) 01:19:47 ok 01:19:53 foxes: you don't pass receiving string. 01:20:15 ASau, ?? what's receiving string ? 01:20:28 "rot min cmove" assumes you have counted string as destination area. 01:20:49 "81619906228 140564808075456" isn't counted string. 01:21:05 It has too large length to be one. 01:21:22 Show us your "names" definition. 01:21:50 http://forth.pastebin.ca/1587103 01:22:13 in line 55 01:24:49 Pretty archaic style. 01:25:16 Take a look at struct% and friends. 01:25:49 This approach is nicer and more extensible. 01:26:07 It is more like Oberon records. 01:27:07 what is the struct% and friends? 01:27:42 Look it up in gforth documentation. 01:27:48 ok 01:28:09 http://forth.pastebin.ca/1587433 01:28:14 I strongly suggest that you write stack comments for your (or Haydon's) "dfield" and "tfield". 01:28:17 The problem is there. 01:28:26 Try to solve it yourself. 01:28:31 you need some words like that but you have to define the buffer words properly in this paste. 01:29:13 If we want to use a structure containing several fields, we could simply reserve memory for it, and access the fields using address arithmetic (see Address arithmetic). As an example, consider a structure with the following fields <--- this part? 01:29:24 it's in the word ADDRESS because we are using block words from the 80's to do file manipulation of the 90's and that has to be changed. 01:29:43 ASau, ok, I will try it now 01:31:43 http://forth.pastebin.ca/1587205 [+] above is what i did, and below is done by Raystm2 . ASau 01:33:50 line 26 comment is not correct as 20 is on otherside of 30+header 01:35:19 i am trying to re-read the CREATE part 01:36:36 All your problems arise from the simple fact: 01:36:43 create begins the definition process by leaving an address of a new dictionary header on the stack. 01:36:49 you don't understand how Haydon uses block system. 01:37:08 Let me clarify it. 01:37:36 that's right. 01:37:45 "open" which "holds file descriptor" does hold file descriptor. 01:37:54 But this file descriptor isn't what you mean. 01:38:04 It is what it meant back then. 01:38:23 And it is _block offset into the storage_. 01:38:50 Block holds integer number of records. 01:39:06 That's why the length of record is 32. 01:39:28 Because block is 128 multiple, if it follows FIG. 01:39:45 Block is exactly 1024, if it follows Forth-83. 01:40:54 Now what "dfield" and "tfield" are. 01:41:01 Dump them and use "struct%". 01:41:08 You'll have sane notations: 01:41:10 struct% 01:41:23 half-word% field tag 01:41:35 char% 30 * field names 01:41:39 end-struct record% 01:42:41 --- join: jauaor (n=araujo@190.38.49.150) joined #forth 01:43:16 Then you'll have common background with other programming languages. 01:43:42 hello there 01:43:52 Use "open-file" and "reposition-file". 01:44:02 Good afternoon. 01:44:15 hi jauaor 01:44:22 great advice ASau :) 01:44:26 hello Raystm2 01:44:45 foxes: If you do want to grok exactly that way of thinking, 01:44:47 * foxes understanding 01:44:51 I can give another recommendations. 01:45:01 I need more thinking though. 01:45:03 please :) 01:45:15 ok, I can wait. 01:45:16 grok, excellent word. ASau have you read "Stranger"? 01:52:10 printing out the struct of gforth 01:56:03 printing out the irc log at the same time :) 01:57:29 there ought to be a button that does that, seeing that that gets done all of the time. :) 01:59:46 foxes: http://forth.pastebin.ca/1587460 01:59:49 See comments. 02:01:37 There's scanning error, which leads to buffer overrun. 02:01:44 Then there's another problem: 02:02:11 the code assumes 2-octet cell. 02:02:24 gforth uses 4-octet cell on i386. 02:07:28 and that explains the cmove error earlier. 02:08:20 I write forth on pentium bare metal and I don't have those luxuries. :) 02:08:33 I have to invent everything I do. 02:08:50 or steal someone elses invention, which is not beyond me. :) 02:12:25 foxes: further comments http://forth.pastebin.ca/1587471 02:13:19 foxes: Note how using symbolic names instead of hard-coded values makes code more clear and _more_portable_. 02:16:25 ASau ty for education. :) 02:17:09 :) 02:28:09 foxes: next edition: http://forth.pastebin.ca/1587485 02:29:44 I hope that you're not professional programmer. 02:30:41 Caution: I edited the code in the way to show how it should 02:30:42 _look_ like, that doesn't mean it is bug-free. 02:30:52 ofcause not :D 02:31:08 And I'm back to my work. 02:31:24 there is either an extra $ in the new struct or one missing in the original struct. does end-struct end in a $ or not? 02:37:10 Oh, well. I'm wrong there... 02:42:51 okay found it. the word end-struct should not be end-struct$ 02:43:03 end-struct% 02:43:11 ty 02:43:50 lol that means it should not be $ but should also not be %. 02:44:19 or in other words end-struct rather then end-struct% 02:44:38 this is for my clarification. I'm sure this is not new to you. :) 02:46:32 * Raystm2 back to working on the TAOCP MIX1009 simulator by DKnuth in forth. 02:47:01 I have all of the 9 registers able to load and also all of the shift and rotate instructions are complete. 02:47:37 working on MOVE and also ADD which means i'm also working on SUB by default. 02:48:26 oh, yeah. NOP works lol, and so does HLT. :) 02:50:23 hmmm I wonder if I can make Load-nRegister instructions work backwards as Store-to-memory-from-nRegister by the cunning usage of swap addresses. 02:50:28 foxes: next edition (with my major bug fixed) http://forth.pastebin.ca/1587506 02:52:08 Now I'm really back to work. 02:53:01 "input" def should increment the record tag id # , create the Tfield name and then send then write the file. 03:04:56 --- join: GeDaMo (n=gedamo@212.225.96.134) joined #forth 03:08:41 --- join: Judofyr (n=Judofyr@cC694BF51.dhcp.bluecom.no) joined #forth 03:14:01 --- join: neceve (n=ncv@unaffiliated/neceve) joined #forth 03:23:30 back from nap 03:23:41 :) thank ASau , reading it. 03:34:24 --- join: mathrick (n=mathrick@users177.kollegienet.dk) joined #forth 04:14:08 --- quit: neceve (Read error: 113 (No route to host)) 04:36:49 --- join: segher (n=segher@84-105-60-153.cable.quicknet.nl) joined #forth 04:43:21 --- quit: GeDaMo ("Leaving.") 04:52:25 --- quit: Al2O3 () 05:18:24 --- quit: nighty^ ("Going home") 06:20:32 --- join: nighty__ (n=nighty@x122091.ppp.asahi-net.or.jp) joined #forth 06:22:34 --- quit: Quartus` (Read error: 110 (Connection timed out)) 06:26:25 --- quit: probonono (pratchett.freenode.net irc.freenode.net) 06:26:25 --- quit: aguai (pratchett.freenode.net irc.freenode.net) 06:26:25 --- quit: _Jordan_ (pratchett.freenode.net irc.freenode.net) 06:26:25 --- quit: scj (pratchett.freenode.net irc.freenode.net) 06:26:25 --- quit: Frek (pratchett.freenode.net irc.freenode.net) 06:26:25 --- quit: Judofyr (pratchett.freenode.net irc.freenode.net) 06:26:55 --- join: Judofyr (n=Judofyr@cC694BF51.dhcp.bluecom.no) joined #forth 06:26:55 --- join: probonono (n=User@unaffiliated/probonono) joined #forth 06:26:55 --- join: scj (i=syljo361@static-ip-62-75-255-125.inaddr.server4you.de) joined #forth 06:26:55 --- join: _Jordan_ (n=jcooper@173-45-228-22.slicehost.net) joined #forth 06:26:55 --- join: Frek (n=FAAO@81-225-142-146-no36.tbcn.telia.com) joined #forth 06:26:55 --- join: aguai (i=aguai@114-32-77-124.HINET-IP.hinet.net) joined #forth 06:59:51 --- quit: jauaor () 07:02:10 --- nick: nighty_ -> cp 07:02:36 --- nick: cp -> nighty- 07:10:43 --- join: f[x] (n=user@95.133.127.223) joined #forth 07:20:57 --- join: TR2N (i=email@89-180-192-63.net.novis.pt) joined #forth 07:32:07 --- join: GeDaMo (n=gedamo@212.225.96.134) joined #forth 07:34:03 --- join: jauaor (n=araujo@190.38.49.150) joined #forth 07:51:55 --- quit: gogonkt (Connection timed out) 07:52:19 --- join: gogonkt (n=info@59.38.201.187) joined #forth 08:03:36 --- quit: f[x] (Read error: 145 (Connection timed out)) 08:12:05 --- quit: ASau ("off") 09:01:19 --- join: kar8nga (n=kar8nga@jol13-1-82-66-176-74.fbx.proxad.net) joined #forth 09:57:03 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 10:00:02 Evening. 10:00:47 ASau, :) 10:01:12 are there some code to help me post a file into the pastebin? 10:01:57 No idea. 10:02:00 i edit that database you posted, and it ran. so, I need past out. 10:02:18 I use Emacs, and it has the code inside. 10:02:51 er..... 10:03:01 i use vim 10:03:07 Looser :) 10:03:08 * foxes googling for vim 10:03:20 :P 10:03:40 --- quit: ASau (Read error: 104 (Connection reset by peer)) 10:04:34 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 10:06:25 --- quit: ASau (Read error: 104 (Connection reset by peer)) 10:07:42 * foxes http://padovan.org/blog/2009/07/vim-plugin-for-pastebin/ <--- trying on this 10:09:12 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 10:10:57 in gentoo theres wgetpaste 10:11:13 yes :) 10:14:42 --- quit: ASau (Read error: 104 (Connection reset by peer)) 10:15:20 --- join: ASau (n=user@91.77.59.32) joined #forth 10:15:25 --- join: f[x] (n=user@95.133.255.114) joined #forth 10:15:58 --- quit: ASau (Read error: 131 (Connection reset by peer)) 10:16:28 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 10:18:53 --- quit: kar8nga (Remote closed the connection) 10:19:38 --- quit: ASau (Read error: 104 (Connection reset by peer)) 10:20:33 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 10:21:35 debian。。。。 10:24:30 http://pastebin.com/dfdc1ba0 ASau 10:24:44 did with pastebin vim plugin :) 10:26:05 --- quit: ASau (Read error: 104 (Connection reset by peer)) 10:26:58 --- join: ASau (n=user@91.77.59.32) joined #forth 10:27:03 --- join: ASau` (n=user@91.77.59.32) joined #forth 10:27:03 --- quit: ASau` (Read error: 131 (Connection reset by peer)) 10:27:50 --- quit: ASau (Remote closed the connection) 10:28:35 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 10:28:54 ... ASau 10:28:58 http://pastebin.com/dfdc1ba0 ASau 10:29:41 Weird. 10:29:44 What's the point in preserving editorial comments? 10:29:52 They don't add value as description. 10:30:27 Like I said, it isn't meant as actual code. 10:30:35 It is to show you how it should be changed. 10:30:55 Direction of change. 10:31:33 --- quit: ASau (Read error: 104 (Connection reset by peer)) 10:32:11 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 10:32:30 * Raystm2 has been working on MIX simulator all "nigth/morning" and now all 10 of the original registers and two extra contol bytes are in actuallity one huge 52 byte register. 10:33:17 This flaky connection is annoying, it wasn 10:33:20 t this way yesterday. 10:33:37 ASau, I need work on it later, so preserved. 10:34:08 --- quit: ASau (Read error: 104 (Connection reset by peer)) 10:34:09 Raystm2, cool~ 10:34:33 hmm I bet Asau might not have got your last post. ty :) 10:34:46 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 10:35:01 wb :) 10:35:14 I'm foody. 10:36:13 lol 10:36:14 --- quit: ASau (Read error: 104 (Connection reset by peer)) 10:36:16 ASau, I need work on it later, so preserved. 10:36:21 oh...my god! 10:36:26 lol 10:36:35 .... 10:36:56 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 10:37:07 Now I can have words that can shift or rotate or fetch or store to any part of the multi-register. 10:38:15 really cool. 10:38:16 --- quit: ASau (Read error: 104 (Connection reset by peer)) 10:41:02 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 10:43:38 ASau, I need work on it later, so preserved. 10:44:09 * foxes reading on bed with <> 10:46:57 --- quit: ASau (Read error: 104 (Connection reset by peer)) 10:47:41 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 10:52:08 --- quit: ASau (Read error: 104 (Connection reset by peer)) 10:52:51 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 10:54:48 --- quit: ASau (Read error: 104 (Connection reset by peer)) 10:55:31 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 11:06:33 --- quit: ASau (Read error: 104 (Connection reset by peer)) 11:07:13 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 11:17:06 --- quit: ASau (Read error: 104 (Connection reset by peer)) 11:19:54 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 11:23:09 --- quit: jauaor (Read error: 60 (Operation timed out)) 11:26:04 --- join: kar8nga (n=kar8nga@jol13-1-82-66-176-74.fbx.proxad.net) joined #forth 11:27:07 --- quit: ASau (Read error: 54 (Connection reset by peer)) 11:28:00 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 11:29:13 --- quit: ASau (Read error: 104 (Connection reset by peer)) 11:29:40 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 11:36:57 --- quit: ASau (Read error: 104 (Connection reset by peer)) 11:39:48 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 11:42:50 --- quit: ASau (Read error: 104 (Connection reset by peer)) 11:43:26 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 11:54:12 --- join: Raystm2_ (i=rastm2@c-24-8-232-212.hsd1.co.comcast.net) joined #forth 11:55:52 --- quit: Frek (Read error: 104 (Connection reset by peer)) 11:57:22 --- quit: ASau (Read error: 104 (Connection reset by peer)) 11:58:02 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 11:59:59 --- quit: ASau (Read error: 104 (Connection reset by peer)) 12:00:38 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 12:07:02 --- quit: ASau (Read error: 104 (Connection reset by peer)) 12:07:47 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 12:09:14 --- quit: Raystm2 (Read error: 110 (Connection timed out)) 12:13:53 --- join: impomatic (n=John@nat66.mia.three.co.uk) joined #forth 12:17:43 --- quit: ASau (Read error: 104 (Connection reset by peer)) 12:18:25 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 12:20:01 --- quit: ASau (Read error: 104 (Connection reset by peer)) 12:20:49 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 12:21:31 --- join: Snoopy_1711 (i=Snoopy_1@dslb-084-059-220-011.pools.arcor-ip.net) joined #forth 12:27:39 --- quit: ASau (Read error: 104 (Connection reset by peer)) 12:28:24 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 12:36:48 --- quit: ASau (Read error: 104 (Connection reset by peer)) 12:38:42 --- quit: Snoopy_1611 (Read error: 110 (Connection timed out)) 12:39:33 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 12:43:56 --- quit: ASau (Read error: 54 (Connection reset by peer)) 12:44:42 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 12:47:40 --- quit: ASau (Read error: 104 (Connection reset by peer)) 12:50:31 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 12:56:54 --- quit: ASau (Read error: 104 (Connection reset by peer)) 12:57:23 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 13:00:58 --- quit: ASau (Read error: 104 (Connection reset by peer)) 13:01:30 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 13:05:47 --- quit: ASau (Read error: 104 (Connection reset by peer)) 13:06:34 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 13:07:58 --- quit: ASau (Read error: 104 (Connection reset by peer)) 13:08:41 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 13:09:49 --- quit: ASau (Read error: 104 (Connection reset by peer)) 13:10:21 --- join: ASau (n=user@91.77.59.32) joined #forth 13:16:37 --- quit: ASau (Read error: 131 (Connection reset by peer)) 13:17:07 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 13:23:40 --- quit: ASau (Read error: 104 (Connection reset by peer)) 13:24:15 --- join: ASau (n=user@91.77.59.32) joined #forth 13:28:33 --- quit: impomatic ("mov.i #1,1") 13:28:42 --- quit: ASau (Read error: 131 (Connection reset by peer)) 13:29:27 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 13:33:15 --- quit: ASau (Read error: 104 (Connection reset by peer)) 13:34:09 --- join: ASau (n=user@91.77.59.32) joined #forth 13:37:24 --- quit: ASau (Read error: 131 (Connection reset by peer)) 13:37:55 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 13:48:10 --- quit: ASau (Read error: 104 (Connection reset by peer)) 13:48:17 --- quit: DrunkTomato () 13:49:00 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 13:53:11 --- quit: ASau (Read error: 104 (Connection reset by peer)) 13:53:36 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 13:54:18 --- quit: f[x] (Read error: 110 (Connection timed out)) 14:03:14 --- quit: ASau (Read error: 104 (Connection reset by peer)) 14:03:46 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 14:06:12 --- join: Raystm2 (i=rastm2@24.8.232.212) joined #forth 14:16:40 --- quit: ASau (Read error: 104 (Connection reset by peer)) 14:17:24 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 14:21:17 --- quit: Raystm2_ (Read error: 113 (No route to host)) 14:27:30 --- join: neceve (n=ncv@unaffiliated/neceve) joined #forth 14:36:46 --- quit: kar8nga (Remote closed the connection) 14:39:44 --- quit: ASau (Read error: 104 (Connection reset by peer)) 14:41:40 --- quit: neceve (Remote closed the connection) 14:42:27 --- join: ASau (n=user@ppp91-77-59-32.pppoe.mtu-net.ru) joined #forth 14:42:34 --- quit: Raystm2 ("User pushed the X - because it's Xtra, baby") 15:04:11 foxes: http://pastebin.com/mbbd2fd7 15:04:44 foxes: if I didn't sign it, it doesn't mean that you may sign it for me. 15:07:40 --- quit: GeDaMo ("Leaving.") 15:50:39 --- join: ASau` (n=user@ppp91-77-57-240.pppoe.mtu-net.ru) joined #forth 16:07:09 --- quit: ASau (Read error: 110 (Connection timed out)) 16:28:38 --- quit: ASau` (Read error: 104 (Connection reset by peer)) 16:29:15 --- join: ASau` (n=user@ppp91-77-57-240.pppoe.mtu-net.ru) joined #forth 16:56:22 ASau`, sorry, I changed. 17:06:40 --- quit: Judofyr (Remote closed the connection) 18:14:21 --- quit: gogonkt (Read error: 104 (Connection reset by peer)) 18:16:26 --- quit: I440r ("Leaving") 18:19:04 --- join: gogonkt (n=info@218.13.51.75) joined #forth 18:24:35 --- join: Raystm2 (i=rastm2@c-24-8-232-212.hsd1.co.comcast.net) joined #forth 18:33:32 --- quit: Raystm2 ("User pushed the X - because it's Xtra, baby") 18:42:40 --- join: Raystm2 (i=rastm2@c-24-8-232-212.hsd1.co.comcast.net) joined #forth 19:12:29 --- quit: ASau` (Remote closed the connection) 19:12:56 --- join: ASau` (n=user@ppp91-77-57-240.pppoe.mtu-net.ru) joined #forth 19:42:29 --- join: Al2O3 (n=Al2O3@69.40.241.67) joined #forth 20:10:54 --- quit: ASau` (pratchett.freenode.net irc.freenode.net) 20:10:55 --- quit: aguai (pratchett.freenode.net irc.freenode.net) 20:10:55 --- quit: _Jordan_ (pratchett.freenode.net irc.freenode.net) 20:10:55 --- quit: scj (pratchett.freenode.net irc.freenode.net) 20:10:55 --- quit: probonono (pratchett.freenode.net irc.freenode.net) 20:10:55 --- quit: Snoopy_1711 (pratchett.freenode.net irc.freenode.net) 20:11:08 --- quit: TR2N (pratchett.freenode.net irc.freenode.net) 20:11:09 --- quit: uiu (pratchett.freenode.net irc.freenode.net) 20:11:09 --- quit: nighty- (pratchett.freenode.net irc.freenode.net) 20:13:11 --- join: ASau` (n=user@ppp91-77-57-240.pppoe.mtu-net.ru) joined #forth 20:13:11 --- join: Snoopy_1711 (i=Snoopy_1@dslb-084-059-220-011.pools.arcor-ip.net) joined #forth 20:13:11 --- join: TR2N (i=email@89-180-192-63.net.novis.pt) joined #forth 20:13:11 --- join: aguai (i=aguai@114-32-77-124.HINET-IP.hinet.net) joined #forth 20:13:11 --- join: _Jordan_ (n=jcooper@173-45-228-22.slicehost.net) joined #forth 20:13:11 --- join: scj (i=syljo361@static-ip-62-75-255-125.inaddr.server4you.de) joined #forth 20:13:11 --- join: probonono (n=User@unaffiliated/probonono) joined #forth 20:13:11 --- join: uiu (n=ian@HSI-KBW-078-042-132-111.hsi3.kabel-badenwuerttemberg.de) joined #forth 20:13:11 --- join: nighty- (n=nighty@x122091.ppp.asahi-net.or.jp) joined #forth 20:14:40 --- join: bjorkintosh (n=bjork@ip72-204-40-138.fv.ks.cox.net) joined #forth 20:14:57 do any of you know ppc asm? 20:15:24 sure 20:16:22 you have a question? 20:17:15 yes 20:17:19 http://www.eighty-twenty.org/~tonyg/Darcs/jonesforth/ppcforth.S.m4 20:17:36 i tried compiling that with gcc, but it just spat errors at me. 20:17:44 is there something wrong with the code? 20:18:02 well, it sounds like you should feed it through m4 first, possibly with some macro package 20:18:30 ew, m4 and _then_ the C preprocessor 20:19:02 it also looks like it will only work on OSX 20:19:04 i did all that. 20:19:07 oh i see. 20:19:10 not with an unmodified GNU as 20:19:29 you might try passing -mregnames (or is it -mreg-names?) 20:19:36 i'm trying to learn powerpc asm and it's proving as tedious to find good examples as i imagined. 20:19:42 or include the header file that defines r0 etc. 20:19:56 well, take the first insn for example 20:20:16 in powerpc asm, that is written lwz 29,0(31) 20:20:56 some people prefer to type "r" in front of every register. there is a standard header file just for that, which simply does #define r0 0 etc 20:21:09 so then you can do lwz r29,0(r30) 20:21:19 apple changed their assembler to _only_ accept that 20:21:28 they were thinking different, i guess 20:21:35 ah i see. 20:21:50 give me a second, i'll find the header for you 20:21:53 is it possible to strip it of the regnames nonsense? 20:22:44 you can pass -mregnames to the assembler -- via GCC, that will be -Wa,-mregnames 20:23:47 or you can do #include 20:24:38 or you could change all source code, but that sounds like a lot of work, heh 20:26:10 still reporting errors. 20:26:20 is that all i have to change? the r's and what not? 20:28:29 dunno, you didn't show the actual error messages 20:29:51 i have to go into hibernate mode very soon because my battery is really almost empty 20:29:57 mine, not my machine's 20:30:04 so hurry it :-) 20:31:03 ppcforth.S: Assembler messages: 20:31:03 ppcforth.S:1: Error: junk at end of line, first unrecognized character is `-' 20:31:07 things like that. 20:31:19 it just goes through the whole file and rips it to shreds. 20:31:26 so show the .S file 20:31:58 or that first line only ,heh 20:32:53 ;;; -*- mode: asm; comment-column: 40 -*- 20:32:56 hrm, you might want to get rid of the include 20:32:57 i think it doesn't like the comments. 20:32:59 heh 20:33:27 sounds like it didn't go through m4, or m4 didn't remove that as a comment 20:33:32 bjorkintosh: http://paste.lisp.org/display/88061 20:33:33 ; is not a comment char 20:33:42 that is the processed file that builds on my os x box 20:34:51 maybe ; is a comment on osx as, but it isn't on any other powerpc as 20:34:58 use # 20:35:17 or C-style comments 20:35:27 * crc assumes that ; is used since the port he linked to is for os x 20:35:42 if you use #, you have to watch out for things like # if because you are running it through the C preprocessor as well 20:35:45 --- join: madwork_ (n=madgarde@204.138.110.15) joined #forth 20:36:21 crc: could be that the m4 handles that, but it seems like this builds on osx only anyway 20:36:26 ah. 20:36:42 i'm running debian on my box... is there a way to de-osx-ify the src? 20:36:56 it'll take a fair amount of work 20:37:04 syscalls, etc would need adjusting 20:37:51 register usage as well maybe -- it uses GPR1 for the data stack, but the linux kernel will use it for signal delivery and stuff 20:37:59 yup 20:38:10 abi will be different for sure 20:38:28 shite. 20:38:33 so it might get pissed when it is unaligned, or stuff with red zone or whatever 20:38:42 the ABI isn't _much_ different 20:38:45 i've created far more work for myself than i intended. 20:39:13 this asm will result in a fairly slow Forth system fwiw 20:39:19 it's alright. 20:39:26 esp. if you are on a G5 or better 20:39:30 i wanted something to sink my teeth in. 20:39:38 well, you found it 20:39:39 it's a 350mhz imac :) 20:39:47 ah cool, a blue one 20:39:47 powerpc 750 i think. 20:39:53 indigo, yes. 20:39:53 got one of those 20:39:59 yeah, 750 copper 20:40:14 i thought it would be a good machine to learn ppc asm on. 20:40:21 it's nice yes 20:40:31 750 is a very well-balanced cpu 20:40:39 one of my favourites 20:40:40 i've found to my dismay that not only are there few tutorials out there for ppc, there's very little code to see. 20:41:32 do you know the wii is 750? you might want to look at http://git.infradead.org/users/segher/savezelda.git 20:41:32 if you're running linux, you could look at herkforth (a colorforth-style system for ppc linux) 20:41:43 there isn't terribly much asm in there though 20:42:11 i didn't know that about the wii. 20:42:27 it's a 750CL at 728.9MHz 20:46:06 anyway, bedtime now 20:46:38 thanks segher 20:46:59 crc, i just got herkforth ... i'm looking at it now. 20:47:27 it's been a few years since I ran it 20:48:01 it compiles. 20:48:09 and there's plenty there to look at. 20:48:20 yup 20:48:33 * crc is going to bed: nearly midnight here 20:48:34 i'll be back tomorrow if you have any powerpc questions 20:48:36 goodnight 20:48:41 nearly 6am here :-) 20:49:05 okay. 20:49:26 --- quit: segher ("Brain going into hibernation") 20:52:29 --- quit: madwork (Read error: 110 (Connection timed out)) 22:02:29 * madgarden is away: aseepin' 22:27:55 --- join: DrunkTomato (n=DEDULO@ext-gw.wellcom.tomsk.ru) joined #forth 22:33:12 --- quit: ASau` (Read error: 104 (Connection reset by peer)) 22:36:02 --- join: ASau` (n=user@ppp91-77-57-240.pppoe.mtu-net.ru) joined #forth 22:47:06 --- quit: ASau` (Read error: 104 (Connection reset by peer)) 22:47:41 --- join: ASau` (n=user@ppp91-77-57-240.pppoe.mtu-net.ru) joined #forth 22:51:46 --- quit: ASau` (Read error: 104 (Connection reset by peer)) 22:52:16 --- join: ASau` (n=user@ppp91-77-57-240.pppoe.mtu-net.ru) joined #forth 23:02:52 --- join: nighty^ (n=nighty@x122091.ppp.asahi-net.or.jp) joined #forth 23:02:52 --- quit: ASau` (Read error: 104 (Connection reset by peer)) 23:03:25 --- join: ASau` (n=user@ppp91-77-57-240.pppoe.mtu-net.ru) joined #forth 23:03:53 --- join: I440r (n=me@c-69-136-171-118.hsd1.in.comcast.net) joined #forth 23:04:44 --- quit: ASau` (Client Quit) 23:23:00 --- join: f[x] (n=user@95.133.227.251) joined #forth 23:36:07 --- quit: nighty- ("leaving") 23:39:50 --- join: nighty_ (n=nighty@122.249.122.91) joined #forth 23:59:59 --- log: ended forth/09.10.01