Changeset 7685


Ignore:
Timestamp:
Nov 20, 2007, 3:10:17 AM (12 years ago)
Author:
rme
Message:

Merge trunk changes r7666:7684

Location:
branches/ia32
Files:
1 deleted
4 edited
1 copied

Legend:

Unmodified
Added
Removed
  • branches/ia32/cocoa-ide/cocoa-editor.lisp

    r7666 r7685  
    3030(def-cocoa-default *wrap-lines-to-window* :bool nil
    3131                   "Soft wrap lines to window width")
     32
     33(def-cocoa-default *use-screen-fonts* :bool t "Use bitmap screen fonts when available")
    3234
    3335(defmacro nsstring-encoding-to-nsinteger (n)
     
    15371539      (#/setTypesetter: layout (make-instance 'hemlock-ats-typesetter))
    15381540      (#/addLayoutManager: textstorage layout)
    1539       (#/setUsesScreenFonts: layout t)
     1541      (#/setUsesScreenFonts: layout *use-screen-fonts*)
    15401542      (#/release layout)
    15411543      (let* ((contentsize (#/contentSize scrollview)))
     
    21492151(defun size-of-char-in-font (f)
    21502152  (let* ((sf (#/screenFont f))
    2151          (screen-p t))
     2153         (screen-p *use-screen-fonts*))
    21522154    (if (%null-ptr-p sf) (setq sf f screen-p nil))
    21532155    (let* ((layout (#/autorelease (#/init (#/alloc ns:ns-layout-manager)))))
  • branches/ia32/cocoa-ide/ide-contents/Resources/English.lproj/preferences.nib/info.nib

    r7604 r7685  
    99        <key>IBOpenObjects</key>
    1010        <array>
    11                 <integer>1500858</integer>
     11                <integer>1501086</integer>
    1212        </array>
    1313        <key>IBSystem Version</key>
    14         <string>9A581</string>
     14        <string>9B18</string>
    1515        <key>targetFramework</key>
    1616        <string>IBCocoaFramework</string>
  • branches/ia32/lisp-kernel/x86-spentry64.s

    r7340 r7685  
    24462446        __(cmpb $fulltag_cons,%imm1_b)
    24472447        __(jne 9f)
    2448         __(_car(%arg_z,%arg_x))
     2448        __(addw $node_size,%imm0_w)
     2449        __(_car(%arg_z,%arg_x))
    24492450        __(_cdr(%arg_z,%arg_z))
    2450         __(addl $node_size,%imm0_l)
     2451        __(js 8f)
    24512452        __(compare_reg_to_nil(%arg_z))
    24522453        __(push %arg_x)
     
    26912692
    26922693_spentry(makestacklist)
     2694        __(testq %arg_y,%arg_y)
     2695        __(js 9f)
     2696        __(testb $fixnummask,%arg_y_b)       
    26932697        __(movq %arg_y,%imm0)
     2698        __(jne 9f)
    26942699        __(addq %imm0,%imm0)
    26952700        __(rcmpq(%imm0,$tstack_alloc_limit))
     
    27152720        __(movq %temp1,%arg_z)
    27162721        __(ret)
     27229:      __(uuo_error_reg_not_type(Rarg_y,error_object_not_unsigned_byte))
    27172723_endsubp(makestacklist)
    27182724
     
    39203926        __(movq %rsp,%rcontext:tcr.save_vsp)
    39213927        __(movq %rbp,%rcontext:tcr.save_rbp)
     3928        __(movq $TCR_STATE_FOREIGN,%rcontext:tcr.valence)
    39223929        __(movq %rcontext:tcr.foreign_sp,%rsp)
    39233930        __(stmxcsr %rcontext:tcr.lisp_mxcsr)
    3924         __(movq $TCR_STATE_FOREIGN,%rcontext:tcr.valence)
    39253931        __(emms)
    39263932        __(ldmxcsr %rcontext:tcr.foreign_mxcsr)
     
    39883994         __(stmxcsr %rcontext:tcr.ffi_exception)
    39893995        __endif
    3990         __(movq $TCR_STATE_LISP,%rcontext:tcr.valence)
    39913996        __(movq %rcontext:tcr.save_vsp,%rsp)
    39923997        __(movq %rcontext:tcr.save_rbp,%rbp)
     3998        __(movq $TCR_STATE_LISP,%rcontext:tcr.valence)
    39933999        __(pop %save3)
    39944000        __(pop %save2)
     
    41184124        __(movq %rsp,%rcontext:tcr.save_vsp)
    41194125        __(movq %rbp,%rcontext:tcr.save_rbp)
     4126        __(movq $TCR_STATE_FOREIGN,%rcontext:tcr.valence)
    41204127        __(movq %rcontext:tcr.foreign_sp,%rsp)
    41214128        __(stmxcsr %rcontext:tcr.lisp_mxcsr)
    4122         __(movq $TCR_STATE_FOREIGN,%rcontext:tcr.valence)
    41234129        __(emms)
    41244130        __(ldmxcsr %rcontext:tcr.foreign_mxcsr)
     
    41904196         __(stmxcsr %rcontext:tcr.ffi_exception)
    41914197        __endif
    4192         __(movq $TCR_STATE_LISP,%rcontext:tcr.valence)
    41934198        __(movq %rcontext:tcr.save_vsp,%rsp)
    41944199        __(movq %rcontext:tcr.save_rbp,%rbp)
     4200        __(movq $TCR_STATE_LISP,%rcontext:tcr.valence)
    41954201        __(pop %fn)
    41964202        __(pop %save3)
     
    43114317        __(movq %rsp,%rcontext:tcr.save_vsp)
    43124318        __(movq %rbp,%rcontext:tcr.save_rbp)
     4319        __(movq $TCR_STATE_FOREIGN,%rcontext:tcr.valence)
    43134320        __(movq %rcontext:tcr.foreign_sp,%rsp)
    4314         __(movq $TCR_STATE_FOREIGN,%rcontext:tcr.valence)
    43154321        __(emms)
    43164322        __(movq (%rsp),%rbp)
     
    43434349        __(clr %fn)
    43444350        __(pxor %fpzero,%fpzero)
    4345         __(movq $TCR_STATE_LISP,%rcontext:tcr.valence)
    43464351        __(movq %rcontext:tcr.save_vsp,%rsp)
    43474352        __(movq %rcontext:tcr.save_rbp,%rbp)
     4353        __(movq $TCR_STATE_LISP,%rcontext:tcr.valence)
    43484354        __(pop %fn)
    43494355        __(pop %save3)
     
    44964502        __(clr %fn)
    44974503        __(pxor %fpzero,%fpzero)
     4504        __(movq %rcontext:tcr.save_vsp,%rsp)
     4505        __(box_fixnum(%rax,%arg_y))
     4506        __(movq %rbp,%arg_z)
     4507        __(movq %rcontext:tcr.save_rbp,%rbp)
    44984508        __(movq $TCR_STATE_LISP,%rcontext:tcr.valence)
    4499         __(movq %rcontext:tcr.save_vsp,%rsp)
    45004509        __(movq (%rsp),%save3)
    45014510        __(movq 8(%rsp),%save2)
     
    45054514        __(andb $~mxcsr_all_exceptions,%rcontext:tcr.foreign_mxcsr)
    45064515        __(ldmxcsr %rcontext:tcr.lisp_mxcsr)
    4507         __(box_fixnum(%rax,%arg_y))
    4508         __(movq %rbp,%arg_z)
    4509         __(movq %rcontext:tcr.save_rbp,%rbp)
    45104516        __(movq $nrs.callbacks,%fname)
    45114517        __(lea local_label(back_from_callback)(%rip),%ra0)
Note: See TracChangeset for help on using the changeset viewer.