Fresh IDE . Check-in [17292b7f38]
Not logged in

This repository is a mirror!

The original is located on: https://fresh.flatassembler.net/fossil/repo/fresh
If you want to follow the project, please update your remote-url

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:More readable comments.
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:17292b7f38d8b038b89dd48d6144a0be4fddcfc3
User & Date: johnfound 2018-12-05 11:32:03
Context
2019-05-26
14:20
Code cleanup. check-in: bc30a1af9f user: johnfound tags: trunk
2018-12-05
11:32
More readable comments. check-in: 17292b7f38 user: johnfound tags: trunk
09:21
Merged with the latest FreshLibDev. check-in: 695640ceff user: johnfound tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to source/sourceeditor.asm.

571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
...
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610

        mov     dword [esp], '_'

@@:
        pop     eax

        call    AsmEdit.recognize_character
        jnc     .endchar     ; if nor separator char.

; if separator character.

        call    .insert_text_proc      ; this approach makes problem when one wants to type sequence of dot characters.

        cmp     [.wparam], $bc
        jne     .maybedot
................................................................................
        test    eax, $8000
        jnz     .closekey

        stdcall CreatePAHint, [.hwnd]
        jmp     .closekey

.maybedot:
        cmp     [.wparam], $ba  ; ;: key
        jne     .maybedot2

        invoke  GetKeyState, VK_SHIFT
        test    eax, $8000
        jnz     .endchar

.maybedot2:
        cmp     [.wparam], $be  ; .> key
        jne     .closekey

.itsdot:
        invoke  GetKeyState, VK_SHIFT
        test    eax, $8000
        jnz     .closekey








|







 







|







|







571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
...
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610

        mov     dword [esp], '_'

@@:
        pop     eax

        call    AsmEdit.recognize_character
        jnc     .endchar     ; if not separator char.

; if separator character.

        call    .insert_text_proc      ; this approach makes problem when one wants to type sequence of dot characters.

        cmp     [.wparam], $bc
        jne     .maybedot
................................................................................
        test    eax, $8000
        jnz     .closekey

        stdcall CreatePAHint, [.hwnd]
        jmp     .closekey

.maybedot:
        cmp     [.wparam], $ba  ; ";" or ":" key
        jne     .maybedot2

        invoke  GetKeyState, VK_SHIFT
        test    eax, $8000
        jnz     .endchar

.maybedot2:
        cmp     [.wparam], $be  ; "." or ">" key
        jne     .closekey

.itsdot:
        invoke  GetKeyState, VK_SHIFT
        test    eax, $8000
        jnz     .closekey