Forth http://fforum.winglion.ru/ |
|
Symbian http://fforum.winglion.ru/viewtopic.php?f=38&t=422 |
Страница 1 из 1 |
Автор: | forth@km.ru [ Вт дек 19, 2006 12:03 ] |
Заголовок сообщения: | Symbian |
Давно облизываюсь на Nokia E6x с симбианом, сейчас пойду попробую взять в кредит. Хотелось бы иметь какой-нибудь on-board скриптовый язык, прежде всего задумался о Форте (как о наименее ресурсоемком варианте). Кто делает свой или использует готовый ? Желательно полностью opensource/freeware -- есть риск что будет использоваться в корпоративных задачах, желательно чтобы не было проблем с лицензированием. ЗЫ: есть конечно вариант использовать мой FVM, но очень не хочется возиться с написанием полноценной интерактивной форт-системы. |
Автор: | Владимир [ Вт дек 19, 2006 13:21 ] |
Заголовок сообщения: | Re: Symbian |
Сразу скажу, что я сам под него не писал, и в ближайшее время вряд ли займусь. Но думаю, что лучше таки заморочиться. С симбианом не все так гладко. Я бы виртуальную форт-машину реализовал, поскольку как раз с лицензированием, по отзывам знакомых, у симбиана завязаны доверенные сертификаты ПО или что-то такое (это попытка защититься от пиратов )... И программировать под него на родном квази-С++ языке довольно неудобно. А про Форт под симбиан имхо вообще глухо |
Автор: | day [ Вт дек 19, 2006 21:06 ] |
Заголовок сообщения: | |
Почему глухо? На с++ значит там можно писать, а на форте нет? Спасибо, смеялся. Сертификаты есть и у WinMobile ну и что? Короче, SPF5 будет поддерживать ARM архитектуру, останется только запустить на симбиане и разобраться с системными вызовами. Best Regards, Dmitry Yakimov |
Автор: | Владимир [ Ср дек 20, 2006 08:31 ] |
Заголовок сообщения: | |
Цитата: Почему глухо? На с++ значит там можно писать, а на форте нет?
Замечу, что я не сказал, что на форте под симбиан нельзя писать. Я сказал, что под симбиан нет настолько развитых форт-систем, чтобы конкурировать с++. |
Автор: | forth@km.ru [ Вт дек 26, 2006 23:05 ] |
Заголовок сообщения: | |
А зачем конкурировать ? Я свой Форт как раз и задумывал так,чтобы не иметь никаких проблем с интеграцией форт-машины и готовых mainstream решений. Ну машинка уже есть, специально клавиатурный коммуникатор искал (с него и пишу), SDK тоже лежит, так что на новый год может будет первая версия интерпретатора байт-кода и CLI |
Автор: | forth@km.ru [ Вт дек 26, 2006 23:10 ] |
Заголовок сообщения: | |
А в симбиане нативный маш код используется, или как в 5 палмосе ретранслятор из команд 68К или байт-кода ? |
Автор: | Kopa [ Чт дек 06, 2007 10:14 ] |
Заголовок сообщения: | |
Немного погуглил и вот например вариант портирования Форта для Симбиан ( на базе hForth ). через С/С++ на ASMе для ARM http://gumbley.me.uk/epoc-forth.html P.S. Странно, что на его никто не дал ссылку:). Последня дата некоторых файлов в архиве ( 08.02.2000 г.) |
Автор: | Mihail [ Чт дек 06, 2007 12:17 ] |
Заголовок сообщения: | |
Kopa писал(а): Форта для Симбиан ( на базе hForth ). через С/С++
на ASMе для ARM Зачем там Код: $CODE 2,'W@',WAT,_SLINK ldrh r1, [tos] ;get the word mov tos, r1 ;bung back on the stack $NEXT У меня Код: CODE W@ ( a - w) ldrh TOS, [TOS] NEXT ASMARM_END Работает Еще Код: CODE >
swp TOS,TOS,[DSTK] CODL < dpop r1 subs TOS,r1,TOS @ TOS = a-b -- msbit set if a is less than b CODL 0< mov TOS,TOS,asr #31 @ turn msbit into 0xffff or 0x0000 NEXT ASMARM_END CODE U> swp TOS,TOS,[DSTK] CODL U< dpop r1 subs TOS,r1,TOS @ TOS = a-b -- carry set if a is less than b sbc TOS,TOS,TOS NEXT ASMARM_END CODE = ( a b - f) dpop R1 eor TOS, R1 TOS CODL 0= subs TOS, TOS, #1 sbc TOS, TOS, TOS NEXT ASMARM_END CODE 2R> str TOS, [DSTK,#-4]! \ DUP ldr TOS, [RSTK], #4 CODL R>SWAP str TOS, [DSTK,#-4]! \ DUP ldr TOS, [RSTK], #4 CODL SWAP swp TOS, TOS, [DSTK] NEXT ASMARM_END CODE OVER ( n1 n2 -- n1 n2 n1 ) str TOS, [DSTK,#-4]! ldr TOS, [DSTK, #4] NEXT ASMARM_END CODE ?DUP tst TOS, TOS strne TOS, [DSTK, #-4]! @ only if TOS is non-zero do we dup it NEXT ASMARM_END CODE UM* ( u1 u2 - ud) ldr r1, [DSTK] umull r0, r3, TOS, r1 @ r3:r2 := TOS * r1 str r0, [DSTK] @ store ls32bits on stack mov TOS, r3 @ TOS := ms32bits NEXT ASMARM_END CODE M* ( n1 n2 - d) \ We probably want a 32x32-->64 signed multiply also ldr r1, [DSTK] smull r0, r3, TOS, r1 @ r3:r2 := TOS * r1 str r0, [DSTK] @ store ls32bits on stack mov TOS, r3 @ TOS := ms32bits NEXT ASMARM_END |
Автор: | Kopa [ Чт дек 06, 2007 13:08 ] |
Заголовок сообщения: | |
На всякий случай:) Здесь есть Ассемблер и дизасемблер для ARM на Форте. http://home.clara.net/tixy/source/index ... 0Assembler |
Страница 1 из 1 | Часовой пояс: UTC + 3 часа [ Летнее время ] |
Powered by phpBB © 2000, 2002, 2005, 2007 phpBB Group http://www.phpbb.com/ |