перехал на другой дисплей и оказалось, о ужас, что мои цветовые настройки emacs-а пестры как попугай. Попробовал сам подобрать новые цвета - не многим лучше. Короче, работа встала из-за такой мелочи.

прошу всех, кому не жадно, поделиться своими конфигами(вернее блоками с описанием цветов) в этой теме, дай бг, что нибудь да подойдёт. Шрифты тоже неплохо было бы указать, мало ли.

п.с. возможно не совсем в тему подфорума, но тут больше вероятность найти нужных людей

В конторе хотят установить другой браузер вместо ie, мешает только то, что ie поддерживает групповые политики, с помощью которых он получает настройки с нашего сервера(тоже win), а для других браузеров о подобной возможности из нас никто не слышал. Если есть готовое решение, буду рад узнать. Иначе прийдётся писать грабер ручками.

заранее спасибо

Как в консоли двигаться вверх с клавы? Fn нет

Однажды поднимал этот вопрос, но так толком и не разобрался. Мой костыль:

(defun test (l)
  (setf (car l) 1))

(let ((a (list 0)))
	   (test a)
	   a)
(1)

Может есть что-то, из коробки умеющие сворачивать тела ф-ций? Вроде я что-то такое видел когда-то давно, но не помню в емаксе или в чём-то другом(во всяких ide не считаю)?

Не к спеху, да и обойтись можно, но было бы удобно сворачивать ф-ции, над которыми работа законченна(т.е. неплохо и сохранение параметров прикрутить).

нужно по ходу работы программы сохранять в файл(в любом формате пригодном для дальнейшего возрождения в программу) лямбды. Сначала сделал по привычке через cl-store, но оказалось что он не умеет правильно работать с ф-циями. С другой стороны на ум сразу приходит идея компилить и делать в будущем просто load. Я так, видимо, и сделаю. Только прийдётся сохранять все такие ф-ции с одним именем, в текстовом формате(это ужасно! мне придётся изменить внутреннее представление этих ф-ций). Как-то некрасиво получается, ведь всё что мне нужно - работать с объектами-функциями как с объектами, а не как с областями определений. Может есть какой-то способ?

Как-то невнятно пишу, вот так понятнее наверн будет) -

;вот как было бы всё просто при рабочем cl-store:
(cl-store:store (lambda () 1) "test") ;  save
(funcall (cl-store:restore "test"))
1

;а вот так пока видится это сейчас:
(save-as-text "(defun sled () (lambda () 1))" "test")
(compile-file "test")
(load "test.fasl")
(funcall (sled))
1

;так-то даже ничего, но хз что будет при попытке распараллеливания, к примеру

посылаю сигнал из хэндлера, обрабатывающего другой сигнал, примерно так -

(g-signal-connect event-box "button-release-event"
			      #'(lambda (w event)
				  ;...
	          		    (emit-signal draw-area "expose-event")))
				  

(g-signal-connect draw-area "expose-event"
;...
)

Unhandled memory fault at #x3317.
   [Condition of type SB-SYS:MEMORY-FAULT-ERROR]

Restarts:
 0: [RETURN-FROM-G-CLOSURE] Return value from closure
 1: [TERMINATE-THREAD] Terminate this thread (#<THREAD "cl-gtk2 main thread" RUNNING {C884309}>)

Backtrace:
  0: (SB-SYS:MEMORY-FAULT-ERROR)
      [No Locals]
  1: ("foreign function: #x80643BB")
  2: ("foreign function: #x80646F0")
  3: ("foreign function: #xB61006F0")
  4: ("foreign function: #xB610645E")
  5: (GOBJECT.FFI:G-VALUE-UNSET #.(SB-SYS:INT-SAP #X081DAEE4))

как можно вывести mouse pointer относительно какого нибудь виджета? к примеру drawing-area?

display-warp-pointer выводит курсор относительно default-display, т.е. нужно получить координаты моей drawing-area относительно default-display.

Вроде можно с помощью gtk-window-get-position достать координаты окна-котнейнера, и (с помощью GtkAllocation? как?) останется получить координаты drawing-area относительно окна.

где биндинг для этой ф-ции в cl-gtk2? widget-event? тогда не пойму, почему не работает такой код -

(within-main-loop 
       (let ((w (make-instance 'gtk-window))
	     (ev (make-instance 'event-box))
	     (l (make-instance 'label :label "usudfs")))
	 (g-signal-connect w "destroy" #'gtk-main-quit)
	 
	 (container-add w ev)
	 (widget-show ev)
	 
	 (container-add ev l)
	 (widget-show l)
	 
	 (widget-event ev :button-press-mask)
	 (g-signal-connect ev "button-press-event" #'(lambda (w e)
						       (declare (ignore e))
						       (quit-callback w)))			   	 
	 (widget-realize ev)
	 (widget-show w)))

lindie@laptop ~/.sbcl/site $ grep -r 'gtk_widget_set_event' ./
lindie@laptop ~/.sbcl/site $ grep -r 'gtk-event' ./
./cl-gtk2-gtk-0.1.1/gtk.main-loop-events.lisp:(defcfun gtk-events-pending :boolean)
./cl-gtk2-gtk-0.1.1/gtk.main-loop-events.lisp:(export 'gtk-events-pending)
./cl-gtk2/gtk/gtk.main-loop-events.lisp:(defcfun gtk-events-pending :boolean)
./cl-gtk2/gtk/gtk.main-loop-events.lisp:(export 'gtk-events-pending)
./cl-gtk2/doc/gtk.main_loop.texi:Runs a single iteration of the mainloop. If no events are waiting to be processed Gtk+ will block until the next event is noticed. If you don't want to block look at @ref{gtk-main-iteration-do} or check if any events are pending with @ref{gtk-events-pending} first.
./cl-gtk2/doc/gtk.main_loop.texi:@RFunction gtk-events-pending
./cl-gtk2/doc/gtk.main_loop.texi:(gtk-events-pending) @result{} boolean

Цель - зона, в которой может происходить отрисовка. размеченная сеткой, по которой можно передвигать курсор. аля автокад.

Мои мысли - в качестве «полотна» взять, к примеру, gtk_image, завернуть в event_box. Не знаю только что делать с сеткой - вроде очевидно корректировать координаты курсора с помощью какого нибудь сигнала, вроде motion-notify_event, аппроксимируя до целых, но нет ли лучшего способа?

Надеюсь на подсказку более хорошего решения в общем и в частности с сеткой

Не могу понять, почему не привязываются(нет никаких признаков их выполнения) callbacks в следующем коде:

(defun open-file-callback (widget)
  (declare (ignore widget))
  (let ((win (make-instance 'gtk-window :title "Select filename"))
	(fc (make-instance 'file-chooser-widget :width-request 450 :height-request 550))
	(h-box (make-instance 'h-box)) 
	(ok-button (make-instance 'button :label "Ok" :width-request 80))
	(cancel-button (make-instance 'button :label "Cancel" :width-request 80)))
    
    (box-pack-end h-box ok-button :expand nil)
    (box-pack-end h-box cancel-button :expand nil)
    (setf (file-chooser-extra-widget fc) h-box)
    
    (container-add win fc)
    (widget-show win)
     ;<--- *

    ;*
    (g-signal-connect cancel-button "activate" #'(lambda (w)
						   (declare (ignore w))
						   (format *std-out* "Cool, I'm button")
						   (object-destroy win)))
    (g-signal-connect ok-button "activate" #'(lambda (w)
					       (declare (ignore w))
					       (format *std-out* "Cool, I'm button")
					       (grep-file (file-chooser-get-file fc))))))

   (g-signal-connect open-file "activate" #'open-file-callback)

в одну строку не всегда помещаются подсказываемые параметры ф-ций, как сделать чтобы он изменял свой размер по мере необходимости?

при вызове gtk-main-quit по сигналу из menuitem приложение завершает работу, но остаётся пустое(мёртвое) окно. Может qtk-main-quit недостаточно и нужно напрямую уничтожать главный виджет или я ещё что-то не так пытаюсь сделать?

Нужно выбрать средство визуализации для программы моделирования работы электр. схем. Т.е. работать с графическими элементами, добавлять, удалять, перетаскивать...
Основные требования -

• простота (большая производительность не требуется, а вот лёгкость работы с ней да)
• свобода(проприетарные вещи не хочется использовать)
• как предел мечтаний - биндинги к Common Lisp

мм, плохо разбираюсь в вопросе, поэтому пока других требований нет..) Графика, наверное, больше подойдёт векторная. И т.к. визуализация - задача не первостепенная в этом случае, то не хочется углубляться в OpenGl, не узнав про более простые пути.

заранее спасибо

(let ((l (list 1 2 3)))
	   (let ((lambda-list 
		  (loop for i in l collect
		       (lambda () (print i)))))
	     (loop for lam in lambda-list 
		do (funcall lam)))) 
3 
3 
3 
NIL

(let ((l (list 1 2 3)))
	   (let ((lambda-list 
		  (loop for i in l collect
		       (let ((j i))
			 (lambda () (print j))))))
	     (loop for lam in lambda-list 
		do (funcall lam)))) 
1 
2 
3 
NIL

Собственно принимаю это как фичу, просто интересно стало, на каком этапе происходит связывание внутри тела lambda, если имеем такой результат в первом листинге?

Добрый вечер, интересует как можно фильтровать файлы при открытии в емаксе. К примеру, чтобы open-dribble-file при дополнении по tab отображал только файлы с разрешением .c ? Пока приходит в голову написать ф-цию, которая бы парсила и выбирала файлы по маске, но может есть готовые решения, чтобы свои велосипеды не строить?

доброго времени Лор, прошу совета.

Ситуация такая, хочу найти работу, связанную с IT, на время студ. жизни и в связи с этим нужно выбрать какую-то область и технологию, которая бы была интересна и востребована. В принципе, открыт всему новому, готов потратить достаточное время на изучение))

Знания пока ограничиваются небольшой практикой функциональщины, давним ковырянием с++ и с (давним, но достаточно глубоко), cl, небольшим временем работы php-кодером(также было достаточно давно) и самые основы cs и архитектуры компьютеров.

Советов хочется дельных, желательно основанных на собственном опыте. Надеюсь на не жадных до работы граждан)

надо работать с usb-портом. Я не имею в этом совершенно никаких знаний. Почитал howto на то как это реализуется на С или асме, с чтением/записью вроде понятно, не понял как выйти на определённый usb-порт, как они адресуются.

пишу на common lisp, хочу спросить касательно этого языка. какие средства стоит использовать? если /dev/port то как? пока нашёл такую инфу, но там походу завязано на CMUCL

всем заранее спасибо

Добрый день. я решил продолжить эту тему в новом топике.

Прочитав описания ф-ций этого пакеты я не достаточно хорошо понял как с ним работать. Другими словами хотелось бы примеров, простых и посложнее. Первый вопрос - что(как) делать с thread после её создания?

Для меня нынче две кружки кофе в день стало нормой, год назад пил не больше раза в неделю. Напоминает чем-то сигаретную зависимость)