Fatal error a1010 unmatched block nesting

The END directive should not have anything following it. This directive indicates the end of the entire file, not a specific scope, so you don’t need to name the scope.
_{(Although you can optionally follow END with the name of the entry point procedure, which in your case would be main, this is not necessary and infrequently done in my experience.)}

Note that this is in contrast to ENDP (end procedure), which is prefixed with the name of the procedure that is coming to an end (the one started with the PROC directive).

The last three lines should look like this:

IsPrime ENDP   ; end the IsPrime procedure

END            ; end of the entire file

Your code would be significantly easier to read if you indented the lines according to each’s scope. Moreover, I suspect that would then allow you to find your own «unmatched block nesting» errors.

For example, you would also notice that there is no ENDP directive for the main procedure!

A corrected (and nicely formatted!) version:

INCLUDE Irvine32.inc


.data
org 100h ; set location counter to 100h


.code

;;;;;;;;;;;;;;;;;;;;;;;;
;; Main
;;;;;;;;;;;;;;;;;;;;;;;;

main PROC
    jmp CodeStart

  DataStart:
    max dw " "
    space db " ", 0

  CodeStart:
    mov bx, 1
    call IsPrime
    cmp dx, 0

  LoopStart:
    ; must be a prime
    mov ax, bx
    call print_num

    ; print a space
    mov si, offset space
    call print_string

    add bx, 1
    cmp bx, max

    jle LoopStart

    ret
main ENDP

;;;;;;;;;;;;;;;;;;;;;;;;
;; IsPrime
;;;;;;;;;;;;;;;;;;;;;;;;

IsPrime PROC
    ; uses a loop to determine if number in bx is prime
    ; upon return if bx not prime dx will be 0, otherwise dx > 0

    ; we only have to test divisors from 2 to bx/2

    ; prepare to divide dx:ax / 2
    mov ax, bx
    mov dx, 0
    mov cx, 2
    div cx

    ; move result into si for loop
    mov si, ax

    ; assume the value is prime
    mov dx, 1

    ; start loop at 2
    mov cx, 2

  PrimeLoop:

    ; compare loop count(in cx) and max loop value (in si)
    cmp cx, si

    ; jump out of loop if count(cx) > si
    ja StopLabel

    ; divide test value (in bx) by loop count (in cx)
    mov ax, bx
    mov dx, 0
    div cx

    ; check remainder (in dx), if zero then we found a divisor
    ; and the number cannot be prime
    cmp dx, 0

    ; if dx = 0 then we found a divisor and can stop looking
    je StopLabel

    ; increment count
    add cx, 1

    jmp PrimeLoop

  StopLabel:
    ret
IsPrime ENDP


END

Если кому интересно предлагаю программку
которая помогает отловить в коде ошибку — A1010
программка заточена под платформу Ассемблера — masm32

Пояснение к программке:

При программировании
компилятор платформы Ассемблера — masm32
в определённых случаях выдаёт ошибку

fatal error A1010:unmatched block nesting : .if-.repeat-.while

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

.if
.endif

.repeat
.until

.while
.endw

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

Если проект не большой то найти ошибку будет
относительно не сложно
но если проект большой да ещё в добавок
состоит из нескольких подключённых файлов
то в определённых случаях это может
мягко говоря затормозить процесс кодинга

Ради интереса можно проверить это тестом
например в каком нибудь проекте
в каком нибудь подключённом файле этого проекта
и в какой нибудь прописанной там функции
пропишите в её теле один из этих блоков
например просто блок пустышку

.if eax == 0

.endif

теперь если вы в этом блоке
закоментируете открывающую директиву

;.if eax == 0

.endif

и запустите компилятор то он выдаст ошибку

fatal error A1011:directive must be in control block

вначале этой ошибки — A1011
компилятор укажет вам имя подключённого файла
и номер строки закрывающей директивы — .endif
вольный перевод этой ошибки будет

‘Должна быть открывающая директива блока’

то есть в данном случае директива — .if

Но подобные ошибки компилятор не плохо раскрывает
а вот если вы вместо директивы — .if
закоментируете закрывающую директиву

.if eax == 0

;.endif

то тогда то и всплывёт неприятная ошибка — A1010
где компилятор скажет вам что блок не закрыт
и в большинстве случаев укажет вам бесполезный адрес
а в большом проекте найти эту ошибку
будет мягко говоря не совсем просто

Если вы например работаете с какой нибудь функцией
и случайно допустили там эту ошибку
то найти её будет по горячим следам проще
потому что вы прекрасно знаете
где в данный момент вы только что писали код
а вот если вы случайно или нет допустили эту ошибку
и потом без предварительной компиляции
стали писать какой нибудь другой код
в каком нибудь другом месте или например
отложили написание кода на завтра
то соответственно уже завтра компилятор вас ‘обрадует’
когда выведет вам на обозрение эту ошибку
и не факт что вы сразу догадаетесь где она может быть
это конечно смоделированная ситуация
но она просто показывает как она может изрядно
в некоторых случаях убить драгоценное время и нервы

Алгоритм поиска этой ошибки
в программе реализован так
данные анализируемого файла загоняются в буфер
и программа начинает искать эти сигнатуры

.if
.endif
.while
.endw
.repeat
.until

для каждого из этих трёх блоков
у программы есть три буфера
в который она записывает адрес строки открытия блока
и соответственно закрывает этот адрес
если блок закрывается соответствующей директивой
после прохода всего файла от начала до конца
программа просматривает эти буфера
и если в каком нибудь буфере или буферах
она найдёт открытые адреса строк данного блока
то программа формирует перечень найденных ошибок
и выводит их в окно программы для просмотра
так же в районе правого угла
появляется кнопка значок в виде стрелки
и если вас не устраивает информация в окне
можно кликнуть по этому значку
и тогда программа запишет эту информацию
в файл который будет иметь имя — $error$
и положит его рядом с исполнительным файлом

Программа может отловить и ошибку — A1011
это где компилятор напишет что
должна быть открывающая директива блока
но подобную ошибку и компилятор неплохо находит
по большому счёту эту программу можно использовать
в том случае если ваш компилятор
выдал вам именно ошибку — A1010
с непонятными координатами этой ошибки

Эта программа конечно не панацея
но в определённых случаях может помочь найти ошибку
при анализе она руководствуется только
заложеным в ней алгоритмом и своеобразными фильтрами
но предусмотреть все подводные камни очень сложно
программа работает с указанными сигнатурами
которые могут находиться например в обычном
текстовом файле но в любом случае программа
будет принимать их за чистую монету
или например если ошибка — A1011
будет в сочетании с ошибкой — A1010
то программа может выдать некоректные данные
но в любом случае она может существенно
уменьшить зону поиска проблемы

Если программа всё таки не нашла ошибку
или указала не правильную информацию
то это будет означать что алгоритму программы
не по зубам анализируемый в данный момент файл

Чтобы начать анализ нужно мышкой перетащить
в окно программы файл или папку
если перетащить папку
то программа проанализирует все файлы в этой папке
и если программа найдёт в этой папке
ещё и вложенные папки то программа включит рекурсию
и проанализирует так же все файлы в этих папках
а если перетащить в окно программы файл
то программа проанализирует все файлы
из этой же директории и соответственно
все вложенные папки в ней

Если по определённым причинам
надо проверить только избранные файл или файлы
тогда нужно эти файлы
скопировать в любую пустую папку
и перетащить эту папку в окно программы

У программы установлен лимит
не больше ста (100) файлов
во время поиска в шапке окна
будет прописыватся индикация файлов

Если программе для анализа попадётся бинарный файл
где в одном из байтов будет прописан ноль (0)
то программа естественно проигнорирует этот файл
все остальные бинарные файлы где нет нулей
программа будет анализировать

Если программа не найдёт своим алгоритмом ошибки
то она выведет это сообщение
и покажет количество файлов которые она просмотрела

Как только программа в одном из файлов
найдёт ошибку или ошибки
она сразу же прекратит поиск
и выведет эту информацию в окно программы
с указанием файла где она нашла ошибку или ошибки

ошибки блока — .if
будут первые в списке

ошибки блока — .while
будут вторые в списке

ошибки блока — .repeat
будут третьи в списке

Программа имеет заточку под кодинги
написанные под платформу — masm32

Если кому нибудь это хоть немного интересно
выкладываю ссылку на програмку на яндекс-диске

https://yadi.sk/d/qMdbjlDn3Hqzid

у файла пароль — assch

What is wrong with this assembly program?

I am very new to assembly language programming, so it is probably a very obvious error, but.

I use MSVC++, and when I compile any project that has a file with a .asm extension, it uses the rule

And just to make sure the compiler works, I tried the code

But when I compiled it, I get three errors

So I am just wondering, is there some obvious error in part of the code, or is it the compiler thats messing up.

6 Answers 6

You lack a «.code» directive before the code to make MASM know that this is supposed to be in the code segment. Aside from that, you do not RETURN in any way from the code, so the CPU blissfully tries to execute whatever bytes follow as if they were executable code. No wonder it crashes after running.

I asume that the code needs some directives, try this out:

Here, .model says that we’ll use a «small» memory program model and .code says that the following lines are executable code.

EDIT: Ok, there is another example tha should run ok.

From a quick browse, it seems that assembly under VS.NET is uncommon enough that you have to set up custom build rules. You can find an example here: http://www.cs.virginia.edu/

Out of curiosity, what are you trying to accomplish? If you’re just doing this for fun, or to learn assembly language, you’ll probably be better off using a dedicated assembly editor. The MASM32 SDK is one such option. You can then link to the libraries you create from the Visual Studio project.

Источник

Fatal error a1010 unmatched block nesting main

Welcome, Guest. Please login or register.
January 16, 2023, 11:20:16 PM

The MASM Forum Archive 2004 to 2012 Miscellaneous Forums 16 bit DOS Programming Unmatched block nesting

« previous next »

Pages: [1] 2

Author

Topic: Unmatched block nesting (Read 25571 times)

carlottagp New Member Posts: 24 My program has the following basic structure: TITLE LDA .MODEL SMALL .STACK 200h .DATA mov AX,@DATA mov DS,AX Five procedures, each with the xxx PROC, RET, xxx ENDP format ZE: mov AX,4C00h int 21h When I try to assemble it, I get the error message: LDA.asm (259) Fatal error A1010: unmatched block nesting: LDAB All of the procedures function correctly on their own, and in any case that’s apparently not where my problem is. Can someone explain the “unmatched block nesting” comment to me? Thanks Logged

Mark Jones Drifting in the Abstract Member Posts: 2302 Logged New Member Posts: 24 Thanks for the suggestion. Actually, I have about eight programs written so far, all of which have procedures inside the main procedure, and they all work just fine. In other words, in the main program I have a number of CALL instructions, each of which invokes a subroutine with the format I mentioned: PROC. code. RET..ENDP. For instance (the smallest subroutine I’ve written so far) CRLF PROC ;writes CR, LF to file mov AH,40h mov BX,handle mov CX,2 mov DX,offset buffc int 21h jc MB RET CRLF ENDP Logged

Mark Jones Drifting in the Abstract Member Posts: 2302 Hmm, it sounds like the error message is generated if another PROC is encountered before the previous ENDP, i.e. Could you try altering the code as follows? Logged New Member Posts: 24 All of my procedures are in the same format as the example I posted; i.e. no CALLs to another procedure within the one that’s running. I have tried moving all procedures to a point after the ENDP END for the main procedure, with no success. Is it possible that there’s a number-of-lines limit problem here? Not trying to muddy the waters, but could there be a problem with the software I’m using to assemble my programs? It came with Kip Irvine’s assembly language book. This morning I observed, using the CodeView 4.10 that came with it, that a line was skipped as I was stepping through the program, trying to debug it. Just an ordinary line, something like mov BX, 12h. It happened again and again. I’m bothered enough to want to go out and try to find a package of assembly language software. Logged

MichaelW Global Moderator Member Gender: Posts: 5161 I doubt that the problem has anything to do with line length or the tools. The only way I can find to produce an unmatched block nesting error with code like you seem to be describing is to have an overlap between the procedure definitions, as in Mark’s example. IIRC you cannot nest procedures that have a stack frame, and without a stack frame a procedure cannot support parameters or local variables, so under these conditions a procedure is little better than label, so why not just use a label? Logged New Member Posts: 24 I am interested in your suggestion to use a label instead of a procedure. . except that I don’t see how to implement the return function at the end of the procedure. Could you perhaps illustrate the idea by showing me how to write the CRLF subroutine I quoted earlier? At the moment I just CALL the procedure when I need to, and this puts the appropriate return address on the stack, to be used when the RET instruction is encountered. Incidentally, by shuffling the order in which the subroutines are called I was able to make the original program work. However, CodeView insists that there is a «fatal error» in the program; this is why I wonder if my assembly-language software, including CV, is flaky. Logged

ChrisLeslie Your original code should have an «end xxx» directive with an entry label instead of just «end». You can call or invoke proc from within procs, but if you nest a proc within a proc, the ret instruction will return program flow to the wrong place. As MichaelW said, it may be appropriate to use simple labels instead of procs in many circumstances if you are not using a stack frame. In this way you will effectively be creating subroutines. For example, the CRLF subroutine could be: where you use «call CRLF». Or better still in my opinoin is a macro: where you just use CRLF in your code. Logged

sinsi Member Gender: Posts: 1758 RIP Bodie 1999-2011 proc1 proc mov eax,eax proc2 proc ret proc2 endp ret proc1 endp main proc call proc1 call proc2 ret main endp will compile and link no worries. With your CRLF proc, jumping out of a PROC is as bad as a BASIC GOTO (a PROC is self-contained and has one exit point (so I have been told )) ChrisLeslie: using your macro 50 times in a program will scatter 50 times «13,10,$» through your .data Logged The problem with the nested proc example that you gave is that any code that may exist in proc1 after the proc2 block will not be executed because proc2’s «ret» will cause proc1 to return. Unfortunately that is correct that when using macros that code, and any data, is repeated upon every invocation. I think it depends on the circumstances and one’s preferences whether a macro is the best choice. Logged

sinsi Member Gender: Posts: 1758 RIP Bodie 1999-2011 Sorry Chris, bad example since proc2 doesn’t need to return if proc1 does. (Too lazy to actually think up some code that works heh heh.) On that CRLF macro, maybe something like Logged Ahh, IFENDEF. That should be an improvement. I havn’t used it yet but it sounds useful. Logged

MichaelW Global Moderator Member Gender: Posts: 5161 Yes, but only if the procedures do not have parameters or automatic local variables. If they do, then you will get: error A2144: cannot nest procedures Logged Member Gender: Posts: 1758 RIP Bodie 1999-2011 Oops . We live and learn. In my meagre defense, I have never used nested PROCs in ASM (I think Delphi treats one as a «local» procedure?). MichaelW, I am curious as to what an «automatic local variable» is. I understand a defined local variable but what’s an automatic one? Logged Global Moderator Member Gender: Posts: 5161 By automatic local variable I mean a local variable created with the LOCAL directive. MASM will not return an error if a nested procedure has local variables that were created manually. And my statement was not correct. For a nested procedure with LOCAL and no parameters, MASM returns: error A2012: PROC, MACRO, or macro repeat directive must precede LOCAL Источник Adblock detector